From ea0426202130e44df7fff2e2979964fcfea5fc35 Mon Sep 17 00:00:00 2001 From: Anupam Jain Date: Wed, 21 Mar 2018 07:20:32 +0000 Subject: [PATCH] Derive Alt, Plus, and Alternative instances for ParIO --- src/Control/Monad/IO.purs | 4 ++++ 1 file changed, 4 insertions(+) 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