From 449d4c61f9a60410d8cea0282f065fb405af1617 Mon Sep 17 00:00:00 2001
From: sof <unknown>
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 1ac07b975c5b..cd18c6e2f4a1 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));
--
GitLab