Skip to content

Commit a3c4d15

Browse files
committed
Fix applicative instance for ParAff
Resolves #76
1 parent 96e0140 commit a3c4d15

File tree

1 file changed

+2
-1
lines changed

1 file changed

+2
-1
lines changed

src/Control/Monad/Aff.purs

Lines changed: 2 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -236,7 +236,8 @@ instance applyParAff :: Apply (ParAff e) where
236236
putOrKill :: forall a. AVar a -> Either Error a -> Aff e Unit
237237
putOrKill v = either (killVar v) (putVar v)
238238

239-
derive newtype instance applicativeParAff :: Applicative (ParAff e)
239+
instance applicativeParAff :: Applicative (ParAff e) where
240+
pure = ParAff <<< pure
240241

241242
-- | Returns the first value, or the first error if both error.
242243
instance altParAff :: Alt (ParAff e) where

0 commit comments

Comments
 (0)