diff options
author | mniip <mniip@mniip.com> | 2016-08-30 16:57:47 -0400 |
---|---|---|
committer | Ben Gamari <ben@smart-cactus.org> | 2016-08-30 17:50:51 -0400 |
commit | a25bf2673d0f6db5f454619ddf91f974cace4e8b (patch) | |
tree | 7b56d2ecef4a88999c8743d1ddc97a3b02c6933a /includes/stg | |
parent | 83b326cda759cfd4c538595cf38ee23eb81a4c76 (diff) | |
download | haskell-a25bf2673d0f6db5f454619ddf91f974cace4e8b.tar.gz |
Tag pointers in interpreted constructors
Instead of stg_interp_constr_entry there are now 7 functions (one for
each value of the tag bits) that tag the constructor pointer before
returning. This is consistent with compiled constructors' entry code,
and expectations that compiled code places on compiled constructors. The
iserv protocol is extended with an extra field that explains what
pointer tag the constructor should use.
Test Plan: Added tests for #12523
Reviewers: erikd, bgamari, hvr, austin, simonmar
Reviewed By: simonmar
Subscribers: osa1, thomie, rwbarton
Differential Revision: https://phabricator.haskell.org/D2473
GHC Trac Issues: #12523
Diffstat (limited to 'includes/stg')
-rw-r--r-- | includes/stg/MiscClosures.h | 8 |
1 files changed, 7 insertions, 1 deletions
diff --git a/includes/stg/MiscClosures.h b/includes/stg/MiscClosures.h index 3f5e403d49..07a7752ed2 100644 --- a/includes/stg/MiscClosures.h +++ b/includes/stg/MiscClosures.h @@ -64,7 +64,13 @@ RTS_RET(stg_maskAsyncExceptionszh_ret); RTS_RET(stg_stack_underflow_frame); RTS_RET(stg_restore_cccs); -// RTS_FUN(stg_interp_constr_entry); +// RTS_FUN(stg_interp_constr1_entry); +// RTS_FUN(stg_interp_constr2_entry); +// RTS_FUN(stg_interp_constr3_entry); +// RTS_FUN(stg_interp_constr4_entry); +// RTS_FUN(stg_interp_constr5_entry); +// RTS_FUN(stg_interp_constr6_entry); +// RTS_FUN(stg_interp_constr7_entry); // // This is referenced using the FFI in the compiler (ByteCodeItbls), // so we can't give it the correct type here because the prototypes |