Update benchmarks to reflect current reality
commit76f68276d9dda3b7771dd021a6585d86ac5457d0
authorBryan O'Sullivan <bos@serpentine.com>
dateMon 6 Jul 2015, 21:57 (11 years ago)
parent451c183
benchmarks/Typed/Generic.hs+2−2
@@ -9,10 +9,10 @@ import Twitter.TH
99import Typed.Common
1010
1111encodeDirect :: Result -> L.ByteString
12−encodeDirect = B.toLazyByteString . fromEncoding . toEncoding
12+encodeDirect = encode
1313
1414encodeViaValue :: Result -> L.ByteString
15−encodeViaValue = encode
15+encodeViaValue = encode . toJSON
1616
1717benchmarks :: Benchmark
1818benchmarks =
benchmarks/Typed/Manual.hs+2−2
@@ -9,10 +9,10 @@ import Twitter.Manual
99import Typed.Common
1010
1111encodeDirect :: Result -> L.ByteString
12−encodeDirect = B.toLazyByteString . fromEncoding . toEncoding
12+encodeDirect = encode
1313
1414encodeViaValue :: Result -> L.ByteString
15−encodeViaValue = encode
15+encodeViaValue = encode . toJSON
1616
1717benchmarks :: Benchmark
1818benchmarks =
benchmarks/Typed/TH.hs+2−2
@@ -9,10 +9,10 @@ import Twitter.TH
99import Typed.Common
1010
1111encodeDirect :: Result -> L.ByteString
12−encodeDirect = B.toLazyByteString . fromEncoding . toEncoding
12+encodeDirect = encode
1313
1414encodeViaValue :: Result -> L.ByteString
15−encodeViaValue = encode
15+encodeViaValue = encode . toJSON
1616
1717benchmarks :: Benchmark
1818benchmarks =