ef95891 · streamly · git.iko.soy

benchmark/Linear.hs+1−1

compare with master

unifiedsplit

@@ -128,7 +128,7 @@ main :: IO ()

128main = do

129 -- XXX Fix indentation

130 (value, cfg, benches) <- parseCLIOpts defaultStreamSize

131− runMode (mode cfg) cfg benches

131+ value `seq` runMode (mode cfg) cfg benches

132 [ bgroup "serially"

133 [ bgroup "pure"

134 [ benchPureSink value "id" id

benchmark/LinearAsync.hs+1−1

@@ -51,7 +51,7 @@ main :: IO ()

51main = do

52 -- XXX Fix indentation

53 (value, cfg, benches) <- parseCLIOpts defaultStreamSize

54− runMode (mode cfg) cfg benches

54+ value `seq` runMode (mode cfg) cfg benches

55 [ bgroup "asyncly"

56 [ benchSrcIO asyncly "unfoldr" (Ops.sourceUnfoldr value)

57 , benchSrcIO asyncly "unfoldrM" (Ops.sourceUnfoldrM value)

benchmark/LinearRate.hs+1−1

@@ -40,7 +40,7 @@ main :: IO ()

40main = do

41 -- XXX Fix indentation

42 (value, cfg, benches) <- parseCLIOpts defaultStreamSize

43− runMode (mode cfg) cfg benches

43+ value `seq` runMode (mode cfg) cfg benches

44 -- XXX arbitrarily large rate should be the same as rate Nothing

45 [ bgroup "avgrate"

46 [ bgroup "asyncly"

benchmark/Nested.hs+1−1

@@ -29,7 +29,7 @@ main :: IO ()

29main = do

30 -- XXX Fix indentation

31 (linearCount, cfg, benches) <- parseCLIOpts defaultStreamSize

32− runMode (mode cfg) cfg benches

32+ linearCount `seq` runMode (mode cfg) cfg benches

33 [ bgroup "serially"

34 [ benchIO "toNullAp" $ Ops.toNullAp linearCount serially

35 , benchIO "toNull" $ Ops.toNull linearCount serially

benchmark/NestedConcurrent.hs+1−1

@@ -29,7 +29,7 @@ main :: IO ()

29main = do

30 -- XXX Fix indentation

31 (linearCount, cfg, benches) <- parseCLIOpts defaultStreamSize

32− runMode (mode cfg) cfg benches

32+ linearCount `seq` runMode (mode cfg) cfg benches

33 [

34 bgroup "aheadly"

35 [ benchIO "toNullAp" $ Ops.toNullAp linearCount aheadly