diff options
author | Simon Marlow <simonmar@microsoft.com> | 2007-08-24 09:54:40 +0000 |
---|---|---|
committer | Simon Marlow <simonmar@microsoft.com> | 2007-08-24 09:54:40 +0000 |
commit | 229fa59a85aa087900a07cdcc7200164db84f79b (patch) | |
tree | b2df993068065e50a2cbadb5b4a4faa0d15ad419 /rts/StgStdThunks.cmm | |
parent | 4143b1297e5b7e0b254d8b1a298f6306fdde81e9 (diff) | |
download | haskell-229fa59a85aa087900a07cdcc7200164db84f79b.tar.gz |
Fix info table for stg_ap_1_upd, it stated 1 non-ptr, should be zero
Fixes a crash I encountered with profiling and -debug
Diffstat (limited to 'rts/StgStdThunks.cmm')
-rw-r--r-- | rts/StgStdThunks.cmm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/rts/StgStdThunks.cmm b/rts/StgStdThunks.cmm index 20ceb6aaba..fecbb4c3c0 100644 --- a/rts/StgStdThunks.cmm +++ b/rts/StgStdThunks.cmm @@ -160,7 +160,7 @@ SELECTOR_CODE_NOUPD(15) * in the compiler that means stg_ap_1 is generated occasionally (ToDo) */ -INFO_TABLE(stg_ap_1_upd,1,1,THUNK_1_0,"stg_ap_1_upd_info","stg_ap_1_upd_info") +INFO_TABLE(stg_ap_1_upd,1,0,THUNK_1_0,"stg_ap_1_upd_info","stg_ap_1_upd_info") { TICK_ENT_DYN_THK(); STK_CHK_NP(SIZEOF_StgUpdateFrame+WDS(1)); |