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

[ghc-hetmet.git] / ghc / compiler / typecheck / TcIfaceSig.lhs

diff --git a/ghc/compiler/typecheck/TcIfaceSig.lhs b/ghc/compiler/typecheck/TcIfaceSig.lhs
index 7326d93..b8e1b1a 100644 (file)
--- a/ghc/compiler/typecheck/TcIfaceSig.lhs
+++ b/ghc/compiler/typecheck/TcIfaceSig.lhs
@@ -16,7 +16,7 @@ import TcMonoType     ( tcPolyType )
 import HsSyn           ( Sig(..), PolyType )
 import RnHsSyn         ( RenamedSig(..), RnName(..) )
 
-import CmdLineOpts     ( opt_CompilingPrelude )
+import CmdLineOpts     ( opt_CompilingGhcInternals )
 import Id              ( mkImported )
 --import Name          ( Name(..) )
 import Maybes          ( maybeToBool )
@@ -56,7 +56,7 @@ tcInterfaceSigs (Sig name ty pragmas src_loc : sigs)
 
   | otherwise -- odd name...
   = case name of
-      WiredInId _ | opt_CompilingPrelude
+      WiredInId _ | opt_CompilingGhcInternals
         -> tcInterfaceSigs sigs
       _ -> tcAddSrcLoc src_loc $
           failTc (ifaceSigNameErr name)