diff options
| author | simonmar <unknown> | 2001-01-31 10:12:08 +0000 |
|---|---|---|
| committer | simonmar <unknown> | 2001-01-31 10:12:08 +0000 |
| commit | cb7a5414a2414df673c33633076816d1c62afc3e (patch) | |
| tree | a6cb71c15a88b2e5fa08285b2da516658720991a | |
| parent | 9710d56a8bf53433d16d6d44da3a6e9a35955cce (diff) | |
| download | haskell-cb7a5414a2414df673c33633076816d1c62afc3e.tar.gz | |
[project @ 2001-01-31 10:12:08 by simonmar]
fix compilation errors in #ifdef TICKY_TICKY code
| -rw-r--r-- | ghc/rts/StgMiscClosures.hc | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/ghc/rts/StgMiscClosures.hc b/ghc/rts/StgMiscClosures.hc index 23a0caf342..8ed6fa86e4 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; |