on master help sign in
Add a String benchmark.
9eed1d3Bryan O'Sullivan
tests/benchmarks/src/Data/Text/Benchmarks/Equality.hs+2
@@ -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
27+ , bench "String" $
28+ readFile fp >>= evaluate . func . lines
27 ]
29 ]
28
30
29-- | Frequency of most-appearing line (from the first 100 lines)
31-- | Frequency of most-appearing line (from the first 100 lines)