Commit 3f33d708 authored by Bodigrim's avatar Bodigrim
Browse files

Do not benchmark concatMap, it consumes too much memory

parent 4514731e
......@@ -105,12 +105,13 @@ benchmark kind ~Env{..} =
, benchBS $ nf (BS.cons c) bsa
, benchBSL $ nf (BL.cons c) bla
]
, bgroup "concatMap"
[ benchT $ nf (T.concatMap (T.replicate 3 . T.singleton)) ta
, benchTL $ nf (TL.concatMap (TL.replicate 3 . TL.singleton)) tla
, benchBS $ nf (BS.concatMap (BS.replicate 3)) bsa
, benchBSL $ nf (BL.concatMap (BL.replicate 3)) bla
]
-- concatMap exceeds 4G heap size on current test data
-- , bgroup "concatMap"
-- [ benchT $ nf (T.concatMap (T.replicate 3 . T.singleton)) ta
-- , benchTL $ nf (TL.concatMap (TL.replicate 3 . TL.singleton)) tla
-- , benchBS $ nf (BS.concatMap (BS.replicate 3)) bsa
-- , benchBSL $ nf (BL.concatMap (BL.replicate 3)) bla
-- ]
, bgroup "decode"
[ benchT $ nf T.decodeUtf8 bsa
, benchTL $ nf TL.decodeUtf8 bla
......
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment