on master help sign in
Fix up benchmark ordering
7ea614aBryan O'Sullivan
benchmarks/Compare/JsonBench.hs+2−2
@@ -319,7 +319,7 @@ benchmarks :: Benchmark
319benchmarks = env (load "json-data/buffer-builder.json") $
319benchmarks = env (load "json-data/buffer-builder.json") $
320 \ ~(parsedUserList :: [User]) ->
320 \ ~(parsedUserList :: [User]) ->
321 bgroup "json-bench" [
321 bgroup "json-bench" [
322+ bench "aeson" $ nf Aeson.encode parsedUserList
322− bench "buffer-builder" $ nf Json.encodeJson parsedUserList
323+ , bench "buffer-builder" $ nf Json.encodeJson parsedUserList
323− , bench "aeson" $ nf Aeson.encode parsedUserList
324 , bench "json-builder" $ nf JB.toJsonLBS parsedUserList
324 , bench "json-builder" $ nf JB.toJsonLBS parsedUserList
325 ]
325 ]