Use canonical `Monad` instance
parent
bb3a7d0a5b
commit
7ce87381ae
|
@ -93,7 +93,6 @@ library {
|
||||||
-Wno-missing-local-signatures
|
-Wno-missing-local-signatures
|
||||||
-Wno-missing-safe-haskell-mode
|
-Wno-missing-safe-haskell-mode
|
||||||
-Wno-monomorphism-restriction
|
-Wno-monomorphism-restriction
|
||||||
-Wno-noncanonical-monad-instances
|
|
||||||
-Wno-noncanonical-monoid-instances
|
-Wno-noncanonical-monoid-instances
|
||||||
-Wno-prepositive-qualified-module
|
-Wno-prepositive-qualified-module
|
||||||
-Wno-redundant-constraints
|
-Wno-redundant-constraints
|
||||||
|
|
|
@ -23,7 +23,6 @@ instance Applicative Strict.Maybe where
|
||||||
_ <*> _ = Strict.Nothing
|
_ <*> _ = Strict.Nothing
|
||||||
|
|
||||||
instance Monad Strict.Maybe where
|
instance Monad Strict.Maybe where
|
||||||
return = Strict.Just
|
|
||||||
Strict.Nothing >>= _ = Strict.Nothing
|
Strict.Nothing >>= _ = Strict.Nothing
|
||||||
Strict.Just x >>= f = f x
|
Strict.Just x >>= f = f x
|
||||||
|
|
||||||
|
|
Loading…
Reference in New Issue