Repository : ssh://darcs.haskell.org//srv/darcs/ghc On branch : master
http://hackage.haskell.org/trac/ghc/changeset/d8684910b18203e0d15d3c77374382f5841e991d >--------------------------------------------------------------- commit d8684910b18203e0d15d3c77374382f5841e991d Author: Ian Lynagh <i...@well-typed.com> Date: Fri Nov 2 14:51:13 2012 +0000 Remove unused function fmapM_maybe >--------------------------------------------------------------- compiler/utils/Maybes.lhs | 9 --------- 1 files changed, 0 insertions(+), 9 deletions(-) diff --git a/compiler/utils/Maybes.lhs b/compiler/utils/Maybes.lhs index e6fab9b..210a7b9 100644 --- a/compiler/utils/Maybes.lhs +++ b/compiler/utils/Maybes.lhs @@ -17,7 +17,6 @@ module Maybes ( MaybeErr(..), -- Instance of Monad failME, isSuccess, - fmapM_maybe, orElse, mapCatMaybes, allMaybes, @@ -85,14 +84,6 @@ orElse :: Maybe a -> a -> a Nothing `orElse` y = y \end{code} -\begin{code} -fmapM_maybe :: Monad m => (a -> m b) -> Maybe a -> m (Maybe b) -fmapM_maybe _ Nothing = return Nothing -fmapM_maybe f (Just x) = do - x' <- f x - return $ Just x' -\end{code} - %************************************************************************ %* * \subsection[MaybeT type]{The @MaybeT@ monad transformer} _______________________________________________ Cvs-ghc mailing list Cvs-ghc@haskell.org http://www.haskell.org/mailman/listinfo/cvs-ghc
