diff options
Diffstat (limited to 'rts/Interpreter.c')
| -rw-r--r-- | rts/Interpreter.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/rts/Interpreter.c b/rts/Interpreter.c index a3b179a4be..3450780ba5 100644 --- a/rts/Interpreter.c +++ b/rts/Interpreter.c @@ -938,7 +938,7 @@ run_BCO_fun: Sp_subW(2); SpW(1) = (W_)obj; SpW(0) = (W_)&stg_apply_interp_info; - checkStackChunk(Sp,SpLim); + checkStackChunk(Sp, cap->r.rCurrentTSO->stackobj->stack+cap->r.rCurrentTSO->stackobj->stack_size); Sp_addW(2); ); |