diff options
Diffstat (limited to 'libraries/base/GHC/Read.hs')
| -rw-r--r-- | libraries/base/GHC/Read.hs | 7 |
1 files changed, 0 insertions, 7 deletions
diff --git a/libraries/base/GHC/Read.hs b/libraries/base/GHC/Read.hs index 26dca6ab65..2283942a8f 100644 --- a/libraries/base/GHC/Read.hs +++ b/libraries/base/GHC/Read.hs @@ -618,17 +618,10 @@ instance Read Integer where readList = readListDefault -#if defined(MIN_VERSION_integer_gmp) -- | @since 4.8.0.0 instance Read Natural where readsPrec d = map (\(n, s) -> (fromInteger n, s)) . filter ((>= 0) . (\(x,_)->x)) . readsPrec d -#else --- | @since 4.8.0.0 -instance Read Natural where - readsPrec d = map (\(n, s) -> (Natural n, s)) - . filter ((>= 0) . (\(x,_)->x)) . readsPrec d -#endif -- | @since 2.01 instance Read Float where |