Skip to content
Snippets Groups Projects
Commit 1db3e1fe authored by sof's avatar sof
Browse files

[project @ 1997-08-03 02:14:33 by sof]

Removed preludeNames - dead code
parent 63b9e02a
No related merge requests found
......@@ -6,8 +6,8 @@
The strings identify built-in prelude modules. They are
defined here so as to avod
[oh dear, look like the recursive module monster caught up and
gobbled whoever was writing the above :-) -- SOF ]
[oh dear, looks like the recursive module monster caught up with
and gobbled whoever was writing the above :-) -- SOF ]
\begin{code}
#include "HsVersions.h"
......@@ -23,30 +23,9 @@ module PrelMods
) where
CHK_Ubiq() -- debugging consistency check
import UniqSet ( UniqSet(..), mkUniqSet, elementOfUniqSet )
\end{code}
Predicate used by RnIface to decide whether or not to
append a special suffix for prelude modules:
\begin{code}
preludeNames :: UniqSet FAST_STRING
preludeNames =
mkUniqSet
[ gHC__
, pRELUDE , pREL_BASE
, pREL_READ , pREL_NUM
, pREL_LIST , pREL_TUP
, pACKED_STRING , cONC_BASE
, iO_BASE , mONAD
, rATIO , iX
, sT_BASE , aRR_BASE
, fOREIGN , mAIN
, gHC_MAIN , gHC_ERR
]
\end{code}
\begin{code}
gHC__ = SLIT("GHC") -- Primitive types and values
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment