[project @ 1997-06-03 22:29:15 by sof]

toEnum and fromEnum methods added to the Enum Integer instance

diff --git a/ghc/lib/ghc/PrelNum.lhs b/ghc/lib/ghc/PrelNum.lhs
index 9d205d7..e329d74 100644 (file)
--- a/ghc/lib/ghc/PrelNum.lhs
+++ b/ghc/lib/ghc/PrelNum.lhs
@@ -335,6 +335,8 @@ instance  Integral Integer where
                   -- Case-ified by WDP 94/10
 
 instance  Enum Integer  where
+    toEnum n            =  toInteger n
+    fromEnum n          =  toInt n
     enumFrom n           =  n : enumFrom (n + 1)
     enumFromThen m n     =  en' m (n - m)
                            where en' m n = m : en' (m + n) n