[project @ 1996-06-26 10:26:00 by partain]

[ghc-hetmet.git] / ghc / compiler / reader / PrefixSyn.lhs

diff --git a/ghc/compiler/reader/PrefixSyn.lhs b/ghc/compiler/reader/PrefixSyn.lhs
index e6c65c4..cd4d1b8 100644 (file)
--- a/ghc/compiler/reader/PrefixSyn.lhs
+++ b/ghc/compiler/reader/PrefixSyn.lhs
@@ -12,22 +12,27 @@ order that follows the \tr{Prefix_Form} document.
 
 module PrefixSyn (
        RdrBinding(..),
-       RdrId(..),
+       SYN_IE(RdrId),
        RdrMatch(..),
-       SigConverter(..),
-       SrcFile(..),
-       SrcFun(..),
-       SrcLine(..),
+       SYN_IE(SigConverter),
+       SYN_IE(SrcFile),
+       SYN_IE(SrcFun),
+       SYN_IE(SrcLine),
 
        readInteger
     ) where
 
-import Ubiq
+IMP_Ubiq()
+IMPORT_1_3(Char(isDigit))
 
 import HsSyn
 import RdrHsSyn
 import Util            ( panic )
 
+#ifdef REALLY_HASKELL_1_3
+ord = fromEnum :: Char -> Int
+#endif
+
 type RdrId   = RdrName
 type SrcLine = Int
 type SrcFile = FAST_STRING