lib: document mapM'

[ci skip]
2019-02-16 15:57:29 -08:00 · 2019-02-16 15:57:29 -08:00 · b34b262c76
commit b34b262c76
parent 49f286dc70
1 changed files with 1 additions and 0 deletions
--- 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