@@ -24,6 +24,8 @@ benchmark fp = return $ bgroup "Equality"
24 B.readFile fp >>= evaluate . func . B.lines
24 B.readFile fp >>= evaluate . func . B.lines
25 , bench "LazyByteString" $
25 , bench "LazyByteString" $
26 BL.readFile fp >>= evaluate . func . BL.lines
26 BL.readFile fp >>= evaluate . func . BL.lines
28+ readFile fp >>= evaluate . func . lines
29-- | Frequency of most-appearing line (from the first 100 lines)
31-- | Frequency of most-appearing line (from the first 100 lines)