diff --git a/lifted-base.cabal b/lifted-base.cabal
--- a/lifted-base.cabal
+++ b/lifted-base.cabal
@@ -1,5 +1,5 @@
 Name:                lifted-base
-Version:             0.2.3.3
+Version:             0.2.3.4
 Synopsis:            lifted IO operations from the base library
 License:             BSD3
 License-file:        LICENSE
@@ -66,7 +66,8 @@
   build-depends: lifted-base
                , base                 >= 3     && < 5
                , transformers         >= 0.3   && < 0.5
-               , transformers-base    >= 0.4   && < 0.5
+               , transformers-base    >= 0.4.4 && < 0.5
+               , transformers-compat  >= 0.3   && < 0.4
                , monad-control        >= 0.3   && < 1.1
                , HUnit                >= 1.2.2 && < 1.3
                , test-framework       >= 0.2.4 && < 0.9
diff --git a/test/test.hs b/test/test.hs
--- a/test/test.hs
+++ b/test/test.hs
@@ -17,10 +17,7 @@
 import Control.Monad.Trans.Maybe
 import Control.Monad.Trans.Reader
 import Control.Monad.Trans.Writer
-
-#if MIN_VERSION_transformers(0,4,0)
 import Control.Monad.Trans.Except
-#endif
 
 import Control.Monad.Trans.State
 import qualified Control.Monad.Trans.RWS as RWS
@@ -48,23 +45,17 @@
     , testSuite "MaybeT" $ fmap fromJust . runMaybeT
     , testSuite "ReaderT" $ flip runReaderT "reader state"
     , testSuite "WriterT" runWriterT'
-#if MIN_VERSION_transformers(0,4,0)
     , testSuite "ExceptT" runExceptT'
-#endif
     , testSuite "StateT" $ flip evalStateT "state state"
     , testSuite "RWST" $ \m -> runRWST' m "RWS in" "RWS state"
-#if MIN_VERSION_transformers(0,4,0)
     , testCase "ExceptT throwE" case_throwE
-#endif
     , testCase "WriterT tell" case_tell
     ]
   where
     runWriterT' :: Functor m => WriterT [Int] m a -> m a
     runWriterT' = fmap fst . runWriterT
-#if MIN_VERSION_transformers(0,4,0)
     runExceptT' :: Functor m => ExceptT String m () -> m ()
     runExceptT' = fmap (either (const ()) id) . runExceptT
-#endif
     runRWST' :: (Monad m, Functor m) => RWS.RWST r [Int] s m a -> r -> s -> m a
     runRWST' m r s = fmap fst $ RWS.evalRWST m r s
 
@@ -144,7 +135,6 @@
     k <- readIORef i
     k @?= 4
 
-#if MIN_VERSION_transformers(0,4,0)
 case_throwE :: Assertion
 case_throwE = do
     i <- newIORef one
@@ -154,7 +144,6 @@
         (liftBase $ writeIORef i 3)
     j <- readIORef i
     j @?= 3
-#endif
 
 case_tell :: Assertion
 case_tell = do