[commit: vector] : Remove unnecessary inplace (afa8604)
Roman Leshchinskiy
rl at cse.unsw.edu.au
Sun Jun 19 23:15:48 CEST 2011
Repository : ssh://darcs.haskell.org//srv/darcs/packages/vector
On branch :
http://hackage.haskell.org/trac/ghc/changeset/afa8604434687b156064cb2312ba85a6ce15a757
>---------------------------------------------------------------
commit afa8604434687b156064cb2312ba85a6ce15a757
Author: Roman Leshchinskiy <rl at cse.unsw.edu.au>
Date: Wed May 11 20:52:54 2011 +0000
Remove unnecessary inplace
>---------------------------------------------------------------
Data/Vector/Generic.hs | 2 +-
1 files changed, 1 insertions(+), 1 deletions(-)
diff --git a/Data/Vector/Generic.hs b/Data/Vector/Generic.hs
index dab9163..3a94a3b 100644
--- a/Data/Vector/Generic.hs
+++ b/Data/Vector/Generic.hs
@@ -883,7 +883,7 @@ modifyWithStream p v s = new (New.modifyWithStream p (clone v) s)
-- | /O(n)/ Pair each element in a vector with its index
indexed :: (Vector v a, Vector v (Int,a)) => v a -> v (Int,a)
{-# INLINE indexed #-}
-indexed = unstream . inplace MStream.indexed . stream
+indexed = unstream . Stream.indexed . stream
-- Mapping
-- -------
More information about the Cvs-libraries
mailing list