update to work with the latest parallel package
[nofib.git] / parallel / mandel / Mandel.lhs
index 1e154fb..fdd0267 100644 (file)
@@ -135,7 +135,7 @@ parallelMandel mat limit radius
 #ifdef STRATEGIES_2
     parallel = parBuffer 70 rwhnf
 #else
-    parallel = withStrategy (parBuffer 70 rwhnf)
+    parallel = withStrategy (parBuffer 70 rseq)
 #endif
 
 seqList :: [a] -> ()