From bb716a93f6505e5851c0716e4b2f4b52d72dc7c7 Mon Sep 17 00:00:00 2001 From: Viktor Dukhovni Date: Wed, 30 Jun 2021 11:40:29 -0400 Subject: Fix cut/paste typo foldrM should be foldlM --- libraries/base/Data/Foldable.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'libraries') diff --git a/libraries/base/Data/Foldable.hs b/libraries/base/Data/Foldable.hs index 059320d265..1a3c3d62f5 100644 --- a/libraries/base/Data/Foldable.hs +++ b/libraries/base/Data/Foldable.hs @@ -1019,7 +1019,7 @@ foldrM f z0 xs = foldl c return xs z0 -- Another way of thinking about @foldlM@ is that it amounts to an application -- to @z@ of a Kleisli composition: -- --- > foldrM f z t = +-- > foldlM f z t = -- > flip f a >=> flip f b >=> ... >=> flip f x >=> flip f y $ z -- -- The monadic effects of @foldlM@ are sequenced from left to right. -- cgit v1.2.1