Merge pull request #77 from slamdata/ap-paraff

Fix applicative instance for ParAff
purescript-contrib · Oct 23, 2016 · 8cd780b · 8cd780b
2 parents 96e0140 + a3c4d15
commit 8cd780b
Showing 1 changed file with 2 additions and 1 deletion.
diff --git a/src/Control/Monad/Aff.purs b/src/Control/Monad/Aff.purs
@@ -236,7 +236,8 @@ instance applyParAff :: Apply (ParAff e) where
  putOrKill :: forall a. AVar a -> Either Error a -> Aff e Unit
  putOrKill v = either (killVar v) (putVar v)
 
-derive newtype instance applicativeParAff :: Applicative (ParAff e)
+instance applicativeParAff :: Applicative (ParAff e) where
+ pure = ParAff <<< pure
 
 -- | Returns the first value, or the first error if both error.
 instance altParAff :: Alt (ParAff e) where