[project @ 1997-01-21 08:52:58 by sof]

[ghc-hetmet.git] / ghc / runtime / main / StgStartup.lhc

diff --git a/ghc/runtime/main/StgStartup.lhc b/ghc/runtime/main/StgStartup.lhc
index b41500d..32382b6 100644 (file)
--- a/ghc/runtime/main/StgStartup.lhc
+++ b/ghc/runtime/main/StgStartup.lhc
@@ -628,7 +628,8 @@ END_REGISTER_CCS()
 START_REGISTER_PRELUDE(_regGHCbase);
 END_REGISTER_CCS()
 
-START_REGISTER_PRELUDE(_regGHCerr);
+/* OLD: START_REGISTER_PRELUDE(_regGHCerr); */
+START_REGISTER_PRELUDE(_regGHC);
 END_REGISTER_CCS()
 
 START_REGISTER_PRELUDE(_regPreludeGlaST);