diff options
author | Simon Marlow <marlowsd@gmail.com> | 2012-10-19 11:27:53 +0100 |
---|---|---|
committer | Simon Marlow <marlowsd@gmail.com> | 2012-10-19 11:49:37 +0100 |
commit | 53810006bbcd3fc9b58893858f95c3432cb33f0e (patch) | |
tree | ff4308239be53eb2ed75afb46bee03fc3a6f7ae9 /rts/HeapStackCheck.cmm | |
parent | 660dc69a777b462fc635e9914fa59bd784bb233c (diff) | |
download | haskell-53810006bbcd3fc9b58893858f95c3432cb33f0e.tar.gz |
profiling fixes
Diffstat (limited to 'rts/HeapStackCheck.cmm')
-rw-r--r-- | rts/HeapStackCheck.cmm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/rts/HeapStackCheck.cmm b/rts/HeapStackCheck.cmm index 1375216646..4fd44302f5 100644 --- a/rts/HeapStackCheck.cmm +++ b/rts/HeapStackCheck.cmm @@ -216,7 +216,7 @@ stg_gc_prim_n (W_ arg) /* The stg_enter_checkbh frame has the same shape as an update frame: */ INFO_TABLE_RET ( stg_enter_checkbh, RET_SMALL, - UPDATE_FRAME_FIELDS(W_,P_,info_ptr,ccs,updatee)) + UPDATE_FRAME_FIELDS(W_,P_,info_ptr,ccs,p2,updatee)) return (P_ ret) { foreign "C" checkBlockingQueues(MyCapability() "ptr", |