Remove unused code
authorRoman Leshchinskiy <rl@cse.unsw.edu.au>
Mon, 15 Sep 2008 07:44:16 +0000 (07:44 +0000)
committerRoman Leshchinskiy <rl@cse.unsw.edu.au>
Mon, 15 Sep 2008 07:44:16 +0000 (07:44 +0000)
Data/Vector/MVector/New.hs

index f1efe7b..7b07515 100644 (file)
@@ -3,7 +3,7 @@
 #include "phases.h"
 
 module Data.Vector.MVector.New (
-  New(..), run, unstream, inplace, update, reverse, map, filter
+  New(..), run, unstream, inplace, update, reverse
 ) where
 
 import qualified Data.Vector.MVector as MVector
@@ -53,11 +53,3 @@ reverse :: New a -> New a
 {-# INLINE_STREAM reverse #-}
 reverse m = modify m (MVector.reverse)
 
-map :: (a -> a) -> New a -> New a
-{-# INLINE map #-}
-map f = inplace (MStream.map f)
-
-filter :: (a -> Bool) -> New a -> New a
-{-# INLINE filter #-}
-filter f = inplace (MStream.filter f)
-