diff options
| author | Alberto Ruiz <aruiz@um.es> | 2011-09-02 12:05:54 +0000 |
|---|---|---|
| committer | Alberto Ruiz <aruiz@um.es> | 2011-09-02 12:05:54 +0000 |
| commit | 05f4f9703162317f3d2610a9136a853eea7ab417 (patch) | |
| tree | 50147e516830d7867c87873121dfe002d4b12254 /lib/Numeric/Vector.hs | |
| parent | 4e6c686dd496e9b7bdd209da3e8fbd3ac47de65a (diff) | |
thanks & bump version
Diffstat (limited to 'lib/Numeric/Vector.hs')
| -rw-r--r-- | lib/Numeric/Vector.hs | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/lib/Numeric/Vector.hs b/lib/Numeric/Vector.hs index 01637d5..5b72951 100644 --- a/lib/Numeric/Vector.hs +++ b/lib/Numeric/Vector.hs | |||
| @@ -41,6 +41,7 @@ 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) | ||
| 44 | instance (Element a, Read a) => Read (Vector a) where | 45 | instance (Element a, Read a) => Read (Vector a) where |
| 45 | readsPrec _ s = [(fromList . read $ listnums, rest)] | 46 | readsPrec _ s = [(fromList . read $ listnums, rest)] |
| 46 | where (thing,trest) = breakAt ']' s | 47 | where (thing,trest) = breakAt ']' s |