[project @ 1999-08-30 18:19:39 by simonpj]

Adjust library imports to get fromInt/toInt from PrelNum

5 files changed, 8 insertions, 0 deletions

diff --git a/ghc/lib/exts/GlaExts.lhs b/ghc/lib/exts/GlaExts.lhs
index 050e031be2..61b1ea63bf 100644
--- a/ghc/lib/exts/GlaExts.lhs
+++ b/ghc/lib/exts/GlaExts.lhs
@@ -50,6 +50,9 @@ module GlaExts
         -- the representation of some basic types:
         Int(..),Addr(..),Word(..),Float(..),Double(..),Integer(..),Char(..),
 
+	-- The non-standard fromInt and toInt methods
+	Num( fromInt ), Integral( toInt ),
+
 	-- Fusion
 	build, augment,
 
@@ -63,6 +66,7 @@ module GlaExts
 
 import PrelGHC
 import PrelBase
+import PrelNum ( Num(..), Integral(..) )	-- To get fromInt/toInt
 import PrelAddr   ( Addr(..), Word(..) )
 import PrelST
 import IOExts
diff --git a/ghc/lib/exts/Int.lhs b/ghc/lib/exts/Int.lhs
index 23caa79c67..894386dc8b 100644
--- a/ghc/lib/exts/Int.lhs
+++ b/ghc/lib/exts/Int.lhs
@@ -116,6 +116,7 @@ import PrelAddr ( Int64(..), Word64(..), Addr(..), Word(..) )
 #endif
 import Ix
 import Bits
+import PrelNum ( Num(..), Integral(..) )	-- To get fromInt/toInt
 import Ratio   ( (%) )
 import Numeric ( readDec )
 import Word    ( Word32 )
diff --git a/ghc/lib/exts/Word.lhs b/ghc/lib/exts/Word.lhs
index fdfbee823f..480f28a982 100644
--- a/ghc/lib/exts/Word.lhs
+++ b/ghc/lib/exts/Word.lhs
@@ -125,6 +125,7 @@ import PrelIOBase
 import PrelAddr
 #endif
 import Ix
+import PrelNum ( Num(..), Integral(..) )	-- To get fromInt/toInt
 import Bits
 import Ratio
 import Numeric (readDec, showInt)
diff --git a/ghc/lib/std/CPUTime.lhs b/ghc/lib/std/CPUTime.lhs
index a90c8ae1e3..32297e8bb9 100644
--- a/ghc/lib/std/CPUTime.lhs
+++ b/ghc/lib/std/CPUTime.lhs
@@ -25,6 +25,7 @@ import PrelIOBase
 import PrelST
 #endif
 import IO		( ioError )
+import PrelNum ( Num(..), Integral(..) )	-- To get fromInt/toInt
 import Ratio
 
 #ifdef __HUGS__
diff --git a/ghc/lib/std/Random.lhs b/ghc/lib/std/Random.lhs
index 998ed0f08f..b914d74e9c 100644
--- a/ghc/lib/std/Random.lhs
+++ b/ghc/lib/std/Random.lhs
@@ -32,6 +32,7 @@ import CPUTime (getCPUTime)
 import PrelST
 import PrelRead
 import PrelShow
+import PrelNum		-- So we get fromInt, toInt
 import PrelIOBase
 import PrelNumExtra ( float2Double, double2Float )
 import PrelBase