diff --git a/Tests.hs b/Tests.hs
index 6ea1c02a0..1a68ce0af 100644
--- a/Tests.hs
+++ b/Tests.hs
@@ -231,6 +231,7 @@ misc_tests = TestList [
   "ledgerDefaultYear" ~: do
     -- something to check default year parsing doesn't blow up
     rl <- rawledgerfromstring "Y2009\n"
+    return ()
 
   ]