blob: 8473ac313446e3e2e7b16aae6f032d054e5e48c0 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
|
diff -Naur ghc-6.0.1.orig/libraries/base/Control/Monad.hs ghc-6.0.1/libraries/base/Control/Monad.hs
--- ghc-6.0.1.orig/libraries/base/Control/Monad.hs 2003-12-16 13:35:44.000000000 +0100
+++ ghc-6.0.1/libraries/base/Control/Monad.hs 2003-12-16 13:36:59.000000000 +0100
@@ -173,7 +173,9 @@
> foldM f a1 [x1, x2, ..., xm ]
+
==
+
> do
> a2 <- f a1 x1
> a3 <- f a2 x2
|