From 9c39b06a2f4dd90de7981af27d073e247250ab5c Mon Sep 17 00:00:00 2001
From: sof <unknown>
Date: Sun, 8 Sep 2002 02:35:34 +0000
Subject: [PATCH] [project @ 2002-09-08 02:35:33 by sof] Hugs updates + fixes

---
 Data/Char.hs        |    2 ++
 Data/Word.hs        |    2 ++
 Foreign/C/String.hs |    1 +
 Foreign/Storable.hs |    1 +
 Numeric.hs          |    1 +
 5 files changed, 7 insertions(+)

diff --git a/Data/Char.hs b/Data/Char.hs
index feadb18..505d735 100644
--- a/Data/Char.hs
+++ b/Data/Char.hs
@@ -45,6 +45,8 @@ import GHC.Read (readLitChar, lexLitChar)
 #endif
 
 #ifdef __HUGS__
+import PrelImpl
+
 isLatin1 c = True
 #endif
 
diff --git a/Data/Word.hs b/Data/Word.hs
index 3bcc8a7..ff81405 100644
--- a/Data/Word.hs
+++ b/Data/Word.hs
@@ -17,7 +17,9 @@ module Data.Word
   ( 
 	-- * Unsigned integral types
 
+#ifndef __HUGS__
 	Word,
+#endif
 	Word8, Word16, Word32, Word64,
 	
 	-- * Notes
diff --git a/Foreign/C/String.hs b/Foreign/C/String.hs
index b1603c3..656b18f 100644
--- a/Foreign/C/String.hs
+++ b/Foreign/C/String.hs
@@ -53,6 +53,7 @@ import GHC.Num
 import GHC.IOBase
 import GHC.Base
 #else
+import Char ( chr, ord )
 #define unsafeChr chr
 #endif
 
diff --git a/Foreign/Storable.hs b/Foreign/Storable.hs
index 43fae68..e5d5202 100644
--- a/Foreign/Storable.hs
+++ b/Foreign/Storable.hs
@@ -51,6 +51,7 @@ import Foreign.Ptr
 #endif
 
 #ifdef __HUGS__
+import PrelImpl
 import Hugs.Storable
 #endif
 
diff --git a/Numeric.hs b/Numeric.hs
index 75c7b47..1b16963 100644
--- a/Numeric.hs
+++ b/Numeric.hs
@@ -58,6 +58,7 @@ import qualified Text.Read.Lex as L
 #endif
 
 #ifdef __HUGS__
+import PrelImpl
 import Hugs.Numeric
 #endif
 
-- 
1.7.10.4