diff --git a/src/Control/Monad/IO.purs b/src/Control/Monad/IO.purs index 49ffd93..0c54587 100644 --- a/src/Control/Monad/IO.purs +++ b/src/Control/Monad/IO.purs @@ -57,6 +57,10 @@ derive newtype instance applicativeParIO :: Applicative ParIO derive newtype instance semigroupParIO :: (Semigroup a) => Semigroup (ParIO a) derive newtype instance monoidParIO :: (Monoid a) => Monoid (ParIO a) +derive newtype instance altParIO :: Alt ParIO +derive newtype instance plusParIO :: Plus ParIO +derive newtype instance alternativeParIO :: Alternative ParIO + instance monadAffIO :: MonadAff eff IO where liftAff = wrap <<< unsafeCoerceAff