`par` should be infixr 0

[haskell-directory.git] / Control / Parallel.hs

diff --git a/Control/Parallel.hs b/Control/Parallel.hs
index 21c9fed..504d92b 100644 (file)
--- a/Control/Parallel.hs
+++ b/Control/Parallel.hs
@@ -30,6 +30,8 @@ import PrelBase
 import PrelErr   ( parError )
 import PrelGHC   ( parGlobal#, parLocal#, parAt#, parAtAbs#, parAtRel#, parAtForNow# )
 
+infixr 0 `par`
+
 {-# INLINE parGlobal #-}
 {-# INLINE parLocal #-}
 {-# INLINE parAt #-}