[project @ 2000-04-19 09:59:55 by panne]

[ghc-hetmet.git] / ghc / lib / std / Char.lhs

diff --git a/ghc/lib/std/Char.lhs b/ghc/lib/std/Char.lhs
index 213d8f7..442b84e 100644 (file)
--- a/ghc/lib/std/Char.lhs
+++ b/ghc/lib/std/Char.lhs
@@ -32,10 +32,14 @@ module Char
      -- Implementation checked wrt. Haskell 98 lib report, 1/99.
     ) where
 
+#ifndef __HUGS__
 import PrelBase
 import PrelShow
 import PrelEnum
 import PrelNum
 import PrelRead (readLitChar, lexLitChar, digitToInt)
 import PrelErr  ( error )
+#else
+isLatin1 c = True
+#endif
 \end{code}