[project @ 1998-01-30 16:57:33 by sof]

[ghc-hetmet.git] / ghc / compiler / prelude / PrelMods.lhs

diff --git a/ghc/compiler/prelude/PrelMods.lhs b/ghc/compiler/prelude/PrelMods.lhs
index 5234793..287a378 100644 (file)
--- a/ghc/compiler/prelude/PrelMods.lhs
+++ b/ghc/compiler/prelude/PrelMods.lhs
@@ -10,8 +10,6 @@ defined here so as to avod
  and gobbled whoever was writing the above :-) -- SOF ]
 
 \begin{code}
-#include "HsVersions.h"
-
 module PrelMods
         (
          gHC__, pRELUDE, pREL_BASE,
@@ -19,12 +17,13 @@ module PrelMods
         pREL_TUP  , pACKED_STRING, cONC_BASE,
          iO_BASE   , mONAD, rATIO, iX,
          sT_BASE   , aRR_BASE, fOREIGN, mAIN,
-         gHC_MAIN  , gHC_ERR
+         gHC_MAIN  , gHC_ERR,
+        cCALL     , aDDR
        ) where
 
-CHK_Ubiq() -- debugging consistency check
+#include "HsVersions.h"
 
-import BasicTypes( SYN_IE(Module) )
+import BasicTypes( Module )
 \end{code}
 
 \begin{code}
@@ -49,6 +48,8 @@ iX         = SLIT("Ix")
 sT_BASE             = SLIT("STBase")
 aRR_BASE     = SLIT("ArrBase")
 fOREIGN             = SLIT("Foreign")
+cCALL        = SLIT("CCall")
+aDDR         = SLIT("Addr")
 
 mAIN        = SLIT("Main")
 gHC_MAIN     = SLIT("GHCmain")