From e13210b23e7f100c6f681b593b6f78445608aa38 Mon Sep 17 00:00:00 2001 From: simonmar Date: Thu, 31 May 2001 10:59:14 +0000 Subject: [PATCH] [project @ 2001-05-31 10:59:14 by simonmar] Fix bug in the GC info for an stg_ap_1_upd closure (it was one word too short). --- ghc/rts/StgStdThunks.hc | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/ghc/rts/StgStdThunks.hc b/ghc/rts/StgStdThunks.hc index 9bc1a21..ce56a01 100644 --- a/ghc/rts/StgStdThunks.hc +++ b/ghc/rts/StgStdThunks.hc @@ -1,5 +1,5 @@ /* ----------------------------------------------------------------------------- - * $Id: StgStdThunks.hc,v 1.15 2001/03/23 16:36:21 simonmar Exp $ + * $Id: StgStdThunks.hc,v 1.16 2001/05/31 10:59:14 simonmar Exp $ * * (c) The GHC Team, 1998-2000 * @@ -159,7 +159,7 @@ FN_(stg_ap_8_upd_entry); * in the compiler that means stg_ap_1 is generated occasionally (ToDo) */ -INFO_TABLE_SRT(stg_ap_1_upd_info,stg_ap_1_upd_entry,1,0,0,0,0,THUNK,,EF_,"stg_ap_1_upd_info","stg_ap_1_upd_info"); +INFO_TABLE_SRT(stg_ap_1_upd_info,stg_ap_1_upd_entry,1,1,0,0,0,THUNK,,EF_,"stg_ap_1_upd_info","stg_ap_1_upd_info"); FN_(stg_ap_1_upd_entry) { FB_ STK_CHK_NP(sizeofW(StgUpdateFrame),1,); -- 1.7.10.4