diff options
| author | Ben Gamari <bgamari.foss@gmail.com> | 2017-02-07 23:00:10 -0500 |
|---|---|---|
| committer | Ben Gamari <ben@smart-cactus.org> | 2017-02-08 10:26:00 -0500 |
| commit | 34e3523354916b0fb8a0dc93041d25812f7e6181 (patch) | |
| tree | 5a33a3183828a23b130e889eff23b90eae30ba5e /rts/StgCRun.c | |
| parent | 5279b08ba3f01e4b7e28d12b2751413d789d9fbe (diff) | |
| download | haskell-34e3523354916b0fb8a0dc93041d25812f7e6181.tar.gz | |
Fix stop_thread unwinding information
This corrects the unwind information for `stg_stop_thread`, which
allows us to unwind back to the C stack after reaching the end of the
STG stack.
Test Plan: Validate
Reviewers: simonmar, austin, erikd
Reviewed By: simonmar
Subscribers: thomie
Differential Revision: https://phabricator.haskell.org/D2746
Diffstat (limited to 'rts/StgCRun.c')
| -rw-r--r-- | rts/StgCRun.c | 6 |
1 files changed, 1 insertions, 5 deletions
diff --git a/rts/StgCRun.c b/rts/StgCRun.c index 0610dd3717..5f7f2b910f 100644 --- a/rts/StgCRun.c +++ b/rts/StgCRun.c @@ -320,11 +320,7 @@ StgRunIsImplementedInAssembler(void) : : "i"(RESERVED_C_STACK_BYTES), -#if defined(mingw32_HOST_OS) - "i"(80 /*stack frame size; 8 too large to make the alignment right*/) -#else - "i"(48 /*stack frame size*/) -#endif + "i"(STG_RUN_STACK_FRAME_SIZE /* stack frame size */) ); /* * See Note [Stack Alignment on X86] |