File tree Expand file tree Collapse file tree 1 file changed +2
-2
lines changed Expand file tree Collapse file tree 1 file changed +2
-2
lines changed Original file line number Diff line number Diff line change @@ -49,7 +49,7 @@ maybe' _ f (Just a) = f a
49
49
-- | fromMaybe x (Just y) == y
50
50
-- | ```
51
51
fromMaybe :: forall a . a -> Maybe a -> a
52
- fromMaybe a = maybe a (id :: forall a . a -> a )
52
+ fromMaybe a = maybe a id
53
53
54
54
-- | Similar to `fromMaybe` but for use in cases where the default value may be
55
55
-- | expensive to compute. As PureScript is not lazy, the standard `fromMaybe`
@@ -61,7 +61,7 @@ fromMaybe a = maybe a (id :: forall a. a -> a)
61
61
-- | fromMaybe' (\_ -> x) (Just y) == y
62
62
-- | ```
63
63
fromMaybe' :: forall a . (Unit -> a ) -> Maybe a -> a
64
- fromMaybe' a = maybe' a (id :: forall a . a -> a )
64
+ fromMaybe' a = maybe' a id
65
65
66
66
-- | Returns `true` when the `Maybe` value was constructed with `Just`.
67
67
isJust :: forall a . Maybe a -> Boolean
You can’t perform that action at this time.
0 commit comments