@@ -20,42 +20,42 @@ main = defaultMain
2020countdown :: Integer -> Benchmark
2121countdown n = bgroup (show n)
2222 [ bgroup "shallow"
23− [ bench "reference" $ nf countdownRef n
24− , bench "effectful (PS)" $ nfAppIO countdownEffectfulStatic n
25− , bench "effectful (PD)" $ nfAppIO countdownEffectfulDynPure n
26− , bench "effectful (MS)" $ nfAppIO countdownEffectfulMVar n
27− , bench "effectful (MD)" $ nfAppIO countdownEffectfulDynMVar n
23+ [ bench "reference" $ nf countdownRef n
24+ , bench "effectful (pure-static)" $ nfAppIO countdownEffectfulStatic n
25+ , bench "effectful (pure-dynamic)" $ nfAppIO countdownEffectfulDynPure n
26+ , bench "effectful (MVar-static)" $ nfAppIO countdownEffectfulMVar n
27+ , bench "effectful (MVar-dynamic)" $ nfAppIO countdownEffectfulDynMVar n
2828#ifdef VERSION_freer_simple
29− , bench "freer-simple" $ nf countdownFreerSimple n
29+ , bench "freer-simple" $ nf countdownFreerSimple n
3030#endif
3131#ifdef VERSION_eff
32− , bench "eff" $ nf countdownEff n
32+ , bench "eff" $ nf countdownEff n
3333#endif
34− , bench "mtl" $ nf countdownMtl n
34+ , bench "mtl" $ nf countdownMtl n
3535#ifdef VERSION_fused_effects
36− , bench "fused-effects" $ nf countdownFusedEffects n
36+ , bench "fused-effects" $ nf countdownFusedEffects n
3737#endif
3838#ifdef VERSION_polysemy
39− , bench "polysemy" $ nf countdownPolysemy n
39+ , bench "polysemy" $ nf countdownPolysemy n
4040#endif
4141 ]
4242 , bgroup "deep"
43− [ bench "effectful (PS)" $ nfAppIO countdownEffectfulStaticDeep n
44− , bench "effectful (PD)" $ nfAppIO countdownEffectfulDynPureDeep n
45− , bench "effectful (MS)" $ nfAppIO countdownEffectfulMVarDeep n
46− , bench "effectful (MD)" $ nfAppIO countdownEffectfulDynMVarDeep n
43+ [ bench "effectful (PS)" $ nfAppIO countdownEffectfulStaticDeep n
44+ , bench "effectful (PD)" $ nfAppIO countdownEffectfulDynPureDeep n
45+ , bench "effectful (MS)" $ nfAppIO countdownEffectfulMVarDeep n
46+ , bench "effectful (MD)" $ nfAppIO countdownEffectfulDynMVarDeep n
4747#ifdef VERSION_freer_simple
48− , bench "freer-simple" $ nf countdownFreerSimpleDeep n
48+ , bench "freer-simple" $ nf countdownFreerSimpleDeep n
4949#endif
5050#ifdef VERSION_eff
51− , bench "eff" $ nf countdownEffDeep n
51+ , bench "eff" $ nf countdownEffDeep n
5252#endif
5353#ifdef VERSION_polysemy
54− , bench "polysemy" $ nf countdownPolysemyDeep n
54+ , bench "polysemy" $ nf countdownPolysemyDeep n
5555#endif
56− , bench "mtl" $ nf countdownMtlDeep n
56+ , bench "mtl" $ nf countdownMtlDeep n
5757#ifdef VERSION_fused_effects
58− , bench "fused-effects" $ nf countdownFusedEffectsDeep n
58+ , bench "fused-effects" $ nf countdownFusedEffectsDeep n
5959#endif
6060 ]
6161 ]