From 32ba0d4a0db40ca45fba54603735163610ac7adf Mon Sep 17 00:00:00 2001
From: gwern0 <gwern0@gmail.com>
Date: Sat, 13 Feb 2010 23:15:37 +0000
Subject: [PATCH] loc.hs: hlintify

---
 tests/loc.hs | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/tests/loc.hs b/tests/loc.hs
index 09399ea..238204a 100644
--- a/tests/loc.hs
+++ b/tests/loc.hs
@@ -5,9 +5,9 @@ main = do foo <- getContents
           let actual_loc = filter (not.null) $ filter isntcomment $
                            map (dropWhile (==' ')) $ lines foo
               loc = length actual_loc
-          putStrLn $ show loc
+          print loc
           -- uncomment the following to check for mistakes in isntcomment
-          -- putStr $ unlines $ actual_loc
+          -- print actual_loc
 
 isntcomment ('-':'-':_) = False
 isntcomment ('{':'-':_) = False -- pragmas