From: sof Date: Fri, 20 Jun 1997 09:09:07 +0000 (+0000) Subject: [project @ 1997-06-20 09:09:07 by sof] X-Git-Tag: Approximately_1000_patches_recorded~296 X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=aba63c7593adfcb3367c3764198fe9d6806d6af8;p=ghc-hetmet.git [project @ 1997-06-20 09:09:07 by sof] Re-enabled CC_DECLS for CC_CAFs and CC_DICTs --- diff --git a/ghc/runtime/main/StgStartup.lhc b/ghc/runtime/main/StgStartup.lhc index 061a0c0..e0f26a7 100644 --- a/ghc/runtime/main/StgStartup.lhc +++ b/ghc/runtime/main/StgStartup.lhc @@ -604,15 +604,15 @@ STGFUN(startCcRegisteringWorld) JMP_(_regMain); FE_ } -/* SOF: Prelude supplies these for you -CC_DECLARE(CC_CAFs, "CAFs_in_...", "PRELUDE", "PRELUDE", CC_IS_CAF,*not static*); -CC_DECLARE(CC_DICTs, "DICTs_in_...", "PRELUDE", "PRELUDE", CC_IS_DICT,*not static*); -START_REGISTER_PRELUDE(_regPrelude); +CC_DECLARE(CC_CAFs, "CAFs_in_...", "PRELUDE", "PRELUDE", CC_IS_CAF,/*not static*/); +CC_DECLARE(CC_DICTs, "DICTs_in_...", "PRELUDE", "PRELUDE", CC_IS_DICT,/*not static*/); + +START_REGISTER_PRELUDE(_regPrel); REGISTER_CC(CC_CAFs); REGISTER_CC(CC_DICTs); END_REGISTER_CCS() -*/ + \end{code} We also need cost centre declarations and registering routines for other