@@ -312,7 +312,7 @@ main = hspec
312 (Async.parConcatMap id (const (Stream.fromList [1..n])))
312 (Async.parConcatMap id (const (Stream.fromList [1..n])))
314#ifdef DEVBUILD
314#ifdef DEVBUILD
315− describe "Time ordering" $ timeOrdering Async.parList id
315+ describe "Time ordering" $ timeOrdering (Async.parList id)
317 describe "Exception propagation" $ exceptionPropagation async
317 describe "Exception propagation" $ exceptionPropagation async
318 -- Ad-hoc tests
318 -- Ad-hoc tests