From: simonmar <unknown>
Date: Wed, 31 Jan 2001 10:12:08 +0000 (+0000)
Subject: [project @ 2001-01-31 10:12:08 by simonmar]
X-Git-Tag: Approximately_9120_patches~2765
X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=cb7a5414a2414df673c33633076816d1c62afc3e;p=ghc-hetmet.git

[project @ 2001-01-31 10:12:08 by simonmar]
fix compilation errors in #ifdef TICKY_TICKY code
---

diff --git a/ghc/rts/StgMiscClosures.hc b/ghc/rts/StgMiscClosures.hc
index 23a0caf..8ed6fa8 100644
--- a/ghc/rts/StgMiscClosures.hc
+++ b/ghc/rts/StgMiscClosures.hc
@@ -1,5 +1,5 @@
 /* -----------------------------------------------------------------------------
- * $Id: StgMiscClosures.hc,v 1.61 2001/01/29 17:23:41 simonmar Exp $
+ * $Id: StgMiscClosures.hc,v 1.62 2001/01/31 10:12:08 simonmar Exp $
  *
  * (c) The GHC Team, 1998-2000
  *
@@ -313,7 +313,7 @@ STGFUN(stg_IND_PERM_entry)
 #  ifdef PROFILING
 #    error Profiling and ticky-ticky do not mix at present!
 #  endif  /* PROFILING */
-    SET_INFO((StgInd*)R1.p,&IND_info);
+    SET_INFO((StgInd*)R1.p,&stg_IND_info);
 #endif /* TICKY_TICKY */
 
     R1.p = (P_) ((StgInd*)R1.p)->indirectee;
@@ -359,7 +359,7 @@ STGFUN(stg_IND_OLDGEN_PERM_entry)
 #  ifdef PROFILING
 #    error Profiling and ticky-ticky do not mix at present!
 #  endif  /* PROFILING */
-    SET_INFO((StgInd*)R1.p,&IND_OLDGEN_info);
+    SET_INFO((StgInd*)R1.p,&stg_IND_OLDGEN_info);
 #endif /* TICKY_TICKY */
 
     R1.p = (P_) ((StgInd*)R1.p)->indirectee;