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 #include "HsVersions.h"
12 pRELUDE, pRELUDE_BUILTIN, pRELUDE_CORE, pRELUDE_RATIO,
13 pRELUDE_LIST, pRELUDE_TEXT,
14 pRELUDE_PRIMIO, pRELUDE_IO, pRELUDE_PS,
15 gLASGOW_ST, gLASGOW_MISC,
16 pRELUDE_FB, fromPrelude
19 CHK_Ubiq() -- debugging consistency check
24 gLASGOW_MISC = SLIT("PreludeGlaMisc")
25 gLASGOW_ST = SLIT("PreludeGlaST")
26 pRELUDE = SLIT("Prelude")
27 pRELUDE_BUILTIN = SLIT("PreludeBuiltin")
28 pRELUDE_CORE = SLIT("PreludeCore")
29 pRELUDE_FB = SLIT("PreludeFoldrBuild")
30 pRELUDE_IO = SLIT("PreludeIO")
31 pRELUDE_LIST = SLIT("PreludeList")
32 pRELUDE_PRIMIO = SLIT("PreludePrimIO")
33 pRELUDE_PS = SLIT("PreludePS")
34 pRELUDE_RATIO = SLIT("PreludeRatio")
35 pRELUDE_TEXT = SLIT("PreludeText")
37 fromPrelude :: FAST_STRING -> Bool
38 fromPrelude s = (_SUBSTR_ s 0 6 == SLIT("Prelude"))