From b34b262c76c13c59f997805268c9a22c24a21ea6 Mon Sep 17 00:00:00 2001 From: Simon Michael Date: Sat, 16 Feb 2019 15:57:29 -0800 Subject: [PATCH] lib: document mapM' [ci skip] --- hledger-lib/Hledger/Utils.hs | 1 + 1 file changed, 1 insertion(+) diff --git a/hledger-lib/Hledger/Utils.hs b/hledger-lib/Hledger/Utils.hs index be78fa344..f2860bf91 100644 --- a/hledger-lib/Hledger/Utils.hs +++ b/hledger-lib/Hledger/Utils.hs @@ -220,6 +220,7 @@ sequence' ms = do x <- m go (h . (x :)) ms +-- | Like mapM but uses sequence'. {-# INLINABLE mapM' #-} mapM' :: Monad f => (a -> f b) -> [a] -> f [b] mapM' f = sequence' . map f