[project @ 1997-11-24 20:34:53 by sof]

Make monadic operators (>>) and (>>=) left-assoc (as per Report.)

diff --git a/ghc/lib/ghc/PrelBase.lhs b/ghc/lib/ghc/PrelBase.lhs
index 7e780c9..87fd4d0 100644 (file)
--- a/ghc/lib/ghc/PrelBase.lhs
+++ b/ghc/lib/ghc/PrelBase.lhs
@@ -24,7 +24,7 @@ infixr 5  ++, :
 infix  4  ==, /=, <, <=, >=, >
 infixr 3  &&
 infixr 2  ||
-infixr 1  >>, >>=
+infixl 1  >>, >>=
 infixr 0  $
 \end{code}