diff options
author | Bas van Dijk <v.dijk.bas@gmail.com> | 2011-09-01 13:49:36 +0000 |
---|---|---|
committer | Bas van Dijk <v.dijk.bas@gmail.com> | 2011-09-01 13:49:36 +0000 |
commit | c236a193ed710a29b6940b87bcbe05cb8f4a086a (patch) | |
tree | e941d1204b3ae083a1da8e34991e3c8eec8c5c2e /lib | |
parent | 943f2db1bce8c5984673b7242ccc0e27a1eb0772 (diff) |
Support vector >= 0.8
vector-0.8 provides a Read instance for Vectors.
This patch hides hmatrix's own Read instance when vector >= 0.8.
Diffstat (limited to 'lib')
-rw-r--r-- | lib/Numeric/Vector.hs | 1 |
1 files changed, 0 insertions, 1 deletions
diff --git a/lib/Numeric/Vector.hs b/lib/Numeric/Vector.hs index 5b72951..01637d5 100644 --- a/lib/Numeric/Vector.hs +++ b/lib/Numeric/Vector.hs | |||
@@ -41,7 +41,6 @@ instance (Show a, Storable a) => (Show (Vector a)) where | |||
41 | 41 | ||
42 | #ifdef VECTOR | 42 | #ifdef VECTOR |
43 | 43 | ||
44 | #if !MIN_VERSION_vector(0,8,0) | ||
45 | instance (Element a, Read a) => Read (Vector a) where | 44 | instance (Element a, Read a) => Read (Vector a) where |
46 | readsPrec _ s = [(fromList . read $ listnums, rest)] | 45 | readsPrec _ s = [(fromList . read $ listnums, rest)] |
47 | where (thing,trest) = breakAt ']' s | 46 | where (thing,trest) = breakAt ']' s |