2 % (c) The GRASP/AQUA Project, Glasgow University, 1992-1996
4 \section[PrelMods]{Definitions of prelude modules}
6 The strings identify built-in prelude modules. They are
7 defined here so as to avod
9 [oh dear, looks like the recursive module monster caught up with
10 and gobbled whoever was writing the above :-) -- SOF ]
13 #include "HsVersions.h"
17 gHC__, pRELUDE, pREL_BASE,
18 pREL_READ , pREL_NUM, pREL_LIST,
19 pREL_TUP , pACKED_STRING, cONC_BASE,
20 iO_BASE , mONAD, rATIO, iX,
21 sT_BASE , aRR_BASE, fOREIGN, mAIN,
25 CHK_Ubiq() -- debugging consistency check
27 import BasicTypes( SYN_IE(Module) )
31 gHC__, pRELUDE, pREL_BASE, pREL_NUM, pREL_LIST, pREL_TUP :: Module
32 pACKED_STRING, cONC_BASE, iO_BASE, mONAD, rATIO, iX :: Module
33 sT_BASE, aRR_BASE, fOREIGN, mAIN, gHC_MAIN, gHC_ERR :: Module
35 gHC__ = SLIT("GHC") -- Primitive types and values
37 pRELUDE = SLIT("Prelude")
38 pREL_BASE = SLIT("PrelBase")
39 pREL_READ = SLIT("PrelRead")
40 pREL_NUM = SLIT("PrelNum")
41 pREL_LIST = SLIT("PrelList")
42 pREL_TUP = SLIT("PrelTup")
43 pACKED_STRING= SLIT("PackBase")
44 cONC_BASE = SLIT("ConcBase")
45 iO_BASE = SLIT("IOBase")
49 sT_BASE = SLIT("STBase")
50 aRR_BASE = SLIT("ArrBase")
51 fOREIGN = SLIT("Foreign")
54 gHC_MAIN = SLIT("GHCmain")
55 gHC_ERR = SLIT("GHCerr")