git.iko.soy/text
on master help sign in
Add a tiny encoding benchmark
7b070bdBryan O'Sullivan
tests/benchmarks/EncodeUtf8.hsnew file+9
compare with master
unifiedsplit
@@ -0,0 +1,9 @@
1+{-# LANGUAGE OverloadedStrings #-}
2+import Data.Text as T
3+import Data.ByteString as B
4+import Data.Text.Encoding as T
5+
6+main = do
7+ let k = 50000000
8+ t = T.replicate k "a"
9+ B.putStr (T.encodeUtf8 t)