diff --git a/listlike-instances.cabal b/listlike-instances.cabal
--- a/listlike-instances.cabal
+++ b/listlike-instances.cabal
@@ -1,5 +1,5 @@
 Name:                listlike-instances
-Version:             0.2.2.1
+Version:             0.2.3
 Synopsis:            Extra instances of the ListLike class
 Description:         Provides ListLike instances for Vector and Text types
 Homepage:            http://jwlato.webfactional.com/haskell/listlike-instances
diff --git a/src/Data/ListLike/Text/Text.hs b/src/Data/ListLike/Text/Text.hs
--- a/src/Data/ListLike/Text/Text.hs
+++ b/src/Data/ListLike/Text/Text.hs
@@ -5,6 +5,8 @@
 
 where
 
+import           Prelude as P
+import           Control.Monad
 import qualified Data.Text as T
 import qualified Data.Text.IO as TI
 import           Data.Text.Encoding (decodeUtf8)
@@ -69,6 +71,10 @@
     genericDrop i = T.drop (fromIntegral i)
     genericSplitAt i = T.splitAt (fromIntegral i)
     genericReplicate i = Data.ListLike.replicate (fromIntegral i)
+
+    sequence  = liftM fromList . P.sequence  . toList
+    mapM func = liftM fromList . P.mapM func . toList
+    mapM_ func = P.mapM_ func . toList
 
 instance ListLikeIO T.Text Char where
     hGetLine = TI.hGetLine
diff --git a/src/Data/ListLike/Text/TextLazy.hs b/src/Data/ListLike/Text/TextLazy.hs
--- a/src/Data/ListLike/Text/TextLazy.hs
+++ b/src/Data/ListLike/Text/TextLazy.hs
@@ -5,6 +5,8 @@
 
 where
 
+import           Prelude as P
+import           Control.Monad
 import qualified Data.Text.Lazy as T
 import qualified Data.Text.Lazy.IO as TI
 import           Data.Text.Encoding (decodeUtf8)
@@ -67,6 +69,10 @@
     genericDrop i = T.drop (fromIntegral i)
     genericSplitAt i = T.splitAt (fromIntegral i)
     genericReplicate i = Data.ListLike.replicate (fromIntegral i)
+
+    sequence  = liftM fromList . P.sequence  . toList
+    mapM func = liftM fromList . P.mapM func . toList
+    mapM_ func = P.mapM_ func . toList
 
 instance ListLikeIO T.Text Char where
     hGetLine = TI.hGetLine
diff --git a/src/Data/ListLike/Vector/Generic.hs b/src/Data/ListLike/Vector/Generic.hs
--- a/src/Data/ListLike/Vector/Generic.hs
+++ b/src/Data/ListLike/Vector/Generic.hs
@@ -11,6 +11,8 @@
 
 where
 
+import           Prelude as P
+import           Control.Monad
 import qualified Data.Vector.Generic as V
 import           Data.Vector.Generic ((!))
 import           Data.ListLike
@@ -74,6 +76,10 @@
     genericDrop i = V.drop (fromIntegral i)
     --genericSplitAt i = 
     genericReplicate i = V.replicate (fromIntegral i)
+
+    sequence  = liftM fromList . P.sequence  . toList
+    mapM func = liftM fromList . P.mapM func . toList
+    mapM_ func = P.mapM_ func . toList
 
 instance (Eq (v Char), V.Vector v Char) => StringLike (v Char) where
     toString = V.toList
diff --git a/src/Data/ListLike/Vector/Storable.hs b/src/Data/ListLike/Vector/Storable.hs
--- a/src/Data/ListLike/Vector/Storable.hs
+++ b/src/Data/ListLike/Vector/Storable.hs
@@ -5,6 +5,8 @@
 
 where
 
+import           Prelude as P
+import           Control.Monad
 import qualified Data.Vector.Storable as V
 import           Data.Vector.Storable ((!))
 import           Data.ListLike
@@ -70,6 +72,10 @@
     genericDrop i = V.drop (fromIntegral i)
     --genericSplitAt i = 
     genericReplicate i = V.replicate (fromIntegral i)
+
+    sequence  = liftM fromList . P.sequence  . toList
+    mapM func = liftM fromList . P.mapM func . toList
+    mapM_ func = P.mapM_ func . toList
 
 instance StringLike (V.Vector Char) where
     toString = toList
diff --git a/src/Data/ListLike/Vector/Unboxed.hs b/src/Data/ListLike/Vector/Unboxed.hs
--- a/src/Data/ListLike/Vector/Unboxed.hs
+++ b/src/Data/ListLike/Vector/Unboxed.hs
@@ -5,6 +5,8 @@
 
 where
 
+import           Prelude as P
+import           Control.Monad
 import qualified Data.Vector.Unboxed as V
 import           Data.Vector.Unboxed (Unbox, (!))
 import           Data.ListLike
@@ -69,6 +71,10 @@
     genericDrop i = V.drop (fromIntegral i)
     --genericSplitAt i = 
     genericReplicate i = V.replicate (fromIntegral i)
+
+    sequence  = liftM fromList . P.sequence  . toList
+    mapM func = liftM fromList . P.mapM func . toList
+    mapM_ func = P.mapM_ func . toList
 
 instance StringLike (V.Vector Char) where
     toString = toList
diff --git a/src/Data/ListLike/Vector/Vector.hs b/src/Data/ListLike/Vector/Vector.hs
--- a/src/Data/ListLike/Vector/Vector.hs
+++ b/src/Data/ListLike/Vector/Vector.hs
@@ -5,6 +5,8 @@
 
 where
 
+import           Prelude as P
+import           Control.Monad
 import qualified Data.Vector as V
 import           Data.Vector ((!))
 import           Data.ListLike
@@ -68,6 +70,10 @@
     genericDrop i = V.drop (fromIntegral i)
     --genericSplitAt i = 
     genericReplicate i = V.replicate (fromIntegral i)
+
+    sequence  = liftM fromList . P.sequence  . toList
+    mapM func = liftM fromList . P.mapM func . toList
+    mapM_ func = P.mapM_ func . toList
 
 instance StringLike (V.Vector Char) where
     toString = toList