diff --git a/bench/bench.hs b/bench/bench.hs
--- a/bench/bench.hs
+++ b/bench/bench.hs
@@ -41,10 +41,7 @@
     rnf d = rnf $ D.toList d
 
 main :: IO ()
-main = defaultMain $ [ bench "Snoc list"    (nf (RSSS.runRSS (testActions (RSSS.tellElement :: Int -> RSSS.RSS () [Int] Int () )) ()) benchlen)
-                     , bench "Snoc seq"     (nf (RSSS.runRSS (testActions (RSSS.tellElement :: Int -> RSSS.RSS () (Seq.Seq Int) Int () )) ()) benchlen)
-                     ]
-                  ++ mkBench "Seq" Seq.singleton
+main = defaultMain $ mkBench "Seq" Seq.singleton
                   ++ mkBench "List" (:[])
                   ++ mkBench "Vector Primitive" VP.singleton
                   ++ mkBench "IntSet" IS.singleton
diff --git a/stateWriter.cabal b/stateWriter.cabal
--- a/stateWriter.cabal
+++ b/stateWriter.cabal
@@ -2,7 +2,7 @@
 -- documentation, see http://haskell.org/cabal/users-guide/
 
 name:                stateWriter
-version:             0.2.0
+version:             0.2.1
 synopsis:            A faster variant of the RWS monad transformers.
 description:         This is a version of the RWS monad transformers that should be much faster than what's found in transformers. The writer in the strict version does not leak memory.
 license:             BSD3
@@ -25,7 +25,7 @@
   ghc-prof-options:    -caf-all -auto-all
   -- other-modules:       
   other-extensions:    FlexibleInstances, MultiParamTypeClasses
-  build-depends:       base >=4.6 && <4.7, transformers >=0.3 && <0.4, mtl >=2.1 && <2.2
+  build-depends:       base >=4.6 && < 4.8, transformers >=0.3 && <0.4, mtl >=2.1 && <2.2
   -- hs-source-dirs:      
   default-language:    Haskell2010
 
diff --git a/tests/rwscompare.hs b/tests/rwscompare.hs
--- a/tests/rwscompare.hs
+++ b/tests/rwscompare.hs
@@ -70,8 +70,6 @@
     describe "Writer part" $ do
         it "logs stuff in the right order, with tell" $
             property $ \listOfLists -> runRSS (mapM_ tell (listOfLists :: [[Int]])) () () == runRWS (mapM_ tell listOfLists) () ()
-        it "logs stuff in the right order, with tellElement" $
-            property $ \list -> runRSS (mapM_ tellElement (list :: [Int])) () () == ((), (), list)
         it "interprets actions the same" $
             property $ \actions -> runRSS (evaluateActions (actions :: Action Int)) 42 12 == runRWS (evaluateActions actions) 42 12