summaryrefslogtreecommitdiff
path: root/gcc/melt-run.proto.h
diff options
context:
space:
mode:
authorbstarynk <bstarynk@138bc75d-0d04-0410-961f-82ee72b054a4>2013-06-25 18:59:02 +0000
committerbstarynk <bstarynk@138bc75d-0d04-0410-961f-82ee72b054a4>2013-06-25 18:59:02 +0000
commitbfa3905362f28be5b539b0e7cee142bbe9652362 (patch)
tree3076bbb0d13a218150c2c6cd385467b1fab9cd8f /gcc/melt-run.proto.h
parente1ef946b671e7f4e0fa26122f65d0901d2b82246 (diff)
downloadgcc-bfa3905362f28be5b539b0e7cee142bbe9652362.tar.gz
2013-06-25 Basile Starynkevitch <basile@starynkevitch.net>
* melt-runtime.h (Melt_CallFrame): Has also a melthook_ptr_t. (Melt_CallFrameWithValues): Add constructor for hook. * melt-run.proto.h (meltfptr, meltfnum, meltfclos, meltfrout): Give definition when MELT_HAVE_CLASSY_FRAME. * melt/warmelt-genobj.melt (compile2obj_hook): The hook data parameter is named melthookdatap. * melt/warmelt-outobj.melt (outcinitfill_objinitroutine): Improve. (outcinitfill_objinithook): Improve. (output_curframe_declstruct): Emit variant for MELT_HAVE_CLASSY_FRAME. (output_curframe_declstruct_init): Ditto. (outpucod_procroutine): Slighty improved emission. * melt/warmelt-modes.melt (generate_runtypesupport_gty): Emit generation of safe casting functions. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/branches/melt-branch@200402 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/melt-run.proto.h')
-rw-r--r--gcc/melt-run.proto.h7
1 files changed, 7 insertions, 0 deletions
diff --git a/gcc/melt-run.proto.h b/gcc/melt-run.proto.h
index 235cff4e19a..170badbba7e 100644
--- a/gcc/melt-run.proto.h
+++ b/gcc/melt-run.proto.h
@@ -98,10 +98,17 @@ along with GCC; see the file COPYING3. If not see
#define meltcallcount -1
+#if MELT_HAVE_CLASSY_FRAME
+#define meltfptr meltfram__._meltcf_valtab
+#define meltfnum meltfram__._meltcf_longtab
+#define meltfclos meltfram__._meltcf_clos
+#define meltfrout meltfram__._meltcf_clos->rout
+#else /*!MELT_HAVE_CLASSY_FRAME*/
#define meltfptr meltfram__.mcfr_varptr
#define meltfnum meltfram__.mcfr_varnum
#define meltfclos meltfram__.mcfr_clos
#define meltfrout meltfram__.mcfr_clos->rout
+#endif /*MELT_HAVE_CLASSY_FRAME*/
/* these are added by the melt-module.mk file & make */
extern const char melt_compiled_timestamp[];