X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Frts%2FStgStdThunks.hc;fp=ghc%2Frts%2FStgStdThunks.hc;h=ce56a01304de92060ad33cfb63809dadd423bcb5;hb=e13210b23e7f100c6f681b593b6f78445608aa38;hp=9bc1a21ee8e9e254062cba9ba6b0743cf0c9c92d;hpb=a2d10fbe1aa228c8848d92cbed9e8f00dddbb0b5;p=ghc-hetmet.git 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,);