From 449d4c61f9a60410d8cea0282f065fb405af1617 Mon Sep 17 00:00:00 2001 From: sof Date: Fri, 14 Mar 1997 01:57:19 +0000 Subject: [PATCH] [project @ 1997-03-14 01:57:19 by sof] Nil closure rename --- ghc/runtime/storage/SMstacks.lc | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/ghc/runtime/storage/SMstacks.lc b/ghc/runtime/storage/SMstacks.lc index 1ac07b9..cd18c6e 100644 --- a/ghc/runtime/storage/SMstacks.lc +++ b/ghc/runtime/storage/SMstacks.lc @@ -35,7 +35,7 @@ initStacks(smInfo *sm) STKO_SIZE(MainStkO) = RTSflags.GcFlags.stksSize + STKO_VHS; STKO_SpB(MainStkO) = STKO_SuB(MainStkO) = STKO_BSTK_BOT(MainStkO) + BREL(1); STKO_SpA(MainStkO) = STKO_SuA(MainStkO) = STKO_ASTK_BOT(MainStkO) + AREL(1); - STKO_LINK(MainStkO) = Prelude_Z91Z93_closure; + STKO_LINK(MainStkO) = PrelBase_Z91Z93_closure; STKO_RETURN(MainStkO) = NULL; ASSERT(sanityChk_StkO(MainStkO)); -- 1.7.10.4