Fix failing test
commit683c6d9f558eccfdcf645a71ea76427798068004
authorGary Burgess <gary.burgess@gmail.com>
dateThu 12 Jun 2014, 23:35 (12 years ago)
parent195b66e
examples/passing/Superclasses3.purs+2−2
@@ -5,12 +5,12 @@ import Debug.Trace
55import Control.Monad.Eff
66
77class (Monad m) <= MonadWriter w m where
8− tell :: w -> m {}
8+ tell :: w -> m Unit
99
1010testFunctor :: forall m. (Monad m) => m Number -> m Number
1111testFunctor n = (+) 1 <$> n
1212
13−test :: forall w m. (Monad m, MonadWriter w m) => w -> m {}
13+test :: forall w m. (Monad m, MonadWriter w m) => w -> m Unit
1414test w = do
1515 tell w
1616 tell w