diff --git a/Control/ContStuff/Trans.hs b/Control/ContStuff/Trans.hs
--- a/Control/ContStuff/Trans.hs
+++ b/Control/ContStuff/Trans.hs
@@ -323,7 +323,8 @@
 
 testEitherT :: Applicative m => EitherT Bool e m a -> m Bool
 testEitherT =
-    let pc x = pure . const x
+    let pc :: Applicative m => a -> b -> m a
+        pc x = pure . const x
     in runEitherT (pc True) (pc False)
 
 
diff --git a/contstuff.cabal b/contstuff.cabal
--- a/contstuff.cabal
+++ b/contstuff.cabal
@@ -1,5 +1,5 @@
 Name:          contstuff
-Version:       1.0.0
+Version:       1.0.1
 Category:      Control, Monads
 Synopsis:      Fast, easy to use CPS-based monad transformers
 Maintainer:    Ertugrul Söylemez <es@ertes.de>