Skip to content

Commit f219dd9

Browse files
committed
Merge pull request #17 from nullobject/master
Fix typo for Apply ContT instance.
2 parents 947300f + 4ff6ce1 commit f219dd9

File tree

1 file changed

+1
-1
lines changed

1 file changed

+1
-1
lines changed

src/Control/Monad/Cont/Trans.purs

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -19,7 +19,7 @@ callCC f = ContT (\k -> runContT (f (\a -> ContT (\_ -> k a))) k)
1919
instance functorContT :: (Monad m) => Functor (ContT r m) where
2020
(<$>) f m = ContT (\k -> runContT m (\a -> k $ f a))
2121

22-
instance appluContT :: (Functor m, Monad m) => Apply (ContT r m) where
22+
instance applyContT :: (Functor m, Monad m) => Apply (ContT r m) where
2323
(<*>) f v = ContT (\k -> runContT f $ (\g -> runContT v (\a -> (k $ g a))))
2424

2525
instance applicativeContT :: (Functor m, Monad m) => Applicative (ContT r m) where

0 commit comments

Comments
 (0)