diff options
Diffstat (limited to 'ghc/rts/Apply.cmm')
| -rw-r--r-- | ghc/rts/Apply.cmm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/ghc/rts/Apply.cmm b/ghc/rts/Apply.cmm index a647b3754a..8d19d1402f 100644 --- a/ghc/rts/Apply.cmm +++ b/ghc/rts/Apply.cmm @@ -264,7 +264,7 @@ INFO_TABLE(stg_AP_STACK,/*special layout*/0,0,AP_STACK,"AP_STACK","AP_STACK") // Reload the stack W_ i; W_ p; - p = ap + SIZEOF_StgThunkHeader + OFFSET_StgAP_STACK_payload; + p = ap + SIZEOF_StgHeader + OFFSET_StgAP_STACK_payload; i = 0; for: if (i < Words) { |