From 2029b603712e39acadbb0a9a54a048d980dbd078 Mon Sep 17 00:00:00 2001 From: simonmar Date: Mon, 26 Mar 2001 13:43:05 +0000 Subject: [PATCH] [project @ 2001-03-26 13:43:05 by simonmar] oops, STABLE_NAME_info is stg_STABLE_NAME_info in the HEAD. --- ghc/rts/PrimOps.hc | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/ghc/rts/PrimOps.hc b/ghc/rts/PrimOps.hc index 0a8e6f8..a23561f 100644 --- a/ghc/rts/PrimOps.hc +++ b/ghc/rts/PrimOps.hc @@ -1,5 +1,5 @@ /* ----------------------------------------------------------------------------- - * $Id: PrimOps.hc,v 1.77 2001/03/26 13:31:46 simonmar Exp $ + * $Id: PrimOps.hc,v 1.78 2001/03/26 13:43:05 simonmar Exp $ * * (c) The GHC Team, 1998-2000 * @@ -1084,7 +1084,7 @@ FN_(makeStableNamezh_fast) /* Is there already a StableName for this heap object? */ if (stable_ptr_table[index].sn_obj == NULL) { sn_obj = (StgStableName *) (Hp - sizeofW(StgStableName) + 1); - SET_HDR(sn_obj,&STABLE_NAME_info,CCCS); + SET_HDR(sn_obj,&stg_STABLE_NAME_info,CCCS); sn_obj->sn = index; stable_ptr_table[index].sn_obj = (StgClosure *)sn_obj; } else { -- 1.7.10.4