Another fix to the stg_enter_checkbh frame
authorSimon Marlow <marlowsd@gmail.com>
Tue, 29 Nov 2011 12:43:45 +0000 (12:43 +0000)
committerSimon Marlow <marlowsd@gmail.com>
Tue, 29 Nov 2011 14:22:27 +0000 (14:22 +0000)
rts/HeapStackCheck.cmm

index 7b08f78..d80e101 100644 (file)
@@ -167,7 +167,14 @@ __stg_gc_enter_1
    be an orphaned BLOCKING_QUEUE now.
    -------------------------------------------------------------------------- */
 
-INFO_TABLE_RET( stg_enter_checkbh, RET_SMALL, P_ unused)
+/* The stg_enter_checkbh frame has the same shape as an update frame: */
+#if defined(PROFILING)
+#define UPD_FRAME_PARAMS W_ unused1, W_ unused2, P_ unused3
+#else
+#define UPD_FRAME_PARAMS P_ unused1
+#endif
+
+INFO_TABLE_RET( stg_enter_checkbh, RET_SMALL, UPD_FRAME_PARAMS)
 {
     R1 = StgUpdateFrame_updatee(Sp);
     Sp = Sp + SIZEOF_StgUpdateFrame;