Repository : ssh://darcs.haskell.org//srv/darcs/packages/base On branch : master
http://hackage.haskell.org/trac/ghc/changeset/c8dc0b8b5026d9c25f93d793b59c1fbbe3d9f4a5 >--------------------------------------------------------------- commit c8dc0b8b5026d9c25f93d793b59c1fbbe3d9f4a5 Author: Ian Lynagh <[email protected]> Date: Sat Nov 19 23:14:21 2011 +0000 Whitespace only in hash001 test >--------------------------------------------------------------- tests/hash001.hs | 4 +++- 1 files changed, 3 insertions(+), 1 deletions(-) diff --git a/tests/hash001.hs b/tests/hash001.hs index 727f488..3ea6563 100644 --- a/tests/hash001.hs +++ b/tests/hash001.hs @@ -1,3 +1,4 @@ + import Data.HashTable import qualified Data.HashTable as HT @@ -7,7 +8,8 @@ test n = do ht <- new (==) hashInt sequence_ [ insert ht key 1 | key <- [0..n]] let check key = do (Just val) <- HT.lookup ht key - if val==1 then return () else putStrLn $ show key + if val==1 then return () + else putStrLn $ show key sequence_ [ check key | key <- [0..n]] _______________________________________________ Cvs-libraries mailing list [email protected] http://www.haskell.org/mailman/listinfo/cvs-libraries
