on develop help sign in
Use (=<<) instead of flip (>>=)
1724c42Alexandre Esteves
src/Reflex/FunctorMaybe.hs+2−2
@@ -24,9 +24,9 @@ class FunctorMaybe f where
24 -- | Combined mapping and filtering function.
24 -- | Combined mapping and filtering function.
25 fmapMaybe :: (a -> Maybe b) -> f a -> f b
25 fmapMaybe :: (a -> Maybe b) -> f a -> f b
26
26
27−-- | @fmapMaybe = flip (>>=)
27+-- | @fmapMaybe = (=<<)
28instance FunctorMaybe Maybe where
28instance FunctorMaybe Maybe where
29− fmapMaybe = flip (>>=)
29+ fmapMaybe = (=<<)
30
30
31-- | @fmapMaybe f = catMaybes . fmap f@
31-- | @fmapMaybe f = catMaybes . fmap f@
32instance FunctorMaybe [] where
32instance FunctorMaybe [] where