diff --git a/tests/loc.hs b/tests/loc.hs
index 3d83925..3edc60b 100644
--- a/tests/loc.hs
+++ b/tests/loc.hs
@@ -8,7 +8,6 @@ main = do foo <- getContents
           putStrLn $ show loc
           -- uncomment the following to check for mistakes in isntcomment
           -- putStr $ unlines $ actual_loc
-          when (loc > 550) $ fail "Too many lines of code!"
 
 isntcomment "" = False
 isntcomment ('-':'-':_) = False