diff options
author | bstarynk <bstarynk@138bc75d-0d04-0410-961f-82ee72b054a4> | 2013-06-05 08:49:58 +0000 |
---|---|---|
committer | bstarynk <bstarynk@138bc75d-0d04-0410-961f-82ee72b054a4> | 2013-06-05 08:49:58 +0000 |
commit | a52fb3d94315675daa59ff9c06c296d6ea016ee2 (patch) | |
tree | 73cc3377c6db2b3a7b1d77d31452b0837c1e0aca /gcc/melt/generated/warmelt-outobj.c | |
parent | f1c2d8da9fabf337e2543106a43542a5bb3d6b47 (diff) | |
download | gcc-a52fb3d94315675daa59ff9c06c296d6ea016ee2.tar.gz |
2013-06-04 Basile Starynkevitch <basile@starynkevitch.net>
{{Unstable & regenerated}}
* melt/generated/meltrunsup-inc.c: Regenerate.
* melt/generated/meltrunsup.h: Regenerate.
* melt/generated/warmelt-base+01.c: Regenerate.
* melt/generated/warmelt-base+02.c: Regenerate.
* melt/generated/warmelt-base+meltdesc.c: Regenerate.
* melt/generated/warmelt-base+melttime.h: Regenerate.
* melt/generated/warmelt-base.c: Regenerate.
* melt/generated/warmelt-debug+01.c: Regenerate.
* melt/generated/warmelt-debug+02.c: Regenerate.
* melt/generated/warmelt-debug+meltdesc.c: Regenerate.
* melt/generated/warmelt-debug+melttime.h: Regenerate.
* melt/generated/warmelt-debug.c: Regenerate.
* melt/generated/warmelt-first+01.c: Regenerate.
* melt/generated/warmelt-first+02.c: Regenerate.
* melt/generated/warmelt-first+meltdesc.c: Regenerate.
* melt/generated/warmelt-first+melttime.h: Regenerate.
* melt/generated/warmelt-first.c: Regenerate.
* melt/generated/warmelt-genobj+01.c: Regenerate.
* melt/generated/warmelt-genobj+02.c: Regenerate.
* melt/generated/warmelt-genobj+03.c: Regenerate.
* melt/generated/warmelt-genobj+04.c: Regenerate.
* melt/generated/warmelt-genobj+05.c: Regenerate.
* melt/generated/warmelt-genobj+06.c: Regenerate.
* melt/generated/warmelt-genobj+07.c: Regenerate.
* melt/generated/warmelt-genobj+meltdesc.c: Regenerate.
* melt/generated/warmelt-genobj+melttime.h: Regenerate.
* melt/generated/warmelt-genobj.c: Regenerate.
* melt/generated/warmelt-hooks+01.c: Regenerate.
* melt/generated/warmelt-hooks+02.c: Regenerate.
* melt/generated/warmelt-hooks+meltdesc.c: Regenerate.
* melt/generated/warmelt-hooks+melttime.h: Regenerate.
* melt/generated/warmelt-hooks.c: Regenerate.
* melt/generated/warmelt-macro+01.c: Regenerate.
* melt/generated/warmelt-macro+02.c: Regenerate.
* melt/generated/warmelt-macro+03.c: Regenerate.
* melt/generated/warmelt-macro+04.c: Regenerate.
* melt/generated/warmelt-macro+05.c: Regenerate.
* melt/generated/warmelt-macro+06.c: Regenerate.
* melt/generated/warmelt-macro+meltdesc.c: Regenerate.
* melt/generated/warmelt-macro+melttime.h: Regenerate.
* melt/generated/warmelt-macro.c: Regenerate.
* melt/generated/warmelt-modes+01.c: Regenerate.
* melt/generated/warmelt-modes+02.c: Regenerate.
* melt/generated/warmelt-modes+03.c: Regenerate.
* melt/generated/warmelt-modes+meltdesc.c: Regenerate.
* melt/generated/warmelt-modes+melttime.h: Regenerate.
* melt/generated/warmelt-modes.c: Regenerate.
* melt/generated/warmelt-normal+01.c: Regenerate.
* melt/generated/warmelt-normal+02.c: Regenerate.
* melt/generated/warmelt-normal+03.c: Regenerate.
* melt/generated/warmelt-normal+04.c: Regenerate.
* melt/generated/warmelt-normal+05.c: Regenerate.
* melt/generated/warmelt-normal+06.c: Regenerate.
* melt/generated/warmelt-normal+meltdesc.c: Regenerate.
* melt/generated/warmelt-normal+melttime.h: Regenerate.
* melt/generated/warmelt-normal.c: Regenerate.
* melt/generated/warmelt-normatch+01.c: Regenerate.
* melt/generated/warmelt-normatch+02.c: Regenerate.
* melt/generated/warmelt-normatch+03.c: Regenerate.
* melt/generated/warmelt-normatch+04.c: Regenerate.
* melt/generated/warmelt-normatch+05.c: Regenerate.
* melt/generated/warmelt-normatch+06.c: Regenerate.
* melt/generated/warmelt-normatch+meltdesc.c: Regenerate.
* melt/generated/warmelt-normatch+melttime.h: Regenerate.
* melt/generated/warmelt-normatch.c: Regenerate.
* melt/generated/warmelt-outobj+01.c: Regenerate.
* melt/generated/warmelt-outobj+02.c: Regenerate.
* melt/generated/warmelt-outobj+03.c: Regenerate.
* melt/generated/warmelt-outobj+04.c: Regenerate.
* melt/generated/warmelt-outobj+05.c: Regenerate.
* melt/generated/warmelt-outobj+06.c: Regenerate.
* melt/generated/warmelt-outobj+07.c: Regenerate.
* melt/generated/warmelt-outobj+meltdesc.c: Regenerate.
* melt/generated/warmelt-outobj+melttime.h: Regenerate.
* melt/generated/warmelt-outobj.c: Regenerate.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/branches/melt-branch@199686 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/melt/generated/warmelt-outobj.c')
-rw-r--r-- | gcc/melt/generated/warmelt-outobj.c | 20106 |
1 files changed, 10091 insertions, 10015 deletions
diff --git a/gcc/melt/generated/warmelt-outobj.c b/gcc/melt/generated/warmelt-outobj.c index 96ee72a1444..6fe14c60dba 100644 --- a/gcc/melt/generated/warmelt-outobj.c +++ b/gcc/melt/generated/warmelt-outobj.c @@ -47,109 +47,87 @@ MELT_EXTERN const char meltrun_used_md5_melt[] = melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_1_warmelt_outobj_GET_CODE_BUFFER_LIMIT (meltclosure_ptr_t meltclosp_, - melt_ptr_t meltfirstargp_, - const melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un - *meltxargtab_, - const melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un - *meltxrestab_); - - - - -melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_2_warmelt_outobj_PUT_CODE_BUFFER_LIMIT (meltclosure_ptr_t meltclosp_, - melt_ptr_t meltfirstargp_, - const melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un - *meltxargtab_, - const melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un - *meltxrestab_); - - - - -melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_3_warmelt_outobj_CODE_BUFFER_LIMIT_OPTSET (meltclosure_ptr_t - meltclosp_, - melt_ptr_t meltfirstargp_, - const melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un - *meltxargtab_, - const melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un - *meltxrestab_); +meltrout_1_WARMELTmiOUTOBJ_GET_CODE_BUFFER_LIMIT (meltclosure_ptr_t + meltclosp_, + melt_ptr_t meltfirstargp_, + const melt_argdescr_cell_t + meltxargdescr_[], + union meltparam_un + *meltxargtab_, + const melt_argdescr_cell_t + meltxresdescr_[], + union meltparam_un + *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_4_warmelt_outobj_OUT_ENUMIX_MODVARBIND (meltclosure_ptr_t meltclosp_, - melt_ptr_t meltfirstargp_, - const melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un - *meltxargtab_, - const melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un - *meltxrestab_); +meltrout_2_WARMELTmiOUTOBJ_PUT_CODE_BUFFER_LIMIT (meltclosure_ptr_t + meltclosp_, + melt_ptr_t meltfirstargp_, + const melt_argdescr_cell_t + meltxargdescr_[], + union meltparam_un + *meltxargtab_, + const melt_argdescr_cell_t + meltxresdescr_[], + union meltparam_un + *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_5_warmelt_outobj_LAMBDA___1__ (meltclosure_ptr_t meltclosp_, - melt_ptr_t meltfirstargp_, - const melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un *meltxargtab_, - const melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un *meltxrestab_); +meltrout_3_WARMELTmiOUTOBJ_CODE_BUFFER_LIMIT_OPTSET (meltclosure_ptr_t + meltclosp_, + melt_ptr_t + meltfirstargp_, + const + melt_argdescr_cell_t + meltxargdescr_[], + union meltparam_un + *meltxargtab_, + const + melt_argdescr_cell_t + meltxresdescr_[], + union meltparam_un + *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_6_warmelt_outobj_OUTDECLINIT_ROOT (meltclosure_ptr_t meltclosp_, - melt_ptr_t meltfirstargp_, - const melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un *meltxargtab_, - const melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un *meltxrestab_); +meltrout_4_WARMELTmiOUTOBJ_OUT_ENUMIX_MODVARBIND (meltclosure_ptr_t + meltclosp_, + melt_ptr_t meltfirstargp_, + const melt_argdescr_cell_t + meltxargdescr_[], + union meltparam_un + *meltxargtab_, + const melt_argdescr_cell_t + meltxresdescr_[], + union meltparam_un + *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_7_warmelt_outobj_OUTPUCOD_OBJINIELEM (meltclosure_ptr_t meltclosp_, - melt_ptr_t meltfirstargp_, - const melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un - *meltxargtab_, - const melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un - *meltxrestab_); +meltrout_5_WARMELTmiOUTOBJ_LAMBDA___1__ (meltclosure_ptr_t meltclosp_, + melt_ptr_t meltfirstargp_, + const melt_argdescr_cell_t + meltxargdescr_[], + union meltparam_un *meltxargtab_, + const melt_argdescr_cell_t + meltxresdescr_[], + union meltparam_un *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_8_warmelt_outobj_OUTCINITFILL_ROOT (meltclosure_ptr_t meltclosp_, +meltrout_6_WARMELTmiOUTOBJ_OUTDECLINIT_ROOT (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[], @@ -163,114 +141,92 @@ meltrout_8_warmelt_outobj_OUTCINITFILL_ROOT (meltclosure_ptr_t meltclosp_, melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_9_warmelt_outobj_OUTCINITPREDEF_ROOT (meltclosure_ptr_t meltclosp_, - melt_ptr_t meltfirstargp_, - const melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un - *meltxargtab_, - const melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un - *meltxrestab_); - - - - -melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_10_warmelt_outobj_OUTPUT_PREDEF (meltclosure_ptr_t meltclosp_, - melt_ptr_t meltfirstargp_, - const melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un *meltxargtab_, - const melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un *meltxrestab_); +meltrout_7_WARMELTmiOUTOBJ_OUTPUCOD_OBJINIELEM (meltclosure_ptr_t meltclosp_, + melt_ptr_t meltfirstargp_, + const melt_argdescr_cell_t + meltxargdescr_[], + union meltparam_un + *meltxargtab_, + const melt_argdescr_cell_t + meltxresdescr_[], + union meltparam_un + *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_11_warmelt_outobj_OUTPUCOD_PREDEF (meltclosure_ptr_t meltclosp_, - melt_ptr_t meltfirstargp_, - const melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un *meltxargtab_, - const melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un *meltxrestab_); +meltrout_8_WARMELTmiOUTOBJ_OUTCINITFILL_ROOT (meltclosure_ptr_t meltclosp_, + melt_ptr_t meltfirstargp_, + const melt_argdescr_cell_t + meltxargdescr_[], + union meltparam_un + *meltxargtab_, + const melt_argdescr_cell_t + meltxresdescr_[], + union meltparam_un + *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_12_warmelt_outobj_OUTPUCOD_NIL (meltclosure_ptr_t meltclosp_, - melt_ptr_t meltfirstargp_, - const melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un *meltxargtab_, - const melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un *meltxrestab_); +meltrout_9_WARMELTmiOUTOBJ_OUTCINITPREDEF_ROOT (meltclosure_ptr_t meltclosp_, + melt_ptr_t meltfirstargp_, + const melt_argdescr_cell_t + meltxargdescr_[], + union meltparam_un + *meltxargtab_, + const melt_argdescr_cell_t + meltxresdescr_[], + union meltparam_un + *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_13_warmelt_outobj_OUTPUCOD_OBJEXPANDPUREVAL (meltclosure_ptr_t - meltclosp_, - melt_ptr_t - meltfirstargp_, - const - melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un - *meltxargtab_, - const - melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un - *meltxrestab_); +meltrout_10_WARMELTmiOUTOBJ_OUTPUT_PREDEF (meltclosure_ptr_t meltclosp_, + melt_ptr_t meltfirstargp_, + const melt_argdescr_cell_t + meltxargdescr_[], + union meltparam_un *meltxargtab_, + const melt_argdescr_cell_t + meltxresdescr_[], + union meltparam_un *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_14_warmelt_outobj_OUTPUCOD_OBJHOOKNTH (meltclosure_ptr_t meltclosp_, - melt_ptr_t meltfirstargp_, - const melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un - *meltxargtab_, - const melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un - *meltxrestab_); +meltrout_11_WARMELTmiOUTOBJ_OUTPUCOD_PREDEF (meltclosure_ptr_t meltclosp_, + melt_ptr_t meltfirstargp_, + const melt_argdescr_cell_t + meltxargdescr_[], + union meltparam_un *meltxargtab_, + const melt_argdescr_cell_t + meltxresdescr_[], + union meltparam_un + *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_15_warmelt_outobj_OUTDECLINIT_OBJINITOBJECT (meltclosure_ptr_t - meltclosp_, - melt_ptr_t - meltfirstargp_, - const - melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un - *meltxargtab_, - const - melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un - *meltxrestab_); +meltrout_12_WARMELTmiOUTOBJ_OUTPUCOD_NIL (meltclosure_ptr_t meltclosp_, + melt_ptr_t meltfirstargp_, + const melt_argdescr_cell_t + meltxargdescr_[], + union meltparam_un *meltxargtab_, + const melt_argdescr_cell_t + meltxresdescr_[], + union meltparam_un *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_16_warmelt_outobj_OUTCINITFILL_OBJINITOBJECT (meltclosure_ptr_t +meltrout_13_WARMELTmiOUTOBJ_OUTPUCOD_OBJEXPANDPUREVAL (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, @@ -289,26 +245,22 @@ meltrout_16_warmelt_outobj_OUTCINITFILL_OBJINITOBJECT (meltclosure_ptr_t melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_17_warmelt_outobj_OUTCINITPREDEF_OBJINITOBJECT (meltclosure_ptr_t - meltclosp_, - melt_ptr_t - meltfirstargp_, - const - melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un - *meltxargtab_, - const - melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un - *meltxrestab_); +meltrout_14_WARMELTmiOUTOBJ_OUTPUCOD_OBJHOOKNTH (meltclosure_ptr_t meltclosp_, + melt_ptr_t meltfirstargp_, + const melt_argdescr_cell_t + meltxargdescr_[], + union meltparam_un + *meltxargtab_, + const melt_argdescr_cell_t + meltxresdescr_[], + union meltparam_un + *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_18_warmelt_outobj_OUTCINITPREDEF_OBJINITHOOK (meltclosure_ptr_t +meltrout_15_WARMELTmiOUTOBJ_OUTDECLINIT_OBJINITOBJECT (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, @@ -327,7 +279,45 @@ meltrout_18_warmelt_outobj_OUTCINITPREDEF_OBJINITHOOK (meltclosure_ptr_t melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_19_warmelt_outobj_OUTDECLINIT_OBJINITMULTIPLE (meltclosure_ptr_t +meltrout_16_WARMELTmiOUTOBJ_OUTCINITFILL_OBJINITOBJECT (meltclosure_ptr_t + meltclosp_, + melt_ptr_t + meltfirstargp_, + const + melt_argdescr_cell_t + meltxargdescr_[], + union meltparam_un + *meltxargtab_, + const + melt_argdescr_cell_t + meltxresdescr_[], + union meltparam_un + *meltxrestab_); + + + + +melt_ptr_t MELT_MODULE_VISIBILITY +meltrout_17_WARMELTmiOUTOBJ_OUTCINITPREDEF_OBJINITOBJECT (meltclosure_ptr_t + meltclosp_, + melt_ptr_t + meltfirstargp_, + const + melt_argdescr_cell_t + meltxargdescr_[], + union meltparam_un + *meltxargtab_, + const + melt_argdescr_cell_t + meltxresdescr_[], + union meltparam_un + *meltxrestab_); + + + + +melt_ptr_t MELT_MODULE_VISIBILITY +meltrout_18_WARMELTmiOUTOBJ_OUTCINITPREDEF_OBJINITHOOK (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, @@ -346,7 +336,7 @@ meltrout_19_warmelt_outobj_OUTDECLINIT_OBJINITMULTIPLE (meltclosure_ptr_t melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_20_warmelt_outobj_OUTCINITFILL_OBJINITMULTIPLE (meltclosure_ptr_t +meltrout_19_WARMELTmiOUTOBJ_OUTDECLINIT_OBJINITMULTIPLE (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, @@ -365,26 +355,26 @@ meltrout_20_warmelt_outobj_OUTCINITFILL_OBJINITMULTIPLE (meltclosure_ptr_t melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_21_warmelt_outobj_OUTDECLINIT_OBJINITCLOSURE (meltclosure_ptr_t - meltclosp_, - melt_ptr_t - meltfirstargp_, - const - melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un - *meltxargtab_, - const - melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un - *meltxrestab_); +meltrout_20_WARMELTmiOUTOBJ_OUTCINITFILL_OBJINITMULTIPLE (meltclosure_ptr_t + meltclosp_, + melt_ptr_t + meltfirstargp_, + const + melt_argdescr_cell_t + meltxargdescr_[], + union meltparam_un + *meltxargtab_, + const + melt_argdescr_cell_t + meltxresdescr_[], + union meltparam_un + *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_22_warmelt_outobj_OUTCINITFILL_OBJINITCLOSURE (meltclosure_ptr_t +meltrout_21_WARMELTmiOUTOBJ_OUTDECLINIT_OBJINITCLOSURE (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, @@ -403,26 +393,26 @@ meltrout_22_warmelt_outobj_OUTCINITFILL_OBJINITCLOSURE (meltclosure_ptr_t melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_23_warmelt_outobj_OUTDECLINIT_OBJINITROUTINE (meltclosure_ptr_t - meltclosp_, - melt_ptr_t - meltfirstargp_, - const - melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un - *meltxargtab_, - const - melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un - *meltxrestab_); +meltrout_22_WARMELTmiOUTOBJ_OUTCINITFILL_OBJINITCLOSURE (meltclosure_ptr_t + meltclosp_, + melt_ptr_t + meltfirstargp_, + const + melt_argdescr_cell_t + meltxargdescr_[], + union meltparam_un + *meltxargtab_, + const + melt_argdescr_cell_t + meltxresdescr_[], + union meltparam_un + *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_24_warmelt_outobj_OUTCINITFILL_OBJINITROUTINE (meltclosure_ptr_t +meltrout_23_WARMELTmiOUTOBJ_OUTDECLINIT_OBJINITROUTINE (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, @@ -441,23 +431,26 @@ meltrout_24_warmelt_outobj_OUTCINITFILL_OBJINITROUTINE (meltclosure_ptr_t melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_25_warmelt_outobj_OUTDECLINIT_OBJINITHOOK (meltclosure_ptr_t - meltclosp_, - melt_ptr_t meltfirstargp_, - const melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un - *meltxargtab_, - const melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un - *meltxrestab_); +meltrout_24_WARMELTmiOUTOBJ_OUTCINITFILL_OBJINITROUTINE (meltclosure_ptr_t + meltclosp_, + melt_ptr_t + meltfirstargp_, + const + melt_argdescr_cell_t + meltxargdescr_[], + union meltparam_un + *meltxargtab_, + const + melt_argdescr_cell_t + meltxresdescr_[], + union meltparam_un + *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_26_warmelt_outobj_OUTCINITFILL_OBJINITHOOK (meltclosure_ptr_t +meltrout_25_WARMELTmiOUTOBJ_OUTDECLINIT_OBJINITHOOK (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, @@ -476,7 +469,7 @@ meltrout_26_warmelt_outobj_OUTCINITFILL_OBJINITHOOK (meltclosure_ptr_t melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_27_warmelt_outobj_OUTDECLINIT_OBJINITSTRING (meltclosure_ptr_t +meltrout_26_WARMELTmiOUTOBJ_OUTCINITFILL_OBJINITHOOK (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, @@ -495,7 +488,7 @@ meltrout_27_warmelt_outobj_OUTDECLINIT_OBJINITSTRING (meltclosure_ptr_t melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_28_warmelt_outobj_OUTCINITFILL_OBJINITSTRING (meltclosure_ptr_t +meltrout_27_WARMELTmiOUTOBJ_OUTDECLINIT_OBJINITSTRING (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, @@ -514,26 +507,26 @@ meltrout_28_warmelt_outobj_OUTCINITFILL_OBJINITSTRING (meltclosure_ptr_t melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_29_warmelt_outobj_OUTDECLINIT_OBJINITBOXEDINTEGER (meltclosure_ptr_t - meltclosp_, - melt_ptr_t - meltfirstargp_, - const - melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un - *meltxargtab_, - const - melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un - *meltxrestab_); +meltrout_28_WARMELTmiOUTOBJ_OUTCINITFILL_OBJINITSTRING (meltclosure_ptr_t + meltclosp_, + melt_ptr_t + meltfirstargp_, + const + melt_argdescr_cell_t + meltxargdescr_[], + union meltparam_un + *meltxargtab_, + const + melt_argdescr_cell_t + meltxresdescr_[], + union meltparam_un + *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_30_warmelt_outobj_OUTCINITFILL_OBJINITBOXEDINTEGER (meltclosure_ptr_t +meltrout_29_WARMELTmiOUTOBJ_OUTDECLINIT_OBJINITBOXEDINTEGER (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, @@ -554,23 +547,16 @@ meltrout_30_warmelt_outobj_OUTCINITFILL_OBJINITBOXEDINTEGER (meltclosure_ptr_t melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_31_warmelt_outobj_OUTDECLINIT_OBJINITPAIR (meltclosure_ptr_t - meltclosp_, - melt_ptr_t meltfirstargp_, - const melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un - *meltxargtab_, - const melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un - *meltxrestab_); +meltrout_30_WARMELTmiOUTOBJ_OUTCINITFILL_OBJINITBOXEDINTEGER +(meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[], +union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[], +union meltparam_un *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_32_warmelt_outobj_OUTCINITFILL_OBJINITPAIR (meltclosure_ptr_t +meltrout_31_WARMELTmiOUTOBJ_OUTDECLINIT_OBJINITPAIR (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, @@ -589,23 +575,26 @@ meltrout_32_warmelt_outobj_OUTCINITFILL_OBJINITPAIR (meltclosure_ptr_t melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_33_warmelt_outobj_OUTDECLINIT_OBJINITLIST (meltclosure_ptr_t - meltclosp_, - melt_ptr_t meltfirstargp_, - const melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un - *meltxargtab_, - const melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un - *meltxrestab_); +meltrout_32_WARMELTmiOUTOBJ_OUTCINITFILL_OBJINITPAIR (meltclosure_ptr_t + meltclosp_, + melt_ptr_t + meltfirstargp_, + const + melt_argdescr_cell_t + meltxargdescr_[], + union meltparam_un + *meltxargtab_, + const + melt_argdescr_cell_t + meltxresdescr_[], + union meltparam_un + *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_34_warmelt_outobj_OUTCINITFILL_OBJINITLIST (meltclosure_ptr_t +meltrout_33_WARMELTmiOUTOBJ_OUTDECLINIT_OBJINITLIST (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, @@ -624,66 +613,7 @@ meltrout_34_warmelt_outobj_OUTCINITFILL_OBJINITLIST (meltclosure_ptr_t melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_35_warmelt_outobj_OUTPUCOD_ANYDISCR (meltclosure_ptr_t meltclosp_, - melt_ptr_t meltfirstargp_, - const melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un - *meltxargtab_, - const melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un - *meltxrestab_); - - - - -melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_36_warmelt_outobj_OUTPUCOD_NULL (meltclosure_ptr_t meltclosp_, - melt_ptr_t meltfirstargp_, - const melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un *meltxargtab_, - const melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un *meltxrestab_); - - - - -melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_37_warmelt_outobj_OUTPUCOD_CATCHALL_ROOT (meltclosure_ptr_t - meltclosp_, - melt_ptr_t meltfirstargp_, - const melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un - *meltxargtab_, - const melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un - *meltxrestab_); - - - - -melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_38_warmelt_outobj_OUTPUT_RAW_LOCATION (meltclosure_ptr_t meltclosp_, - melt_ptr_t meltfirstargp_, - const melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un - *meltxargtab_, - const melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un - *meltxrestab_); - - - - -melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_39_warmelt_outobj_LINE_AND_FILE_OF_LOCATION (meltclosure_ptr_t +meltrout_34_WARMELTmiOUTOBJ_OUTCINITFILL_OBJINITLIST (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, @@ -702,97 +632,51 @@ meltrout_39_warmelt_outobj_LINE_AND_FILE_OF_LOCATION (meltclosure_ptr_t melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_40_warmelt_outobj_OUTPUT_LOCATION (meltclosure_ptr_t meltclosp_, - melt_ptr_t meltfirstargp_, - const melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un *meltxargtab_, - const melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un *meltxrestab_); - - - - -melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_41_warmelt_outobj_OUTPUT_CURFRAME_DECLSTRUCT (meltclosure_ptr_t - meltclosp_, - melt_ptr_t - meltfirstargp_, - const - melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un - *meltxargtab_, - const - melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un - *meltxrestab_); - - - - -melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_42_warmelt_outobj_LAMBDA___2__ (meltclosure_ptr_t meltclosp_, - melt_ptr_t meltfirstargp_, - const melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un *meltxargtab_, - const melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un *meltxrestab_); - - - - -melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_43_warmelt_outobj_OUTPUCOD_MARKER (meltclosure_ptr_t meltclosp_, - melt_ptr_t meltfirstargp_, - const melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un *meltxargtab_, - const melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un *meltxrestab_); +meltrout_35_WARMELTmiOUTOBJ_OUTPUCOD_ANYDISCR (meltclosure_ptr_t meltclosp_, + melt_ptr_t meltfirstargp_, + const melt_argdescr_cell_t + meltxargdescr_[], + union meltparam_un + *meltxargtab_, + const melt_argdescr_cell_t + meltxresdescr_[], + union meltparam_un + *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_44_warmelt_outobj_LAMBDA___3__ (meltclosure_ptr_t meltclosp_, - melt_ptr_t meltfirstargp_, - const melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un *meltxargtab_, - const melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un *meltxrestab_); +meltrout_36_WARMELTmiOUTOBJ_OUTPUCOD_NULL (meltclosure_ptr_t meltclosp_, + melt_ptr_t meltfirstargp_, + const melt_argdescr_cell_t + meltxargdescr_[], + union meltparam_un *meltxargtab_, + const melt_argdescr_cell_t + meltxresdescr_[], + union meltparam_un *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_45_warmelt_outobj_OUTPUT_CURFRAME_DECLSTRUCT_INIT (meltclosure_ptr_t - meltclosp_, - melt_ptr_t - meltfirstargp_, - const - melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un - *meltxargtab_, - const - melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un - *meltxrestab_); +meltrout_37_WARMELTmiOUTOBJ_OUTPUCOD_CATCHALL_ROOT (meltclosure_ptr_t + meltclosp_, + melt_ptr_t meltfirstargp_, + const melt_argdescr_cell_t + meltxargdescr_[], + union meltparam_un + *meltxargtab_, + const melt_argdescr_cell_t + meltxresdescr_[], + union meltparam_un + *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_46_warmelt_outobj_OUTPUCOD_PROCROUTINE (meltclosure_ptr_t meltclosp_, +meltrout_38_WARMELTmiOUTOBJ_OUTPUT_RAW_LOCATION (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[], @@ -807,20 +691,40 @@ meltrout_46_warmelt_outobj_OUTPUCOD_PROCROUTINE (meltclosure_ptr_t meltclosp_, melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_47_warmelt_outobj_LAMBDA___4__ (meltclosure_ptr_t meltclosp_, - melt_ptr_t meltfirstargp_, - const melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un *meltxargtab_, - const melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un *meltxrestab_); +meltrout_39_WARMELTmiOUTOBJ_LINE_AND_FILE_OF_LOCATION (meltclosure_ptr_t + meltclosp_, + melt_ptr_t + meltfirstargp_, + const + melt_argdescr_cell_t + meltxargdescr_[], + union meltparam_un + *meltxargtab_, + const + melt_argdescr_cell_t + meltxresdescr_[], + union meltparam_un + *meltxrestab_); + + + + +melt_ptr_t MELT_MODULE_VISIBILITY +meltrout_40_WARMELTmiOUTOBJ_OUTPUT_LOCATION (meltclosure_ptr_t meltclosp_, + melt_ptr_t meltfirstargp_, + const melt_argdescr_cell_t + meltxargdescr_[], + union meltparam_un *meltxargtab_, + const melt_argdescr_cell_t + meltxresdescr_[], + union meltparam_un + *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_48_warmelt_outobj_OUTPUT_CURFRAME_CDAT_STRUCT (meltclosure_ptr_t +meltrout_41_WARMELTmiOUTOBJ_OUTPUT_CURFRAME_DECLSTRUCT (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, @@ -839,92 +743,47 @@ meltrout_48_warmelt_outobj_OUTPUT_CURFRAME_CDAT_STRUCT (meltclosure_ptr_t melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_49_warmelt_outobj_OUTPUT_CURFRAME_CDAT_FILL (meltclosure_ptr_t - meltclosp_, - melt_ptr_t - meltfirstargp_, - const - melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un - *meltxargtab_, - const - melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un - *meltxrestab_); - - - - -melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_50_warmelt_outobj_OUTPUCOD_INITIALMODULEROUTINE (meltclosure_ptr_t - meltclosp_, - melt_ptr_t - meltfirstargp_, - const - melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un - *meltxargtab_, - const - melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un - *meltxrestab_); - - - - -melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_51_warmelt_outobj_LAMBDA___5__ (meltclosure_ptr_t meltclosp_, - melt_ptr_t meltfirstargp_, - const melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un *meltxargtab_, - const melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un *meltxrestab_); +meltrout_42_WARMELTmiOUTOBJ_LAMBDA___2__ (meltclosure_ptr_t meltclosp_, + melt_ptr_t meltfirstargp_, + const melt_argdescr_cell_t + meltxargdescr_[], + union meltparam_un *meltxargtab_, + const melt_argdescr_cell_t + meltxresdescr_[], + union meltparam_un *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_52_warmelt_outobj_OUTPUT_CENTRALDECL_HOOKROUTINE (meltclosure_ptr_t - meltclosp_, - melt_ptr_t - meltfirstargp_, - const - melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un - *meltxargtab_, - const - melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un - *meltxrestab_); +meltrout_43_WARMELTmiOUTOBJ_OUTPUCOD_MARKER (meltclosure_ptr_t meltclosp_, + melt_ptr_t meltfirstargp_, + const melt_argdescr_cell_t + meltxargdescr_[], + union meltparam_un *meltxargtab_, + const melt_argdescr_cell_t + meltxresdescr_[], + union meltparam_un + *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_53_warmelt_outobj_OUTPUCOD_HOOKROUTINE (meltclosure_ptr_t meltclosp_, - melt_ptr_t meltfirstargp_, - const melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un - *meltxargtab_, - const melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un - *meltxrestab_); +meltrout_44_WARMELTmiOUTOBJ_LAMBDA___3__ (meltclosure_ptr_t meltclosp_, + melt_ptr_t meltfirstargp_, + const melt_argdescr_cell_t + meltxargdescr_[], + union meltparam_un *meltxargtab_, + const melt_argdescr_cell_t + meltxresdescr_[], + union meltparam_un *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_54_warmelt_outobj_OUTPUCOD_INITIALEXTENSIONROUTINE (meltclosure_ptr_t +meltrout_45_WARMELTmiOUTOBJ_OUTPUT_CURFRAME_DECLSTRUCT_INIT (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, @@ -945,95 +804,125 @@ meltrout_54_warmelt_outobj_OUTPUCOD_INITIALEXTENSIONROUTINE (meltclosure_ptr_t melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_55_warmelt_outobj_LAMBDA___6__ (meltclosure_ptr_t meltclosp_, - melt_ptr_t meltfirstargp_, - const melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un *meltxargtab_, - const melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un *meltxrestab_); +meltrout_46_WARMELTmiOUTOBJ_OUTPUCOD_PROCROUTINE (meltclosure_ptr_t + meltclosp_, + melt_ptr_t meltfirstargp_, + const melt_argdescr_cell_t + meltxargdescr_[], + union meltparam_un + *meltxargtab_, + const melt_argdescr_cell_t + meltxresdescr_[], + union meltparam_un + *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_56_warmelt_outobj_OUTPUCOD_GETARG (meltclosure_ptr_t meltclosp_, - melt_ptr_t meltfirstargp_, - const melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un *meltxargtab_, - const melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un *meltxrestab_); +meltrout_47_WARMELTmiOUTOBJ_LAMBDA___4__ (meltclosure_ptr_t meltclosp_, + melt_ptr_t meltfirstargp_, + const melt_argdescr_cell_t + meltxargdescr_[], + union meltparam_un *meltxargtab_, + const melt_argdescr_cell_t + meltxresdescr_[], + union meltparam_un *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_57_warmelt_outobj_OUTPUCOD_GETARGREST (meltclosure_ptr_t meltclosp_, - melt_ptr_t meltfirstargp_, - const melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un - *meltxargtab_, - const melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un - *meltxrestab_); +meltrout_48_WARMELTmiOUTOBJ_OUTPUT_CURFRAME_CDAT_STRUCT (meltclosure_ptr_t + meltclosp_, + melt_ptr_t + meltfirstargp_, + const + melt_argdescr_cell_t + meltxargdescr_[], + union meltparam_un + *meltxargtab_, + const + melt_argdescr_cell_t + meltxresdescr_[], + union meltparam_un + *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_58_warmelt_outobj_OUTPUCOD_OBJCFORMAL (meltclosure_ptr_t meltclosp_, - melt_ptr_t meltfirstargp_, - const melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un - *meltxargtab_, - const melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un - *meltxrestab_); +meltrout_49_WARMELTmiOUTOBJ_OUTPUT_CURFRAME_CDAT_FILL (meltclosure_ptr_t + meltclosp_, + melt_ptr_t + meltfirstargp_, + const + melt_argdescr_cell_t + meltxargdescr_[], + union meltparam_un + *meltxargtab_, + const + melt_argdescr_cell_t + meltxresdescr_[], + union meltparam_un + *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_59_warmelt_outobj_OUTPUCOD_OBJFETCHMODVAR (meltclosure_ptr_t - meltclosp_, - melt_ptr_t meltfirstargp_, - const melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un - *meltxargtab_, - const melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un - *meltxrestab_); +meltrout_50_WARMELTmiOUTOBJ_OUTPUCOD_INITIALMODULEROUTINE (meltclosure_ptr_t + meltclosp_, + melt_ptr_t + meltfirstargp_, + const + melt_argdescr_cell_t + meltxargdescr_[], + union meltparam_un + *meltxargtab_, + const + melt_argdescr_cell_t + meltxresdescr_[], + union meltparam_un + *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_60_warmelt_outobj_OUTPUCOD_OBJPUTMODVAR (meltclosure_ptr_t - meltclosp_, - melt_ptr_t meltfirstargp_, - const melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un - *meltxargtab_, - const melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un - *meltxrestab_); +meltrout_51_WARMELTmiOUTOBJ_LAMBDA___5__ (meltclosure_ptr_t meltclosp_, + melt_ptr_t meltfirstargp_, + const melt_argdescr_cell_t + meltxargdescr_[], + union meltparam_un *meltxargtab_, + const melt_argdescr_cell_t + meltxresdescr_[], + union meltparam_un *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_61_warmelt_outobj_OUTPUCOD_OBJPUTOUTARG (meltclosure_ptr_t +meltrout_52_WARMELTmiOUTOBJ_OUTPUT_CENTRALDECL_HOOKROUTINE (meltclosure_ptr_t + meltclosp_, + melt_ptr_t + meltfirstargp_, + const + melt_argdescr_cell_t + meltxargdescr_[], + union meltparam_un + *meltxargtab_, + const + melt_argdescr_cell_t + meltxresdescr_[], + union meltparam_un + *meltxrestab_); + + + + +melt_ptr_t MELT_MODULE_VISIBILITY +meltrout_53_WARMELTmiOUTOBJ_OUTPUCOD_HOOKROUTINE (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t @@ -1049,7 +938,29 @@ meltrout_61_warmelt_outobj_OUTPUCOD_OBJPUTOUTARG (meltclosure_ptr_t melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_62_warmelt_outobj_OUTPUCOD_OBJLOCV (meltclosure_ptr_t meltclosp_, +meltrout_54_WARMELTmiOUTOBJ_OUTPUCOD_INITIALEXTENSIONROUTINE +(meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[], +union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[], +union meltparam_un *meltxrestab_); + + + + +melt_ptr_t MELT_MODULE_VISIBILITY +meltrout_55_WARMELTmiOUTOBJ_LAMBDA___6__ (meltclosure_ptr_t meltclosp_, + melt_ptr_t meltfirstargp_, + const melt_argdescr_cell_t + meltxargdescr_[], + union meltparam_un *meltxargtab_, + const melt_argdescr_cell_t + meltxresdescr_[], + union meltparam_un *meltxrestab_); + + + + +melt_ptr_t MELT_MODULE_VISIBILITY +meltrout_56_WARMELTmiOUTOBJ_OUTPUCOD_GETARG (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[], @@ -1063,22 +974,7 @@ meltrout_62_warmelt_outobj_OUTPUCOD_OBJLOCV (meltclosure_ptr_t meltclosp_, melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_63_warmelt_outobj_OUTPUCOD_OBJCLOCCV (meltclosure_ptr_t meltclosp_, - melt_ptr_t meltfirstargp_, - const melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un - *meltxargtab_, - const melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un - *meltxrestab_); - - - - -melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_64_warmelt_outobj_OUTPUCOD_OBJCLOHOOKV (meltclosure_ptr_t meltclosp_, +meltrout_57_WARMELTmiOUTOBJ_OUTPUCOD_GETARGREST (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[], @@ -1093,57 +989,7 @@ meltrout_64_warmelt_outobj_OUTPUCOD_OBJCLOHOOKV (meltclosure_ptr_t meltclosp_, melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_65_warmelt_outobj_OUTPUCOD_OBJCONSTV (meltclosure_ptr_t meltclosp_, - melt_ptr_t meltfirstargp_, - const melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un - *meltxargtab_, - const melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un - *meltxrestab_); - - - - -melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_66_warmelt_outobj_OUTPUT_CODE_INSTRUCTIONS_LIST (meltclosure_ptr_t - meltclosp_, - melt_ptr_t - meltfirstargp_, - const - melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un - *meltxargtab_, - const - melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un - *meltxrestab_); - - - - -melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_67_warmelt_outobj_OUTPUCOD_OBJCHECKSIGNAL (meltclosure_ptr_t - meltclosp_, - melt_ptr_t meltfirstargp_, - const melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un - *meltxargtab_, - const melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un - *meltxrestab_); - - - - -melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_68_warmelt_outobj_OUTPUCOD_OBJANYBLOCK (meltclosure_ptr_t meltclosp_, +meltrout_58_WARMELTmiOUTOBJ_OUTPUCOD_OBJCFORMAL (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[], @@ -1158,75 +1004,7 @@ meltrout_68_warmelt_outobj_OUTPUCOD_OBJANYBLOCK (meltclosure_ptr_t meltclosp_, melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_69_warmelt_outobj_OUTPUCOD_OBJFLAG (meltclosure_ptr_t meltclosp_, - melt_ptr_t meltfirstargp_, - const melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un *meltxargtab_, - const melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un - *meltxrestab_); - - - - -melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_70_warmelt_outobj_OUTPUCOD_OBJMATCHFLAGBLOCK (meltclosure_ptr_t - meltclosp_, - melt_ptr_t - meltfirstargp_, - const - melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un - *meltxargtab_, - const - melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un - *meltxrestab_); - - - - -melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_71_warmelt_outobj_OUTPUCOD_OBJMULTIALLOCBLOCK (meltclosure_ptr_t - meltclosp_, - melt_ptr_t - meltfirstargp_, - const - melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un - *meltxargtab_, - const - melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un - *meltxrestab_); - - - - -melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_72_warmelt_outobj_OUTPUCOD_OBJCITERBLOCK (meltclosure_ptr_t - meltclosp_, - melt_ptr_t meltfirstargp_, - const melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un - *meltxargtab_, - const melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un - *meltxrestab_); - - - - -melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_73_warmelt_outobj_OUTPUCOD_OBJCOMMENTINSTR (meltclosure_ptr_t +meltrout_59_WARMELTmiOUTOBJ_OUTPUCOD_OBJFETCHMODVAR (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, @@ -1245,26 +1023,7 @@ meltrout_73_warmelt_outobj_OUTPUCOD_OBJCOMMENTINSTR (meltclosure_ptr_t melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_74_warmelt_outobj_OUTPUCOD_OBJCOMMENTEDBLOCK (meltclosure_ptr_t - meltclosp_, - melt_ptr_t - meltfirstargp_, - const - melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un - *meltxargtab_, - const - melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un - *meltxrestab_); - - - - -melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_75_warmelt_outobj_OUTPUCOD_OBJLABELINSTR (meltclosure_ptr_t +meltrout_60_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTMODVAR (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t @@ -1280,91 +1039,23 @@ meltrout_75_warmelt_outobj_OUTPUCOD_OBJLABELINSTR (meltclosure_ptr_t melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_76_warmelt_outobj_OUTPUCOD_OBJGOTOINSTR (meltclosure_ptr_t - meltclosp_, - melt_ptr_t meltfirstargp_, - const melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un - *meltxargtab_, - const melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un - *meltxrestab_); - - - - -melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_77_warmelt_outobj_ADD2SBUF_CLONSYM (meltclosure_ptr_t meltclosp_, - melt_ptr_t meltfirstargp_, - const melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un *meltxargtab_, - const melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un - *meltxrestab_); - - - - -melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_78_warmelt_outobj_OUTPUCOD_OBJLOOP (meltclosure_ptr_t meltclosp_, - melt_ptr_t meltfirstargp_, - const melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un *meltxargtab_, - const melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un - *meltxrestab_); - - - - -melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_79_warmelt_outobj_LAMBDA___7__ (meltclosure_ptr_t meltclosp_, - melt_ptr_t meltfirstargp_, - const melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un *meltxargtab_, - const melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un *meltxrestab_); - - - - -melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_80_warmelt_outobj_LAMBDA___8__ (meltclosure_ptr_t meltclosp_, - melt_ptr_t meltfirstargp_, - const melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un *meltxargtab_, - const melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un *meltxrestab_); - - - - -melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_81_warmelt_outobj_OUTPUCOD_OBJEXIT (meltclosure_ptr_t meltclosp_, - melt_ptr_t meltfirstargp_, - const melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un *meltxargtab_, - const melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un - *meltxrestab_); +meltrout_61_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTOUTARG (meltclosure_ptr_t + meltclosp_, + melt_ptr_t meltfirstargp_, + const melt_argdescr_cell_t + meltxargdescr_[], + union meltparam_un + *meltxargtab_, + const melt_argdescr_cell_t + meltxresdescr_[], + union meltparam_un + *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_82_warmelt_outobj_OUTPUCOD_OBJAGAIN (meltclosure_ptr_t meltclosp_, +meltrout_62_WARMELTmiOUTOBJ_OUTPUCOD_OBJLOCV (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[], @@ -1379,7 +1070,7 @@ meltrout_82_warmelt_outobj_OUTPUCOD_OBJAGAIN (meltclosure_ptr_t meltclosp_, melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_83_warmelt_outobj_OUTPUCOD_OBJCOMPUTE (meltclosure_ptr_t meltclosp_, +meltrout_63_WARMELTmiOUTOBJ_OUTPUCOD_OBJCLOCCV (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[], @@ -1394,60 +1085,92 @@ meltrout_83_warmelt_outobj_OUTPUCOD_OBJCOMPUTE (meltclosure_ptr_t meltclosp_, melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_84_warmelt_outobj_LAMBDA___9__ (meltclosure_ptr_t meltclosp_, - melt_ptr_t meltfirstargp_, - const melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un *meltxargtab_, - const melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un *meltxrestab_); +meltrout_64_WARMELTmiOUTOBJ_OUTPUCOD_OBJCLOHOOKV (meltclosure_ptr_t + meltclosp_, + melt_ptr_t meltfirstargp_, + const melt_argdescr_cell_t + meltxargdescr_[], + union meltparam_un + *meltxargtab_, + const melt_argdescr_cell_t + meltxresdescr_[], + union meltparam_un + *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_85_warmelt_outobj_LAMBDA___10__ (meltclosure_ptr_t meltclosp_, - melt_ptr_t meltfirstargp_, - const melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un *meltxargtab_, - const melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un *meltxrestab_); +meltrout_65_WARMELTmiOUTOBJ_OUTPUCOD_OBJCONSTV (meltclosure_ptr_t meltclosp_, + melt_ptr_t meltfirstargp_, + const melt_argdescr_cell_t + meltxargdescr_[], + union meltparam_un + *meltxargtab_, + const melt_argdescr_cell_t + meltxresdescr_[], + union meltparam_un + *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_86_warmelt_outobj_LAMBDA___11__ (meltclosure_ptr_t meltclosp_, - melt_ptr_t meltfirstargp_, - const melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un *meltxargtab_, - const melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un *meltxrestab_); +meltrout_66_WARMELTmiOUTOBJ_OUTPUT_CODE_INSTRUCTIONS_LIST (meltclosure_ptr_t + meltclosp_, + melt_ptr_t + meltfirstargp_, + const + melt_argdescr_cell_t + meltxargdescr_[], + union meltparam_un + *meltxargtab_, + const + melt_argdescr_cell_t + meltxresdescr_[], + union meltparam_un + *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_87_warmelt_outobj_OUTPUCOD_OBJCOND (meltclosure_ptr_t meltclosp_, - melt_ptr_t meltfirstargp_, - const melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un *meltxargtab_, - const melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un - *meltxrestab_); +meltrout_67_WARMELTmiOUTOBJ_OUTPUCOD_OBJCHECKSIGNAL (meltclosure_ptr_t + meltclosp_, + melt_ptr_t + meltfirstargp_, + const + melt_argdescr_cell_t + meltxargdescr_[], + union meltparam_un + *meltxargtab_, + const + melt_argdescr_cell_t + meltxresdescr_[], + union meltparam_un + *meltxrestab_); + + + + +melt_ptr_t MELT_MODULE_VISIBILITY +meltrout_68_WARMELTmiOUTOBJ_OUTPUCOD_OBJANYBLOCK (meltclosure_ptr_t + meltclosp_, + melt_ptr_t meltfirstargp_, + const melt_argdescr_cell_t + meltxargdescr_[], + union meltparam_un + *meltxargtab_, + const melt_argdescr_cell_t + meltxresdescr_[], + union meltparam_un + *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_88_warmelt_outobj_OUTPUCOD_OBJCPPIF (meltclosure_ptr_t meltclosp_, +meltrout_69_WARMELTmiOUTOBJ_OUTPUCOD_OBJFLAG (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[], @@ -1462,26 +1185,61 @@ meltrout_88_warmelt_outobj_OUTPUCOD_OBJCPPIF (meltclosure_ptr_t meltclosp_, melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_89_warmelt_outobj_OUTPUCOD_OBJINTERNSYMBOL (meltclosure_ptr_t - meltclosp_, - melt_ptr_t - meltfirstargp_, - const - melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un - *meltxargtab_, - const - melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un - *meltxrestab_); +meltrout_70_WARMELTmiOUTOBJ_OUTPUCOD_OBJMATCHFLAGBLOCK (meltclosure_ptr_t + meltclosp_, + melt_ptr_t + meltfirstargp_, + const + melt_argdescr_cell_t + meltxargdescr_[], + union meltparam_un + *meltxargtab_, + const + melt_argdescr_cell_t + meltxresdescr_[], + union meltparam_un + *meltxrestab_); + + + + +melt_ptr_t MELT_MODULE_VISIBILITY +meltrout_71_WARMELTmiOUTOBJ_OUTPUCOD_OBJMULTIALLOCBLOCK (meltclosure_ptr_t + meltclosp_, + melt_ptr_t + meltfirstargp_, + const + melt_argdescr_cell_t + meltxargdescr_[], + union meltparam_un + *meltxargtab_, + const + melt_argdescr_cell_t + meltxresdescr_[], + union meltparam_un + *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_90_warmelt_outobj_OUTPUCOD_OBJINTERNKEYWORD (meltclosure_ptr_t +meltrout_72_WARMELTmiOUTOBJ_OUTPUCOD_OBJCITERBLOCK (meltclosure_ptr_t + meltclosp_, + melt_ptr_t meltfirstargp_, + const melt_argdescr_cell_t + meltxargdescr_[], + union meltparam_un + *meltxargtab_, + const melt_argdescr_cell_t + meltxresdescr_[], + union meltparam_un + *meltxrestab_); + + + + +melt_ptr_t MELT_MODULE_VISIBILITY +meltrout_73_WARMELTmiOUTOBJ_OUTPUCOD_OBJCOMMENTINSTR (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, @@ -1500,26 +1258,7 @@ meltrout_90_warmelt_outobj_OUTPUCOD_OBJINTERNKEYWORD (meltclosure_ptr_t melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_91_warmelt_outobj_OUTPUCOD_OBJGETNAMEDSYMBOL (meltclosure_ptr_t - meltclosp_, - melt_ptr_t - meltfirstargp_, - const - melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un - *meltxargtab_, - const - melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un - *meltxrestab_); - - - - -melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_92_warmelt_outobj_OUTPUCOD_OBJGETNAMEDKEYWORD (meltclosure_ptr_t +meltrout_74_WARMELTmiOUTOBJ_OUTPUCOD_OBJCOMMENTEDBLOCK (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, @@ -1538,7 +1277,54 @@ meltrout_92_warmelt_outobj_OUTPUCOD_OBJGETNAMEDKEYWORD (meltclosure_ptr_t melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_93_warmelt_outobj_OUTPUCOD_OBJAPPLY (meltclosure_ptr_t meltclosp_, +meltrout_75_WARMELTmiOUTOBJ_OUTPUCOD_OBJLABELINSTR (meltclosure_ptr_t + meltclosp_, + melt_ptr_t meltfirstargp_, + const melt_argdescr_cell_t + meltxargdescr_[], + union meltparam_un + *meltxargtab_, + const melt_argdescr_cell_t + meltxresdescr_[], + union meltparam_un + *meltxrestab_); + + + + +melt_ptr_t MELT_MODULE_VISIBILITY +meltrout_76_WARMELTmiOUTOBJ_OUTPUCOD_OBJGOTOINSTR (meltclosure_ptr_t + meltclosp_, + melt_ptr_t meltfirstargp_, + const melt_argdescr_cell_t + meltxargdescr_[], + union meltparam_un + *meltxargtab_, + const melt_argdescr_cell_t + meltxresdescr_[], + union meltparam_un + *meltxrestab_); + + + + +melt_ptr_t MELT_MODULE_VISIBILITY +meltrout_77_WARMELTmiOUTOBJ_ADD2SBUF_CLONSYM (meltclosure_ptr_t meltclosp_, + melt_ptr_t meltfirstargp_, + const melt_argdescr_cell_t + meltxargdescr_[], + union meltparam_un + *meltxargtab_, + const melt_argdescr_cell_t + meltxresdescr_[], + union meltparam_un + *meltxrestab_); + + + + +melt_ptr_t MELT_MODULE_VISIBILITY +meltrout_78_WARMELTmiOUTOBJ_OUTPUCOD_OBJLOOP (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[], @@ -1553,7 +1339,7 @@ meltrout_93_warmelt_outobj_OUTPUCOD_OBJAPPLY (meltclosure_ptr_t meltclosp_, melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_94_warmelt_outobj_LAMBDA___12__ (meltclosure_ptr_t meltclosp_, +meltrout_79_WARMELTmiOUTOBJ_LAMBDA___7__ (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[], @@ -1566,7 +1352,7 @@ meltrout_94_warmelt_outobj_LAMBDA___12__ (meltclosure_ptr_t meltclosp_, melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_95_warmelt_outobj_LAMBDA___13__ (meltclosure_ptr_t meltclosp_, +meltrout_80_WARMELTmiOUTOBJ_LAMBDA___8__ (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[], @@ -1579,7 +1365,7 @@ meltrout_95_warmelt_outobj_LAMBDA___13__ (meltclosure_ptr_t meltclosp_, melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_96_warmelt_outobj_OUTPUCOD_OBJMSEND (meltclosure_ptr_t meltclosp_, +meltrout_81_WARMELTmiOUTOBJ_OUTPUCOD_OBJEXIT (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[], @@ -1594,36 +1380,37 @@ meltrout_96_warmelt_outobj_OUTPUCOD_OBJMSEND (meltclosure_ptr_t meltclosp_, melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_97_warmelt_outobj_LAMBDA___14__ (meltclosure_ptr_t meltclosp_, - melt_ptr_t meltfirstargp_, - const melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un *meltxargtab_, - const melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un *meltxrestab_); +meltrout_82_WARMELTmiOUTOBJ_OUTPUCOD_OBJAGAIN (meltclosure_ptr_t meltclosp_, + melt_ptr_t meltfirstargp_, + const melt_argdescr_cell_t + meltxargdescr_[], + union meltparam_un + *meltxargtab_, + const melt_argdescr_cell_t + meltxresdescr_[], + union meltparam_un + *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_98_warmelt_outobj_OUTPUCOD_OBJMULTIAPPLY (meltclosure_ptr_t - meltclosp_, - melt_ptr_t meltfirstargp_, - const melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un - *meltxargtab_, - const melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un - *meltxrestab_); +meltrout_83_WARMELTmiOUTOBJ_OUTPUCOD_OBJCOMPUTE (meltclosure_ptr_t meltclosp_, + melt_ptr_t meltfirstargp_, + const melt_argdescr_cell_t + meltxargdescr_[], + union meltparam_un + *meltxargtab_, + const melt_argdescr_cell_t + meltxresdescr_[], + union meltparam_un + *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_99_warmelt_outobj_LAMBDA___15__ (meltclosure_ptr_t meltclosp_, +meltrout_84_WARMELTmiOUTOBJ_LAMBDA___9__ (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[], @@ -1636,7 +1423,7 @@ meltrout_99_warmelt_outobj_LAMBDA___15__ (meltclosure_ptr_t meltclosp_, melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_100_warmelt_outobj_LAMBDA___16__ (meltclosure_ptr_t meltclosp_, +meltrout_85_WARMELTmiOUTOBJ_LAMBDA___10__ (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[], @@ -1649,7 +1436,7 @@ meltrout_100_warmelt_outobj_LAMBDA___16__ (meltclosure_ptr_t meltclosp_, melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_101_warmelt_outobj_LAMBDA___17__ (meltclosure_ptr_t meltclosp_, +meltrout_86_WARMELTmiOUTOBJ_LAMBDA___11__ (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[], @@ -1662,88 +1449,128 @@ meltrout_101_warmelt_outobj_LAMBDA___17__ (meltclosure_ptr_t meltclosp_, melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_102_warmelt_outobj_LAMBDA___18__ (meltclosure_ptr_t meltclosp_, - melt_ptr_t meltfirstargp_, - const melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un *meltxargtab_, - const melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un *meltxrestab_); +meltrout_87_WARMELTmiOUTOBJ_OUTPUCOD_OBJCOND (meltclosure_ptr_t meltclosp_, + melt_ptr_t meltfirstargp_, + const melt_argdescr_cell_t + meltxargdescr_[], + union meltparam_un + *meltxargtab_, + const melt_argdescr_cell_t + meltxresdescr_[], + union meltparam_un + *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_103_warmelt_outobj_LAMBDA___19__ (meltclosure_ptr_t meltclosp_, - melt_ptr_t meltfirstargp_, - const melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un *meltxargtab_, - const melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un *meltxrestab_); +meltrout_88_WARMELTmiOUTOBJ_OUTPUCOD_OBJCPPIF (meltclosure_ptr_t meltclosp_, + melt_ptr_t meltfirstargp_, + const melt_argdescr_cell_t + meltxargdescr_[], + union meltparam_un + *meltxargtab_, + const melt_argdescr_cell_t + meltxresdescr_[], + union meltparam_un + *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_104_warmelt_outobj_OUTPUCOD_OBJMULTIMSEND (meltclosure_ptr_t - meltclosp_, - melt_ptr_t meltfirstargp_, - const melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un - *meltxargtab_, - const melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un - *meltxrestab_); +meltrout_89_WARMELTmiOUTOBJ_OUTPUCOD_OBJINTERNSYMBOL (meltclosure_ptr_t + meltclosp_, + melt_ptr_t + meltfirstargp_, + const + melt_argdescr_cell_t + meltxargdescr_[], + union meltparam_un + *meltxargtab_, + const + melt_argdescr_cell_t + meltxresdescr_[], + union meltparam_un + *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_105_warmelt_outobj_LAMBDA___20__ (meltclosure_ptr_t meltclosp_, - melt_ptr_t meltfirstargp_, - const melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un *meltxargtab_, - const melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un *meltxrestab_); +meltrout_90_WARMELTmiOUTOBJ_OUTPUCOD_OBJINTERNKEYWORD (meltclosure_ptr_t + meltclosp_, + melt_ptr_t + meltfirstargp_, + const + melt_argdescr_cell_t + meltxargdescr_[], + union meltparam_un + *meltxargtab_, + const + melt_argdescr_cell_t + meltxresdescr_[], + union meltparam_un + *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_106_warmelt_outobj_LAMBDA___21__ (meltclosure_ptr_t meltclosp_, - melt_ptr_t meltfirstargp_, - const melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un *meltxargtab_, - const melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un *meltxrestab_); +meltrout_91_WARMELTmiOUTOBJ_OUTPUCOD_OBJGETNAMEDSYMBOL (meltclosure_ptr_t + meltclosp_, + melt_ptr_t + meltfirstargp_, + const + melt_argdescr_cell_t + meltxargdescr_[], + union meltparam_un + *meltxargtab_, + const + melt_argdescr_cell_t + meltxresdescr_[], + union meltparam_un + *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_107_warmelt_outobj_LAMBDA___22__ (meltclosure_ptr_t meltclosp_, - melt_ptr_t meltfirstargp_, - const melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un *meltxargtab_, - const melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un *meltxrestab_); +meltrout_92_WARMELTmiOUTOBJ_OUTPUCOD_OBJGETNAMEDKEYWORD (meltclosure_ptr_t + meltclosp_, + melt_ptr_t + meltfirstargp_, + const + melt_argdescr_cell_t + meltxargdescr_[], + union meltparam_un + *meltxargtab_, + const + melt_argdescr_cell_t + meltxresdescr_[], + union meltparam_un + *meltxrestab_); + + + + +melt_ptr_t MELT_MODULE_VISIBILITY +meltrout_93_WARMELTmiOUTOBJ_OUTPUCOD_OBJAPPLY (meltclosure_ptr_t meltclosp_, + melt_ptr_t meltfirstargp_, + const melt_argdescr_cell_t + meltxargdescr_[], + union meltparam_un + *meltxargtab_, + const melt_argdescr_cell_t + meltxresdescr_[], + union meltparam_un + *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_108_warmelt_outobj_LAMBDA___23__ (meltclosure_ptr_t meltclosp_, +meltrout_94_WARMELTmiOUTOBJ_LAMBDA___12__ (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[], @@ -1756,7 +1583,7 @@ meltrout_108_warmelt_outobj_LAMBDA___23__ (meltclosure_ptr_t meltclosp_, melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_109_warmelt_outobj_LAMBDA___24__ (meltclosure_ptr_t meltclosp_, +meltrout_95_WARMELTmiOUTOBJ_LAMBDA___13__ (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[], @@ -1769,7 +1596,7 @@ meltrout_109_warmelt_outobj_LAMBDA___24__ (meltclosure_ptr_t meltclosp_, melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_110_warmelt_outobj_OUTPUCOD_OBJCLEAR (meltclosure_ptr_t meltclosp_, +meltrout_96_WARMELTmiOUTOBJ_OUTPUCOD_OBJMSEND (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[], @@ -1784,26 +1611,20 @@ meltrout_110_warmelt_outobj_OUTPUCOD_OBJCLEAR (meltclosure_ptr_t meltclosp_, melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_111_warmelt_outobj_OUTPUCOD_OBJRAWALLOCOBJ (meltclosure_ptr_t - meltclosp_, - melt_ptr_t - meltfirstargp_, - const - melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un - *meltxargtab_, - const - melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un - *meltxrestab_); +meltrout_97_WARMELTmiOUTOBJ_LAMBDA___14__ (meltclosure_ptr_t meltclosp_, + melt_ptr_t meltfirstargp_, + const melt_argdescr_cell_t + meltxargdescr_[], + union meltparam_un *meltxargtab_, + const melt_argdescr_cell_t + meltxresdescr_[], + union meltparam_un *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_112_warmelt_outobj_OUTPUCOD_OBJNEWCLOSURE (meltclosure_ptr_t +meltrout_98_WARMELTmiOUTOBJ_OUTPUCOD_OBJMULTIAPPLY (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t @@ -1819,7 +1640,7 @@ meltrout_112_warmelt_outobj_OUTPUCOD_OBJNEWCLOSURE (meltclosure_ptr_t melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_113_warmelt_outobj_LAMBDA___25__ (meltclosure_ptr_t meltclosp_, +meltrout_99_WARMELTmiOUTOBJ_LAMBDA___15__ (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[], @@ -1832,75 +1653,59 @@ meltrout_113_warmelt_outobj_LAMBDA___25__ (meltclosure_ptr_t meltclosp_, melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_114_warmelt_outobj_OUTPUCOD_OBJTOUCH (meltclosure_ptr_t meltclosp_, - melt_ptr_t meltfirstargp_, - const melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un - *meltxargtab_, - const melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un - *meltxrestab_); +meltrout_100_WARMELTmiOUTOBJ_LAMBDA___16__ (meltclosure_ptr_t meltclosp_, + melt_ptr_t meltfirstargp_, + const melt_argdescr_cell_t + meltxargdescr_[], + union meltparam_un *meltxargtab_, + const melt_argdescr_cell_t + meltxresdescr_[], + union meltparam_un *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_115_warmelt_outobj_OUTPUCOD_DBGTRACEWRITEOBJ (meltclosure_ptr_t - meltclosp_, - melt_ptr_t - meltfirstargp_, - const - melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un - *meltxargtab_, - const - melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un - *meltxrestab_); +meltrout_101_WARMELTmiOUTOBJ_LAMBDA___17__ (meltclosure_ptr_t meltclosp_, + melt_ptr_t meltfirstargp_, + const melt_argdescr_cell_t + meltxargdescr_[], + union meltparam_un *meltxargtab_, + const melt_argdescr_cell_t + meltxresdescr_[], + union meltparam_un *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_116_warmelt_outobj_OUTPUCOD_OBJPUTUPLE (meltclosure_ptr_t meltclosp_, - melt_ptr_t meltfirstargp_, - const melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un - *meltxargtab_, - const melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un - *meltxrestab_); +meltrout_102_WARMELTmiOUTOBJ_LAMBDA___18__ (meltclosure_ptr_t meltclosp_, + melt_ptr_t meltfirstargp_, + const melt_argdescr_cell_t + meltxargdescr_[], + union meltparam_un *meltxargtab_, + const melt_argdescr_cell_t + meltxresdescr_[], + union meltparam_un *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_117_warmelt_outobj_OUTPUCOD_OBJPUTPAIRHEAD (meltclosure_ptr_t - meltclosp_, - melt_ptr_t - meltfirstargp_, - const - melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un - *meltxargtab_, - const - melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un - *meltxrestab_); +meltrout_103_WARMELTmiOUTOBJ_LAMBDA___19__ (meltclosure_ptr_t meltclosp_, + melt_ptr_t meltfirstargp_, + const melt_argdescr_cell_t + meltxargdescr_[], + union meltparam_un *meltxargtab_, + const melt_argdescr_cell_t + meltxresdescr_[], + union meltparam_un *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_118_warmelt_outobj_OUTPUCOD_OBJPUTPAIRTAIL (meltclosure_ptr_t +meltrout_104_WARMELTmiOUTOBJ_OUTPUCOD_OBJMULTIMSEND (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, @@ -1919,65 +1724,87 @@ meltrout_118_warmelt_outobj_OUTPUCOD_OBJPUTPAIRTAIL (meltclosure_ptr_t melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_119_warmelt_outobj_OUTPUCOD_OBJPUTLIST (meltclosure_ptr_t meltclosp_, - melt_ptr_t meltfirstargp_, - const melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un - *meltxargtab_, - const melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un - *meltxrestab_); +meltrout_105_WARMELTmiOUTOBJ_LAMBDA___20__ (meltclosure_ptr_t meltclosp_, + melt_ptr_t meltfirstargp_, + const melt_argdescr_cell_t + meltxargdescr_[], + union meltparam_un *meltxargtab_, + const melt_argdescr_cell_t + meltxresdescr_[], + union meltparam_un *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_120_warmelt_outobj_OUTPUCOD_OBJGETSLOT (meltclosure_ptr_t meltclosp_, - melt_ptr_t meltfirstargp_, - const melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un - *meltxargtab_, - const melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un - *meltxrestab_); +meltrout_106_WARMELTmiOUTOBJ_LAMBDA___21__ (meltclosure_ptr_t meltclosp_, + melt_ptr_t meltfirstargp_, + const melt_argdescr_cell_t + meltxargdescr_[], + union meltparam_un *meltxargtab_, + const melt_argdescr_cell_t + meltxresdescr_[], + union meltparam_un *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_121_warmelt_outobj_LAMBDA___26__ (meltclosure_ptr_t meltclosp_, - melt_ptr_t meltfirstargp_, - const melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un *meltxargtab_, - const melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un *meltxrestab_); +meltrout_107_WARMELTmiOUTOBJ_LAMBDA___22__ (meltclosure_ptr_t meltclosp_, + melt_ptr_t meltfirstargp_, + const melt_argdescr_cell_t + meltxargdescr_[], + union meltparam_un *meltxargtab_, + const melt_argdescr_cell_t + meltxresdescr_[], + union meltparam_un *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_122_warmelt_outobj_OUTPUCOD_OBJPUTSLOT (meltclosure_ptr_t meltclosp_, - melt_ptr_t meltfirstargp_, - const melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un - *meltxargtab_, - const melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un - *meltxrestab_); +meltrout_108_WARMELTmiOUTOBJ_LAMBDA___23__ (meltclosure_ptr_t meltclosp_, + melt_ptr_t meltfirstargp_, + const melt_argdescr_cell_t + meltxargdescr_[], + union meltparam_un *meltxargtab_, + const melt_argdescr_cell_t + meltxresdescr_[], + union meltparam_un *meltxrestab_); + + + + +melt_ptr_t MELT_MODULE_VISIBILITY +meltrout_109_WARMELTmiOUTOBJ_LAMBDA___24__ (meltclosure_ptr_t meltclosp_, + melt_ptr_t meltfirstargp_, + const melt_argdescr_cell_t + meltxargdescr_[], + union meltparam_un *meltxargtab_, + const melt_argdescr_cell_t + meltxresdescr_[], + union meltparam_un *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_123_warmelt_outobj_OUTPUCOD_OBJPUTCLOSUROUT (meltclosure_ptr_t +meltrout_110_WARMELTmiOUTOBJ_OUTPUCOD_OBJCLEAR (meltclosure_ptr_t meltclosp_, + melt_ptr_t meltfirstargp_, + const melt_argdescr_cell_t + meltxargdescr_[], + union meltparam_un + *meltxargtab_, + const melt_argdescr_cell_t + meltxresdescr_[], + union meltparam_un + *meltxrestab_); + + + + +melt_ptr_t MELT_MODULE_VISIBILITY +meltrout_111_WARMELTmiOUTOBJ_OUTPUCOD_OBJRAWALLOCOBJ (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, @@ -1996,42 +1823,89 @@ meltrout_123_warmelt_outobj_OUTPUCOD_OBJPUTCLOSUROUT (meltclosure_ptr_t melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_124_warmelt_outobj_OUTPUCOD_OBJPUTCLOSEDV (meltclosure_ptr_t - meltclosp_, - melt_ptr_t meltfirstargp_, - const melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un - *meltxargtab_, - const melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un - *meltxrestab_); +meltrout_112_WARMELTmiOUTOBJ_OUTPUCOD_OBJNEWCLOSURE (meltclosure_ptr_t + meltclosp_, + melt_ptr_t + meltfirstargp_, + const + melt_argdescr_cell_t + meltxargdescr_[], + union meltparam_un + *meltxargtab_, + const + melt_argdescr_cell_t + meltxresdescr_[], + union meltparam_un + *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_125_warmelt_outobj_OUTPUCOD_OBJPUTCLOSEDNOTNULLV (meltclosure_ptr_t - meltclosp_, - melt_ptr_t - meltfirstargp_, - const - melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un - *meltxargtab_, - const - melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un - *meltxrestab_); +meltrout_113_WARMELTmiOUTOBJ_LAMBDA___25__ (meltclosure_ptr_t meltclosp_, + melt_ptr_t meltfirstargp_, + const melt_argdescr_cell_t + meltxargdescr_[], + union meltparam_un *meltxargtab_, + const melt_argdescr_cell_t + meltxresdescr_[], + union meltparam_un *meltxrestab_); + + + + +melt_ptr_t MELT_MODULE_VISIBILITY +meltrout_114_WARMELTmiOUTOBJ_OUTPUCOD_OBJTOUCH (meltclosure_ptr_t meltclosp_, + melt_ptr_t meltfirstargp_, + const melt_argdescr_cell_t + meltxargdescr_[], + union meltparam_un + *meltxargtab_, + const melt_argdescr_cell_t + meltxresdescr_[], + union meltparam_un + *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_126_warmelt_outobj_OUTPUCOD_OBJPUTROUTCONST (meltclosure_ptr_t +meltrout_115_WARMELTmiOUTOBJ_OUTPUCOD_DBGTRACEWRITEOBJ (meltclosure_ptr_t + meltclosp_, + melt_ptr_t + meltfirstargp_, + const + melt_argdescr_cell_t + meltxargdescr_[], + union meltparam_un + *meltxargtab_, + const + melt_argdescr_cell_t + meltxresdescr_[], + union meltparam_un + *meltxrestab_); + + + + +melt_ptr_t MELT_MODULE_VISIBILITY +meltrout_116_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTUPLE (meltclosure_ptr_t + meltclosp_, + melt_ptr_t meltfirstargp_, + const melt_argdescr_cell_t + meltxargdescr_[], + union meltparam_un + *meltxargtab_, + const melt_argdescr_cell_t + meltxresdescr_[], + union meltparam_un + *meltxrestab_); + + + + +melt_ptr_t MELT_MODULE_VISIBILITY +meltrout_117_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTPAIRHEAD (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, @@ -2050,28 +1924,7 @@ meltrout_126_warmelt_outobj_OUTPUCOD_OBJPUTROUTCONST (meltclosure_ptr_t melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_127_warmelt_outobj_OUTPUCOD_OBJPUTROUTCONSTNOTNULL (meltclosure_ptr_t - meltclosp_, - melt_ptr_t - meltfirstargp_, - const - melt_argdescr_cell_t - meltxargdescr_[], - union - meltparam_un - *meltxargtab_, - const - melt_argdescr_cell_t - meltxresdescr_[], - union - meltparam_un - *meltxrestab_); - - - - -melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_128_warmelt_outobj_OUTPUCOD_OBJPUTHOOKCONST (meltclosure_ptr_t +meltrout_118_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTPAIRTAIL (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, @@ -2090,7 +1943,87 @@ meltrout_128_warmelt_outobj_OUTPUCOD_OBJPUTHOOKCONST (meltclosure_ptr_t melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_129_warmelt_outobj_OUTPUCOD_OBJPUTHOOKDATA (meltclosure_ptr_t +meltrout_119_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTLIST (meltclosure_ptr_t + meltclosp_, + melt_ptr_t meltfirstargp_, + const melt_argdescr_cell_t + meltxargdescr_[], + union meltparam_un + *meltxargtab_, + const melt_argdescr_cell_t + meltxresdescr_[], + union meltparam_un + *meltxrestab_); + + + + +melt_ptr_t MELT_MODULE_VISIBILITY +meltrout_120_WARMELTmiOUTOBJ_OUTPUCOD_OBJGETSLOT (meltclosure_ptr_t + meltclosp_, + melt_ptr_t meltfirstargp_, + const melt_argdescr_cell_t + meltxargdescr_[], + union meltparam_un + *meltxargtab_, + const melt_argdescr_cell_t + meltxresdescr_[], + union meltparam_un + *meltxrestab_); + + + + +melt_ptr_t MELT_MODULE_VISIBILITY +meltrout_121_WARMELTmiOUTOBJ_LAMBDA___26__ (meltclosure_ptr_t meltclosp_, + melt_ptr_t meltfirstargp_, + const melt_argdescr_cell_t + meltxargdescr_[], + union meltparam_un *meltxargtab_, + const melt_argdescr_cell_t + meltxresdescr_[], + union meltparam_un *meltxrestab_); + + + + +melt_ptr_t MELT_MODULE_VISIBILITY +meltrout_122_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTSLOT (meltclosure_ptr_t + meltclosp_, + melt_ptr_t meltfirstargp_, + const melt_argdescr_cell_t + meltxargdescr_[], + union meltparam_un + *meltxargtab_, + const melt_argdescr_cell_t + meltxresdescr_[], + union meltparam_un + *meltxrestab_); + + + + +melt_ptr_t MELT_MODULE_VISIBILITY +meltrout_123_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTCLOSUROUT (meltclosure_ptr_t + meltclosp_, + melt_ptr_t + meltfirstargp_, + const + melt_argdescr_cell_t + meltxargdescr_[], + union meltparam_un + *meltxargtab_, + const + melt_argdescr_cell_t + meltxresdescr_[], + union meltparam_un + *meltxrestab_); + + + + +melt_ptr_t MELT_MODULE_VISIBILITY +meltrout_124_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTCLOSEDV (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, @@ -2109,7 +2042,26 @@ meltrout_129_warmelt_outobj_OUTPUCOD_OBJPUTHOOKDATA (meltclosure_ptr_t melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_130_warmelt_outobj_OUTPUCOD_OBJPUTXTRARESULT (meltclosure_ptr_t +meltrout_125_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTCLOSEDNOTNULLV (meltclosure_ptr_t + meltclosp_, + melt_ptr_t + meltfirstargp_, + const + melt_argdescr_cell_t + meltxargdescr_[], + union meltparam_un + *meltxargtab_, + const + melt_argdescr_cell_t + meltxresdescr_[], + union meltparam_un + *meltxrestab_); + + + + +melt_ptr_t MELT_MODULE_VISIBILITY +meltrout_126_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTROUTCONST (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, @@ -2128,74 +2080,126 @@ meltrout_130_warmelt_outobj_OUTPUCOD_OBJPUTXTRARESULT (meltclosure_ptr_t melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_131_warmelt_outobj_OUTPUCOD_OBJEXPV (meltclosure_ptr_t meltclosp_, - melt_ptr_t meltfirstargp_, - const melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un - *meltxargtab_, - const melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un - *meltxrestab_); +meltrout_127_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTROUTCONSTNOTNULL +(meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[], +union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[], +union meltparam_un *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_132_warmelt_outobj_OUTPUCOD_OBJLOCATEDEXPV (meltclosure_ptr_t - meltclosp_, - melt_ptr_t - meltfirstargp_, - const - melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un - *meltxargtab_, - const - melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un - *meltxrestab_); +meltrout_128_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTHOOKCONST (meltclosure_ptr_t + meltclosp_, + melt_ptr_t + meltfirstargp_, + const + melt_argdescr_cell_t + meltxargdescr_[], + union meltparam_un + *meltxargtab_, + const + melt_argdescr_cell_t + meltxresdescr_[], + union meltparam_un + *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_133_warmelt_outobj_OUTPUCOD_VERBATIMSTRING (meltclosure_ptr_t - meltclosp_, - melt_ptr_t - meltfirstargp_, - const - melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un - *meltxargtab_, - const - melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un - *meltxrestab_); +meltrout_129_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTHOOKDATA (meltclosure_ptr_t + meltclosp_, + melt_ptr_t + meltfirstargp_, + const + melt_argdescr_cell_t + meltxargdescr_[], + union meltparam_un + *meltxargtab_, + const + melt_argdescr_cell_t + meltxresdescr_[], + union meltparam_un + *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_134_warmelt_outobj_OUTPUCOD_STRING (meltclosure_ptr_t meltclosp_, - melt_ptr_t meltfirstargp_, - const melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un *meltxargtab_, - const melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un - *meltxrestab_); +meltrout_130_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTXTRARESULT (meltclosure_ptr_t + meltclosp_, + melt_ptr_t + meltfirstargp_, + const + melt_argdescr_cell_t + meltxargdescr_[], + union meltparam_un + *meltxargtab_, + const + melt_argdescr_cell_t + meltxresdescr_[], + union meltparam_un + *meltxrestab_); + + + + +melt_ptr_t MELT_MODULE_VISIBILITY +meltrout_131_WARMELTmiOUTOBJ_OUTPUCOD_OBJEXPV (meltclosure_ptr_t meltclosp_, + melt_ptr_t meltfirstargp_, + const melt_argdescr_cell_t + meltxargdescr_[], + union meltparam_un + *meltxargtab_, + const melt_argdescr_cell_t + meltxresdescr_[], + union meltparam_un + *meltxrestab_); + + + + +melt_ptr_t MELT_MODULE_VISIBILITY +meltrout_132_WARMELTmiOUTOBJ_OUTPUCOD_OBJLOCATEDEXPV (meltclosure_ptr_t + meltclosp_, + melt_ptr_t + meltfirstargp_, + const + melt_argdescr_cell_t + meltxargdescr_[], + union meltparam_un + *meltxargtab_, + const + melt_argdescr_cell_t + meltxresdescr_[], + union meltparam_un + *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_135_warmelt_outobj_OUTPUCOD_INTEGER (meltclosure_ptr_t meltclosp_, +meltrout_133_WARMELTmiOUTOBJ_OUTPUCOD_VERBATIMSTRING (meltclosure_ptr_t + meltclosp_, + melt_ptr_t + meltfirstargp_, + const + melt_argdescr_cell_t + meltxargdescr_[], + union meltparam_un + *meltxargtab_, + const + melt_argdescr_cell_t + meltxresdescr_[], + union meltparam_un + *meltxrestab_); + + + + +melt_ptr_t MELT_MODULE_VISIBILITY +meltrout_134_WARMELTmiOUTOBJ_OUTPUCOD_STRING (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[], @@ -2210,42 +2214,91 @@ meltrout_135_warmelt_outobj_OUTPUCOD_INTEGER (meltclosure_ptr_t meltclosp_, melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_136_warmelt_outobj_OUTPUCOD_FINALRETURN (meltclosure_ptr_t - meltclosp_, - melt_ptr_t meltfirstargp_, - const melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un - *meltxargtab_, - const melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un - *meltxrestab_); +meltrout_135_WARMELTmiOUTOBJ_OUTPUCOD_INTEGER (meltclosure_ptr_t meltclosp_, + melt_ptr_t meltfirstargp_, + const melt_argdescr_cell_t + meltxargdescr_[], + union meltparam_un + *meltxargtab_, + const melt_argdescr_cell_t + meltxresdescr_[], + union meltparam_un + *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_137_warmelt_outobj_SORTED_NAMED_DICT_TUPLE (meltclosure_ptr_t - meltclosp_, - melt_ptr_t - meltfirstargp_, - const - melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un - *meltxargtab_, - const - melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un - *meltxrestab_); +meltrout_136_WARMELTmiOUTOBJ_OUTPUCOD_FINALRETURN (meltclosure_ptr_t + meltclosp_, + melt_ptr_t meltfirstargp_, + const melt_argdescr_cell_t + meltxargdescr_[], + union meltparam_un + *meltxargtab_, + const melt_argdescr_cell_t + meltxresdescr_[], + union meltparam_un + *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_138_warmelt_outobj_OUTPUT_EXPORTED_OFFSETS (meltclosure_ptr_t +meltrout_137_WARMELTmiOUTOBJ_SORTED_NAMED_DICT_TUPLE (meltclosure_ptr_t + meltclosp_, + melt_ptr_t + meltfirstargp_, + const + melt_argdescr_cell_t + meltxargdescr_[], + union meltparam_un + *meltxargtab_, + const + melt_argdescr_cell_t + meltxresdescr_[], + union meltparam_un + *meltxrestab_); + + + + +melt_ptr_t MELT_MODULE_VISIBILITY +meltrout_138_WARMELTmiOUTOBJ_OUTPUT_EXPORTED_OFFSETS (meltclosure_ptr_t + meltclosp_, + melt_ptr_t + meltfirstargp_, + const + melt_argdescr_cell_t + meltxargdescr_[], + union meltparam_un + *meltxargtab_, + const + melt_argdescr_cell_t + meltxresdescr_[], + union meltparam_un + *meltxrestab_); + + + + +melt_ptr_t MELT_MODULE_VISIBILITY +meltrout_139_WARMELTmiOUTOBJ_NTH_SECUNDARY_FILE (meltclosure_ptr_t meltclosp_, + melt_ptr_t meltfirstargp_, + const melt_argdescr_cell_t + meltxargdescr_[], + union meltparam_un + *meltxargtab_, + const melt_argdescr_cell_t + meltxresdescr_[], + union meltparam_un + *meltxrestab_); + + + + +melt_ptr_t MELT_MODULE_VISIBILITY +meltrout_140_WARMELTmiOUTOBJ_OUTPUT_MELT_DESCRIPTOR (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, @@ -2264,105 +2317,93 @@ meltrout_138_warmelt_outobj_OUTPUT_EXPORTED_OFFSETS (meltclosure_ptr_t melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_139_warmelt_outobj_NTH_SECUNDARY_FILE (meltclosure_ptr_t meltclosp_, - melt_ptr_t meltfirstargp_, - const melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un - *meltxargtab_, - const melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un - *meltxrestab_); - - - - -melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_140_warmelt_outobj_OUTPUT_MELT_DESCRIPTOR (meltclosure_ptr_t - meltclosp_, - melt_ptr_t meltfirstargp_, - const melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un - *meltxargtab_, - const melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un - *meltxrestab_); +meltrout_141_WARMELTmiOUTOBJ_SYNTESTGEN_ANY (meltclosure_ptr_t meltclosp_, + melt_ptr_t meltfirstargp_, + const melt_argdescr_cell_t + meltxargdescr_[], + union meltparam_un *meltxargtab_, + const melt_argdescr_cell_t + meltxresdescr_[], + union meltparam_un + *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_141_warmelt_outobj_SYNTESTGEN_ANY (meltclosure_ptr_t meltclosp_, - melt_ptr_t meltfirstargp_, - const melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un *meltxargtab_, - const melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un *meltxrestab_); +meltrout_142_WARMELTmiOUTOBJ_SUBSTITUTE_FORMALS_FOR_SYNTEST (meltclosure_ptr_t + meltclosp_, + melt_ptr_t + meltfirstargp_, + const + melt_argdescr_cell_t + meltxargdescr_[], + union + meltparam_un + *meltxargtab_, + const + melt_argdescr_cell_t + meltxresdescr_[], + union + meltparam_un + *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_142_warmelt_outobj_SUBSTITUTE_FORMALS_FOR_SYNTEST (meltclosure_ptr_t - meltclosp_, - melt_ptr_t - meltfirstargp_, - const - melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un - *meltxargtab_, - const - melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un - *meltxrestab_); +meltrout_143_WARMELTmiOUTOBJ_EXPAND_TUPLE_FOR_SYNTEST (meltclosure_ptr_t + meltclosp_, + melt_ptr_t + meltfirstargp_, + const + melt_argdescr_cell_t + meltxargdescr_[], + union meltparam_un + *meltxargtab_, + const + melt_argdescr_cell_t + meltxresdescr_[], + union meltparam_un + *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_143_warmelt_outobj_EXPAND_TUPLE_FOR_SYNTEST (meltclosure_ptr_t - meltclosp_, - melt_ptr_t - meltfirstargp_, - const - melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un - *meltxargtab_, - const - melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un - *meltxrestab_); +meltrout_144_WARMELTmiOUTOBJ_SYNTESTGEN_PRIMITIVE (meltclosure_ptr_t + meltclosp_, + melt_ptr_t meltfirstargp_, + const melt_argdescr_cell_t + meltxargdescr_[], + union meltparam_un + *meltxargtab_, + const melt_argdescr_cell_t + meltxresdescr_[], + union meltparam_un + *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_144_warmelt_outobj_SYNTESTGEN_PRIMITIVE (meltclosure_ptr_t - meltclosp_, - melt_ptr_t meltfirstargp_, - const melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un - *meltxargtab_, - const melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un - *meltxrestab_); +meltrout_145_WARMELTmiOUTOBJ_SYNTESTGEN_CITERATOR (meltclosure_ptr_t + meltclosp_, + melt_ptr_t meltfirstargp_, + const melt_argdescr_cell_t + meltxargdescr_[], + union meltparam_un + *meltxargtab_, + const melt_argdescr_cell_t + meltxresdescr_[], + union meltparam_un + *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_145_warmelt_outobj_SYNTESTGEN_CITERATOR (meltclosure_ptr_t +meltrout_146_WARMELTmiOUTOBJ_SYNTESTGEN_CMATCHER (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t @@ -2378,41 +2419,7 @@ meltrout_145_warmelt_outobj_SYNTESTGEN_CITERATOR (meltclosure_ptr_t melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_146_warmelt_outobj_SYNTESTGEN_CMATCHER (meltclosure_ptr_t meltclosp_, - melt_ptr_t meltfirstargp_, - const melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un - *meltxargtab_, - const melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un - *meltxrestab_); - - - - -melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_147_warmelt_outobj_EMIT_SYNTAX_TESTING_ROUTINE (meltclosure_ptr_t - meltclosp_, - melt_ptr_t - meltfirstargp_, - const - melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un - *meltxargtab_, - const - melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un - *meltxrestab_); - - - - -melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_148_warmelt_outobj_NORMALIZE_MACROEXPANDED_LIST (meltclosure_ptr_t +meltrout_147_WARMELTmiOUTOBJ_EMIT_SYNTAX_TESTING_ROUTINE (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, @@ -2431,45 +2438,80 @@ meltrout_148_warmelt_outobj_NORMALIZE_MACROEXPANDED_LIST (meltclosure_ptr_t melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_149_warmelt_outobj_OUTPUT_HOOKS_WITH_MODVAR (meltclosure_ptr_t - meltclosp_, - melt_ptr_t - meltfirstargp_, - const - melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un - *meltxargtab_, - const - melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un - *meltxrestab_); +meltrout_148_WARMELTmiOUTOBJ_NORMALIZE_MACROEXPANDED_LIST (meltclosure_ptr_t + meltclosp_, + melt_ptr_t + meltfirstargp_, + const + melt_argdescr_cell_t + meltxargdescr_[], + union meltparam_un + *meltxargtab_, + const + melt_argdescr_cell_t + meltxresdescr_[], + union meltparam_un + *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_150_warmelt_outobj_TRANSLATE_MACROEXPANDED_LIST (meltclosure_ptr_t - meltclosp_, - melt_ptr_t - meltfirstargp_, - const - melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un - *meltxargtab_, - const - melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un - *meltxrestab_); +meltrout_149_WARMELTmiOUTOBJ_OUTPUT_HOOKS_WITH_MODVAR (meltclosure_ptr_t + meltclosp_, + melt_ptr_t + meltfirstargp_, + const + melt_argdescr_cell_t + meltxargdescr_[], + union meltparam_un + *meltxargtab_, + const + melt_argdescr_cell_t + meltxresdescr_[], + union meltparam_un + *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_151_warmelt_outobj_FATAL_COMPILE_ERROR (meltclosure_ptr_t meltclosp_, +meltrout_150_WARMELTmiOUTOBJ_TRANSLATE_MACROEXPANDED_LIST (meltclosure_ptr_t + meltclosp_, + melt_ptr_t + meltfirstargp_, + const + melt_argdescr_cell_t + meltxargdescr_[], + union meltparam_un + *meltxargtab_, + const + melt_argdescr_cell_t + meltxresdescr_[], + union meltparam_un + *meltxrestab_); + + + + +melt_ptr_t MELT_MODULE_VISIBILITY +meltrout_151_WARMELTmiOUTOBJ_FATAL_COMPILE_ERROR (meltclosure_ptr_t + meltclosp_, + melt_ptr_t meltfirstargp_, + const melt_argdescr_cell_t + meltxargdescr_[], + union meltparam_un + *meltxargtab_, + const melt_argdescr_cell_t + meltxresdescr_[], + union meltparam_un + *meltxrestab_); + + + + +melt_ptr_t MELT_MODULE_VISIBILITY +meltrout_152_WARMELTmiOUTOBJ_COMPILE_LIST_SEXPR (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[], @@ -2484,125 +2526,112 @@ meltrout_151_warmelt_outobj_FATAL_COMPILE_ERROR (meltclosure_ptr_t meltclosp_, melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_152_warmelt_outobj_COMPILE_LIST_SEXPR (meltclosure_ptr_t meltclosp_, - melt_ptr_t meltfirstargp_, - const melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un - *meltxargtab_, - const melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un - *meltxrestab_); - - - - -melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_153_warmelt_outobj_LAMBDA___27__ (meltclosure_ptr_t meltclosp_, - melt_ptr_t meltfirstargp_, - const melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un *meltxargtab_, - const melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un *meltxrestab_); +meltrout_153_WARMELTmiOUTOBJ_LAMBDA___27__ (meltclosure_ptr_t meltclosp_, + melt_ptr_t meltfirstargp_, + const melt_argdescr_cell_t + meltxargdescr_[], + union meltparam_un *meltxargtab_, + const melt_argdescr_cell_t + meltxresdescr_[], + union meltparam_un *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_154_warmelt_outobj_AUTOBOX_NORMAL_RETURN (meltclosure_ptr_t - meltclosp_, - melt_ptr_t meltfirstargp_, - const melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un - *meltxargtab_, - const melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un - *meltxrestab_); +meltrout_154_WARMELTmiOUTOBJ_AUTOBOX_NORMAL_RETURN (meltclosure_ptr_t + meltclosp_, + melt_ptr_t meltfirstargp_, + const melt_argdescr_cell_t + meltxargdescr_[], + union meltparam_un + *meltxargtab_, + const melt_argdescr_cell_t + meltxresdescr_[], + union meltparam_un + *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_155_warmelt_outobj_TRANSLATE_RUN_MELT_EXPRESSIONS (meltclosure_ptr_t - meltclosp_, - melt_ptr_t - meltfirstargp_, - const - melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un - *meltxargtab_, - const - melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un - *meltxrestab_); +meltrout_155_WARMELTmiOUTOBJ_TRANSLATE_RUN_MELT_EXPRESSIONS (meltclosure_ptr_t + meltclosp_, + melt_ptr_t + meltfirstargp_, + const + melt_argdescr_cell_t + meltxargdescr_[], + union + meltparam_un + *meltxargtab_, + const + melt_argdescr_cell_t + meltxresdescr_[], + union + meltparam_un + *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_156_warmelt_outobj_LAMBDA___28__ (meltclosure_ptr_t meltclosp_, - melt_ptr_t meltfirstargp_, - const melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un *meltxargtab_, - const melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un *meltxrestab_); +meltrout_156_WARMELTmiOUTOBJ_LAMBDA___28__ (meltclosure_ptr_t meltclosp_, + melt_ptr_t meltfirstargp_, + const melt_argdescr_cell_t + meltxargdescr_[], + union meltparam_un *meltxargtab_, + const melt_argdescr_cell_t + meltxresdescr_[], + union meltparam_un *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_157_warmelt_outobj_LAMBDA___29__ (meltclosure_ptr_t meltclosp_, - melt_ptr_t meltfirstargp_, - const melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un *meltxargtab_, - const melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un *meltxrestab_); +meltrout_157_WARMELTmiOUTOBJ_LAMBDA___29__ (meltclosure_ptr_t meltclosp_, + melt_ptr_t meltfirstargp_, + const melt_argdescr_cell_t + meltxargdescr_[], + union meltparam_un *meltxargtab_, + const melt_argdescr_cell_t + meltxresdescr_[], + union meltparam_un *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_158_warmelt_outobj_LAMBDA___30__ (meltclosure_ptr_t meltclosp_, - melt_ptr_t meltfirstargp_, - const melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un *meltxargtab_, - const melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un *meltxrestab_); +meltrout_158_WARMELTmiOUTOBJ_LAMBDA___30__ (meltclosure_ptr_t meltclosp_, + melt_ptr_t meltfirstargp_, + const melt_argdescr_cell_t + meltxargdescr_[], + union meltparam_un *meltxargtab_, + const melt_argdescr_cell_t + meltxresdescr_[], + union meltparam_un *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_159_warmelt_outobj_READ_MELT_EXPRESSIONS (meltclosure_ptr_t - meltclosp_, - melt_ptr_t meltfirstargp_, - const melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un - *meltxargtab_, - const melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un - *meltxrestab_); +meltrout_159_WARMELTmiOUTOBJ_READ_MELT_EXPRESSIONS (meltclosure_ptr_t + meltclosp_, + melt_ptr_t meltfirstargp_, + const melt_argdescr_cell_t + meltxargdescr_[], + union meltparam_un + *meltxargtab_, + const melt_argdescr_cell_t + meltxresdescr_[], + union meltparam_un + *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_160_warmelt_outobj_TRANSLATE_TO_C_MODULE_MELT_SOURCES +meltrout_160_WARMELTmiOUTOBJ_TRANSLATE_TO_C_MODULE_MELT_SOURCES (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[], union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[], union meltparam_un *meltxrestab_); @@ -2611,7 +2640,7 @@ union meltparam_un *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_161_warmelt_outobj_GENERATE_GPLV3PLUS_COPYRIGHT_NOTICE_C_COMMENT +meltrout_161_WARMELTmiOUTOBJ_GENERATE_GPLV3PLUS_COPYRIGHT_NOTICE_C_COMMENT (meltclosure_ptr_t meltclosp_, melt_ptr_t meltfirstargp_, const melt_argdescr_cell_t meltxargdescr_[], union meltparam_un *meltxargtab_, const melt_argdescr_cell_t meltxresdescr_[], union meltparam_un *meltxrestab_); @@ -2627,62 +2656,62 @@ typedef struct melt_initial_frame_st meltinitial_frame_t; /* define different names when debugging or not */ #if MELT_HAVE_DEBUG -MELT_EXTERN const char meltmodule_warmelt_outobj__melt_have_debug_enabled[]; -#define melt_have_debug_string meltmodule_warmelt_outobj__melt_have_debug_enabled +MELT_EXTERN const char meltmodule_WARMELTmiOUTOBJ__melt_have_debug_enabled[]; +#define melt_have_debug_string meltmodule_WARMELTmiOUTOBJ__melt_have_debug_enabled #else /*!MELT_HAVE_DEBUG */ -MELT_EXTERN const char meltmodule_warmelt_outobj__melt_have_debug_disabled[]; -#define melt_have_debug_string meltmodule_warmelt_outobj__melt_have_debug_disabled +MELT_EXTERN const char meltmodule_WARMELTmiOUTOBJ__melt_have_debug_disabled[]; +#define melt_have_debug_string meltmodule_WARMELTmiOUTOBJ__melt_have_debug_disabled #endif /*!MELT_HAVE_DEBUG */ void MELT_MODULE_VISIBILITY -meltmod__warmelt_outobj__initialmeltchunk_0 (meltinitial_frame_t *, char *); +meltmod__WARMELTmiOUTOBJ__initialmeltchunk_0 (meltinitial_frame_t *, char *); void MELT_MODULE_VISIBILITY -meltmod__warmelt_outobj__initialmeltchunk_1 (meltinitial_frame_t *, char *); +meltmod__WARMELTmiOUTOBJ__initialmeltchunk_1 (meltinitial_frame_t *, char *); void MELT_MODULE_VISIBILITY -meltmod__warmelt_outobj__initialmeltchunk_2 (meltinitial_frame_t *, char *); +meltmod__WARMELTmiOUTOBJ__initialmeltchunk_2 (meltinitial_frame_t *, char *); void MELT_MODULE_VISIBILITY -meltmod__warmelt_outobj__initialmeltchunk_3 (meltinitial_frame_t *, char *); +meltmod__WARMELTmiOUTOBJ__initialmeltchunk_3 (meltinitial_frame_t *, char *); void MELT_MODULE_VISIBILITY -meltmod__warmelt_outobj__initialmeltchunk_4 (meltinitial_frame_t *, char *); +meltmod__WARMELTmiOUTOBJ__initialmeltchunk_4 (meltinitial_frame_t *, char *); void MELT_MODULE_VISIBILITY -meltmod__warmelt_outobj__initialmeltchunk_5 (meltinitial_frame_t *, char *); +meltmod__WARMELTmiOUTOBJ__initialmeltchunk_5 (meltinitial_frame_t *, char *); void MELT_MODULE_VISIBILITY -meltmod__warmelt_outobj__initialmeltchunk_6 (meltinitial_frame_t *, char *); +meltmod__WARMELTmiOUTOBJ__initialmeltchunk_6 (meltinitial_frame_t *, char *); void MELT_MODULE_VISIBILITY -meltmod__warmelt_outobj__initialmeltchunk_7 (meltinitial_frame_t *, char *); +meltmod__WARMELTmiOUTOBJ__initialmeltchunk_7 (meltinitial_frame_t *, char *); void MELT_MODULE_VISIBILITY -meltmod__warmelt_outobj__initialmeltchunk_8 (meltinitial_frame_t *, char *); +meltmod__WARMELTmiOUTOBJ__initialmeltchunk_8 (meltinitial_frame_t *, char *); void MELT_MODULE_VISIBILITY -meltmod__warmelt_outobj__initialmeltchunk_9 (meltinitial_frame_t *, char *); +meltmod__WARMELTmiOUTOBJ__initialmeltchunk_9 (meltinitial_frame_t *, char *); void MELT_MODULE_VISIBILITY -meltmod__warmelt_outobj__initialmeltchunk_10 (meltinitial_frame_t *, char *); +meltmod__WARMELTmiOUTOBJ__initialmeltchunk_10 (meltinitial_frame_t *, char *); void MELT_MODULE_VISIBILITY -meltmod__warmelt_outobj__initialmeltchunk_11 (meltinitial_frame_t *, char *); +meltmod__WARMELTmiOUTOBJ__initialmeltchunk_11 (meltinitial_frame_t *, char *); void MELT_MODULE_VISIBILITY -meltmod__warmelt_outobj__initialmeltchunk_12 (meltinitial_frame_t *, char *); +meltmod__WARMELTmiOUTOBJ__initialmeltchunk_12 (meltinitial_frame_t *, char *); void MELT_MODULE_VISIBILITY -meltmod__warmelt_outobj__initialmeltchunk_13 (meltinitial_frame_t *, char *); +meltmod__WARMELTmiOUTOBJ__initialmeltchunk_13 (meltinitial_frame_t *, char *); void MELT_MODULE_VISIBILITY -meltmod__warmelt_outobj__initialmeltchunk_14 (meltinitial_frame_t *, char *); +meltmod__WARMELTmiOUTOBJ__initialmeltchunk_14 (meltinitial_frame_t *, char *); void MELT_MODULE_VISIBILITY -meltmod__warmelt_outobj__initialmeltchunk_15 (meltinitial_frame_t *, char *); +meltmod__WARMELTmiOUTOBJ__initialmeltchunk_15 (meltinitial_frame_t *, char *); void MELT_MODULE_VISIBILITY -meltmod__warmelt_outobj__initialmeltchunk_16 (meltinitial_frame_t *, char *); +meltmod__WARMELTmiOUTOBJ__initialmeltchunk_16 (meltinitial_frame_t *, char *); void MELT_MODULE_VISIBILITY -meltmod__warmelt_outobj__initialmeltchunk_17 (meltinitial_frame_t *, char *); +meltmod__WARMELTmiOUTOBJ__initialmeltchunk_17 (meltinitial_frame_t *, char *); void MELT_MODULE_VISIBILITY -meltmod__warmelt_outobj__initialmeltchunk_18 (meltinitial_frame_t *, char *); +meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t *, char *); void MELT_MODULE_VISIBILITY -meltmod__warmelt_outobj__initialmeltchunk_19 (meltinitial_frame_t *, char *); +meltmod__WARMELTmiOUTOBJ__initialmeltchunk_19 (meltinitial_frame_t *, char *); void MELT_MODULE_VISIBILITY -meltmod__warmelt_outobj__initialmeltchunk_20 (meltinitial_frame_t *, char *); +meltmod__WARMELTmiOUTOBJ__initialmeltchunk_20 (meltinitial_frame_t *, char *); void MELT_MODULE_VISIBILITY -meltmod__warmelt_outobj__forward_or_mark_module_start_frame (struct - melt_callframe_st - *fp, - int marking); +meltmod__WARMELTmiOUTOBJ__forward_or_mark_module_start_frame (struct + melt_callframe_st + *fp, + int marking); @@ -2694,19 +2723,20 @@ meltmod__warmelt_outobj__forward_or_mark_module_start_frame (struct melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_1_warmelt_outobj_GET_CODE_BUFFER_LIMIT (meltclosure_ptr_t meltclosp_, - melt_ptr_t meltfirstargp_, - const melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un - *meltxargtab_, - const melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un - *meltxrestab_) +meltrout_1_WARMELTmiOUTOBJ_GET_CODE_BUFFER_LIMIT (meltclosure_ptr_t + meltclosp_, + melt_ptr_t meltfirstargp_, + const melt_argdescr_cell_t + meltxargdescr_[], + union meltparam_un + *meltxargtab_, + const melt_argdescr_cell_t + meltxresdescr_[], + union meltparam_un + *meltxrestab_) { long - current_blocklevel_signals_meltrout_1_warmelt_outobj_GET_CODE_BUFFER_LIMIT_melt + current_blocklevel_signals_meltrout_1_WARMELTmiOUTOBJ_GET_CODE_BUFFER_LIMIT_melt = melt_blocklevel_signals; #if MELT_HAVE_DEBUG @@ -2719,7 +2749,7 @@ meltrout_1_warmelt_outobj_GET_CODE_BUFFER_LIMIT (meltclosure_ptr_t meltclosp_, #define meltcallcount 0L #endif - struct meltframe_meltrout_1_warmelt_outobj_GET_CODE_BUFFER_LIMIT_st + struct meltframe_meltrout_1_WARMELTmiOUTOBJ_GET_CODE_BUFFER_LIMIT_st { int mcfr_nbvar; #if MELT_HAVE_DEBUG @@ -2741,14 +2771,14 @@ meltrout_1_warmelt_outobj_GET_CODE_BUFFER_LIMIT (meltclosure_ptr_t meltclosp_, } *meltframptr_ = 0, meltfram__; /*declfrastruct */ #define meltframe meltfram__ - /*meltrout_1_warmelt_outobj_GET_CODE_BUFFER_LIMIT is not initial declstructinit */ + /*meltrout_1_WARMELTmiOUTOBJ_GET_CODE_BUFFER_LIMIT is not initial declstructinit */ if (MELT_UNLIKELY (meltxargdescr_ == MELTPAR_MARKGGC)) { /*mark for ggc */ int meltix; meltframptr_ = - (struct meltframe_meltrout_1_warmelt_outobj_GET_CODE_BUFFER_LIMIT_st + (struct meltframe_meltrout_1_WARMELTmiOUTOBJ_GET_CODE_BUFFER_LIMIT_st *) meltfirstargp_; - /* use arguments meltrout_1_warmelt_outobj_GET_CODE_BUFFER_LIMIT output_curframe_declstruct_init */ + /* use arguments meltrout_1_WARMELTmiOUTOBJ_GET_CODE_BUFFER_LIMIT output_curframe_declstruct_init */ (void) meltclosp_; (void) meltfirstargp_; (void) meltxargdescr_; @@ -2763,7 +2793,7 @@ meltrout_1_warmelt_outobj_GET_CODE_BUFFER_LIMIT (meltclosure_ptr_t meltclosp_, return NULL; } /*end markggc */ ; memset (&meltfram__, 0, sizeof (meltfram__)); -/* declstructinit plain routine meltrout_1_warmelt_outobj_GET_CODE_BUFFER_LIMIT nbval 2*/ +/* declstructinit plain routine meltrout_1_WARMELTmiOUTOBJ_GET_CODE_BUFFER_LIMIT nbval 2*/ meltfram__.mcfr_nbvar = 2 /*nbval */ ; meltfram__.mcfr_clos = meltclosp_; meltfram__.mcfr_prev = (struct melt_callframe_st *) melt_topframe; @@ -2809,7 +2839,7 @@ meltlab_endgetargs:; MELT_LOCATION ("warmelt-outobj.melt:41:/ quasiblock"); - /*_.RETVAL___V1*/ meltfptr[0] = /*_.REFERENCED_VALUE__V2*/ meltfptr[1];; + /*_._RETVAL___V1*/ meltfptr[0] = /*_.REFERENCED_VALUE__V2*/ meltfptr[1];; { MELT_LOCATION ("warmelt-outobj.melt:41:/ locexp"); @@ -2837,33 +2867,34 @@ meltlabend_rout: melt_trace_end ("GET_CODE_BUFFER_LIMIT", meltcallcount); MELT_TRACE_EXIT_LOCATION (); melt_blocklevel_signals = - current_blocklevel_signals_meltrout_1_warmelt_outobj_GET_CODE_BUFFER_LIMIT_melt; + current_blocklevel_signals_meltrout_1_WARMELTmiOUTOBJ_GET_CODE_BUFFER_LIMIT_melt; melt_topframe = (struct melt_callframe_st *) meltfram__.mcfr_prev; - return (melt_ptr_t) ( /*_.RETVAL___V1*/ meltfptr[0]); + return (melt_ptr_t) ( /*_._RETVAL___V1*/ meltfptr[0]); #undef meltcallcount #undef meltfram__ #undef MELTFRAM_NBVARNUM #undef MELTFRAM_NBVARPTR -} /*end meltrout_1_warmelt_outobj_GET_CODE_BUFFER_LIMIT */ +} /*end meltrout_1_WARMELTmiOUTOBJ_GET_CODE_BUFFER_LIMIT */ melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_2_warmelt_outobj_PUT_CODE_BUFFER_LIMIT (meltclosure_ptr_t meltclosp_, - melt_ptr_t meltfirstargp_, - const melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un * - meltxargtab_, - const melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un * - meltxrestab_) +meltrout_2_WARMELTmiOUTOBJ_PUT_CODE_BUFFER_LIMIT (meltclosure_ptr_t + meltclosp_, + melt_ptr_t meltfirstargp_, + const melt_argdescr_cell_t + meltxargdescr_[], + union meltparam_un * + meltxargtab_, + const melt_argdescr_cell_t + meltxresdescr_[], + union meltparam_un * + meltxrestab_) { long - current_blocklevel_signals_meltrout_2_warmelt_outobj_PUT_CODE_BUFFER_LIMIT_melt + current_blocklevel_signals_meltrout_2_WARMELTmiOUTOBJ_PUT_CODE_BUFFER_LIMIT_melt = melt_blocklevel_signals; #if MELT_HAVE_DEBUG @@ -2876,7 +2907,7 @@ meltrout_2_warmelt_outobj_PUT_CODE_BUFFER_LIMIT (meltclosure_ptr_t meltclosp_, #define meltcallcount 0L #endif - struct meltframe_meltrout_2_warmelt_outobj_PUT_CODE_BUFFER_LIMIT_st + struct meltframe_meltrout_2_WARMELTmiOUTOBJ_PUT_CODE_BUFFER_LIMIT_st { int mcfr_nbvar; #if MELT_HAVE_DEBUG @@ -2898,14 +2929,14 @@ meltrout_2_warmelt_outobj_PUT_CODE_BUFFER_LIMIT (meltclosure_ptr_t meltclosp_, } *meltframptr_ = 0, meltfram__; /*declfrastruct */ #define meltframe meltfram__ - /*meltrout_2_warmelt_outobj_PUT_CODE_BUFFER_LIMIT is not initial declstructinit */ + /*meltrout_2_WARMELTmiOUTOBJ_PUT_CODE_BUFFER_LIMIT is not initial declstructinit */ if (MELT_UNLIKELY (meltxargdescr_ == MELTPAR_MARKGGC)) { /*mark for ggc */ int meltix; meltframptr_ = - (struct meltframe_meltrout_2_warmelt_outobj_PUT_CODE_BUFFER_LIMIT_st + (struct meltframe_meltrout_2_WARMELTmiOUTOBJ_PUT_CODE_BUFFER_LIMIT_st *) meltfirstargp_; - /* use arguments meltrout_2_warmelt_outobj_PUT_CODE_BUFFER_LIMIT output_curframe_declstruct_init */ + /* use arguments meltrout_2_WARMELTmiOUTOBJ_PUT_CODE_BUFFER_LIMIT output_curframe_declstruct_init */ (void) meltclosp_; (void) meltfirstargp_; (void) meltxargdescr_; @@ -2920,7 +2951,7 @@ meltrout_2_warmelt_outobj_PUT_CODE_BUFFER_LIMIT (meltclosure_ptr_t meltclosp_, return NULL; } /*end markggc */ ; memset (&meltfram__, 0, sizeof (meltfram__)); -/* declstructinit plain routine meltrout_2_warmelt_outobj_PUT_CODE_BUFFER_LIMIT nbval 7*/ +/* declstructinit plain routine meltrout_2_WARMELTmiOUTOBJ_PUT_CODE_BUFFER_LIMIT nbval 7*/ meltfram__.mcfr_nbvar = 7 /*nbval */ ; meltfram__.mcfr_clos = meltclosp_; meltfram__.mcfr_prev = (struct melt_callframe_st *) melt_topframe; @@ -3016,7 +3047,8 @@ meltlab_endgetargs:; (union meltparam_un *) 0); } ; - /*_.IF___V4*/ meltfptr[3] = /*_.MELT_DEBUG_FUN__V5*/ meltfptr[4];; + /*_._IF___V4*/ meltfptr[3] = + /*_.MELT_DEBUG_FUN__V5*/ meltfptr[4];; /*epilog */ MELT_LOCATION ("warmelt-outobj.melt:51:/ clear"); @@ -3029,13 +3061,13 @@ meltlab_endgetargs:; else { /*^cond.else */ - /*_.IF___V4*/ meltfptr[3] = NULL;; + /*_._IF___V4*/ meltfptr[3] = NULL;; } ; MELT_LOCATION ("warmelt-outobj.melt:51:/ quasiblock"); - /*_.PROGN___V6*/ meltfptr[4] = /*_.IF___V4*/ meltfptr[3];; + /*_.PROGN___V6*/ meltfptr[4] = /*_._IF___V4*/ meltfptr[3];; /*^compute */ /*_.IFCPP___V3*/ meltfptr[2] = /*_.PROGN___V6*/ meltfptr[4];; /*epilog */ @@ -3043,7 +3075,7 @@ meltlab_endgetargs:; MELT_LOCATION ("warmelt-outobj.melt:51:/ clear"); /*clear *//*_#MELT_NEED_DBG__L2*/ meltfnum[1] = 0; /*^clear */ - /*clear *//*_.IF___V4*/ meltfptr[3] = 0; + /*clear *//*_._IF___V4*/ meltfptr[3] = 0; /*^clear */ /*clear *//*_.PROGN___V6*/ meltfptr[4] = 0; } @@ -3060,35 +3092,35 @@ meltlab_endgetargs:; MELT_CHECK_SIGNAL (); ; /*^compute */ - /*_#I__L4*/ meltfnum[2] = + /*_#gteqI__L4*/ meltfnum[2] = (( /*_#L__L1*/ meltfnum[0]) >= (2097152));; MELT_LOCATION ("warmelt-outobj.melt:52:/ cond"); - /*cond */ if ( /*_#I__L4*/ meltfnum[2]) /*then */ + /*cond */ if ( /*_#gteqI__L4*/ meltfnum[2]) /*then */ { /*^cond.then */ /*^block */ /*anyblock */ { - /*_#I__L6*/ meltfnum[5] = + /*_#lteqI__L6*/ meltfnum[5] = (( /*_#L__L1*/ meltfnum[0]) <= (134217728));; /*^compute */ - /*_#IF___L5*/ meltfnum[1] = /*_#I__L6*/ meltfnum[5];; + /*_#_IF___L5*/ meltfnum[1] = /*_#lteqI__L6*/ meltfnum[5];; /*epilog */ MELT_LOCATION ("warmelt-outobj.melt:52:/ clear"); - /*clear *//*_#I__L6*/ meltfnum[5] = 0; + /*clear *//*_#lteqI__L6*/ meltfnum[5] = 0; } ; } else { /*^cond.else */ - /*_#IF___L5*/ meltfnum[1] = 0;; + /*_#_IF___L5*/ meltfnum[1] = 0;; } ; MELT_LOCATION ("warmelt-outobj.melt:52:/ cond"); - /*cond */ if ( /*_#IF___L5*/ meltfnum[1]) /*then */ + /*cond */ if ( /*_#_IF___L5*/ meltfnum[1]) /*then */ { /*^cond.then */ /*^block */ @@ -3171,9 +3203,9 @@ meltlab_endgetargs:; /*^clear */ /*clear *//*_.IFCPP___V3*/ meltfptr[2] = 0; /*^clear */ - /*clear *//*_#I__L4*/ meltfnum[2] = 0; + /*clear *//*_#gteqI__L4*/ meltfnum[2] = 0; /*^clear */ - /*clear *//*_#IF___L5*/ meltfnum[1] = 0; + /*clear *//*_#_IF___L5*/ meltfnum[1] = 0; /*epilog */ } @@ -3183,34 +3215,37 @@ meltlabend_rout: melt_trace_end ("PUT_CODE_BUFFER_LIMIT", meltcallcount); MELT_TRACE_EXIT_LOCATION (); melt_blocklevel_signals = - current_blocklevel_signals_meltrout_2_warmelt_outobj_PUT_CODE_BUFFER_LIMIT_melt; + current_blocklevel_signals_meltrout_2_WARMELTmiOUTOBJ_PUT_CODE_BUFFER_LIMIT_melt; melt_topframe = (struct melt_callframe_st *) meltfram__.mcfr_prev; return (melt_ptr_t) ( /*noretval */ NULL); #undef meltcallcount #undef meltfram__ #undef MELTFRAM_NBVARNUM #undef MELTFRAM_NBVARPTR -} /*end meltrout_2_warmelt_outobj_PUT_CODE_BUFFER_LIMIT */ +} /*end meltrout_2_WARMELTmiOUTOBJ_PUT_CODE_BUFFER_LIMIT */ melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_3_warmelt_outobj_CODE_BUFFER_LIMIT_OPTSET (meltclosure_ptr_t - meltclosp_, - melt_ptr_t meltfirstargp_, - const melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un * - meltxargtab_, - const melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un * - meltxrestab_) +meltrout_3_WARMELTmiOUTOBJ_CODE_BUFFER_LIMIT_OPTSET (meltclosure_ptr_t + meltclosp_, + melt_ptr_t + meltfirstargp_, + const + melt_argdescr_cell_t + meltxargdescr_[], + union meltparam_un * + meltxargtab_, + const + melt_argdescr_cell_t + meltxresdescr_[], + union meltparam_un * + meltxrestab_) { long - current_blocklevel_signals_meltrout_3_warmelt_outobj_CODE_BUFFER_LIMIT_OPTSET_melt + current_blocklevel_signals_meltrout_3_WARMELTmiOUTOBJ_CODE_BUFFER_LIMIT_OPTSET_melt = melt_blocklevel_signals; #if MELT_HAVE_DEBUG @@ -3223,7 +3258,7 @@ meltrout_3_warmelt_outobj_CODE_BUFFER_LIMIT_OPTSET (meltclosure_ptr_t #define meltcallcount 0L #endif - struct meltframe_meltrout_3_warmelt_outobj_CODE_BUFFER_LIMIT_OPTSET_st + struct meltframe_meltrout_3_WARMELTmiOUTOBJ_CODE_BUFFER_LIMIT_OPTSET_st { int mcfr_nbvar; #if MELT_HAVE_DEBUG @@ -3246,15 +3281,15 @@ meltrout_3_warmelt_outobj_CODE_BUFFER_LIMIT_OPTSET (meltclosure_ptr_t } *meltframptr_ = 0, meltfram__; /*declfrastruct */ #define meltframe meltfram__ - /*meltrout_3_warmelt_outobj_CODE_BUFFER_LIMIT_OPTSET is not initial declstructinit */ + /*meltrout_3_WARMELTmiOUTOBJ_CODE_BUFFER_LIMIT_OPTSET is not initial declstructinit */ if (MELT_UNLIKELY (meltxargdescr_ == MELTPAR_MARKGGC)) { /*mark for ggc */ int meltix; meltframptr_ = (struct - meltframe_meltrout_3_warmelt_outobj_CODE_BUFFER_LIMIT_OPTSET_st *) + meltframe_meltrout_3_WARMELTmiOUTOBJ_CODE_BUFFER_LIMIT_OPTSET_st *) meltfirstargp_; - /* use arguments meltrout_3_warmelt_outobj_CODE_BUFFER_LIMIT_OPTSET output_curframe_declstruct_init */ + /* use arguments meltrout_3_WARMELTmiOUTOBJ_CODE_BUFFER_LIMIT_OPTSET output_curframe_declstruct_init */ (void) meltclosp_; (void) meltfirstargp_; (void) meltxargdescr_; @@ -3269,7 +3304,7 @@ meltrout_3_warmelt_outobj_CODE_BUFFER_LIMIT_OPTSET (meltclosure_ptr_t return NULL; } /*end markggc */ ; memset (&meltfram__, 0, sizeof (meltfram__)); -/* declstructinit plain routine meltrout_3_warmelt_outobj_CODE_BUFFER_LIMIT_OPTSET nbval 6*/ +/* declstructinit plain routine meltrout_3_WARMELTmiOUTOBJ_CODE_BUFFER_LIMIT_OPTSET nbval 6*/ meltfram__.mcfr_nbvar = 6 /*nbval */ ; meltfram__.mcfr_clos = meltclosp_; meltfram__.mcfr_prev = (struct melt_callframe_st *) melt_topframe; @@ -3309,24 +3344,24 @@ meltlab_endgetargs:; MELT_CHECK_SIGNAL (); ; - /*_#I__L2*/ meltfnum[1] = + /*_#gtI__L2*/ meltfnum[1] = (( /*_#LIM__L1*/ meltfnum[0]) > (0));; MELT_LOCATION ("warmelt-outobj.melt:73:/ cond"); - /*cond */ if ( /*_#I__L2*/ meltfnum[1]) /*then */ + /*cond */ if ( /*_#gtI__L2*/ meltfnum[1]) /*then */ { /*^cond.then */ /*^block */ /*anyblock */ { - /*_#I__L3*/ meltfnum[2] = + /*_#stI__L3*/ meltfnum[2] = (( /*_#LIM__L1*/ meltfnum[0]) * (1024));; /*^compute */ /*_.MAKE_INTEGERBOX__V5*/ meltfptr[4] = (meltgc_new_int ((meltobject_ptr_t) (( /*!DISCR_CONSTANT_INTEGER */ meltfrout->tabval[1])), - ( /*_#I__L3*/ meltfnum[2])));; + ( /*_#stI__L3*/ meltfnum[2])));; MELT_CHECK_SIGNAL (); ; @@ -3343,12 +3378,12 @@ meltlab_endgetargs:; (union meltparam_un *) 0); } ; - /*_.IF___V4*/ meltfptr[3] = + /*_._IF___V4*/ meltfptr[3] = /*_.PUT_CODE_BUFFER_LIMIT__V6*/ meltfptr[5];; /*epilog */ MELT_LOCATION ("warmelt-outobj.melt:73:/ clear"); - /*clear *//*_#I__L3*/ meltfnum[2] = 0; + /*clear *//*_#stI__L3*/ meltfnum[2] = 0; /*^clear */ /*clear *//*_.MAKE_INTEGERBOX__V5*/ meltfptr[4] = 0; /*^clear */ @@ -3359,22 +3394,22 @@ meltlab_endgetargs:; else { /*^cond.else */ - /*_.IF___V4*/ meltfptr[3] = NULL;; + /*_._IF___V4*/ meltfptr[3] = NULL;; } ; /*^compute */ - /*_.LET___V3*/ meltfptr[2] = /*_.IF___V4*/ meltfptr[3];; + /*_.LET___V3*/ meltfptr[2] = /*_._IF___V4*/ meltfptr[3];; MELT_LOCATION ("warmelt-outobj.melt:69:/ clear"); /*clear *//*_#LIM__L1*/ meltfnum[0] = 0; /*^clear */ - /*clear *//*_#I__L2*/ meltfnum[1] = 0; + /*clear *//*_#gtI__L2*/ meltfnum[1] = 0; /*^clear */ - /*clear *//*_.IF___V4*/ meltfptr[3] = 0; + /*clear *//*_._IF___V4*/ meltfptr[3] = 0; MELT_LOCATION ("warmelt-outobj.melt:68:/ quasiblock"); - /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V3*/ meltfptr[2];; + /*_._RETVAL___V1*/ meltfptr[0] = /*_.LET___V3*/ meltfptr[2];; { MELT_LOCATION ("warmelt-outobj.melt:68:/ locexp"); @@ -3402,33 +3437,34 @@ meltlabend_rout: melt_trace_end ("CODE_BUFFER_LIMIT_OPTSET", meltcallcount); MELT_TRACE_EXIT_LOCATION (); melt_blocklevel_signals = - current_blocklevel_signals_meltrout_3_warmelt_outobj_CODE_BUFFER_LIMIT_OPTSET_melt; + current_blocklevel_signals_meltrout_3_WARMELTmiOUTOBJ_CODE_BUFFER_LIMIT_OPTSET_melt; melt_topframe = (struct melt_callframe_st *) meltfram__.mcfr_prev; - return (melt_ptr_t) ( /*_.RETVAL___V1*/ meltfptr[0]); + return (melt_ptr_t) ( /*_._RETVAL___V1*/ meltfptr[0]); #undef meltcallcount #undef meltfram__ #undef MELTFRAM_NBVARNUM #undef MELTFRAM_NBVARPTR -} /*end meltrout_3_warmelt_outobj_CODE_BUFFER_LIMIT_OPTSET */ +} /*end meltrout_3_WARMELTmiOUTOBJ_CODE_BUFFER_LIMIT_OPTSET */ melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_4_warmelt_outobj_OUT_ENUMIX_MODVARBIND (meltclosure_ptr_t meltclosp_, - melt_ptr_t meltfirstargp_, - const melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un * - meltxargtab_, - const melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un * - meltxrestab_) +meltrout_4_WARMELTmiOUTOBJ_OUT_ENUMIX_MODVARBIND (meltclosure_ptr_t + meltclosp_, + melt_ptr_t meltfirstargp_, + const melt_argdescr_cell_t + meltxargdescr_[], + union meltparam_un * + meltxargtab_, + const melt_argdescr_cell_t + meltxresdescr_[], + union meltparam_un * + meltxrestab_) { long - current_blocklevel_signals_meltrout_4_warmelt_outobj_OUT_ENUMIX_MODVARBIND_melt + current_blocklevel_signals_meltrout_4_WARMELTmiOUTOBJ_OUT_ENUMIX_MODVARBIND_melt = melt_blocklevel_signals; #if MELT_HAVE_DEBUG @@ -3441,7 +3477,7 @@ meltrout_4_warmelt_outobj_OUT_ENUMIX_MODVARBIND (meltclosure_ptr_t meltclosp_, #define meltcallcount 0L #endif - struct meltframe_meltrout_4_warmelt_outobj_OUT_ENUMIX_MODVARBIND_st + struct meltframe_meltrout_4_WARMELTmiOUTOBJ_OUT_ENUMIX_MODVARBIND_st { int mcfr_nbvar; #if MELT_HAVE_DEBUG @@ -3463,14 +3499,14 @@ meltrout_4_warmelt_outobj_OUT_ENUMIX_MODVARBIND (meltclosure_ptr_t meltclosp_, } *meltframptr_ = 0, meltfram__; /*declfrastruct */ #define meltframe meltfram__ - /*meltrout_4_warmelt_outobj_OUT_ENUMIX_MODVARBIND is not initial declstructinit */ + /*meltrout_4_WARMELTmiOUTOBJ_OUT_ENUMIX_MODVARBIND is not initial declstructinit */ if (MELT_UNLIKELY (meltxargdescr_ == MELTPAR_MARKGGC)) { /*mark for ggc */ int meltix; meltframptr_ = - (struct meltframe_meltrout_4_warmelt_outobj_OUT_ENUMIX_MODVARBIND_st + (struct meltframe_meltrout_4_WARMELTmiOUTOBJ_OUT_ENUMIX_MODVARBIND_st *) meltfirstargp_; - /* use arguments meltrout_4_warmelt_outobj_OUT_ENUMIX_MODVARBIND output_curframe_declstruct_init */ + /* use arguments meltrout_4_WARMELTmiOUTOBJ_OUT_ENUMIX_MODVARBIND output_curframe_declstruct_init */ (void) meltclosp_; (void) meltfirstargp_; (void) meltxargdescr_; @@ -3485,7 +3521,7 @@ meltrout_4_warmelt_outobj_OUT_ENUMIX_MODVARBIND (meltclosure_ptr_t meltclosp_, return NULL; } /*end markggc */ ; memset (&meltfram__, 0, sizeof (meltfram__)); -/* declstructinit plain routine meltrout_4_warmelt_outobj_OUT_ENUMIX_MODVARBIND nbval 30*/ +/* declstructinit plain routine meltrout_4_WARMELTmiOUTOBJ_OUT_ENUMIX_MODVARBIND nbval 30*/ meltfram__.mcfr_nbvar = 30 /*nbval */ ; meltfram__.mcfr_clos = meltclosp_; meltfram__.mcfr_prev = (struct melt_callframe_st *) melt_topframe; @@ -3530,7 +3566,7 @@ meltlab_endgetargs:; /*cond */ if ( /*_#IS_OUT__L1*/ meltfnum[0]) /*then */ { /*^cond.then */ - /*_.IFELSE___V5*/ meltfptr[4] = ( /*nil */ NULL);; + /*_._IFELSE___V5*/ meltfptr[4] = ( /*nil */ NULL);; } else { @@ -3552,20 +3588,20 @@ meltlab_endgetargs:; ; } ; - /*clear *//*_.IFELSE___V5*/ meltfptr[4] = 0; + /*clear *//*_._IFELSE___V5*/ meltfptr[4] = 0; /*epilog */ } ; } ; /*^compute */ - /*_.IFCPP___V4*/ meltfptr[3] = /*_.IFELSE___V5*/ meltfptr[4];; + /*_.IFCPP___V4*/ meltfptr[3] = /*_._IFELSE___V5*/ meltfptr[4];; /*epilog */ MELT_LOCATION ("warmelt-outobj.melt:86:/ clear"); /*clear *//*_#IS_OUT__L1*/ meltfnum[0] = 0; /*^clear */ - /*clear *//*_.IFELSE___V5*/ meltfptr[4] = 0; + /*clear *//*_._IFELSE___V5*/ meltfptr[4] = 0; } #else /*MELT_HAVE_DEBUG */ @@ -3590,7 +3626,7 @@ meltlab_endgetargs:; /*cond */ if ( /*_#IS_A__L2*/ meltfnum[0]) /*then */ { /*^cond.then */ - /*_.IFELSE___V7*/ meltfptr[6] = ( /*nil */ NULL);; + /*_._IFELSE___V7*/ meltfptr[6] = ( /*nil */ NULL);; } else { @@ -3612,20 +3648,20 @@ meltlab_endgetargs:; ; } ; - /*clear *//*_.IFELSE___V7*/ meltfptr[6] = 0; + /*clear *//*_._IFELSE___V7*/ meltfptr[6] = 0; /*epilog */ } ; } ; /*^compute */ - /*_.IFCPP___V6*/ meltfptr[4] = /*_.IFELSE___V7*/ meltfptr[6];; + /*_.IFCPP___V6*/ meltfptr[4] = /*_._IFELSE___V7*/ meltfptr[6];; /*epilog */ MELT_LOCATION ("warmelt-outobj.melt:87:/ clear"); /*clear *//*_#IS_A__L2*/ meltfnum[0] = 0; /*^clear */ - /*clear *//*_.IFELSE___V7*/ meltfptr[6] = 0; + /*clear *//*_._IFELSE___V7*/ meltfptr[6] = 0; } #else /*MELT_HAVE_DEBUG */ @@ -3810,7 +3846,7 @@ meltlab_endgetargs:; /*clear *//*_.ADD2OUT__V16*/ meltfptr[15] = 0; /*^clear */ /*clear *//*_.ADD2OUT__V17*/ meltfptr[16] = 0; - /*_.IFELSE___V12*/ meltfptr[11] = /*_.LET___V13*/ meltfptr[12];; + /*_._IFELSE___V12*/ meltfptr[11] = /*_.LET___V13*/ meltfptr[12];; /*epilog */ MELT_LOCATION ("warmelt-outobj.melt:91:/ clear"); @@ -3832,11 +3868,11 @@ meltlab_endgetargs:; ((melt_ptr_t) (melt_discr ((melt_ptr_t) ( /*_.BINDER__V9*/ meltfptr[8]))));; /*^compute */ - /*_#__L4*/ meltfnum[3] = + /*_#eqeq__L4*/ meltfnum[3] = (( /*_.DISCRIM__V18*/ meltfptr[13]) == (( /*!CLASS_SYMBOL */ meltfrout->tabval[6])));; MELT_LOCATION ("warmelt-outobj.melt:99:/ cond"); - /*cond */ if ( /*_#__L4*/ meltfnum[3]) /*then */ + /*cond */ if ( /*_#eqeq__L4*/ meltfnum[3]) /*then */ { /*^cond.then */ /*^block */ @@ -3928,7 +3964,7 @@ meltlab_endgetargs:; /*clear *//*_.ADD2OUT__V22*/ meltfptr[12] = 0; /*^clear */ /*clear *//*_.ADD2OUT__V23*/ meltfptr[22] = 0; - /*_.IFELSE___V19*/ meltfptr[14] = + /*_._IFELSE___V19*/ meltfptr[14] = /*_.LET___V20*/ meltfptr[15];; /*epilog */ @@ -4020,7 +4056,7 @@ meltlab_endgetargs:; (union meltparam_un *) 0); } ; - /*_.IF___V25*/ meltfptr[12] = + /*_._IF___V25*/ meltfptr[12] = /*_.MELT_DEBUG_FUN__V26*/ meltfptr[22];; /*epilog */ @@ -4034,14 +4070,14 @@ meltlab_endgetargs:; else { /*^cond.else */ - /*_.IF___V25*/ meltfptr[12] = NULL;; + /*_._IF___V25*/ meltfptr[12] = NULL;; } ; MELT_LOCATION ("warmelt-outobj.melt:107:/ quasiblock"); /*_.PROGN___V27*/ meltfptr[15] = - /*_.IF___V25*/ meltfptr[12];; + /*_._IF___V25*/ meltfptr[12];; /*^compute */ /*_.IFCPP___V24*/ meltfptr[16] = /*_.PROGN___V27*/ meltfptr[15];; @@ -4050,7 +4086,7 @@ meltlab_endgetargs:; MELT_LOCATION ("warmelt-outobj.melt:107:/ clear"); /*clear *//*_#MELT_NEED_DBG__L5*/ meltfnum[4] = 0; /*^clear */ - /*clear *//*_.IF___V25*/ meltfptr[12] = 0; + /*clear *//*_._IF___V25*/ meltfptr[12] = 0; /*^clear */ /*clear *//*_.PROGN___V27*/ meltfptr[15] = 0; } @@ -4074,7 +4110,7 @@ meltlab_endgetargs:; /*cond */ if (( /*nil */ NULL)) /*then */ { /*^cond.then */ - /*_.IFELSE___V29*/ meltfptr[12] = ( /*nil */ NULL);; + /*_._IFELSE___V29*/ meltfptr[12] = ( /*nil */ NULL);; } else { @@ -4093,7 +4129,7 @@ meltlab_endgetargs:; ; } ; - /*clear *//*_.IFELSE___V29*/ meltfptr[12] = 0; + /*clear *//*_._IFELSE___V29*/ meltfptr[12] = 0; /*epilog */ } ; @@ -4101,11 +4137,11 @@ meltlab_endgetargs:; ; /*^compute */ /*_.IFCPP___V28*/ meltfptr[22] = - /*_.IFELSE___V29*/ meltfptr[12];; + /*_._IFELSE___V29*/ meltfptr[12];; /*epilog */ MELT_LOCATION ("warmelt-outobj.melt:108:/ clear"); - /*clear *//*_.IFELSE___V29*/ meltfptr[12] = 0; + /*clear *//*_._IFELSE___V29*/ meltfptr[12] = 0; } #else /*MELT_HAVE_DEBUG */ @@ -4119,7 +4155,7 @@ meltlab_endgetargs:; /*_.PROGN___V30*/ meltfptr[15] = /*_.IFCPP___V28*/ meltfptr[22];; /*^compute */ - /*_.IFELSE___V19*/ meltfptr[14] = + /*_._IFELSE___V19*/ meltfptr[14] = /*_.PROGN___V30*/ meltfptr[15];; /*epilog */ @@ -4133,20 +4169,21 @@ meltlab_endgetargs:; ; } ; - /*_.IFELSE___V12*/ meltfptr[11] = /*_.IFELSE___V19*/ meltfptr[14];; + /*_._IFELSE___V12*/ meltfptr[11] = + /*_._IFELSE___V19*/ meltfptr[14];; /*epilog */ MELT_LOCATION ("warmelt-outobj.melt:91:/ clear"); /*clear *//*_.DISCRIM__V18*/ meltfptr[13] = 0; /*^clear */ - /*clear *//*_#__L4*/ meltfnum[3] = 0; + /*clear *//*_#eqeq__L4*/ meltfnum[3] = 0; /*^clear */ - /*clear *//*_.IFELSE___V19*/ meltfptr[14] = 0; + /*clear *//*_._IFELSE___V19*/ meltfptr[14] = 0; } ; } ; - /*_.LET___V8*/ meltfptr[6] = /*_.IFELSE___V12*/ meltfptr[11];; + /*_.LET___V8*/ meltfptr[6] = /*_._IFELSE___V12*/ meltfptr[11];; MELT_LOCATION ("warmelt-outobj.melt:88:/ clear"); /*clear *//*_.BINDER__V9*/ meltfptr[8] = 0; @@ -4155,14 +4192,14 @@ meltlab_endgetargs:; /*^clear */ /*clear *//*_#IS_A__L3*/ meltfnum[0] = 0; /*^clear */ - /*clear *//*_.IFELSE___V12*/ meltfptr[11] = 0; + /*clear *//*_._IFELSE___V12*/ meltfptr[11] = 0; MELT_CHECK_SIGNAL (); ; MELT_LOCATION ("warmelt-outobj.melt:85:/ quasiblock"); - /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V8*/ meltfptr[6];; + /*_._RETVAL___V1*/ meltfptr[0] = /*_.LET___V8*/ meltfptr[6];; { MELT_LOCATION ("warmelt-outobj.melt:85:/ locexp"); @@ -4194,30 +4231,30 @@ meltlabend_rout: melt_trace_end ("OUT_ENUMIX_MODVARBIND", meltcallcount); MELT_TRACE_EXIT_LOCATION (); melt_blocklevel_signals = - current_blocklevel_signals_meltrout_4_warmelt_outobj_OUT_ENUMIX_MODVARBIND_melt; + current_blocklevel_signals_meltrout_4_WARMELTmiOUTOBJ_OUT_ENUMIX_MODVARBIND_melt; melt_topframe = (struct melt_callframe_st *) meltfram__.mcfr_prev; - return (melt_ptr_t) ( /*_.RETVAL___V1*/ meltfptr[0]); + return (melt_ptr_t) ( /*_._RETVAL___V1*/ meltfptr[0]); #undef meltcallcount #undef meltfram__ #undef MELTFRAM_NBVARNUM #undef MELTFRAM_NBVARPTR -} /*end meltrout_4_warmelt_outobj_OUT_ENUMIX_MODVARBIND */ +} /*end meltrout_4_WARMELTmiOUTOBJ_OUT_ENUMIX_MODVARBIND */ melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_5_warmelt_outobj_LAMBDA___1__ (meltclosure_ptr_t meltclosp_, - melt_ptr_t meltfirstargp_, - const melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un * meltxargtab_, - const melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un * meltxrestab_) +meltrout_5_WARMELTmiOUTOBJ_LAMBDA___1__ (meltclosure_ptr_t meltclosp_, + melt_ptr_t meltfirstargp_, + const melt_argdescr_cell_t + meltxargdescr_[], + union meltparam_un * meltxargtab_, + const melt_argdescr_cell_t + meltxresdescr_[], + union meltparam_un * meltxrestab_) { - long current_blocklevel_signals_meltrout_5_warmelt_outobj_LAMBDA___1___melt + long current_blocklevel_signals_meltrout_5_WARMELTmiOUTOBJ_LAMBDA___1___melt = melt_blocklevel_signals; #if MELT_HAVE_DEBUG @@ -4230,7 +4267,7 @@ meltrout_5_warmelt_outobj_LAMBDA___1__ (meltclosure_ptr_t meltclosp_, #define meltcallcount 0L #endif - struct meltframe_meltrout_5_warmelt_outobj_LAMBDA___1___st + struct meltframe_meltrout_5_WARMELTmiOUTOBJ_LAMBDA___1___st { int mcfr_nbvar; #if MELT_HAVE_DEBUG @@ -4252,14 +4289,14 @@ meltrout_5_warmelt_outobj_LAMBDA___1__ (meltclosure_ptr_t meltclosp_, } *meltframptr_ = 0, meltfram__; /*declfrastruct */ #define meltframe meltfram__ - /*meltrout_5_warmelt_outobj_LAMBDA___1__ is not initial declstructinit */ + /*meltrout_5_WARMELTmiOUTOBJ_LAMBDA___1__ is not initial declstructinit */ if (MELT_UNLIKELY (meltxargdescr_ == MELTPAR_MARKGGC)) { /*mark for ggc */ int meltix; meltframptr_ = - (struct meltframe_meltrout_5_warmelt_outobj_LAMBDA___1___st *) + (struct meltframe_meltrout_5_WARMELTmiOUTOBJ_LAMBDA___1___st *) meltfirstargp_; - /* use arguments meltrout_5_warmelt_outobj_LAMBDA___1__ output_curframe_declstruct_init */ + /* use arguments meltrout_5_WARMELTmiOUTOBJ_LAMBDA___1__ output_curframe_declstruct_init */ (void) meltclosp_; (void) meltfirstargp_; (void) meltxargdescr_; @@ -4274,7 +4311,7 @@ meltrout_5_warmelt_outobj_LAMBDA___1__ (meltclosure_ptr_t meltclosp_, return NULL; } /*end markggc */ ; memset (&meltfram__, 0, sizeof (meltfram__)); -/* declstructinit plain routine meltrout_5_warmelt_outobj_LAMBDA___1__ nbval 2*/ +/* declstructinit plain routine meltrout_5_WARMELTmiOUTOBJ_LAMBDA___1__ nbval 2*/ meltfram__.mcfr_nbvar = 2 /*nbval */ ; meltfram__.mcfr_clos = meltclosp_; meltfram__.mcfr_prev = (struct melt_callframe_st *) melt_topframe; @@ -4310,31 +4347,33 @@ meltlabend_rout: melt_trace_end ("LAMBDA_", meltcallcount); MELT_TRACE_EXIT_LOCATION (); melt_blocklevel_signals = - current_blocklevel_signals_meltrout_5_warmelt_outobj_LAMBDA___1___melt; + current_blocklevel_signals_meltrout_5_WARMELTmiOUTOBJ_LAMBDA___1___melt; melt_topframe = (struct melt_callframe_st *) meltfram__.mcfr_prev; return (melt_ptr_t) ( /*noretval */ NULL); #undef meltcallcount #undef meltfram__ #undef MELTFRAM_NBVARNUM #undef MELTFRAM_NBVARPTR -} /*end meltrout_5_warmelt_outobj_LAMBDA___1__ */ +} /*end meltrout_5_WARMELTmiOUTOBJ_LAMBDA___1__ */ melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_6_warmelt_outobj_OUTDECLINIT_ROOT (meltclosure_ptr_t meltclosp_, - melt_ptr_t meltfirstargp_, - const melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un * meltxargtab_, - const melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un * meltxrestab_) +meltrout_6_WARMELTmiOUTOBJ_OUTDECLINIT_ROOT (meltclosure_ptr_t meltclosp_, + melt_ptr_t meltfirstargp_, + const melt_argdescr_cell_t + meltxargdescr_[], + union meltparam_un * + meltxargtab_, + const melt_argdescr_cell_t + meltxresdescr_[], + union meltparam_un * + meltxrestab_) { long - current_blocklevel_signals_meltrout_6_warmelt_outobj_OUTDECLINIT_ROOT_melt + current_blocklevel_signals_meltrout_6_WARMELTmiOUTOBJ_OUTDECLINIT_ROOT_melt = melt_blocklevel_signals; #if MELT_HAVE_DEBUG @@ -4347,7 +4386,7 @@ meltrout_6_warmelt_outobj_OUTDECLINIT_ROOT (meltclosure_ptr_t meltclosp_, #define meltcallcount 0L #endif - struct meltframe_meltrout_6_warmelt_outobj_OUTDECLINIT_ROOT_st + struct meltframe_meltrout_6_WARMELTmiOUTOBJ_OUTDECLINIT_ROOT_st { int mcfr_nbvar; #if MELT_HAVE_DEBUG @@ -4369,14 +4408,14 @@ meltrout_6_warmelt_outobj_OUTDECLINIT_ROOT (meltclosure_ptr_t meltclosp_, } *meltframptr_ = 0, meltfram__; /*declfrastruct */ #define meltframe meltfram__ - /*meltrout_6_warmelt_outobj_OUTDECLINIT_ROOT is not initial declstructinit */ + /*meltrout_6_WARMELTmiOUTOBJ_OUTDECLINIT_ROOT is not initial declstructinit */ if (MELT_UNLIKELY (meltxargdescr_ == MELTPAR_MARKGGC)) { /*mark for ggc */ int meltix; meltframptr_ = - (struct meltframe_meltrout_6_warmelt_outobj_OUTDECLINIT_ROOT_st *) + (struct meltframe_meltrout_6_WARMELTmiOUTOBJ_OUTDECLINIT_ROOT_st *) meltfirstargp_; - /* use arguments meltrout_6_warmelt_outobj_OUTDECLINIT_ROOT output_curframe_declstruct_init */ + /* use arguments meltrout_6_WARMELTmiOUTOBJ_OUTDECLINIT_ROOT output_curframe_declstruct_init */ (void) meltclosp_; (void) meltfirstargp_; (void) meltxargdescr_; @@ -4391,7 +4430,7 @@ meltrout_6_warmelt_outobj_OUTDECLINIT_ROOT (meltclosure_ptr_t meltclosp_, return NULL; } /*end markggc */ ; memset (&meltfram__, 0, sizeof (meltfram__)); -/* declstructinit plain routine meltrout_6_warmelt_outobj_OUTDECLINIT_ROOT nbval 9*/ +/* declstructinit plain routine meltrout_6_WARMELTmiOUTOBJ_OUTDECLINIT_ROOT nbval 9*/ meltfram__.mcfr_nbvar = 9 /*nbval */ ; meltfram__.mcfr_clos = meltclosp_; meltfram__.mcfr_prev = (struct melt_callframe_st *) melt_topframe; @@ -4493,7 +4532,8 @@ meltlab_endgetargs:; (union meltparam_un *) 0); } ; - /*_.IF___V5*/ meltfptr[4] = /*_.MELT_DEBUG_FUN__V6*/ meltfptr[5];; + /*_._IF___V5*/ meltfptr[4] = + /*_.MELT_DEBUG_FUN__V6*/ meltfptr[5];; /*epilog */ MELT_LOCATION ("warmelt-outobj.melt:113:/ clear"); @@ -4506,13 +4546,13 @@ meltlab_endgetargs:; else { /*^cond.else */ - /*_.IF___V5*/ meltfptr[4] = NULL;; + /*_._IF___V5*/ meltfptr[4] = NULL;; } ; MELT_LOCATION ("warmelt-outobj.melt:113:/ quasiblock"); - /*_.PROGN___V7*/ meltfptr[5] = /*_.IF___V5*/ meltfptr[4];; + /*_.PROGN___V7*/ meltfptr[5] = /*_._IF___V5*/ meltfptr[4];; /*^compute */ /*_.IFCPP___V4*/ meltfptr[3] = /*_.PROGN___V7*/ meltfptr[5];; /*epilog */ @@ -4520,7 +4560,7 @@ meltlab_endgetargs:; MELT_LOCATION ("warmelt-outobj.melt:113:/ clear"); /*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0; /*^clear */ - /*clear *//*_.IF___V5*/ meltfptr[4] = 0; + /*clear *//*_._IF___V5*/ meltfptr[4] = 0; /*^clear */ /*clear *//*_.PROGN___V7*/ meltfptr[5] = 0; } @@ -4544,7 +4584,7 @@ meltlab_endgetargs:; /*cond */ if (( /*nil */ NULL)) /*then */ { /*^cond.then */ - /*_.IFELSE___V9*/ meltfptr[5] = ( /*nil */ NULL);; + /*_._IFELSE___V9*/ meltfptr[5] = ( /*nil */ NULL);; } else { @@ -4566,18 +4606,18 @@ meltlab_endgetargs:; ; } ; - /*clear *//*_.IFELSE___V9*/ meltfptr[5] = 0; + /*clear *//*_._IFELSE___V9*/ meltfptr[5] = 0; /*epilog */ } ; } ; /*^compute */ - /*_.IFCPP___V8*/ meltfptr[4] = /*_.IFELSE___V9*/ meltfptr[5];; + /*_.IFCPP___V8*/ meltfptr[4] = /*_._IFELSE___V9*/ meltfptr[5];; /*epilog */ MELT_LOCATION ("warmelt-outobj.melt:114:/ clear"); - /*clear *//*_.IFELSE___V9*/ meltfptr[5] = 0; + /*clear *//*_._IFELSE___V9*/ meltfptr[5] = 0; } #else /*MELT_HAVE_DEBUG */ @@ -4591,7 +4631,7 @@ meltlab_endgetargs:; MELT_LOCATION ("warmelt-outobj.melt:112:/ quasiblock"); - /*_.RETVAL___V1*/ meltfptr[0] = /*_.IFCPP___V8*/ meltfptr[4];; + /*_._RETVAL___V1*/ meltfptr[0] = /*_.IFCPP___V8*/ meltfptr[4];; { MELT_LOCATION ("warmelt-outobj.melt:112:/ locexp"); @@ -4621,33 +4661,33 @@ meltlabend_rout: melt_trace_end ("OUTDECLINIT_ROOT", meltcallcount); MELT_TRACE_EXIT_LOCATION (); melt_blocklevel_signals = - current_blocklevel_signals_meltrout_6_warmelt_outobj_OUTDECLINIT_ROOT_melt; + current_blocklevel_signals_meltrout_6_WARMELTmiOUTOBJ_OUTDECLINIT_ROOT_melt; melt_topframe = (struct melt_callframe_st *) meltfram__.mcfr_prev; - return (melt_ptr_t) ( /*_.RETVAL___V1*/ meltfptr[0]); + return (melt_ptr_t) ( /*_._RETVAL___V1*/ meltfptr[0]); #undef meltcallcount #undef meltfram__ #undef MELTFRAM_NBVARNUM #undef MELTFRAM_NBVARPTR -} /*end meltrout_6_warmelt_outobj_OUTDECLINIT_ROOT */ +} /*end meltrout_6_WARMELTmiOUTOBJ_OUTDECLINIT_ROOT */ melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_7_warmelt_outobj_OUTPUCOD_OBJINIELEM (meltclosure_ptr_t meltclosp_, - melt_ptr_t meltfirstargp_, - const melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un * - meltxargtab_, - const melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un * - meltxrestab_) +meltrout_7_WARMELTmiOUTOBJ_OUTPUCOD_OBJINIELEM (meltclosure_ptr_t meltclosp_, + melt_ptr_t meltfirstargp_, + const melt_argdescr_cell_t + meltxargdescr_[], + union meltparam_un * + meltxargtab_, + const melt_argdescr_cell_t + meltxresdescr_[], + union meltparam_un * + meltxrestab_) { long - current_blocklevel_signals_meltrout_7_warmelt_outobj_OUTPUCOD_OBJINIELEM_melt + current_blocklevel_signals_meltrout_7_WARMELTmiOUTOBJ_OUTPUCOD_OBJINIELEM_melt = melt_blocklevel_signals; #if MELT_HAVE_DEBUG @@ -4660,7 +4700,7 @@ meltrout_7_warmelt_outobj_OUTPUCOD_OBJINIELEM (meltclosure_ptr_t meltclosp_, #define meltcallcount 0L #endif - struct meltframe_meltrout_7_warmelt_outobj_OUTPUCOD_OBJINIELEM_st + struct meltframe_meltrout_7_WARMELTmiOUTOBJ_OUTPUCOD_OBJINIELEM_st { int mcfr_nbvar; #if MELT_HAVE_DEBUG @@ -4682,14 +4722,14 @@ meltrout_7_warmelt_outobj_OUTPUCOD_OBJINIELEM (meltclosure_ptr_t meltclosp_, } *meltframptr_ = 0, meltfram__; /*declfrastruct */ #define meltframe meltfram__ - /*meltrout_7_warmelt_outobj_OUTPUCOD_OBJINIELEM is not initial declstructinit */ + /*meltrout_7_WARMELTmiOUTOBJ_OUTPUCOD_OBJINIELEM is not initial declstructinit */ if (MELT_UNLIKELY (meltxargdescr_ == MELTPAR_MARKGGC)) { /*mark for ggc */ int meltix; meltframptr_ = - (struct meltframe_meltrout_7_warmelt_outobj_OUTPUCOD_OBJINIELEM_st *) + (struct meltframe_meltrout_7_WARMELTmiOUTOBJ_OUTPUCOD_OBJINIELEM_st *) meltfirstargp_; - /* use arguments meltrout_7_warmelt_outobj_OUTPUCOD_OBJINIELEM output_curframe_declstruct_init */ + /* use arguments meltrout_7_WARMELTmiOUTOBJ_OUTPUCOD_OBJINIELEM output_curframe_declstruct_init */ (void) meltclosp_; (void) meltfirstargp_; (void) meltxargdescr_; @@ -4704,7 +4744,7 @@ meltrout_7_warmelt_outobj_OUTPUCOD_OBJINIELEM (meltclosure_ptr_t meltclosp_, return NULL; } /*end markggc */ ; memset (&meltfram__, 0, sizeof (meltfram__)); -/* declstructinit plain routine meltrout_7_warmelt_outobj_OUTPUCOD_OBJINIELEM nbval 34*/ +/* declstructinit plain routine meltrout_7_WARMELTmiOUTOBJ_OUTPUCOD_OBJINIELEM nbval 34*/ meltfram__.mcfr_nbvar = 34 /*nbval */ ; meltfram__.mcfr_clos = meltclosp_; meltfram__.mcfr_prev = (struct melt_callframe_st *) melt_topframe; @@ -4767,7 +4807,7 @@ meltlab_endgetargs:; /*cond */ if ( /*_#IS_A__L2*/ meltfnum[1]) /*then */ { /*^cond.then */ - /*_.IFELSE___V6*/ meltfptr[5] = ( /*nil */ NULL);; + /*_._IFELSE___V6*/ meltfptr[5] = ( /*nil */ NULL);; } else { @@ -4789,20 +4829,20 @@ meltlab_endgetargs:; ; } ; - /*clear *//*_.IFELSE___V6*/ meltfptr[5] = 0; + /*clear *//*_._IFELSE___V6*/ meltfptr[5] = 0; /*epilog */ } ; } ; /*^compute */ - /*_.IFCPP___V5*/ meltfptr[4] = /*_.IFELSE___V6*/ meltfptr[5];; + /*_.IFCPP___V5*/ meltfptr[4] = /*_._IFELSE___V6*/ meltfptr[5];; /*epilog */ MELT_LOCATION ("warmelt-outobj.melt:120:/ clear"); /*clear *//*_#IS_A__L2*/ meltfnum[1] = 0; /*^clear */ - /*clear *//*_.IFELSE___V6*/ meltfptr[5] = 0; + /*clear *//*_._IFELSE___V6*/ meltfptr[5] = 0; } #else /*MELT_HAVE_DEBUG */ @@ -4846,7 +4886,7 @@ meltlab_endgetargs:; /*cond */ if ( /*_#IS_STRING__L3*/ meltfnum[1]) /*then */ { /*^cond.then */ - /*_.IFELSE___V11*/ meltfptr[10] = ( /*nil */ NULL);; + /*_._IFELSE___V11*/ meltfptr[10] = ( /*nil */ NULL);; } else { @@ -4868,20 +4908,20 @@ meltlab_endgetargs:; ; } ; - /*clear *//*_.IFELSE___V11*/ meltfptr[10] = 0; + /*clear *//*_._IFELSE___V11*/ meltfptr[10] = 0; /*epilog */ } ; } ; /*^compute */ - /*_.IFCPP___V10*/ meltfptr[9] = /*_.IFELSE___V11*/ meltfptr[10];; + /*_.IFCPP___V10*/ meltfptr[9] = /*_._IFELSE___V11*/ meltfptr[10];; /*epilog */ MELT_LOCATION ("warmelt-outobj.melt:123:/ clear"); /*clear *//*_#IS_STRING__L3*/ meltfnum[1] = 0; /*^clear */ - /*clear *//*_.IFELSE___V11*/ meltfptr[10] = 0; + /*clear *//*_._IFELSE___V11*/ meltfptr[10] = 0; } #else /*MELT_HAVE_DEBUG */ @@ -4903,7 +4943,7 @@ meltlab_endgetargs:; /*cond */ if ( /*_.OLOCVAR__V8*/ meltfptr[7]) /*then */ { /*^cond.then */ - /*_.IFELSE___V13*/ meltfptr[12] = ( /*nil */ NULL);; + /*_._IFELSE___V13*/ meltfptr[12] = ( /*nil */ NULL);; } else { @@ -4925,18 +4965,18 @@ meltlab_endgetargs:; ; } ; - /*clear *//*_.IFELSE___V13*/ meltfptr[12] = 0; + /*clear *//*_._IFELSE___V13*/ meltfptr[12] = 0; /*epilog */ } ; } ; /*^compute */ - /*_.IFCPP___V12*/ meltfptr[10] = /*_.IFELSE___V13*/ meltfptr[12];; + /*_.IFCPP___V12*/ meltfptr[10] = /*_._IFELSE___V13*/ meltfptr[12];; /*epilog */ MELT_LOCATION ("warmelt-outobj.melt:124:/ clear"); - /*clear *//*_.IFELSE___V13*/ meltfptr[12] = 0; + /*clear *//*_._IFELSE___V13*/ meltfptr[12] = 0; } #else /*MELT_HAVE_DEBUG */ @@ -5004,14 +5044,14 @@ meltlab_endgetargs:; (melt_get_int ((melt_ptr_t) ( /*_.REFERENCED_VALUE__V15*/ meltfptr[14])));; /*^compute */ - /*_#IRAW__L6*/ meltfnum[5] = + /*_#diIRAW__L6*/ meltfnum[5] = (( /*_#GET_INT__L5*/ meltfnum[4]) / (2));; /*^compute */ - /*_#I__L7*/ meltfnum[6] = + /*_#gtI__L7*/ meltfnum[6] = (( /*_#STRBUF_USEDLENGTH__L4*/ meltfnum[1]) > - ( /*_#IRAW__L6*/ meltfnum[5]));; + ( /*_#diIRAW__L6*/ meltfnum[5]));; MELT_LOCATION ("warmelt-outobj.melt:127:/ cond"); - /*cond */ if ( /*_#I__L7*/ meltfnum[6]) /*then */ + /*cond */ if ( /*_#gtI__L7*/ meltfnum[6]) /*then */ { /*^cond.then */ /*^block */ @@ -5106,7 +5146,7 @@ meltlab_endgetargs:; (union meltparam_un *) 0); } ; - /*_.IF___V18*/ meltfptr[17] = + /*_._IF___V18*/ meltfptr[17] = /*_.MELT_DEBUG_FUN__V19*/ meltfptr[18];; /*epilog */ @@ -5120,13 +5160,13 @@ meltlab_endgetargs:; else { /*^cond.else */ - /*_.IF___V18*/ meltfptr[17] = NULL;; + /*_._IF___V18*/ meltfptr[17] = NULL;; } ; MELT_LOCATION ("warmelt-outobj.melt:129:/ quasiblock"); - /*_.PROGN___V20*/ meltfptr[18] = /*_.IF___V18*/ meltfptr[17];; + /*_.PROGN___V20*/ meltfptr[18] = /*_._IF___V18*/ meltfptr[17];; /*^compute */ /*_.IFCPP___V17*/ meltfptr[16] = /*_.PROGN___V20*/ meltfptr[18];; /*epilog */ @@ -5134,7 +5174,7 @@ meltlab_endgetargs:; MELT_LOCATION ("warmelt-outobj.melt:129:/ clear"); /*clear *//*_#MELT_NEED_DBG__L8*/ meltfnum[7] = 0; /*^clear */ - /*clear *//*_.IF___V18*/ meltfptr[17] = 0; + /*clear *//*_._IF___V18*/ meltfptr[17] = 0; /*^clear */ /*clear *//*_.PROGN___V20*/ meltfptr[18] = 0; } @@ -5189,14 +5229,14 @@ meltlab_endgetargs:; (melt_get_int ((melt_ptr_t) ( /*_.REFERENCED_VALUE__V22*/ meltfptr[18])));; /*^compute */ - /*_#I__L12*/ meltfnum[11] = + /*_#ltI__L12*/ meltfnum[11] = (( /*_#STRBUF_USEDLENGTH__L10*/ meltfnum[8]) < ( /*_#GET_INT__L11*/ meltfnum[7]));; MELT_LOCATION ("warmelt-outobj.melt:130:/ cond"); - /*cond */ if ( /*_#I__L12*/ meltfnum[11]) /*then */ + /*cond */ if ( /*_#ltI__L12*/ meltfnum[11]) /*then */ { /*^cond.then */ - /*_.IFELSE___V23*/ meltfptr[22] = ( /*nil */ NULL);; + /*_._IFELSE___V23*/ meltfptr[22] = ( /*nil */ NULL);; } else { @@ -5219,14 +5259,15 @@ meltlab_endgetargs:; ; } ; - /*clear *//*_.IFELSE___V23*/ meltfptr[22] = 0; + /*clear *//*_._IFELSE___V23*/ meltfptr[22] = 0; /*epilog */ } ; } ; /*^compute */ - /*_.IFCPP___V21*/ meltfptr[17] = /*_.IFELSE___V23*/ meltfptr[22];; + /*_.IFCPP___V21*/ meltfptr[17] = + /*_._IFELSE___V23*/ meltfptr[22];; /*epilog */ MELT_LOCATION ("warmelt-outobj.melt:130:/ clear"); @@ -5236,9 +5277,9 @@ meltlab_endgetargs:; /*^clear */ /*clear *//*_#GET_INT__L11*/ meltfnum[7] = 0; /*^clear */ - /*clear *//*_#I__L12*/ meltfnum[11] = 0; + /*clear *//*_#ltI__L12*/ meltfnum[11] = 0; /*^clear */ - /*clear *//*_.IFELSE___V23*/ meltfptr[22] = 0; + /*clear *//*_._IFELSE___V23*/ meltfptr[22] = 0; } #else /*MELT_HAVE_DEBUG */ @@ -5251,7 +5292,7 @@ meltlab_endgetargs:; /*_.PROGN___V24*/ meltfptr[18] = /*_.IFCPP___V21*/ meltfptr[17];; /*^compute */ - /*_.IFELSE___V16*/ meltfptr[15] = /*_.PROGN___V24*/ meltfptr[18];; + /*_._IFELSE___V16*/ meltfptr[15] = /*_.PROGN___V24*/ meltfptr[18];; /*epilog */ MELT_LOCATION ("warmelt-outobj.melt:127:/ clear"); @@ -5266,7 +5307,7 @@ meltlab_endgetargs:; else { /*^cond.else */ - /*_.IFELSE___V16*/ meltfptr[15] = NULL;; + /*_._IFELSE___V16*/ meltfptr[15] = NULL;; } ; @@ -5308,14 +5349,14 @@ meltlab_endgetargs:; (melt_get_int ((melt_ptr_t) ( /*_.REFERENCED_VALUE__V25*/ meltfptr[22])));; /*^compute */ - /*_#IRAW__L15*/ meltfnum[11] = + /*_#diIRAW__L15*/ meltfnum[11] = (( /*_#GET_INT__L14*/ meltfnum[7]) / (2));; /*^compute */ - /*_#I__L16*/ meltfnum[15] = + /*_#gtI__L16*/ meltfnum[15] = (( /*_#STRBUF_USEDLENGTH__L13*/ meltfnum[8]) > - ( /*_#IRAW__L15*/ meltfnum[11]));; + ( /*_#diIRAW__L15*/ meltfnum[11]));; MELT_LOCATION ("warmelt-outobj.melt:133:/ cond"); - /*cond */ if ( /*_#I__L16*/ meltfnum[15]) /*then */ + /*cond */ if ( /*_#gtI__L16*/ meltfnum[15]) /*then */ { /*^cond.then */ /*^block */ @@ -5410,7 +5451,7 @@ meltlab_endgetargs:; (union meltparam_un *) 0); } ; - /*_.IF___V28*/ meltfptr[18] = + /*_._IF___V28*/ meltfptr[18] = /*_.MELT_DEBUG_FUN__V29*/ meltfptr[28];; /*epilog */ @@ -5424,13 +5465,13 @@ meltlab_endgetargs:; else { /*^cond.else */ - /*_.IF___V28*/ meltfptr[18] = NULL;; + /*_._IF___V28*/ meltfptr[18] = NULL;; } ; MELT_LOCATION ("warmelt-outobj.melt:135:/ quasiblock"); - /*_.PROGN___V30*/ meltfptr[28] = /*_.IF___V28*/ meltfptr[18];; + /*_.PROGN___V30*/ meltfptr[28] = /*_._IF___V28*/ meltfptr[18];; /*^compute */ /*_.IFCPP___V27*/ meltfptr[17] = /*_.PROGN___V30*/ meltfptr[28];; /*epilog */ @@ -5438,7 +5479,7 @@ meltlab_endgetargs:; MELT_LOCATION ("warmelt-outobj.melt:135:/ clear"); /*clear *//*_#MELT_NEED_DBG__L17*/ meltfnum[16] = 0; /*^clear */ - /*clear *//*_.IF___V28*/ meltfptr[18] = 0; + /*clear *//*_._IF___V28*/ meltfptr[18] = 0; /*^clear */ /*clear *//*_.PROGN___V30*/ meltfptr[28] = 0; } @@ -5493,14 +5534,14 @@ meltlab_endgetargs:; (melt_get_int ((melt_ptr_t) ( /*_.REFERENCED_VALUE__V32*/ meltfptr[28])));; /*^compute */ - /*_#I__L21*/ meltfnum[20] = + /*_#ltI__L21*/ meltfnum[20] = (( /*_#STRBUF_USEDLENGTH__L19*/ meltfnum[17]) < ( /*_#GET_INT__L20*/ meltfnum[16]));; MELT_LOCATION ("warmelt-outobj.melt:136:/ cond"); - /*cond */ if ( /*_#I__L21*/ meltfnum[20]) /*then */ + /*cond */ if ( /*_#ltI__L21*/ meltfnum[20]) /*then */ { /*^cond.then */ - /*_.IFELSE___V33*/ meltfptr[32] = ( /*nil */ NULL);; + /*_._IFELSE___V33*/ meltfptr[32] = ( /*nil */ NULL);; } else { @@ -5523,14 +5564,15 @@ meltlab_endgetargs:; ; } ; - /*clear *//*_.IFELSE___V33*/ meltfptr[32] = 0; + /*clear *//*_._IFELSE___V33*/ meltfptr[32] = 0; /*epilog */ } ; } ; /*^compute */ - /*_.IFCPP___V31*/ meltfptr[18] = /*_.IFELSE___V33*/ meltfptr[32];; + /*_.IFCPP___V31*/ meltfptr[18] = + /*_._IFELSE___V33*/ meltfptr[32];; /*epilog */ MELT_LOCATION ("warmelt-outobj.melt:136:/ clear"); @@ -5540,9 +5582,9 @@ meltlab_endgetargs:; /*^clear */ /*clear *//*_#GET_INT__L20*/ meltfnum[16] = 0; /*^clear */ - /*clear *//*_#I__L21*/ meltfnum[20] = 0; + /*clear *//*_#ltI__L21*/ meltfnum[20] = 0; /*^clear */ - /*clear *//*_.IFELSE___V33*/ meltfptr[32] = 0; + /*clear *//*_._IFELSE___V33*/ meltfptr[32] = 0; } #else /*MELT_HAVE_DEBUG */ @@ -5555,7 +5597,7 @@ meltlab_endgetargs:; /*_.PROGN___V34*/ meltfptr[28] = /*_.IFCPP___V31*/ meltfptr[18];; /*^compute */ - /*_.IFELSE___V26*/ meltfptr[16] = /*_.PROGN___V34*/ meltfptr[28];; + /*_._IFELSE___V26*/ meltfptr[16] = /*_.PROGN___V34*/ meltfptr[28];; /*epilog */ MELT_LOCATION ("warmelt-outobj.melt:133:/ clear"); @@ -5570,11 +5612,11 @@ meltlab_endgetargs:; else { /*^cond.else */ - /*_.IFELSE___V26*/ meltfptr[16] = NULL;; + /*_._IFELSE___V26*/ meltfptr[16] = NULL;; } ; /*^compute */ - /*_.LET___V7*/ meltfptr[5] = /*_.IFELSE___V26*/ meltfptr[16];; + /*_.LET___V7*/ meltfptr[5] = /*_._IFELSE___V26*/ meltfptr[16];; MELT_LOCATION ("warmelt-outobj.melt:121:/ clear"); /*clear *//*_.OLOCVAR__V8*/ meltfptr[7] = 0; @@ -5593,11 +5635,11 @@ meltlab_endgetargs:; /*^clear */ /*clear *//*_#GET_INT__L5*/ meltfnum[4] = 0; /*^clear */ - /*clear *//*_#IRAW__L6*/ meltfnum[5] = 0; + /*clear *//*_#diIRAW__L6*/ meltfnum[5] = 0; /*^clear */ - /*clear *//*_#I__L7*/ meltfnum[6] = 0; + /*clear *//*_#gtI__L7*/ meltfnum[6] = 0; /*^clear */ - /*clear *//*_.IFELSE___V16*/ meltfptr[15] = 0; + /*clear *//*_._IFELSE___V16*/ meltfptr[15] = 0; /*^clear */ /*clear *//*_#STRBUF_USEDLENGTH__L13*/ meltfnum[8] = 0; /*^clear */ @@ -5605,18 +5647,18 @@ meltlab_endgetargs:; /*^clear */ /*clear *//*_#GET_INT__L14*/ meltfnum[7] = 0; /*^clear */ - /*clear *//*_#IRAW__L15*/ meltfnum[11] = 0; + /*clear *//*_#diIRAW__L15*/ meltfnum[11] = 0; /*^clear */ - /*clear *//*_#I__L16*/ meltfnum[15] = 0; + /*clear *//*_#gtI__L16*/ meltfnum[15] = 0; /*^clear */ - /*clear *//*_.IFELSE___V26*/ meltfptr[16] = 0; + /*clear *//*_._IFELSE___V26*/ meltfptr[16] = 0; MELT_CHECK_SIGNAL (); ; MELT_LOCATION ("warmelt-outobj.melt:119:/ quasiblock"); - /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V7*/ meltfptr[5];; + /*_._RETVAL___V1*/ meltfptr[0] = /*_.LET___V7*/ meltfptr[5];; { MELT_LOCATION ("warmelt-outobj.melt:119:/ locexp"); @@ -5646,33 +5688,33 @@ meltlabend_rout: melt_trace_end ("OUTPUCOD_OBJINIELEM", meltcallcount); MELT_TRACE_EXIT_LOCATION (); melt_blocklevel_signals = - current_blocklevel_signals_meltrout_7_warmelt_outobj_OUTPUCOD_OBJINIELEM_melt; + current_blocklevel_signals_meltrout_7_WARMELTmiOUTOBJ_OUTPUCOD_OBJINIELEM_melt; melt_topframe = (struct melt_callframe_st *) meltfram__.mcfr_prev; - return (melt_ptr_t) ( /*_.RETVAL___V1*/ meltfptr[0]); + return (melt_ptr_t) ( /*_._RETVAL___V1*/ meltfptr[0]); #undef meltcallcount #undef meltfram__ #undef MELTFRAM_NBVARNUM #undef MELTFRAM_NBVARPTR -} /*end meltrout_7_warmelt_outobj_OUTPUCOD_OBJINIELEM */ +} /*end meltrout_7_WARMELTmiOUTOBJ_OUTPUCOD_OBJINIELEM */ melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_8_warmelt_outobj_OUTCINITFILL_ROOT (meltclosure_ptr_t meltclosp_, - melt_ptr_t meltfirstargp_, - const melt_argdescr_cell_t - meltxargdescr_[], - union meltparam_un * - meltxargtab_, - const melt_argdescr_cell_t - meltxresdescr_[], - union meltparam_un * - meltxrestab_) +meltrout_8_WARMELTmiOUTOBJ_OUTCINITFILL_ROOT (meltclosure_ptr_t meltclosp_, + melt_ptr_t meltfirstargp_, + const melt_argdescr_cell_t + meltxargdescr_[], + union meltparam_un * + meltxargtab_, + const melt_argdescr_cell_t + meltxresdescr_[], + union meltparam_un * + meltxrestab_) { long - current_blocklevel_signals_meltrout_8_warmelt_outobj_OUTCINITFILL_ROOT_melt + current_blocklevel_signals_meltrout_8_WARMELTmiOUTOBJ_OUTCINITFILL_ROOT_melt = melt_blocklevel_signals; #if MELT_HAVE_DEBUG @@ -5685,7 +5727,7 @@ meltrout_8_warmelt_outobj_OUTCINITFILL_ROOT (meltclosure_ptr_t meltclosp_, #define meltcallcount 0L #endif - struct meltframe_meltrout_8_warmelt_outobj_OUTCINITFILL_ROOT_st + struct meltframe_meltrout_8_WARMELTmiOUTOBJ_OUTCINITFILL_ROOT_st { int mcfr_nbvar; #if MELT_HAVE_DEBUG @@ -5707,14 +5749,14 @@ meltrout_8_warmelt_outobj_OUTCINITFILL_ROOT (meltclosure_ptr_t meltclosp_, } *meltframptr_ = 0, meltfram__; /*declfrastruct */ #define meltframe meltfram__ - /*meltrout_8_warmelt_outobj_OUTCINITFILL_ROOT is not initial declstructinit */ + /*meltrout_8_WARMELTmiOUTOBJ_OUTCINITFILL_ROOT is not initial declstructinit */ if (MELT_UNLIKELY (meltxargdescr_ == MELTPAR_MARKGGC)) { /*mark for ggc */ int meltix; meltframptr_ = - (struct meltframe_meltrout_8_warmelt_outobj_OUTCINITFILL_ROOT_st *) + (struct meltframe_meltrout_8_WARMELTmiOUTOBJ_OUTCINITFILL_ROOT_st *) meltfirstargp_; - /* use arguments meltrout_8_warmelt_outobj_OUTCINITFILL_ROOT output_curframe_declstruct_init */ + /* use arguments meltrout_8_WARMELTmiOUTOBJ_OUTCINITFILL_ROOT output_curframe_declstruct_init */ (void) meltclosp_; (void) meltfirstargp_; (void) meltxargdescr_; @@ -5729,7 +5771,7 @@ meltrout_8_warmelt_outobj_OUTCINITFILL_ROOT (meltclosure_ptr_t meltclosp_, return NULL; } /*end markggc */ ; memset (&meltfram__, 0, sizeof (meltfram__)); -/* declstructinit plain routine meltrout_8_warmelt_outobj_OUTCINITFILL_ROOT nbval 10*/ +/* declstructinit plain routine meltrout_8_WARMELTmiOUTOBJ_OUTCINITFILL_ROOT nbval 10*/ meltfram__.mcfr_nbvar = 10 /*nbval */ ; meltfram__.mcfr_clos = meltclosp_; meltfram__.mcfr_prev = (struct melt_callframe_st *) melt_topframe; @@ -5847,7 +5889,8 @@ meltlab_endgetargs:; (union meltparam_un *) 0); } ; - /*_.IF___V6*/ meltfptr[5] = /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6];; + /*_._IF___V6*/ meltfptr[5] = + /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6];; /*epilog */ MELT_LOCATION ("warmelt-outobj.melt:143:/ clear"); @@ -5860,13 +5903,13 @@ meltlab_endgetargs:; else { /*^cond.else */ - /*_.IF___V6*/ meltfptr[5] = NULL;; + /*_._IF___V6*/ meltfptr[5] = NULL;; } ; MELT_LOCATION ("warmelt-outobj.melt:143:/ quasiblock"); - /*_.PROGN___V8*/ meltfptr[6] = /*_.IF___V6*/ meltfptr[5];; + /*_.PROGN___V8*/ meltfptr[6] = /*_._IF___V6*/ meltfptr[5];; /*^compute */ /*_.IFCPP___V5*/ meltfptr[4] = /*_.PROGN___V8*/ meltfptr[6];; /*epilog */ @@ -5874,7 +5917,7 @@ meltlab_endgetargs:; MELT_LOCATION ("warmelt-outobj.melt:143:/ clear"); /*clear *//*_#MELT_NEED_DBG__L2*/ meltfnum[1] = 0; /*^clear */ - /*clear *//*_.IF___V6*/ meltfptr[5] = 0; + /*clear *//*_._IF___V6*/ meltfptr[5] = 0; /*^clear */ /*clear *//*_.PROGN___V8*/ meltfptr[6] = 0; } @@ -5898,7 +5941,7 @@ meltlab_endgetargs:; /*cond */ if (( /*nil */ NULL)) /*then */ { /*^cond.then */ - /*_.IFELSE___V10*/ meltfptr[6] = ( /*nil */ NULL);; + /*_._IFELSE___V10*/ meltfptr[6] = ( /*nil */ NULL);; } else { @@ -5917,18 +5960,18 @@ meltlab_endgetargs:; ; } ; - /*clear *//*_.IFELSE___V10*/ meltfptr[6] = 0; + /*clear *//*_._IFELSE___V10*/ meltfptr[6] = 0; /*epilog */ } ; } ; /*^compute */ - /*_.IFCPP___V9*/ meltfptr[5] = /*_.IFELSE___V10*/ meltfptr[6];; + /*_.IFCPP___V9*/ meltfptr[5] = /*_._IFELSE___V10*/ meltfptr[6];; /*epilog */ MELT_LOCATION ("warmelt-outobj.melt:144:/ clear"); - /*clear *//*_.IFELSE___V10*/ meltfptr[6] = 0; + /*clear *//*_._IFELSE___V10*/ meltfptr[6] = 0; } #else /*MELT_HAVE_DEBUG */ @@ -5942,7 +5985,7 @@ meltlab_endgetargs:; MELT_LOCATION ("warmelt-outobj.melt:142:/ quasiblock"); - /*_.RETVAL___V1*/ meltfptr[0] = /*_.IFCPP___V9*/ meltfptr[5];; + /*_._RETVAL___V1*/ meltfptr[0] = /*_.IFCPP___V9*/ meltfptr[5];; { MELT_LOCATION ("warmelt-outobj.melt:142:/ locexp"); @@ -5972,14 +6015,14 @@ meltlabend_rout: melt_trace_end ("OUTCINITFILL_ROOT", meltcallcount); MELT_TRACE_EXIT_LOCATION (); melt_blocklevel_signals = - current_blocklevel_signals_meltrout_8_warmelt_outobj_OUTCINITFILL_ROOT_melt; + current_blocklevel_signals_meltrout_8_WARMELTmiOUTOBJ_OUTCINITFILL_ROOT_melt; melt_topframe = (struct melt_callframe_st *) meltfram__.mcfr_prev; - return (melt_ptr_t) ( /*_.RETVAL___V1*/ meltfptr[0]); + return (melt_ptr_t) ( /*_._RETVAL___V1*/ meltfptr[0]); #undef meltcallcount #undef meltfram__ #undef MELTFRAM_NBVARNUM #undef MELTFRAM_NBVARPTR -} /*end meltrout_8_warmelt_outobj_OUTCINITFILL_ROOT */ +} /*end meltrout_8_WARMELTmiOUTOBJ_OUTCINITFILL_ROOT */ @@ -5991,14 +6034,14 @@ meltlabend_rout: /* generated syntax checking routine for 2 C generating devices */ MELT_EXTERN void MELT_MODULE_VISIBILITY -melt_syntax_tester_warmelt_outobj (void); +melt_syntax_tester_WARMELTmiOUTOBJ (void); void -melt_syntax_tester_warmelt_outobj (void) +melt_syntax_tester_WARMELTmiOUTOBJ (void) { if (1) return; -#define meltcallcount -1L /* in melt_syntax_tester_warmelt_outobj */ +#define meltcallcount -1L /* in melt_syntax_tester_WARMELTmiOUTOBJ */ /* generating device #1 */ @@ -6035,7 +6078,7 @@ melt_syntax_tester_warmelt_outobj (void) } /*end primitive-syntax MELT_RUN_EXTENSION */ -} /* end generated melt_syntax_tester_warmelt_outobj */ +} /* end generated melt_syntax_tester_WARMELTmiOUTOBJ */ #endif /*MELT_HAVE_DEBUG syntaxcheck */ @@ -6065,8 +6108,8 @@ struct melt_initial_frame_st static void -initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, - char meltpredefinited[]) +initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, + char meltpredefinited[]) { #define meltfram__ (*iniframp__) @@ -6891,11 +6934,11 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, struct MELT_STRING_STRUCT (30) dstr_802__TRANSLATE_RUN_ME; long spare_; } *meltcdat = NULL; - dbgprintf ("start initialize_module_meltdata_warmelt_outobj iniframp__=%p", + dbgprintf ("start initialize_module_meltdata_WARMELTmiOUTOBJ iniframp__=%p", (void *) iniframp__); (void) meltpredefinited; /* avoid warning if non-used. */ melt_assertmsg ("check module initial frame", - iniframp__->mcfr_nbvar == /*minihash */ -10); + iniframp__->mcfr_nbvar == /*minihash */ -3862); /*curframe_cdat_fill */ meltcdat = (struct meltcdata_st *) meltgc_allocate (sizeof (*meltcdat), 0); melt_prohibit_garbcoll = TRUE; @@ -6904,8 +6947,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_1__BUFFER_LIMIT_CONT*/ - /*uniqueobj*/ if (! /*_.VALDATA___V188*/ meltfptr[187]) -/*_.VALDATA___V188*/ meltfptr[187] = + /*uniqueobj*/ if (! /*_._VALDATA___V188*/ meltfptr[187]) +/*_._VALDATA___V188*/ meltfptr[187] = (melt_ptr_t) & meltcdat->dsym_1__BUFFER_LIMIT_CONT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_1__BUFFER_LIMIT_CONT", @@ -6925,7 +6968,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_2__BUFFER_LIMIT_CON*/ - /*_.VALSTR___V189*/ meltfptr[188] = + /*_._VALSTR___V189*/ meltfptr[188] = (melt_ptr_t) & meltcdat->dstr_2__BUFFER_LIMIT_CON; meltcdat->dstr_2__BUFFER_LIMIT_CON.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -6938,8 +6981,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_3__CLASS_REFERENCE*/ - /*uniqueobj*/ if (! /*_.VALDATA___V190*/ meltfptr[189]) -/*_.VALDATA___V190*/ meltfptr[189] = + /*uniqueobj*/ if (! /*_._VALDATA___V190*/ meltfptr[189]) +/*_._VALDATA___V190*/ meltfptr[189] = (melt_ptr_t) & meltcdat->dsym_3__CLASS_REFERENCE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_3__CLASS_REFERENCE", @@ -6959,7 +7002,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_4__CLASS_REFERENCE*/ - /*_.VALSTR___V191*/ meltfptr[190] = + /*_._VALSTR___V191*/ meltfptr[190] = (melt_ptr_t) & meltcdat->dstr_4__CLASS_REFERENCE; meltcdat->dstr_4__CLASS_REFERENCE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -6973,7 +7016,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_LOCATION ("warmelt-outobj.melt:37:/ iniobj"); /*iniobj dobj_5__BUFFER_LIMIT_CONT*/ -/*_.VALDATA___V192*/ meltfptr[191] = +/*_._VALDATA___V192*/ meltfptr[191] = (melt_ptr_t) & meltcdat->dobj_5__BUFFER_LIMIT_CONT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_5__BUFFER_LIMIT_CONT", @@ -6987,18 +7030,18 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); meltcdat->dobj_5__BUFFER_LIMIT_CONT.meltobj_class = (meltobject_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); - meltcdat->dobj_5__BUFFER_LIMIT_CONT.obj_hash = 604177185; + meltcdat->dobj_5__BUFFER_LIMIT_CONT.obj_hash = 797892081; meltcdat->dobj_5__BUFFER_LIMIT_CONT.obj_len = 1; /*iniboxint dint_6__ */ - /*_.VALBXINT___V193*/ meltfptr[192] = (melt_ptr_t) & meltcdat->dint_6__; + /*_._VALBXINT___V193*/ meltfptr[192] = (melt_ptr_t) & meltcdat->dint_6__; meltcdat->dint_6__.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CONSTANT_INTEGER)))); meltcdat->dint_6__.val = 33554432; /*inirout drout_7__GET_CODE_BUFFER_LIMIT */ - /*_.VALROUT___V194*/ meltfptr[193] = + /*_._VALROUT___V194*/ meltfptr[193] = (melt_ptr_t) & meltcdat->drout_7__GET_CODE_BUFFER_LIMIT; meltcdat->drout_7__GET_CODE_BUFFER_LIMIT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -7007,17 +7050,17 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_ROUTDESCR_LEN - 1); meltcdat->drout_7__GET_CODE_BUFFER_LIMIT.nbval = 2; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_7__GET_CODE_BUFFER_LIMIT, - meltrout_1_warmelt_outobj_GET_CODE_BUFFER_LIMIT); + meltrout_1_WARMELTmiOUTOBJ_GET_CODE_BUFFER_LIMIT); /*iniclos dclo_8__GET_CODE_BUFFER_LIMIT */ - /*_.VALCLO___V195*/ meltfptr[194] = + /*_._VALCLO___V195*/ meltfptr[194] = (melt_ptr_t) & meltcdat->dclo_8__GET_CODE_BUFFER_LIMIT; meltcdat->dclo_8__GET_CODE_BUFFER_LIMIT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); meltcdat->dclo_8__GET_CODE_BUFFER_LIMIT.nbval = 0; /*inirout drout_9__PUT_CODE_BUFFER_LIMIT */ - /*_.VALROUT___V196*/ meltfptr[195] = + /*_._VALROUT___V196*/ meltfptr[195] = (melt_ptr_t) & meltcdat->drout_9__PUT_CODE_BUFFER_LIMIT; meltcdat->drout_9__PUT_CODE_BUFFER_LIMIT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -7026,10 +7069,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_ROUTDESCR_LEN - 1); meltcdat->drout_9__PUT_CODE_BUFFER_LIMIT.nbval = 4; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_9__PUT_CODE_BUFFER_LIMIT, - meltrout_2_warmelt_outobj_PUT_CODE_BUFFER_LIMIT); + meltrout_2_WARMELTmiOUTOBJ_PUT_CODE_BUFFER_LIMIT); /*iniclos dclo_10__PUT_CODE_BUFFER_LIMIT */ - /*_.VALCLO___V197*/ meltfptr[196] = + /*_._VALCLO___V197*/ meltfptr[196] = (melt_ptr_t) & meltcdat->dclo_10__PUT_CODE_BUFFER_LIMIT; meltcdat->dclo_10__PUT_CODE_BUFFER_LIMIT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -7037,8 +7080,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_11__MELT_DEBUG_FUN*/ - /*uniqueobj*/ if (! /*_.VALDATA___V198*/ meltfptr[197]) -/*_.VALDATA___V198*/ meltfptr[197] = + /*uniqueobj*/ if (! /*_._VALDATA___V198*/ meltfptr[197]) +/*_._VALDATA___V198*/ meltfptr[197] = (melt_ptr_t) & meltcdat->dsym_11__MELT_DEBUG_FUN; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_11__MELT_DEBUG_FUN", @@ -7058,7 +7101,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_12__MELT_DEBUG_FUN*/ - /*_.VALSTR___V199*/ meltfptr[198] = + /*_._VALSTR___V199*/ meltfptr[198] = (melt_ptr_t) & meltcdat->dstr_12__MELT_DEBUG_FUN; meltcdat->dstr_12__MELT_DEBUG_FUN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -7071,8 +7114,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_13__DISCR_CONSTANT_INTEGER*/ - /*uniqueobj*/ if (! /*_.VALDATA___V200*/ meltfptr[199]) -/*_.VALDATA___V200*/ meltfptr[199] = + /*uniqueobj*/ if (! /*_._VALDATA___V200*/ meltfptr[199]) +/*_._VALDATA___V200*/ meltfptr[199] = (melt_ptr_t) & meltcdat->dsym_13__DISCR_CONSTANT_INTEGER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg @@ -7092,7 +7135,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_14__DISCR_CONSTANT_I*/ - /*_.VALSTR___V201*/ meltfptr[200] = + /*_._VALSTR___V201*/ meltfptr[200] = (melt_ptr_t) & meltcdat->dstr_14__DISCR_CONSTANT_I; meltcdat->dstr_14__DISCR_CONSTANT_I.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -7104,7 +7147,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_14__DISCR_CONSTANT_I.slen = 22; /*inirout drout_15__CODE_BUFFER_LIMIT_OPTSET */ - /*_.VALROUT___V202*/ meltfptr[201] = + /*_._VALROUT___V202*/ meltfptr[201] = (melt_ptr_t) & meltcdat->drout_15__CODE_BUFFER_LIMIT_OPTSET; meltcdat->drout_15__CODE_BUFFER_LIMIT_OPTSET.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -7113,10 +7156,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_ROUTDESCR_LEN - 1); meltcdat->drout_15__CODE_BUFFER_LIMIT_OPTSET.nbval = 2; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_15__CODE_BUFFER_LIMIT_OPTSET, - meltrout_3_warmelt_outobj_CODE_BUFFER_LIMIT_OPTSET); + meltrout_3_WARMELTmiOUTOBJ_CODE_BUFFER_LIMIT_OPTSET); /*iniclos dclo_16__CODE_BUFFER_LIMIT_OPTSET */ - /*_.VALCLO___V203*/ meltfptr[202] = + /*_._VALCLO___V203*/ meltfptr[202] = (melt_ptr_t) & meltcdat->dclo_16__CODE_BUFFER_LIMIT_OPTSET; meltcdat->dclo_16__CODE_BUFFER_LIMIT_OPTSET.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -7124,8 +7167,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_17__REGISTER_OPTION*/ - /*uniqueobj*/ if (! /*_.VALDATA___V204*/ meltfptr[203]) -/*_.VALDATA___V204*/ meltfptr[203] = + /*uniqueobj*/ if (! /*_._VALDATA___V204*/ meltfptr[203]) +/*_._VALDATA___V204*/ meltfptr[203] = (melt_ptr_t) & meltcdat->dsym_17__REGISTER_OPTION; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_17__REGISTER_OPTION", @@ -7145,7 +7188,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_18__REGISTER_OPTION*/ - /*_.VALSTR___V205*/ meltfptr[204] = + /*_._VALSTR___V205*/ meltfptr[204] = (melt_ptr_t) & meltcdat->dstr_18__REGISTER_OPTION; meltcdat->dstr_18__REGISTER_OPTION.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -7158,8 +7201,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_19__CODE_BUFFER_LIMIT*/ - /*uniqueobj*/ if (! /*_.VALDATA___V206*/ meltfptr[205]) -/*_.VALDATA___V206*/ meltfptr[205] = + /*uniqueobj*/ if (! /*_._VALDATA___V206*/ meltfptr[205]) +/*_._VALDATA___V206*/ meltfptr[205] = (melt_ptr_t) & meltcdat->dsym_19__CODE_BUFFER_LIMIT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_19__CODE_BUFFER_LIMIT", @@ -7179,7 +7222,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_20__CODE_BUFFER_LIMI*/ - /*_.VALSTR___V207*/ meltfptr[206] = + /*_._VALSTR___V207*/ meltfptr[206] = (melt_ptr_t) & meltcdat->dstr_20__CODE_BUFFER_LIMI; meltcdat->dstr_20__CODE_BUFFER_LIMI.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -7192,7 +7235,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_21__set_limit_in_kil*/ - /*_.VALSTR___V208*/ meltfptr[207] = + /*_._VALSTR___V208*/ meltfptr[207] = (melt_ptr_t) & meltcdat->dstr_21__set_limit_in_kil; meltcdat->dstr_21__set_limit_in_kil.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -7204,7 +7247,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_21__set_limit_in_kil.slen = 57; /*inirout drout_22__OUT_ENUMIX_MODVARBIND */ - /*_.VALROUT___V209*/ meltfptr[208] = + /*_._VALROUT___V209*/ meltfptr[208] = (melt_ptr_t) & meltcdat->drout_22__OUT_ENUMIX_MODVARBIND; meltcdat->drout_22__OUT_ENUMIX_MODVARBIND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -7213,10 +7256,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_ROUTDESCR_LEN - 1); meltcdat->drout_22__OUT_ENUMIX_MODVARBIND.nbval = 8; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_22__OUT_ENUMIX_MODVARBIND, - meltrout_4_warmelt_outobj_OUT_ENUMIX_MODVARBIND); + meltrout_4_WARMELTmiOUTOBJ_OUT_ENUMIX_MODVARBIND); /*iniclos dclo_23__OUT_ENUMIX_MODVARBIND */ - /*_.VALCLO___V211*/ meltfptr[210] = + /*_._VALCLO___V211*/ meltfptr[210] = (melt_ptr_t) & meltcdat->dclo_23__OUT_ENUMIX_MODVARBIND; meltcdat->dclo_23__OUT_ENUMIX_MODVARBIND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -7224,8 +7267,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_24__CLASS_NORMAL_MODULE_VARIABLE_BINDING*/ - /*uniqueobj*/ if (! /*_.VALDATA___V212*/ meltfptr[211]) -/*_.VALDATA___V212*/ meltfptr[211] = + /*uniqueobj*/ if (! /*_._VALDATA___V212*/ meltfptr[211]) +/*_._VALDATA___V212*/ meltfptr[211] = (melt_ptr_t) & meltcdat->dsym_24__CLASS_NORMAL_MODULE_VARIABLE_BINDING; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg @@ -7246,7 +7289,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_25__CLASS_NORMAL_MOD*/ - /*_.VALSTR___V213*/ meltfptr[212] = + /*_._VALSTR___V213*/ meltfptr[212] = (melt_ptr_t) & meltcdat->dstr_25__CLASS_NORMAL_MOD; meltcdat->dstr_25__CLASS_NORMAL_MOD.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -7259,8 +7302,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_26__CLASS_ANY_BINDING*/ - /*uniqueobj*/ if (! /*_.VALDATA___V214*/ meltfptr[213]) -/*_.VALDATA___V214*/ meltfptr[213] = + /*uniqueobj*/ if (! /*_._VALDATA___V214*/ meltfptr[213]) +/*_._VALDATA___V214*/ meltfptr[213] = (melt_ptr_t) & meltcdat->dsym_26__CLASS_ANY_BINDING; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_26__CLASS_ANY_BINDING", @@ -7280,7 +7323,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_27__CLASS_ANY_BINDIN*/ - /*_.VALSTR___V215*/ meltfptr[214] = + /*_._VALSTR___V215*/ meltfptr[214] = (melt_ptr_t) & meltcdat->dstr_27__CLASS_ANY_BINDIN; meltcdat->dstr_27__CLASS_ANY_BINDIN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -7292,7 +7335,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_27__CLASS_ANY_BINDIN.slen = 17; /*inirout drout_28__LAMBDA_ */ - /*_.VALROUT___V210*/ meltfptr[209] = + /*_._VALROUT___V210*/ meltfptr[209] = (melt_ptr_t) & meltcdat->drout_28__LAMBDA_; meltcdat->drout_28__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -7300,12 +7343,12 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, "LAMBDA_ @warmelt-outobj.melt:89", MELT_ROUTDESCR_LEN - 1); meltcdat->drout_28__LAMBDA_.nbval = 0; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_28__LAMBDA_, - meltrout_5_warmelt_outobj_LAMBDA___1__); + meltrout_5_WARMELTmiOUTOBJ_LAMBDA___1__); /*iniobj dsym_29__CLASS_CLONED_SYMBOL*/ - /*uniqueobj*/ if (! /*_.VALDATA___V216*/ meltfptr[215]) -/*_.VALDATA___V216*/ meltfptr[215] = + /*uniqueobj*/ if (! /*_._VALDATA___V216*/ meltfptr[215]) +/*_._VALDATA___V216*/ meltfptr[215] = (melt_ptr_t) & meltcdat->dsym_29__CLASS_CLONED_SYMBOL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_29__CLASS_CLONED_SYMBOL", @@ -7325,7 +7368,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_30__CLASS_CLONED_SYM*/ - /*_.VALSTR___V217*/ meltfptr[216] = + /*_._VALSTR___V217*/ meltfptr[216] = (melt_ptr_t) & meltcdat->dstr_30__CLASS_CLONED_SYM; meltcdat->dstr_30__CLASS_CLONED_SYM.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -7338,8 +7381,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_31__CLASS_NAMED*/ - /*uniqueobj*/ if (! /*_.VALDATA___V218*/ meltfptr[217]) -/*_.VALDATA___V218*/ meltfptr[217] = + /*uniqueobj*/ if (! /*_._VALDATA___V218*/ meltfptr[217]) +/*_._VALDATA___V218*/ meltfptr[217] = (melt_ptr_t) & meltcdat->dsym_31__CLASS_NAMED; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_31__CLASS_NAMED", @@ -7359,7 +7402,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_32__CLASS_NAMED*/ - /*_.VALSTR___V219*/ meltfptr[218] = + /*_._VALSTR___V219*/ meltfptr[218] = (melt_ptr_t) & meltcdat->dstr_32__CLASS_NAMED; meltcdat->dstr_32__CLASS_NAMED.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -7372,8 +7415,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_33__ADD2OUT*/ - /*uniqueobj*/ if (! /*_.VALDATA___V220*/ meltfptr[219]) -/*_.VALDATA___V220*/ meltfptr[219] = + /*uniqueobj*/ if (! /*_._VALDATA___V220*/ meltfptr[219]) +/*_._VALDATA___V220*/ meltfptr[219] = (melt_ptr_t) & meltcdat->dsym_33__ADD2OUT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_33__ADD2OUT", @@ -7393,7 +7436,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_34__ADD2OUT*/ - /*_.VALSTR___V221*/ meltfptr[220] = + /*_._VALSTR___V221*/ meltfptr[220] = (melt_ptr_t) & meltcdat->dstr_34__ADD2OUT; meltcdat->dstr_34__ADD2OUT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -7404,8 +7447,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_35__CLASS_SYMBOL*/ - /*uniqueobj*/ if (! /*_.VALDATA___V222*/ meltfptr[221]) -/*_.VALDATA___V222*/ meltfptr[221] = + /*uniqueobj*/ if (! /*_._VALDATA___V222*/ meltfptr[221]) +/*_._VALDATA___V222*/ meltfptr[221] = (melt_ptr_t) & meltcdat->dsym_35__CLASS_SYMBOL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_35__CLASS_SYMBOL", @@ -7425,7 +7468,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_36__CLASS_SYMBOL*/ - /*_.VALSTR___V223*/ meltfptr[222] = + /*_._VALSTR___V223*/ meltfptr[222] = (melt_ptr_t) & meltcdat->dstr_36__CLASS_SYMBOL; meltcdat->dstr_36__CLASS_SYMBOL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -7437,7 +7480,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_36__CLASS_SYMBOL.slen = 12; /*inirout drout_37__OUTDECLINIT_ROOT */ - /*_.VALROUT___V224*/ meltfptr[223] = + /*_._VALROUT___V224*/ meltfptr[223] = (melt_ptr_t) & meltcdat->drout_37__OUTDECLINIT_ROOT; meltcdat->drout_37__OUTDECLINIT_ROOT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -7446,10 +7489,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_ROUTDESCR_LEN - 1); meltcdat->drout_37__OUTDECLINIT_ROOT.nbval = 1; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_37__OUTDECLINIT_ROOT, - meltrout_6_warmelt_outobj_OUTDECLINIT_ROOT); + meltrout_6_WARMELTmiOUTOBJ_OUTDECLINIT_ROOT); /*iniclos dclo_38__OUTDECLINIT_ROOT */ - /*_.VALCLO___V225*/ meltfptr[224] = + /*_._VALCLO___V225*/ meltfptr[224] = (melt_ptr_t) & meltcdat->dclo_38__OUTDECLINIT_ROOT; meltcdat->dclo_38__OUTDECLINIT_ROOT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -7457,8 +7500,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_39__INSTALL_METHOD*/ - /*uniqueobj*/ if (! /*_.VALDATA___V226*/ meltfptr[225]) -/*_.VALDATA___V226*/ meltfptr[225] = + /*uniqueobj*/ if (! /*_._VALDATA___V226*/ meltfptr[225]) +/*_._VALDATA___V226*/ meltfptr[225] = (melt_ptr_t) & meltcdat->dsym_39__INSTALL_METHOD; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_39__INSTALL_METHOD", @@ -7478,7 +7521,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_40__INSTALL_METHOD*/ - /*_.VALSTR___V227*/ meltfptr[226] = + /*_._VALSTR___V227*/ meltfptr[226] = (melt_ptr_t) & meltcdat->dstr_40__INSTALL_METHOD; meltcdat->dstr_40__INSTALL_METHOD.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -7491,8 +7534,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_41__CLASS_ROOT*/ - /*uniqueobj*/ if (! /*_.VALDATA___V228*/ meltfptr[227]) -/*_.VALDATA___V228*/ meltfptr[227] = + /*uniqueobj*/ if (! /*_._VALDATA___V228*/ meltfptr[227]) +/*_._VALDATA___V228*/ meltfptr[227] = (melt_ptr_t) & meltcdat->dsym_41__CLASS_ROOT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_41__CLASS_ROOT", @@ -7512,7 +7555,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_42__CLASS_ROOT*/ - /*_.VALSTR___V229*/ meltfptr[228] = + /*_._VALSTR___V229*/ meltfptr[228] = (melt_ptr_t) & meltcdat->dstr_42__CLASS_ROOT; meltcdat->dstr_42__CLASS_ROOT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -7525,8 +7568,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_43__OUTPUT_C_DECLINIT*/ - /*uniqueobj*/ if (! /*_.VALDATA___V230*/ meltfptr[229]) -/*_.VALDATA___V230*/ meltfptr[229] = + /*uniqueobj*/ if (! /*_._VALDATA___V230*/ meltfptr[229]) +/*_._VALDATA___V230*/ meltfptr[229] = (melt_ptr_t) & meltcdat->dsym_43__OUTPUT_C_DECLINIT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_43__OUTPUT_C_DECLINIT", @@ -7546,7 +7589,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_44__OUTPUT_C_DECLINI*/ - /*_.VALSTR___V231*/ meltfptr[230] = + /*_._VALSTR___V231*/ meltfptr[230] = (melt_ptr_t) & meltcdat->dstr_44__OUTPUT_C_DECLINI; meltcdat->dstr_44__OUTPUT_C_DECLINI.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -7558,7 +7601,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_44__OUTPUT_C_DECLINI.slen = 17; /*inirout drout_45__OUTPUCOD_OBJINIELEM */ - /*_.VALROUT___V232*/ meltfptr[231] = + /*_._VALROUT___V232*/ meltfptr[231] = (melt_ptr_t) & meltcdat->drout_45__OUTPUCOD_OBJINIELEM; meltcdat->drout_45__OUTPUCOD_OBJINIELEM.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -7567,10 +7610,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_ROUTDESCR_LEN - 1); meltcdat->drout_45__OUTPUCOD_OBJINIELEM.nbval = 5; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_45__OUTPUCOD_OBJINIELEM, - meltrout_7_warmelt_outobj_OUTPUCOD_OBJINIELEM); + meltrout_7_WARMELTmiOUTOBJ_OUTPUCOD_OBJINIELEM); /*iniclos dclo_46__OUTPUCOD_OBJINIELEM */ - /*_.VALCLO___V233*/ meltfptr[232] = + /*_._VALCLO___V233*/ meltfptr[232] = (melt_ptr_t) & meltcdat->dclo_46__OUTPUCOD_OBJINIELEM; meltcdat->dclo_46__OUTPUCOD_OBJINIELEM.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -7578,8 +7621,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_47__CLASS_OBJINITELEM*/ - /*uniqueobj*/ if (! /*_.VALDATA___V234*/ meltfptr[233]) -/*_.VALDATA___V234*/ meltfptr[233] = + /*uniqueobj*/ if (! /*_._VALDATA___V234*/ meltfptr[233]) +/*_._VALDATA___V234*/ meltfptr[233] = (melt_ptr_t) & meltcdat->dsym_47__CLASS_OBJINITELEM; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_47__CLASS_OBJINITELEM", @@ -7599,7 +7642,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_48__CLASS_OBJINITELE*/ - /*_.VALSTR___V235*/ meltfptr[234] = + /*_._VALSTR___V235*/ meltfptr[234] = (melt_ptr_t) & meltcdat->dstr_48__CLASS_OBJINITELE; meltcdat->dstr_48__CLASS_OBJINITELE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -7612,8 +7655,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_49__OUTPUT_C_CODE*/ - /*uniqueobj*/ if (! /*_.VALDATA___V236*/ meltfptr[235]) -/*_.VALDATA___V236*/ meltfptr[235] = + /*uniqueobj*/ if (! /*_._VALDATA___V236*/ meltfptr[235]) +/*_._VALDATA___V236*/ meltfptr[235] = (melt_ptr_t) & meltcdat->dsym_49__OUTPUT_C_CODE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_49__OUTPUT_C_CODE", @@ -7633,7 +7676,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_50__OUTPUT_C_CODE*/ - /*_.VALSTR___V237*/ meltfptr[236] = + /*_._VALSTR___V237*/ meltfptr[236] = (melt_ptr_t) & meltcdat->dstr_50__OUTPUT_C_CODE; meltcdat->dstr_50__OUTPUT_C_CODE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -7645,7 +7688,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_50__OUTPUT_C_CODE.slen = 13; /*inirout drout_51__OUTCINITFILL_ROOT */ - /*_.VALROUT___V238*/ meltfptr[237] = + /*_._VALROUT___V238*/ meltfptr[237] = (melt_ptr_t) & meltcdat->drout_51__OUTCINITFILL_ROOT; meltcdat->drout_51__OUTCINITFILL_ROOT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -7654,10 +7697,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_ROUTDESCR_LEN - 1); meltcdat->drout_51__OUTCINITFILL_ROOT.nbval = 1; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_51__OUTCINITFILL_ROOT, - meltrout_8_warmelt_outobj_OUTCINITFILL_ROOT); + meltrout_8_WARMELTmiOUTOBJ_OUTCINITFILL_ROOT); /*iniclos dclo_52__OUTCINITFILL_ROOT */ - /*_.VALCLO___V239*/ meltfptr[238] = + /*_._VALCLO___V239*/ meltfptr[238] = (melt_ptr_t) & meltcdat->dclo_52__OUTCINITFILL_ROOT; meltcdat->dclo_52__OUTCINITFILL_ROOT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -7665,8 +7708,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_53__OUTPUT_C_INITIAL_FILL*/ - /*uniqueobj*/ if (! /*_.VALDATA___V240*/ meltfptr[239]) -/*_.VALDATA___V240*/ meltfptr[239] = + /*uniqueobj*/ if (! /*_._VALDATA___V240*/ meltfptr[239]) +/*_._VALDATA___V240*/ meltfptr[239] = (melt_ptr_t) & meltcdat->dsym_53__OUTPUT_C_INITIAL_FILL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_53__OUTPUT_C_INITIAL_FILL", @@ -7686,7 +7729,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_54__OUTPUT_C_INITIAL*/ - /*_.VALSTR___V241*/ meltfptr[240] = + /*_._VALSTR___V241*/ meltfptr[240] = (melt_ptr_t) & meltcdat->dstr_54__OUTPUT_C_INITIAL; meltcdat->dstr_54__OUTPUT_C_INITIAL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -7698,7 +7741,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_54__OUTPUT_C_INITIAL.slen = 21; /*inirout drout_55__OUTCINITPREDEF_ROOT */ - /*_.VALROUT___V242*/ meltfptr[241] = + /*_._VALROUT___V242*/ meltfptr[241] = (melt_ptr_t) & meltcdat->drout_55__OUTCINITPREDEF_ROOT; meltcdat->drout_55__OUTCINITPREDEF_ROOT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -7707,10 +7750,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_ROUTDESCR_LEN - 1); meltcdat->drout_55__OUTCINITPREDEF_ROOT.nbval = 1; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_55__OUTCINITPREDEF_ROOT, - meltrout_9_warmelt_outobj_OUTCINITPREDEF_ROOT); + meltrout_9_WARMELTmiOUTOBJ_OUTCINITPREDEF_ROOT); /*iniclos dclo_56__OUTCINITPREDEF_ROOT */ - /*_.VALCLO___V243*/ meltfptr[242] = + /*_._VALCLO___V243*/ meltfptr[242] = (melt_ptr_t) & meltcdat->dclo_56__OUTCINITPREDEF_ROOT; meltcdat->dclo_56__OUTCINITPREDEF_ROOT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -7718,8 +7761,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_57__OUTPUT_C_INITIAL_PREDEF*/ - /*uniqueobj*/ if (! /*_.VALDATA___V244*/ meltfptr[243]) -/*_.VALDATA___V244*/ meltfptr[243] = + /*uniqueobj*/ if (! /*_._VALDATA___V244*/ meltfptr[243]) +/*_._VALDATA___V244*/ meltfptr[243] = (melt_ptr_t) & meltcdat->dsym_57__OUTPUT_C_INITIAL_PREDEF; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg @@ -7739,7 +7782,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_58__OUTPUT_C_INITIAL*/ - /*_.VALSTR___V245*/ meltfptr[244] = + /*_._VALSTR___V245*/ meltfptr[244] = (melt_ptr_t) & meltcdat->dstr_58__OUTPUT_C_INITIAL; meltcdat->dstr_58__OUTPUT_C_INITIAL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -7751,7 +7794,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_58__OUTPUT_C_INITIAL.slen = 23; /*inirout drout_59__OUTPUT_PREDEF */ - /*_.VALROUT___V246*/ meltfptr[245] = + /*_._VALROUT___V246*/ meltfptr[245] = (melt_ptr_t) & meltcdat->drout_59__OUTPUT_PREDEF; meltcdat->drout_59__OUTPUT_PREDEF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -7759,10 +7802,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, "OUTPUT_PREDEF @warmelt-outobj.melt:157", MELT_ROUTDESCR_LEN - 1); meltcdat->drout_59__OUTPUT_PREDEF.nbval = 5; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_59__OUTPUT_PREDEF, - meltrout_10_warmelt_outobj_OUTPUT_PREDEF); + meltrout_10_WARMELTmiOUTOBJ_OUTPUT_PREDEF); /*iniclos dclo_60__OUTPUT_PREDEF */ - /*_.VALCLO___V247*/ meltfptr[246] = + /*_._VALCLO___V247*/ meltfptr[246] = (melt_ptr_t) & meltcdat->dclo_60__OUTPUT_PREDEF; meltcdat->dclo_60__OUTPUT_PREDEF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -7770,8 +7813,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_61__OBPREDEF*/ - /*uniqueobj*/ if (! /*_.VALDATA___V248*/ meltfptr[247]) -/*_.VALDATA___V248*/ meltfptr[247] = + /*uniqueobj*/ if (! /*_._VALDATA___V248*/ meltfptr[247]) +/*_._VALDATA___V248*/ meltfptr[247] = (melt_ptr_t) & meltcdat->dsym_61__OBPREDEF; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_61__OBPREDEF", @@ -7791,7 +7834,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_62__OBPREDEF*/ - /*_.VALSTR___V249*/ meltfptr[248] = + /*_._VALSTR___V249*/ meltfptr[248] = (melt_ptr_t) & meltcdat->dstr_62__OBPREDEF; meltcdat->dstr_62__OBPREDEF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -7801,7 +7844,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_62__OBPREDEF.slen = 8; /*inirout drout_63__OUTPUCOD_PREDEF */ - /*_.VALROUT___V250*/ meltfptr[249] = + /*_._VALROUT___V250*/ meltfptr[249] = (melt_ptr_t) & meltcdat->drout_63__OUTPUCOD_PREDEF; meltcdat->drout_63__OUTPUCOD_PREDEF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -7810,10 +7853,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_ROUTDESCR_LEN - 1); meltcdat->drout_63__OUTPUCOD_PREDEF.nbval = 2; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_63__OUTPUCOD_PREDEF, - meltrout_11_warmelt_outobj_OUTPUCOD_PREDEF); + meltrout_11_WARMELTmiOUTOBJ_OUTPUCOD_PREDEF); /*iniclos dclo_64__OUTPUCOD_PREDEF */ - /*_.VALCLO___V251*/ meltfptr[250] = + /*_._VALCLO___V251*/ meltfptr[250] = (melt_ptr_t) & meltcdat->dclo_64__OUTPUCOD_PREDEF; meltcdat->dclo_64__OUTPUCOD_PREDEF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -7821,8 +7864,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_65__CLASS_OBJPREDEF*/ - /*uniqueobj*/ if (! /*_.VALDATA___V252*/ meltfptr[251]) -/*_.VALDATA___V252*/ meltfptr[251] = + /*uniqueobj*/ if (! /*_._VALDATA___V252*/ meltfptr[251]) +/*_._VALDATA___V252*/ meltfptr[251] = (melt_ptr_t) & meltcdat->dsym_65__CLASS_OBJPREDEF; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_65__CLASS_OBJPREDEF", @@ -7842,7 +7885,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_66__CLASS_OBJPREDEF*/ - /*_.VALSTR___V253*/ meltfptr[252] = + /*_._VALSTR___V253*/ meltfptr[252] = (melt_ptr_t) & meltcdat->dstr_66__CLASS_OBJPREDEF; meltcdat->dstr_66__CLASS_OBJPREDEF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -7854,7 +7897,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_66__CLASS_OBJPREDEF.slen = 15; /*inirout drout_67__OUTPUCOD_NIL */ - /*_.VALROUT___V254*/ meltfptr[253] = + /*_._VALROUT___V254*/ meltfptr[253] = (melt_ptr_t) & meltcdat->drout_67__OUTPUCOD_NIL; meltcdat->drout_67__OUTPUCOD_NIL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -7862,10 +7905,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, "OUTPUCOD_NIL @warmelt-outobj.melt:190", MELT_ROUTDESCR_LEN - 1); meltcdat->drout_67__OUTPUCOD_NIL.nbval = 1; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_67__OUTPUCOD_NIL, - meltrout_12_warmelt_outobj_OUTPUCOD_NIL); + meltrout_12_WARMELTmiOUTOBJ_OUTPUCOD_NIL); /*iniclos dclo_68__OUTPUCOD_NIL */ - /*_.VALCLO___V255*/ meltfptr[254] = + /*_._VALCLO___V255*/ meltfptr[254] = (melt_ptr_t) & meltcdat->dclo_68__OUTPUCOD_NIL; meltcdat->dclo_68__OUTPUCOD_NIL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -7873,8 +7916,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_69__CLASS_OBJNIL*/ - /*uniqueobj*/ if (! /*_.VALDATA___V256*/ meltfptr[255]) -/*_.VALDATA___V256*/ meltfptr[255] = + /*uniqueobj*/ if (! /*_._VALDATA___V256*/ meltfptr[255]) +/*_._VALDATA___V256*/ meltfptr[255] = (melt_ptr_t) & meltcdat->dsym_69__CLASS_OBJNIL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_69__CLASS_OBJNIL", @@ -7894,7 +7937,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_70__CLASS_OBJNIL*/ - /*_.VALSTR___V257*/ meltfptr[256] = + /*_._VALSTR___V257*/ meltfptr[256] = (melt_ptr_t) & meltcdat->dstr_70__CLASS_OBJNIL; meltcdat->dstr_70__CLASS_OBJNIL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -7906,7 +7949,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_70__CLASS_OBJNIL.slen = 12; /*inirout drout_71__OUTPUCOD_OBJEXPANDPUREVAL */ - /*_.VALROUT___V258*/ meltfptr[257] = + /*_._VALROUT___V258*/ meltfptr[257] = (melt_ptr_t) & meltcdat->drout_71__OUTPUCOD_OBJEXPANDPUREVAL; meltcdat->drout_71__OUTPUCOD_OBJEXPANDPUREVAL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -7915,10 +7958,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_ROUTDESCR_LEN - 1); meltcdat->drout_71__OUTPUCOD_OBJEXPANDPUREVAL.nbval = 9; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_71__OUTPUCOD_OBJEXPANDPUREVAL, - meltrout_13_warmelt_outobj_OUTPUCOD_OBJEXPANDPUREVAL); + meltrout_13_WARMELTmiOUTOBJ_OUTPUCOD_OBJEXPANDPUREVAL); /*iniclos dclo_72__OUTPUCOD_OBJEXPANDPUREVAL */ - /*_.VALCLO___V265*/ meltfptr[264] = + /*_._VALCLO___V265*/ meltfptr[264] = (melt_ptr_t) & meltcdat->dclo_72__OUTPUCOD_OBJEXPANDPUREVAL; meltcdat->dclo_72__OUTPUCOD_OBJEXPANDPUREVAL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -7926,8 +7969,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_73__CLASS_OBJEXPANDPUREVAL*/ - /*uniqueobj*/ if (! /*_.VALDATA___V266*/ meltfptr[265]) -/*_.VALDATA___V266*/ meltfptr[265] = + /*uniqueobj*/ if (! /*_._VALDATA___V266*/ meltfptr[265]) +/*_._VALDATA___V266*/ meltfptr[265] = (melt_ptr_t) & meltcdat->dsym_73__CLASS_OBJEXPANDPUREVAL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg @@ -7947,7 +7990,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_74__CLASS_OBJEXPANDP*/ - /*_.VALSTR___V267*/ meltfptr[266] = + /*_._VALSTR___V267*/ meltfptr[266] = (melt_ptr_t) & meltcdat->dstr_74__CLASS_OBJEXPANDP; meltcdat->dstr_74__CLASS_OBJEXPANDP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -7960,8 +8003,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_75__CLASS_OBJVALUE*/ - /*uniqueobj*/ if (! /*_.VALDATA___V268*/ meltfptr[267]) -/*_.VALDATA___V268*/ meltfptr[267] = + /*uniqueobj*/ if (! /*_._VALDATA___V268*/ meltfptr[267]) +/*_._VALDATA___V268*/ meltfptr[267] = (melt_ptr_t) & meltcdat->dsym_75__CLASS_OBJVALUE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_75__CLASS_OBJVALUE", @@ -7981,7 +8024,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_76__CLASS_OBJVALUE*/ - /*_.VALSTR___V269*/ meltfptr[268] = + /*_._VALSTR___V269*/ meltfptr[268] = (melt_ptr_t) & meltcdat->dstr_76__CLASS_OBJVALUE; meltcdat->dstr_76__CLASS_OBJVALUE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -7994,8 +8037,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_77__CLASS_CTYPE*/ - /*uniqueobj*/ if (! /*_.VALDATA___V270*/ meltfptr[269]) -/*_.VALDATA___V270*/ meltfptr[269] = + /*uniqueobj*/ if (! /*_._VALDATA___V270*/ meltfptr[269]) +/*_._VALDATA___V270*/ meltfptr[269] = (melt_ptr_t) & meltcdat->dsym_77__CLASS_CTYPE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_77__CLASS_CTYPE", @@ -8015,7 +8058,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_78__CLASS_CTYPE*/ - /*_.VALSTR___V271*/ meltfptr[270] = + /*_._VALSTR___V271*/ meltfptr[270] = (melt_ptr_t) & meltcdat->dstr_78__CLASS_CTYPE; meltcdat->dstr_78__CLASS_CTYPE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -8028,8 +8071,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_79__CTYPE_VOID*/ - /*uniqueobj*/ if (! /*_.VALDATA___V272*/ meltfptr[271]) -/*_.VALDATA___V272*/ meltfptr[271] = + /*uniqueobj*/ if (! /*_._VALDATA___V272*/ meltfptr[271]) +/*_._VALDATA___V272*/ meltfptr[271] = (melt_ptr_t) & meltcdat->dsym_79__CTYPE_VOID; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_79__CTYPE_VOID", @@ -8049,7 +8092,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_80__CTYPE_VOID*/ - /*_.VALSTR___V273*/ meltfptr[272] = + /*_._VALSTR___V273*/ meltfptr[272] = (melt_ptr_t) & meltcdat->dstr_80__CTYPE_VOID; meltcdat->dstr_80__CTYPE_VOID.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -8061,7 +8104,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_80__CTYPE_VOID.slen = 10; /*inirout drout_81__OUTPUCOD_OBJHOOKNTH */ - /*_.VALROUT___V274*/ meltfptr[273] = + /*_._VALROUT___V274*/ meltfptr[273] = (melt_ptr_t) & meltcdat->drout_81__OUTPUCOD_OBJHOOKNTH; meltcdat->drout_81__OUTPUCOD_OBJHOOKNTH.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -8070,10 +8113,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_ROUTDESCR_LEN - 1); meltcdat->drout_81__OUTPUCOD_OBJHOOKNTH.nbval = 6; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_81__OUTPUCOD_OBJHOOKNTH, - meltrout_14_warmelt_outobj_OUTPUCOD_OBJHOOKNTH); + meltrout_14_WARMELTmiOUTOBJ_OUTPUCOD_OBJHOOKNTH); /*iniclos dclo_82__OUTPUCOD_OBJHOOKNTH */ - /*_.VALCLO___V275*/ meltfptr[274] = + /*_._VALCLO___V275*/ meltfptr[274] = (melt_ptr_t) & meltcdat->dclo_82__OUTPUCOD_OBJHOOKNTH; meltcdat->dclo_82__OUTPUCOD_OBJHOOKNTH.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -8081,8 +8124,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_83__CLASS_OBJHOOKNTH*/ - /*uniqueobj*/ if (! /*_.VALDATA___V276*/ meltfptr[275]) -/*_.VALDATA___V276*/ meltfptr[275] = + /*uniqueobj*/ if (! /*_._VALDATA___V276*/ meltfptr[275]) +/*_._VALDATA___V276*/ meltfptr[275] = (melt_ptr_t) & meltcdat->dsym_83__CLASS_OBJHOOKNTH; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_83__CLASS_OBJHOOKNTH", @@ -8102,7 +8145,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_84__CLASS_OBJHOOKNTH*/ - /*_.VALSTR___V277*/ meltfptr[276] = + /*_._VALSTR___V277*/ meltfptr[276] = (melt_ptr_t) & meltcdat->dstr_84__CLASS_OBJHOOKNTH; meltcdat->dstr_84__CLASS_OBJHOOKNTH.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -8115,8 +8158,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_85__CTYPE_VALUE*/ - /*uniqueobj*/ if (! /*_.VALDATA___V278*/ meltfptr[277]) -/*_.VALDATA___V278*/ meltfptr[277] = + /*uniqueobj*/ if (! /*_._VALDATA___V278*/ meltfptr[277]) +/*_._VALDATA___V278*/ meltfptr[277] = (melt_ptr_t) & meltcdat->dsym_85__CTYPE_VALUE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_85__CTYPE_VALUE", @@ -8136,7 +8179,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_86__CTYPE_VALUE*/ - /*_.VALSTR___V279*/ meltfptr[278] = + /*_._VALSTR___V279*/ meltfptr[278] = (melt_ptr_t) & meltcdat->dstr_86__CTYPE_VALUE; meltcdat->dstr_86__CTYPE_VALUE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -8148,7 +8191,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_86__CTYPE_VALUE.slen = 11; /*inirout drout_87__OUTDECLINIT_OBJINITOBJECT */ - /*_.VALROUT___V280*/ meltfptr[279] = + /*_._VALROUT___V280*/ meltfptr[279] = (melt_ptr_t) & meltcdat->drout_87__OUTDECLINIT_OBJINITOBJECT; meltcdat->drout_87__OUTDECLINIT_OBJINITOBJECT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -8157,10 +8200,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_ROUTDESCR_LEN - 1); meltcdat->drout_87__OUTDECLINIT_OBJINITOBJECT.nbval = 0; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_87__OUTDECLINIT_OBJINITOBJECT, - meltrout_15_warmelt_outobj_OUTDECLINIT_OBJINITOBJECT); + meltrout_15_WARMELTmiOUTOBJ_OUTDECLINIT_OBJINITOBJECT); /*iniclos dclo_88__OUTDECLINIT_OBJINITOBJECT */ - /*_.VALCLO___V281*/ meltfptr[280] = + /*_._VALCLO___V281*/ meltfptr[280] = (melt_ptr_t) & meltcdat->dclo_88__OUTDECLINIT_OBJINITOBJECT; meltcdat->dclo_88__OUTDECLINIT_OBJINITOBJECT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -8168,8 +8211,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_89__CLASS_OBJINITOBJECT*/ - /*uniqueobj*/ if (! /*_.VALDATA___V282*/ meltfptr[281]) -/*_.VALDATA___V282*/ meltfptr[281] = + /*uniqueobj*/ if (! /*_._VALDATA___V282*/ meltfptr[281]) +/*_._VALDATA___V282*/ meltfptr[281] = (melt_ptr_t) & meltcdat->dsym_89__CLASS_OBJINITOBJECT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_89__CLASS_OBJINITOBJECT", @@ -8189,7 +8232,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_90__CLASS_OBJINITOBJ*/ - /*_.VALSTR___V283*/ meltfptr[282] = + /*_._VALSTR___V283*/ meltfptr[282] = (melt_ptr_t) & meltcdat->dstr_90__CLASS_OBJINITOBJ; meltcdat->dstr_90__CLASS_OBJINITOBJ.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -8201,7 +8244,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_90__CLASS_OBJINITOBJ.slen = 19; /*inirout drout_91__OUTCINITFILL_OBJINITOBJECT */ - /*_.VALROUT___V284*/ meltfptr[283] = + /*_._VALROUT___V284*/ meltfptr[283] = (melt_ptr_t) & meltcdat->drout_91__OUTCINITFILL_OBJINITOBJECT; meltcdat->drout_91__OUTCINITFILL_OBJINITOBJECT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -8210,10 +8253,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_ROUTDESCR_LEN - 1); meltcdat->drout_91__OUTCINITFILL_OBJINITOBJECT.nbval = 11; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_91__OUTCINITFILL_OBJINITOBJECT, - meltrout_16_warmelt_outobj_OUTCINITFILL_OBJINITOBJECT); + meltrout_16_WARMELTmiOUTOBJ_OUTCINITFILL_OBJINITOBJECT); /*iniclos dclo_92__OUTCINITFILL_OBJINITOBJECT */ - /*_.VALCLO___V285*/ meltfptr[284] = + /*_._VALCLO___V285*/ meltfptr[284] = (melt_ptr_t) & meltcdat->dclo_92__OUTCINITFILL_OBJINITOBJECT; meltcdat->dclo_92__OUTCINITFILL_OBJINITOBJECT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -8221,8 +8264,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_93__CLASS_NREP_DATAINSTANCE*/ - /*uniqueobj*/ if (! /*_.VALDATA___V286*/ meltfptr[285]) -/*_.VALDATA___V286*/ meltfptr[285] = + /*uniqueobj*/ if (! /*_._VALDATA___V286*/ meltfptr[285]) +/*_._VALDATA___V286*/ meltfptr[285] = (melt_ptr_t) & meltcdat->dsym_93__CLASS_NREP_DATAINSTANCE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg @@ -8242,7 +8285,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_94__CLASS_NREP_DATAI*/ - /*_.VALSTR___V287*/ meltfptr[286] = + /*_._VALSTR___V287*/ meltfptr[286] = (melt_ptr_t) & meltcdat->dstr_94__CLASS_NREP_DATAI; meltcdat->dstr_94__CLASS_NREP_DATAI.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -8255,8 +8298,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_95__CLASS_CLASS*/ - /*uniqueobj*/ if (! /*_.VALDATA___V288*/ meltfptr[287]) -/*_.VALDATA___V288*/ meltfptr[287] = + /*uniqueobj*/ if (! /*_._VALDATA___V288*/ meltfptr[287]) +/*_._VALDATA___V288*/ meltfptr[287] = (melt_ptr_t) & meltcdat->dsym_95__CLASS_CLASS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_95__CLASS_CLASS", @@ -8276,7 +8319,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_96__CLASS_CLASS*/ - /*_.VALSTR___V289*/ meltfptr[288] = + /*_._VALSTR___V289*/ meltfptr[288] = (melt_ptr_t) & meltcdat->dstr_96__CLASS_CLASS; meltcdat->dstr_96__CLASS_CLASS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -8289,8 +8332,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_97__CLASS_OBJINITUNIQUEOBJECT*/ - /*uniqueobj*/ if (! /*_.VALDATA___V290*/ meltfptr[289]) -/*_.VALDATA___V290*/ meltfptr[289] = + /*uniqueobj*/ if (! /*_._VALDATA___V290*/ meltfptr[289]) +/*_._VALDATA___V290*/ meltfptr[289] = (melt_ptr_t) & meltcdat->dsym_97__CLASS_OBJINITUNIQUEOBJECT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg @@ -8310,7 +8353,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_98__CLASS_OBJINITUNI*/ - /*_.VALSTR___V291*/ meltfptr[290] = + /*_._VALSTR___V291*/ meltfptr[290] = (melt_ptr_t) & meltcdat->dstr_98__CLASS_OBJINITUNI; meltcdat->dstr_98__CLASS_OBJINITUNI.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -8322,7 +8365,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_98__CLASS_OBJINITUNI.slen = 25; /*inirout drout_99__OUTCINITPREDEF_OBJINITOBJECT */ - /*_.VALROUT___V292*/ meltfptr[291] = + /*_._VALROUT___V292*/ meltfptr[291] = (melt_ptr_t) & meltcdat->drout_99__OUTCINITPREDEF_OBJINITOBJECT; meltcdat->drout_99__OUTCINITPREDEF_OBJINITOBJECT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -8332,10 +8375,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->drout_99__OUTCINITPREDEF_OBJINITOBJECT.nbval = 8; MELT_ROUTINE_SET_ROUTCODE (&meltcdat-> drout_99__OUTCINITPREDEF_OBJINITOBJECT, - meltrout_17_warmelt_outobj_OUTCINITPREDEF_OBJINITOBJECT); + meltrout_17_WARMELTmiOUTOBJ_OUTCINITPREDEF_OBJINITOBJECT); /*iniclos dclo_100__OUTCINITPREDEF_OBJINITOBJECT */ - /*_.VALCLO___V293*/ meltfptr[292] = + /*_._VALCLO___V293*/ meltfptr[292] = (melt_ptr_t) & meltcdat->dclo_100__OUTCINITPREDEF_OBJINITOBJECT; meltcdat->dclo_100__OUTCINITPREDEF_OBJINITOBJECT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -8343,8 +8386,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_101__CLASS_NREP_NIL*/ - /*uniqueobj*/ if (! /*_.VALDATA___V294*/ meltfptr[293]) -/*_.VALDATA___V294*/ meltfptr[293] = + /*uniqueobj*/ if (! /*_._VALDATA___V294*/ meltfptr[293]) +/*_._VALDATA___V294*/ meltfptr[293] = (melt_ptr_t) & meltcdat->dsym_101__CLASS_NREP_NIL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_101__CLASS_NREP_NIL", @@ -8364,7 +8407,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_102__CLASS_NREP_NIL*/ - /*_.VALSTR___V295*/ meltfptr[294] = + /*_._VALSTR___V295*/ meltfptr[294] = (melt_ptr_t) & meltcdat->dstr_102__CLASS_NREP_NIL; meltcdat->dstr_102__CLASS_NREP_NIL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -8376,7 +8419,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_102__CLASS_NREP_NIL.slen = 14; /*inirout drout_103__OUTCINITPREDEF_OBJINITHOOK */ - /*_.VALROUT___V296*/ meltfptr[295] = + /*_._VALROUT___V296*/ meltfptr[295] = (melt_ptr_t) & meltcdat->drout_103__OUTCINITPREDEF_OBJINITHOOK; meltcdat->drout_103__OUTCINITPREDEF_OBJINITHOOK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -8385,10 +8428,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_ROUTDESCR_LEN - 1); meltcdat->drout_103__OUTCINITPREDEF_OBJINITHOOK.nbval = 8; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_103__OUTCINITPREDEF_OBJINITHOOK, - meltrout_18_warmelt_outobj_OUTCINITPREDEF_OBJINITHOOK); + meltrout_18_WARMELTmiOUTOBJ_OUTCINITPREDEF_OBJINITHOOK); /*iniclos dclo_104__OUTCINITPREDEF_OBJINITHOOK */ - /*_.VALCLO___V297*/ meltfptr[296] = + /*_._VALCLO___V297*/ meltfptr[296] = (melt_ptr_t) & meltcdat->dclo_104__OUTCINITPREDEF_OBJINITHOOK; meltcdat->dclo_104__OUTCINITPREDEF_OBJINITHOOK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -8396,8 +8439,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_105__CLASS_OBJINITHOOK*/ - /*uniqueobj*/ if (! /*_.VALDATA___V298*/ meltfptr[297]) -/*_.VALDATA___V298*/ meltfptr[297] = + /*uniqueobj*/ if (! /*_._VALDATA___V298*/ meltfptr[297]) +/*_._VALDATA___V298*/ meltfptr[297] = (melt_ptr_t) & meltcdat->dsym_105__CLASS_OBJINITHOOK; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_105__CLASS_OBJINITHOOK", @@ -8417,7 +8460,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_106__CLASS_OBJINITHOO*/ - /*_.VALSTR___V299*/ meltfptr[298] = + /*_._VALSTR___V299*/ meltfptr[298] = (melt_ptr_t) & meltcdat->dstr_106__CLASS_OBJINITHOO; meltcdat->dstr_106__CLASS_OBJINITHOO.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -8430,8 +8473,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_107__CLASS_NREP*/ - /*uniqueobj*/ if (! /*_.VALDATA___V300*/ meltfptr[299]) -/*_.VALDATA___V300*/ meltfptr[299] = + /*uniqueobj*/ if (! /*_._VALDATA___V300*/ meltfptr[299]) +/*_._VALDATA___V300*/ meltfptr[299] = (melt_ptr_t) & meltcdat->dsym_107__CLASS_NREP; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_107__CLASS_NREP", @@ -8451,7 +8494,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_108__CLASS_NREP*/ - /*_.VALSTR___V301*/ meltfptr[300] = + /*_._VALSTR___V301*/ meltfptr[300] = (melt_ptr_t) & meltcdat->dstr_108__CLASS_NREP; meltcdat->dstr_108__CLASS_NREP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -8463,7 +8506,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_108__CLASS_NREP.slen = 10; /*inirout drout_109__OUTDECLINIT_OBJINITMULTIPLE */ - /*_.VALROUT___V302*/ meltfptr[301] = + /*_._VALROUT___V302*/ meltfptr[301] = (melt_ptr_t) & meltcdat->drout_109__OUTDECLINIT_OBJINITMULTIPLE; meltcdat->drout_109__OUTDECLINIT_OBJINITMULTIPLE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -8473,10 +8516,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->drout_109__OUTDECLINIT_OBJINITMULTIPLE.nbval = 0; MELT_ROUTINE_SET_ROUTCODE (&meltcdat-> drout_109__OUTDECLINIT_OBJINITMULTIPLE, - meltrout_19_warmelt_outobj_OUTDECLINIT_OBJINITMULTIPLE); + meltrout_19_WARMELTmiOUTOBJ_OUTDECLINIT_OBJINITMULTIPLE); /*iniclos dclo_110__OUTDECLINIT_OBJINITMULTIPLE */ - /*_.VALCLO___V303*/ meltfptr[302] = + /*_._VALCLO___V303*/ meltfptr[302] = (melt_ptr_t) & meltcdat->dclo_110__OUTDECLINIT_OBJINITMULTIPLE; meltcdat->dclo_110__OUTDECLINIT_OBJINITMULTIPLE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -8484,8 +8527,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_111__CLASS_OBJINITMULTIPLE*/ - /*uniqueobj*/ if (! /*_.VALDATA___V304*/ meltfptr[303]) -/*_.VALDATA___V304*/ meltfptr[303] = + /*uniqueobj*/ if (! /*_._VALDATA___V304*/ meltfptr[303]) +/*_._VALDATA___V304*/ meltfptr[303] = (melt_ptr_t) & meltcdat->dsym_111__CLASS_OBJINITMULTIPLE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg @@ -8505,7 +8548,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_112__CLASS_OBJINITMUL*/ - /*_.VALSTR___V305*/ meltfptr[304] = + /*_._VALSTR___V305*/ meltfptr[304] = (melt_ptr_t) & meltcdat->dstr_112__CLASS_OBJINITMUL; meltcdat->dstr_112__CLASS_OBJINITMUL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -8517,7 +8560,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_112__CLASS_OBJINITMUL.slen = 21; /*inirout drout_113__OUTCINITFILL_OBJINITMULTIPLE */ - /*_.VALROUT___V306*/ meltfptr[305] = + /*_._VALROUT___V306*/ meltfptr[305] = (melt_ptr_t) & meltcdat->drout_113__OUTCINITFILL_OBJINITMULTIPLE; meltcdat->drout_113__OUTCINITFILL_OBJINITMULTIPLE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -8527,17 +8570,17 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->drout_113__OUTCINITFILL_OBJINITMULTIPLE.nbval = 5; MELT_ROUTINE_SET_ROUTCODE (&meltcdat-> drout_113__OUTCINITFILL_OBJINITMULTIPLE, - meltrout_20_warmelt_outobj_OUTCINITFILL_OBJINITMULTIPLE); + meltrout_20_WARMELTmiOUTOBJ_OUTCINITFILL_OBJINITMULTIPLE); /*iniclos dclo_114__OUTCINITFILL_OBJINITMULTIPLE */ - /*_.VALCLO___V307*/ meltfptr[306] = + /*_._VALCLO___V307*/ meltfptr[306] = (melt_ptr_t) & meltcdat->dclo_114__OUTCINITFILL_OBJINITMULTIPLE; meltcdat->dclo_114__OUTCINITFILL_OBJINITMULTIPLE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); meltcdat->dclo_114__OUTCINITFILL_OBJINITMULTIPLE.nbval = 0; /*inirout drout_115__OUTDECLINIT_OBJINITCLOSURE */ - /*_.VALROUT___V308*/ meltfptr[307] = + /*_._VALROUT___V308*/ meltfptr[307] = (melt_ptr_t) & meltcdat->drout_115__OUTDECLINIT_OBJINITCLOSURE; meltcdat->drout_115__OUTDECLINIT_OBJINITCLOSURE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -8546,10 +8589,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_ROUTDESCR_LEN - 1); meltcdat->drout_115__OUTDECLINIT_OBJINITCLOSURE.nbval = 0; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_115__OUTDECLINIT_OBJINITCLOSURE, - meltrout_21_warmelt_outobj_OUTDECLINIT_OBJINITCLOSURE); + meltrout_21_WARMELTmiOUTOBJ_OUTDECLINIT_OBJINITCLOSURE); /*iniclos dclo_116__OUTDECLINIT_OBJINITCLOSURE */ - /*_.VALCLO___V309*/ meltfptr[308] = + /*_._VALCLO___V309*/ meltfptr[308] = (melt_ptr_t) & meltcdat->dclo_116__OUTDECLINIT_OBJINITCLOSURE; meltcdat->dclo_116__OUTDECLINIT_OBJINITCLOSURE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -8557,8 +8600,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_117__CLASS_OBJINITCLOSURE*/ - /*uniqueobj*/ if (! /*_.VALDATA___V310*/ meltfptr[309]) -/*_.VALDATA___V310*/ meltfptr[309] = + /*uniqueobj*/ if (! /*_._VALDATA___V310*/ meltfptr[309]) +/*_._VALDATA___V310*/ meltfptr[309] = (melt_ptr_t) & meltcdat->dsym_117__CLASS_OBJINITCLOSURE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_117__CLASS_OBJINITCLOSURE", @@ -8578,7 +8621,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_118__CLASS_OBJINITCLO*/ - /*_.VALSTR___V311*/ meltfptr[310] = + /*_._VALSTR___V311*/ meltfptr[310] = (melt_ptr_t) & meltcdat->dstr_118__CLASS_OBJINITCLO; meltcdat->dstr_118__CLASS_OBJINITCLO.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -8590,7 +8633,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_118__CLASS_OBJINITCLO.slen = 20; /*inirout drout_119__OUTCINITFILL_OBJINITCLOSURE */ - /*_.VALROUT___V312*/ meltfptr[311] = + /*_._VALROUT___V312*/ meltfptr[311] = (melt_ptr_t) & meltcdat->drout_119__OUTCINITFILL_OBJINITCLOSURE; meltcdat->drout_119__OUTCINITFILL_OBJINITCLOSURE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -8600,17 +8643,17 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->drout_119__OUTCINITFILL_OBJINITCLOSURE.nbval = 5; MELT_ROUTINE_SET_ROUTCODE (&meltcdat-> drout_119__OUTCINITFILL_OBJINITCLOSURE, - meltrout_22_warmelt_outobj_OUTCINITFILL_OBJINITCLOSURE); + meltrout_22_WARMELTmiOUTOBJ_OUTCINITFILL_OBJINITCLOSURE); /*iniclos dclo_120__OUTCINITFILL_OBJINITCLOSURE */ - /*_.VALCLO___V313*/ meltfptr[312] = + /*_._VALCLO___V313*/ meltfptr[312] = (melt_ptr_t) & meltcdat->dclo_120__OUTCINITFILL_OBJINITCLOSURE; meltcdat->dclo_120__OUTCINITFILL_OBJINITCLOSURE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); meltcdat->dclo_120__OUTCINITFILL_OBJINITCLOSURE.nbval = 0; /*inirout drout_121__OUTDECLINIT_OBJINITROUTINE */ - /*_.VALROUT___V314*/ meltfptr[313] = + /*_._VALROUT___V314*/ meltfptr[313] = (melt_ptr_t) & meltcdat->drout_121__OUTDECLINIT_OBJINITROUTINE; meltcdat->drout_121__OUTDECLINIT_OBJINITROUTINE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -8619,10 +8662,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_ROUTDESCR_LEN - 1); meltcdat->drout_121__OUTDECLINIT_OBJINITROUTINE.nbval = 0; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_121__OUTDECLINIT_OBJINITROUTINE, - meltrout_23_warmelt_outobj_OUTDECLINIT_OBJINITROUTINE); + meltrout_23_WARMELTmiOUTOBJ_OUTDECLINIT_OBJINITROUTINE); /*iniclos dclo_122__OUTDECLINIT_OBJINITROUTINE */ - /*_.VALCLO___V315*/ meltfptr[314] = + /*_._VALCLO___V315*/ meltfptr[314] = (melt_ptr_t) & meltcdat->dclo_122__OUTDECLINIT_OBJINITROUTINE; meltcdat->dclo_122__OUTDECLINIT_OBJINITROUTINE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -8630,8 +8673,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_123__CLASS_OBJINITROUTINE*/ - /*uniqueobj*/ if (! /*_.VALDATA___V316*/ meltfptr[315]) -/*_.VALDATA___V316*/ meltfptr[315] = + /*uniqueobj*/ if (! /*_._VALDATA___V316*/ meltfptr[315]) +/*_._VALDATA___V316*/ meltfptr[315] = (melt_ptr_t) & meltcdat->dsym_123__CLASS_OBJINITROUTINE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_123__CLASS_OBJINITROUTINE", @@ -8651,7 +8694,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_124__CLASS_OBJINITROU*/ - /*_.VALSTR___V317*/ meltfptr[316] = + /*_._VALSTR___V317*/ meltfptr[316] = (melt_ptr_t) & meltcdat->dstr_124__CLASS_OBJINITROU; meltcdat->dstr_124__CLASS_OBJINITROU.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -8663,7 +8706,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_124__CLASS_OBJINITROU.slen = 20; /*inirout drout_125__OUTCINITFILL_OBJINITROUTINE */ - /*_.VALROUT___V318*/ meltfptr[317] = + /*_._VALROUT___V318*/ meltfptr[317] = (melt_ptr_t) & meltcdat->drout_125__OUTCINITFILL_OBJINITROUTINE; meltcdat->drout_125__OUTCINITFILL_OBJINITROUTINE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -8673,10 +8716,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->drout_125__OUTCINITFILL_OBJINITROUTINE.nbval = 8; MELT_ROUTINE_SET_ROUTCODE (&meltcdat-> drout_125__OUTCINITFILL_OBJINITROUTINE, - meltrout_24_warmelt_outobj_OUTCINITFILL_OBJINITROUTINE); + meltrout_24_WARMELTmiOUTOBJ_OUTCINITFILL_OBJINITROUTINE); /*iniclos dclo_126__OUTCINITFILL_OBJINITROUTINE */ - /*_.VALCLO___V319*/ meltfptr[318] = + /*_._VALCLO___V319*/ meltfptr[318] = (melt_ptr_t) & meltcdat->dclo_126__OUTCINITFILL_OBJINITROUTINE; meltcdat->dclo_126__OUTCINITFILL_OBJINITROUTINE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -8684,8 +8727,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_127__CLASS_NREP_DATAROUTINE*/ - /*uniqueobj*/ if (! /*_.VALDATA___V320*/ meltfptr[319]) -/*_.VALDATA___V320*/ meltfptr[319] = + /*uniqueobj*/ if (! /*_._VALDATA___V320*/ meltfptr[319]) +/*_._VALDATA___V320*/ meltfptr[319] = (melt_ptr_t) & meltcdat->dsym_127__CLASS_NREP_DATAROUTINE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg @@ -8705,7 +8748,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_128__CLASS_NREP_DATAR*/ - /*_.VALSTR___V321*/ meltfptr[320] = + /*_._VALSTR___V321*/ meltfptr[320] = (melt_ptr_t) & meltcdat->dstr_128__CLASS_NREP_DATAR; meltcdat->dstr_128__CLASS_NREP_DATAR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -8718,8 +8761,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_129__CLASS_NREP_ROUTPROC*/ - /*uniqueobj*/ if (! /*_.VALDATA___V322*/ meltfptr[321]) -/*_.VALDATA___V322*/ meltfptr[321] = + /*uniqueobj*/ if (! /*_._VALDATA___V322*/ meltfptr[321]) +/*_._VALDATA___V322*/ meltfptr[321] = (melt_ptr_t) & meltcdat->dsym_129__CLASS_NREP_ROUTPROC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_129__CLASS_NREP_ROUTPROC", @@ -8739,7 +8782,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_130__CLASS_NREP_ROUTP*/ - /*_.VALSTR___V323*/ meltfptr[322] = + /*_._VALSTR___V323*/ meltfptr[322] = (melt_ptr_t) & meltcdat->dstr_130__CLASS_NREP_ROUTP; meltcdat->dstr_130__CLASS_NREP_ROUTP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -8751,7 +8794,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_130__CLASS_NREP_ROUTP.slen = 19; /*inirout drout_131__OUTDECLINIT_OBJINITHOOK */ - /*_.VALROUT___V324*/ meltfptr[323] = + /*_._VALROUT___V324*/ meltfptr[323] = (melt_ptr_t) & meltcdat->drout_131__OUTDECLINIT_OBJINITHOOK; meltcdat->drout_131__OUTDECLINIT_OBJINITHOOK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -8760,17 +8803,17 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_ROUTDESCR_LEN - 1); meltcdat->drout_131__OUTDECLINIT_OBJINITHOOK.nbval = 3; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_131__OUTDECLINIT_OBJINITHOOK, - meltrout_25_warmelt_outobj_OUTDECLINIT_OBJINITHOOK); + meltrout_25_WARMELTmiOUTOBJ_OUTDECLINIT_OBJINITHOOK); /*iniclos dclo_132__OUTDECLINIT_OBJINITHOOK */ - /*_.VALCLO___V325*/ meltfptr[324] = + /*_._VALCLO___V325*/ meltfptr[324] = (melt_ptr_t) & meltcdat->dclo_132__OUTDECLINIT_OBJINITHOOK; meltcdat->dclo_132__OUTDECLINIT_OBJINITHOOK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); meltcdat->dclo_132__OUTDECLINIT_OBJINITHOOK.nbval = 0; /*inirout drout_133__OUTCINITFILL_OBJINITHOOK */ - /*_.VALROUT___V326*/ meltfptr[325] = + /*_._VALROUT___V326*/ meltfptr[325] = (melt_ptr_t) & meltcdat->drout_133__OUTCINITFILL_OBJINITHOOK; meltcdat->drout_133__OUTCINITFILL_OBJINITHOOK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -8779,10 +8822,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_ROUTDESCR_LEN - 1); meltcdat->drout_133__OUTCINITFILL_OBJINITHOOK.nbval = 6; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_133__OUTCINITFILL_OBJINITHOOK, - meltrout_26_warmelt_outobj_OUTCINITFILL_OBJINITHOOK); + meltrout_26_WARMELTmiOUTOBJ_OUTCINITFILL_OBJINITHOOK); /*iniclos dclo_134__OUTCINITFILL_OBJINITHOOK */ - /*_.VALCLO___V327*/ meltfptr[326] = + /*_._VALCLO___V327*/ meltfptr[326] = (melt_ptr_t) & meltcdat->dclo_134__OUTCINITFILL_OBJINITHOOK; meltcdat->dclo_134__OUTCINITFILL_OBJINITHOOK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -8790,8 +8833,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_135__CLASS_NREP_HOOKPROC*/ - /*uniqueobj*/ if (! /*_.VALDATA___V328*/ meltfptr[327]) -/*_.VALDATA___V328*/ meltfptr[327] = + /*uniqueobj*/ if (! /*_._VALDATA___V328*/ meltfptr[327]) +/*_._VALDATA___V328*/ meltfptr[327] = (melt_ptr_t) & meltcdat->dsym_135__CLASS_NREP_HOOKPROC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_135__CLASS_NREP_HOOKPROC", @@ -8811,7 +8854,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_136__CLASS_NREP_HOOKP*/ - /*_.VALSTR___V329*/ meltfptr[328] = + /*_._VALSTR___V329*/ meltfptr[328] = (melt_ptr_t) & meltcdat->dstr_136__CLASS_NREP_HOOKP; meltcdat->dstr_136__CLASS_NREP_HOOKP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -8823,7 +8866,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_136__CLASS_NREP_HOOKP.slen = 19; /*inirout drout_137__OUTDECLINIT_OBJINITSTRING */ - /*_.VALROUT___V330*/ meltfptr[329] = + /*_._VALROUT___V330*/ meltfptr[329] = (melt_ptr_t) & meltcdat->drout_137__OUTDECLINIT_OBJINITSTRING; meltcdat->drout_137__OUTDECLINIT_OBJINITSTRING.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -8832,10 +8875,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_ROUTDESCR_LEN - 1); meltcdat->drout_137__OUTDECLINIT_OBJINITSTRING.nbval = 0; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_137__OUTDECLINIT_OBJINITSTRING, - meltrout_27_warmelt_outobj_OUTDECLINIT_OBJINITSTRING); + meltrout_27_WARMELTmiOUTOBJ_OUTDECLINIT_OBJINITSTRING); /*iniclos dclo_138__OUTDECLINIT_OBJINITSTRING */ - /*_.VALCLO___V331*/ meltfptr[330] = + /*_._VALCLO___V331*/ meltfptr[330] = (melt_ptr_t) & meltcdat->dclo_138__OUTDECLINIT_OBJINITSTRING; meltcdat->dclo_138__OUTDECLINIT_OBJINITSTRING.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -8843,8 +8886,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_139__CLASS_OBJINITSTRING*/ - /*uniqueobj*/ if (! /*_.VALDATA___V332*/ meltfptr[331]) -/*_.VALDATA___V332*/ meltfptr[331] = + /*uniqueobj*/ if (! /*_._VALDATA___V332*/ meltfptr[331]) +/*_._VALDATA___V332*/ meltfptr[331] = (melt_ptr_t) & meltcdat->dsym_139__CLASS_OBJINITSTRING; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_139__CLASS_OBJINITSTRING", @@ -8864,7 +8907,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_140__CLASS_OBJINITSTR*/ - /*_.VALSTR___V333*/ meltfptr[332] = + /*_._VALSTR___V333*/ meltfptr[332] = (melt_ptr_t) & meltcdat->dstr_140__CLASS_OBJINITSTR; meltcdat->dstr_140__CLASS_OBJINITSTR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -8876,7 +8919,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_140__CLASS_OBJINITSTR.slen = 19; /*inirout drout_141__OUTCINITFILL_OBJINITSTRING */ - /*_.VALROUT___V334*/ meltfptr[333] = + /*_._VALROUT___V334*/ meltfptr[333] = (melt_ptr_t) & meltcdat->drout_141__OUTCINITFILL_OBJINITSTRING; meltcdat->drout_141__OUTCINITFILL_OBJINITSTRING.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -8885,17 +8928,17 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_ROUTDESCR_LEN - 1); meltcdat->drout_141__OUTCINITFILL_OBJINITSTRING.nbval = 6; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_141__OUTCINITFILL_OBJINITSTRING, - meltrout_28_warmelt_outobj_OUTCINITFILL_OBJINITSTRING); + meltrout_28_WARMELTmiOUTOBJ_OUTCINITFILL_OBJINITSTRING); /*iniclos dclo_142__OUTCINITFILL_OBJINITSTRING */ - /*_.VALCLO___V335*/ meltfptr[334] = + /*_._VALCLO___V335*/ meltfptr[334] = (melt_ptr_t) & meltcdat->dclo_142__OUTCINITFILL_OBJINITSTRING; meltcdat->dclo_142__OUTCINITFILL_OBJINITSTRING.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); meltcdat->dclo_142__OUTCINITFILL_OBJINITSTRING.nbval = 0; /*inirout drout_143__OUTDECLINIT_OBJINITBOXEDINTEGER */ - /*_.VALROUT___V336*/ meltfptr[335] = + /*_._VALROUT___V336*/ meltfptr[335] = (melt_ptr_t) & meltcdat->drout_143__OUTDECLINIT_OBJINITBOXEDINTEGER; meltcdat->drout_143__OUTDECLINIT_OBJINITBOXEDINTEGER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -8905,10 +8948,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->drout_143__OUTDECLINIT_OBJINITBOXEDINTEGER.nbval = 0; MELT_ROUTINE_SET_ROUTCODE (&meltcdat-> drout_143__OUTDECLINIT_OBJINITBOXEDINTEGER, - meltrout_29_warmelt_outobj_OUTDECLINIT_OBJINITBOXEDINTEGER); + meltrout_29_WARMELTmiOUTOBJ_OUTDECLINIT_OBJINITBOXEDINTEGER); /*iniclos dclo_144__OUTDECLINIT_OBJINITBOXEDINTEGER */ - /*_.VALCLO___V337*/ meltfptr[336] = + /*_._VALCLO___V337*/ meltfptr[336] = (melt_ptr_t) & meltcdat->dclo_144__OUTDECLINIT_OBJINITBOXEDINTEGER; meltcdat->dclo_144__OUTDECLINIT_OBJINITBOXEDINTEGER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -8916,8 +8959,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_145__CLASS_OBJINITBOXINTEGER*/ - /*uniqueobj*/ if (! /*_.VALDATA___V338*/ meltfptr[337]) -/*_.VALDATA___V338*/ meltfptr[337] = + /*uniqueobj*/ if (! /*_._VALDATA___V338*/ meltfptr[337]) +/*_._VALDATA___V338*/ meltfptr[337] = (melt_ptr_t) & meltcdat->dsym_145__CLASS_OBJINITBOXINTEGER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg @@ -8937,7 +8980,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_146__CLASS_OBJINITBOX*/ - /*_.VALSTR___V339*/ meltfptr[338] = + /*_._VALSTR___V339*/ meltfptr[338] = (melt_ptr_t) & meltcdat->dstr_146__CLASS_OBJINITBOX; meltcdat->dstr_146__CLASS_OBJINITBOX.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -8949,7 +8992,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_146__CLASS_OBJINITBOX.slen = 23; /*inirout drout_147__OUTCINITFILL_OBJINITBOXEDINTEGER */ - /*_.VALROUT___V340*/ meltfptr[339] = + /*_._VALROUT___V340*/ meltfptr[339] = (melt_ptr_t) & meltcdat->drout_147__OUTCINITFILL_OBJINITBOXEDINTEGER; meltcdat->drout_147__OUTCINITFILL_OBJINITBOXEDINTEGER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -8959,17 +9002,17 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->drout_147__OUTCINITFILL_OBJINITBOXEDINTEGER.nbval = 5; MELT_ROUTINE_SET_ROUTCODE (&meltcdat-> drout_147__OUTCINITFILL_OBJINITBOXEDINTEGER, - meltrout_30_warmelt_outobj_OUTCINITFILL_OBJINITBOXEDINTEGER); + meltrout_30_WARMELTmiOUTOBJ_OUTCINITFILL_OBJINITBOXEDINTEGER); /*iniclos dclo_148__OUTCINITFILL_OBJINITBOXEDINTEGER */ - /*_.VALCLO___V341*/ meltfptr[340] = + /*_._VALCLO___V341*/ meltfptr[340] = (melt_ptr_t) & meltcdat->dclo_148__OUTCINITFILL_OBJINITBOXEDINTEGER; meltcdat->dclo_148__OUTCINITFILL_OBJINITBOXEDINTEGER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); meltcdat->dclo_148__OUTCINITFILL_OBJINITBOXEDINTEGER.nbval = 0; /*inirout drout_149__OUTDECLINIT_OBJINITPAIR */ - /*_.VALROUT___V342*/ meltfptr[341] = + /*_._VALROUT___V342*/ meltfptr[341] = (melt_ptr_t) & meltcdat->drout_149__OUTDECLINIT_OBJINITPAIR; meltcdat->drout_149__OUTDECLINIT_OBJINITPAIR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -8978,10 +9021,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_ROUTDESCR_LEN - 1); meltcdat->drout_149__OUTDECLINIT_OBJINITPAIR.nbval = 0; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_149__OUTDECLINIT_OBJINITPAIR, - meltrout_31_warmelt_outobj_OUTDECLINIT_OBJINITPAIR); + meltrout_31_WARMELTmiOUTOBJ_OUTDECLINIT_OBJINITPAIR); /*iniclos dclo_150__OUTDECLINIT_OBJINITPAIR */ - /*_.VALCLO___V343*/ meltfptr[342] = + /*_._VALCLO___V343*/ meltfptr[342] = (melt_ptr_t) & meltcdat->dclo_150__OUTDECLINIT_OBJINITPAIR; meltcdat->dclo_150__OUTDECLINIT_OBJINITPAIR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -8989,8 +9032,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_151__CLASS_OBJINITPAIR*/ - /*uniqueobj*/ if (! /*_.VALDATA___V344*/ meltfptr[343]) -/*_.VALDATA___V344*/ meltfptr[343] = + /*uniqueobj*/ if (! /*_._VALDATA___V344*/ meltfptr[343]) +/*_._VALDATA___V344*/ meltfptr[343] = (melt_ptr_t) & meltcdat->dsym_151__CLASS_OBJINITPAIR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_151__CLASS_OBJINITPAIR", @@ -9010,7 +9053,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_152__CLASS_OBJINITPAI*/ - /*_.VALSTR___V345*/ meltfptr[344] = + /*_._VALSTR___V345*/ meltfptr[344] = (melt_ptr_t) & meltcdat->dstr_152__CLASS_OBJINITPAI; meltcdat->dstr_152__CLASS_OBJINITPAI.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -9022,7 +9065,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_152__CLASS_OBJINITPAI.slen = 17; /*inirout drout_153__OUTCINITFILL_OBJINITPAIR */ - /*_.VALROUT___V346*/ meltfptr[345] = + /*_._VALROUT___V346*/ meltfptr[345] = (melt_ptr_t) & meltcdat->drout_153__OUTCINITFILL_OBJINITPAIR; meltcdat->drout_153__OUTCINITFILL_OBJINITPAIR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -9031,17 +9074,17 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_ROUTDESCR_LEN - 1); meltcdat->drout_153__OUTCINITFILL_OBJINITPAIR.nbval = 5; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_153__OUTCINITFILL_OBJINITPAIR, - meltrout_32_warmelt_outobj_OUTCINITFILL_OBJINITPAIR); + meltrout_32_WARMELTmiOUTOBJ_OUTCINITFILL_OBJINITPAIR); /*iniclos dclo_154__OUTCINITFILL_OBJINITPAIR */ - /*_.VALCLO___V347*/ meltfptr[346] = + /*_._VALCLO___V347*/ meltfptr[346] = (melt_ptr_t) & meltcdat->dclo_154__OUTCINITFILL_OBJINITPAIR; meltcdat->dclo_154__OUTCINITFILL_OBJINITPAIR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); meltcdat->dclo_154__OUTCINITFILL_OBJINITPAIR.nbval = 0; /*inirout drout_155__OUTDECLINIT_OBJINITLIST */ - /*_.VALROUT___V348*/ meltfptr[347] = + /*_._VALROUT___V348*/ meltfptr[347] = (melt_ptr_t) & meltcdat->drout_155__OUTDECLINIT_OBJINITLIST; meltcdat->drout_155__OUTDECLINIT_OBJINITLIST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -9050,10 +9093,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_ROUTDESCR_LEN - 1); meltcdat->drout_155__OUTDECLINIT_OBJINITLIST.nbval = 0; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_155__OUTDECLINIT_OBJINITLIST, - meltrout_33_warmelt_outobj_OUTDECLINIT_OBJINITLIST); + meltrout_33_WARMELTmiOUTOBJ_OUTDECLINIT_OBJINITLIST); /*iniclos dclo_156__OUTDECLINIT_OBJINITLIST */ - /*_.VALCLO___V349*/ meltfptr[348] = + /*_._VALCLO___V349*/ meltfptr[348] = (melt_ptr_t) & meltcdat->dclo_156__OUTDECLINIT_OBJINITLIST; meltcdat->dclo_156__OUTDECLINIT_OBJINITLIST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -9061,8 +9104,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_157__CLASS_OBJINITLIST*/ - /*uniqueobj*/ if (! /*_.VALDATA___V350*/ meltfptr[349]) -/*_.VALDATA___V350*/ meltfptr[349] = + /*uniqueobj*/ if (! /*_._VALDATA___V350*/ meltfptr[349]) +/*_._VALDATA___V350*/ meltfptr[349] = (melt_ptr_t) & meltcdat->dsym_157__CLASS_OBJINITLIST; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_157__CLASS_OBJINITLIST", @@ -9082,7 +9125,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_158__CLASS_OBJINITLIS*/ - /*_.VALSTR___V351*/ meltfptr[350] = + /*_._VALSTR___V351*/ meltfptr[350] = (melt_ptr_t) & meltcdat->dstr_158__CLASS_OBJINITLIS; meltcdat->dstr_158__CLASS_OBJINITLIS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -9094,7 +9137,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_158__CLASS_OBJINITLIS.slen = 17; /*inirout drout_159__OUTCINITFILL_OBJINITLIST */ - /*_.VALROUT___V352*/ meltfptr[351] = + /*_._VALROUT___V352*/ meltfptr[351] = (melt_ptr_t) & meltcdat->drout_159__OUTCINITFILL_OBJINITLIST; meltcdat->drout_159__OUTCINITFILL_OBJINITLIST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -9103,17 +9146,17 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_ROUTDESCR_LEN - 1); meltcdat->drout_159__OUTCINITFILL_OBJINITLIST.nbval = 5; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_159__OUTCINITFILL_OBJINITLIST, - meltrout_34_warmelt_outobj_OUTCINITFILL_OBJINITLIST); + meltrout_34_WARMELTmiOUTOBJ_OUTCINITFILL_OBJINITLIST); /*iniclos dclo_160__OUTCINITFILL_OBJINITLIST */ - /*_.VALCLO___V353*/ meltfptr[352] = + /*_._VALCLO___V353*/ meltfptr[352] = (melt_ptr_t) & meltcdat->dclo_160__OUTCINITFILL_OBJINITLIST; meltcdat->dclo_160__OUTCINITFILL_OBJINITLIST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); meltcdat->dclo_160__OUTCINITFILL_OBJINITLIST.nbval = 0; /*inirout drout_161__OUTPUCOD_ANYDISCR */ - /*_.VALROUT___V354*/ meltfptr[353] = + /*_._VALROUT___V354*/ meltfptr[353] = (melt_ptr_t) & meltcdat->drout_161__OUTPUCOD_ANYDISCR; meltcdat->drout_161__OUTPUCOD_ANYDISCR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -9122,10 +9165,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_ROUTDESCR_LEN - 1); meltcdat->drout_161__OUTPUCOD_ANYDISCR.nbval = 1; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_161__OUTPUCOD_ANYDISCR, - meltrout_35_warmelt_outobj_OUTPUCOD_ANYDISCR); + meltrout_35_WARMELTmiOUTOBJ_OUTPUCOD_ANYDISCR); /*iniclos dclo_162__OUTPUCOD_ANYDISCR */ - /*_.VALCLO___V355*/ meltfptr[354] = + /*_._VALCLO___V355*/ meltfptr[354] = (melt_ptr_t) & meltcdat->dclo_162__OUTPUCOD_ANYDISCR; meltcdat->dclo_162__OUTPUCOD_ANYDISCR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -9133,8 +9176,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_163__DISCR_ANY_RECEIVER*/ - /*uniqueobj*/ if (! /*_.VALDATA___V356*/ meltfptr[355]) -/*_.VALDATA___V356*/ meltfptr[355] = + /*uniqueobj*/ if (! /*_._VALDATA___V356*/ meltfptr[355]) +/*_._VALDATA___V356*/ meltfptr[355] = (melt_ptr_t) & meltcdat->dsym_163__DISCR_ANY_RECEIVER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_163__DISCR_ANY_RECEIVER", @@ -9154,7 +9197,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_164__DISCR_ANY_RECEIV*/ - /*_.VALSTR___V357*/ meltfptr[356] = + /*_._VALSTR___V357*/ meltfptr[356] = (melt_ptr_t) & meltcdat->dstr_164__DISCR_ANY_RECEIV; meltcdat->dstr_164__DISCR_ANY_RECEIV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -9166,7 +9209,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_164__DISCR_ANY_RECEIV.slen = 18; /*inirout drout_165__OUTPUCOD_NULL */ - /*_.VALROUT___V358*/ meltfptr[357] = + /*_._VALROUT___V358*/ meltfptr[357] = (melt_ptr_t) & meltcdat->drout_165__OUTPUCOD_NULL; meltcdat->drout_165__OUTPUCOD_NULL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -9174,10 +9217,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, "OUTPUCOD_NULL @warmelt-outobj.melt:1307", MELT_ROUTDESCR_LEN - 1); meltcdat->drout_165__OUTPUCOD_NULL.nbval = 1; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_165__OUTPUCOD_NULL, - meltrout_36_warmelt_outobj_OUTPUCOD_NULL); + meltrout_36_WARMELTmiOUTOBJ_OUTPUCOD_NULL); /*iniclos dclo_166__OUTPUCOD_NULL */ - /*_.VALCLO___V359*/ meltfptr[358] = + /*_._VALCLO___V359*/ meltfptr[358] = (melt_ptr_t) & meltcdat->dclo_166__OUTPUCOD_NULL; meltcdat->dclo_166__OUTPUCOD_NULL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -9185,8 +9228,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_167__DISCR_NULL_RECEIVER*/ - /*uniqueobj*/ if (! /*_.VALDATA___V360*/ meltfptr[359]) -/*_.VALDATA___V360*/ meltfptr[359] = + /*uniqueobj*/ if (! /*_._VALDATA___V360*/ meltfptr[359]) +/*_._VALDATA___V360*/ meltfptr[359] = (melt_ptr_t) & meltcdat->dsym_167__DISCR_NULL_RECEIVER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_167__DISCR_NULL_RECEIVER", @@ -9206,7 +9249,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_168__DISCR_NULL_RECEI*/ - /*_.VALSTR___V361*/ meltfptr[360] = + /*_._VALSTR___V361*/ meltfptr[360] = (melt_ptr_t) & meltcdat->dstr_168__DISCR_NULL_RECEI; meltcdat->dstr_168__DISCR_NULL_RECEI.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -9218,7 +9261,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_168__DISCR_NULL_RECEI.slen = 19; /*inirout drout_169__OUTPUCOD_CATCHALL_ROOT */ - /*_.VALROUT___V362*/ meltfptr[361] = + /*_._VALROUT___V362*/ meltfptr[361] = (melt_ptr_t) & meltcdat->drout_169__OUTPUCOD_CATCHALL_ROOT; meltcdat->drout_169__OUTPUCOD_CATCHALL_ROOT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -9227,10 +9270,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_ROUTDESCR_LEN - 1); meltcdat->drout_169__OUTPUCOD_CATCHALL_ROOT.nbval = 2; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_169__OUTPUCOD_CATCHALL_ROOT, - meltrout_37_warmelt_outobj_OUTPUCOD_CATCHALL_ROOT); + meltrout_37_WARMELTmiOUTOBJ_OUTPUCOD_CATCHALL_ROOT); /*iniclos dclo_170__OUTPUCOD_CATCHALL_ROOT */ - /*_.VALCLO___V363*/ meltfptr[362] = + /*_._VALCLO___V363*/ meltfptr[362] = (melt_ptr_t) & meltcdat->dclo_170__OUTPUCOD_CATCHALL_ROOT; meltcdat->dclo_170__OUTPUCOD_CATCHALL_ROOT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -9238,8 +9281,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_171__DISPLAY_DEBUG_MESSAGE*/ - /*uniqueobj*/ if (! /*_.VALDATA___V364*/ meltfptr[363]) -/*_.VALDATA___V364*/ meltfptr[363] = + /*uniqueobj*/ if (! /*_._VALDATA___V364*/ meltfptr[363]) +/*_._VALDATA___V364*/ meltfptr[363] = (melt_ptr_t) & meltcdat->dsym_171__DISPLAY_DEBUG_MESSAGE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg @@ -9259,7 +9302,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_172__DISPLAY_DEBUG_ME*/ - /*_.VALSTR___V365*/ meltfptr[364] = + /*_._VALSTR___V365*/ meltfptr[364] = (melt_ptr_t) & meltcdat->dstr_172__DISPLAY_DEBUG_ME; meltcdat->dstr_172__DISPLAY_DEBUG_ME.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -9271,7 +9314,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_172__DISPLAY_DEBUG_ME.slen = 21; /*inirout drout_173__OUTPUT_RAW_LOCATION */ - /*_.VALROUT___V264*/ meltfptr[263] = + /*_._VALROUT___V264*/ meltfptr[263] = (melt_ptr_t) & meltcdat->drout_173__OUTPUT_RAW_LOCATION; meltcdat->drout_173__OUTPUT_RAW_LOCATION.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -9280,10 +9323,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_ROUTDESCR_LEN - 1); meltcdat->drout_173__OUTPUT_RAW_LOCATION.nbval = 3; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_173__OUTPUT_RAW_LOCATION, - meltrout_38_warmelt_outobj_OUTPUT_RAW_LOCATION); + meltrout_38_WARMELTmiOUTOBJ_OUTPUT_RAW_LOCATION); /*iniclos dclo_174__OUTPUT_RAW_LOCATION */ - /*_.VALCLO___V263*/ meltfptr[262] = + /*_._VALCLO___V263*/ meltfptr[262] = (melt_ptr_t) & meltcdat->dclo_174__OUTPUT_RAW_LOCATION; meltcdat->dclo_174__OUTPUT_RAW_LOCATION.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -9291,8 +9334,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_175__PREVLOC_CONTAINER*/ - /*uniqueobj*/ if (! /*_.VALDATA___V366*/ meltfptr[365]) -/*_.VALDATA___V366*/ meltfptr[365] = + /*uniqueobj*/ if (! /*_._VALDATA___V366*/ meltfptr[365]) +/*_._VALDATA___V366*/ meltfptr[365] = (melt_ptr_t) & meltcdat->dsym_175__PREVLOC_CONTAINER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_175__PREVLOC_CONTAINER", @@ -9312,7 +9355,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_176__PREVLOC_CONTAINE*/ - /*_.VALSTR___V367*/ meltfptr[366] = + /*_._VALSTR___V367*/ meltfptr[366] = (melt_ptr_t) & meltcdat->dstr_176__PREVLOC_CONTAINE; meltcdat->dstr_176__PREVLOC_CONTAINE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -9326,7 +9369,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_LOCATION ("warmelt-outobj.melt:1373:/ iniobj"); /*iniobj dobj_177__PREVLOC_CONTAINER*/ -/*_.VALDATA___V261*/ meltfptr[260] = +/*_._VALDATA___V261*/ meltfptr[260] = (melt_ptr_t) & meltcdat->dobj_177__PREVLOC_CONTAINER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_177__PREVLOC_CONTAINER", @@ -9340,13 +9383,13 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); meltcdat->dobj_177__PREVLOC_CONTAINER.meltobj_class = (meltobject_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); - meltcdat->dobj_177__PREVLOC_CONTAINER.obj_hash = 624542949; + meltcdat->dobj_177__PREVLOC_CONTAINER.obj_hash = 554928930; meltcdat->dobj_177__PREVLOC_CONTAINER.obj_len = 1; /*iniobj dsym_178__PREVIMPLBUF_CONTAINER*/ - /*uniqueobj*/ if (! /*_.VALDATA___V368*/ meltfptr[367]) -/*_.VALDATA___V368*/ meltfptr[367] = + /*uniqueobj*/ if (! /*_._VALDATA___V368*/ meltfptr[367]) +/*_._VALDATA___V368*/ meltfptr[367] = (melt_ptr_t) & meltcdat->dsym_178__PREVIMPLBUF_CONTAINER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg @@ -9366,7 +9409,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_179__PREVIMPLBUF_CONT*/ - /*_.VALSTR___V369*/ meltfptr[368] = + /*_._VALSTR___V369*/ meltfptr[368] = (melt_ptr_t) & meltcdat->dstr_179__PREVIMPLBUF_CONT; meltcdat->dstr_179__PREVIMPLBUF_CONT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -9380,7 +9423,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_LOCATION ("warmelt-outobj.melt:1374:/ iniobj"); /*iniobj dobj_180__PREVIMPLBUF_CONTAINER*/ -/*_.VALDATA___V262*/ meltfptr[261] = +/*_._VALDATA___V262*/ meltfptr[261] = (melt_ptr_t) & meltcdat->dobj_180__PREVIMPLBUF_CONTAINER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg @@ -9395,11 +9438,11 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); meltcdat->dobj_180__PREVIMPLBUF_CONTAINER.meltobj_class = (meltobject_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); - meltcdat->dobj_180__PREVIMPLBUF_CONTAINER.obj_hash = 1045235132; + meltcdat->dobj_180__PREVIMPLBUF_CONTAINER.obj_hash = 724216036; meltcdat->dobj_180__PREVIMPLBUF_CONTAINER.obj_len = 1; /*inirout drout_181__LINE_AND_FILE_OF_LOCATION */ - /*_.VALROUT___V370*/ meltfptr[369] = + /*_._VALROUT___V370*/ meltfptr[369] = (melt_ptr_t) & meltcdat->drout_181__LINE_AND_FILE_OF_LOCATION; meltcdat->drout_181__LINE_AND_FILE_OF_LOCATION.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -9408,10 +9451,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_ROUTDESCR_LEN - 1); meltcdat->drout_181__LINE_AND_FILE_OF_LOCATION.nbval = 2; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_181__LINE_AND_FILE_OF_LOCATION, - meltrout_39_warmelt_outobj_LINE_AND_FILE_OF_LOCATION); + meltrout_39_WARMELTmiOUTOBJ_LINE_AND_FILE_OF_LOCATION); /*iniclos dclo_182__LINE_AND_FILE_OF_LOCATION */ - /*_.VALCLO___V371*/ meltfptr[370] = + /*_._VALCLO___V371*/ meltfptr[370] = (melt_ptr_t) & meltcdat->dclo_182__LINE_AND_FILE_OF_LOCATION; meltcdat->dclo_182__LINE_AND_FILE_OF_LOCATION.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -9419,8 +9462,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_183__DISCR_INTEGER*/ - /*uniqueobj*/ if (! /*_.VALDATA___V372*/ meltfptr[371]) -/*_.VALDATA___V372*/ meltfptr[371] = + /*uniqueobj*/ if (! /*_._VALDATA___V372*/ meltfptr[371]) +/*_._VALDATA___V372*/ meltfptr[371] = (melt_ptr_t) & meltcdat->dsym_183__DISCR_INTEGER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_183__DISCR_INTEGER", @@ -9440,7 +9483,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_184__DISCR_INTEGER*/ - /*_.VALSTR___V373*/ meltfptr[372] = + /*_._VALSTR___V373*/ meltfptr[372] = (melt_ptr_t) & meltcdat->dstr_184__DISCR_INTEGER; meltcdat->dstr_184__DISCR_INTEGER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -9453,8 +9496,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_185__DISCR_STRING*/ - /*uniqueobj*/ if (! /*_.VALDATA___V374*/ meltfptr[373]) -/*_.VALDATA___V374*/ meltfptr[373] = + /*uniqueobj*/ if (! /*_._VALDATA___V374*/ meltfptr[373]) +/*_._VALDATA___V374*/ meltfptr[373] = (melt_ptr_t) & meltcdat->dsym_185__DISCR_STRING; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_185__DISCR_STRING", @@ -9474,7 +9517,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_186__DISCR_STRING*/ - /*_.VALSTR___V375*/ meltfptr[374] = + /*_._VALSTR___V375*/ meltfptr[374] = (melt_ptr_t) & meltcdat->dstr_186__DISCR_STRING; meltcdat->dstr_186__DISCR_STRING.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -9486,7 +9529,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_186__DISCR_STRING.slen = 12; /*inirout drout_187__OUTPUT_LOCATION */ - /*_.VALROUT___V260*/ meltfptr[259] = + /*_._VALROUT___V260*/ meltfptr[259] = (melt_ptr_t) & meltcdat->drout_187__OUTPUT_LOCATION; meltcdat->drout_187__OUTPUT_LOCATION.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -9495,17 +9538,17 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_ROUTDESCR_LEN - 1); meltcdat->drout_187__OUTPUT_LOCATION.nbval = 6; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_187__OUTPUT_LOCATION, - meltrout_40_warmelt_outobj_OUTPUT_LOCATION); + meltrout_40_WARMELTmiOUTOBJ_OUTPUT_LOCATION); /*iniclos dclo_188__OUTPUT_LOCATION */ - /*_.VALCLO___V259*/ meltfptr[258] = + /*_._VALCLO___V259*/ meltfptr[258] = (melt_ptr_t) & meltcdat->dclo_188__OUTPUT_LOCATION; meltcdat->dclo_188__OUTPUT_LOCATION.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); meltcdat->dclo_188__OUTPUT_LOCATION.nbval = 0; /*inirout drout_189__OUTPUT_CURFRAME_DECLSTRUCT */ - /*_.VALROUT___V376*/ meltfptr[375] = + /*_._VALROUT___V376*/ meltfptr[375] = (melt_ptr_t) & meltcdat->drout_189__OUTPUT_CURFRAME_DECLSTRUCT; meltcdat->drout_189__OUTPUT_CURFRAME_DECLSTRUCT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -9514,10 +9557,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_ROUTDESCR_LEN - 1); meltcdat->drout_189__OUTPUT_CURFRAME_DECLSTRUCT.nbval = 11; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_189__OUTPUT_CURFRAME_DECLSTRUCT, - meltrout_41_warmelt_outobj_OUTPUT_CURFRAME_DECLSTRUCT); + meltrout_41_WARMELTmiOUTOBJ_OUTPUT_CURFRAME_DECLSTRUCT); /*iniclos dclo_190__OUTPUT_CURFRAME_DECLSTRUCT */ - /*_.VALCLO___V378*/ meltfptr[377] = + /*_._VALCLO___V378*/ meltfptr[377] = (melt_ptr_t) & meltcdat->dclo_190__OUTPUT_CURFRAME_DECLSTRUCT; meltcdat->dclo_190__OUTPUT_CURFRAME_DECLSTRUCT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -9525,8 +9568,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_191__CLASS_INITIAL_EXTENSION_ROUTINEOBJ*/ - /*uniqueobj*/ if (! /*_.VALDATA___V379*/ meltfptr[378]) -/*_.VALDATA___V379*/ meltfptr[378] = + /*uniqueobj*/ if (! /*_._VALDATA___V379*/ meltfptr[378]) +/*_._VALDATA___V379*/ meltfptr[378] = (melt_ptr_t) & meltcdat->dsym_191__CLASS_INITIAL_EXTENSION_ROUTINEOBJ; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg @@ -9547,7 +9590,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_192__CLASS_INITIAL_EX*/ - /*_.VALSTR___V380*/ meltfptr[379] = + /*_._VALSTR___V380*/ meltfptr[379] = (melt_ptr_t) & meltcdat->dstr_192__CLASS_INITIAL_EX; meltcdat->dstr_192__CLASS_INITIAL_EX.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -9560,8 +9603,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_193__CLASS_INITIALROUTINEOBJ*/ - /*uniqueobj*/ if (! /*_.VALDATA___V381*/ meltfptr[380]) -/*_.VALDATA___V381*/ meltfptr[380] = + /*uniqueobj*/ if (! /*_._VALDATA___V381*/ meltfptr[380]) +/*_._VALDATA___V381*/ meltfptr[380] = (melt_ptr_t) & meltcdat->dsym_193__CLASS_INITIALROUTINEOBJ; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg @@ -9581,7 +9624,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_194__CLASS_INITIALROU*/ - /*_.VALSTR___V382*/ meltfptr[381] = + /*_._VALSTR___V382*/ meltfptr[381] = (melt_ptr_t) & meltcdat->dstr_194__CLASS_INITIALROU; meltcdat->dstr_194__CLASS_INITIALROU.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -9594,8 +9637,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_195__LIST_EVERY*/ - /*uniqueobj*/ if (! /*_.VALDATA___V383*/ meltfptr[382]) -/*_.VALDATA___V383*/ meltfptr[382] = + /*uniqueobj*/ if (! /*_._VALDATA___V383*/ meltfptr[382]) +/*_._VALDATA___V383*/ meltfptr[382] = (melt_ptr_t) & meltcdat->dsym_195__LIST_EVERY; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_195__LIST_EVERY", @@ -9615,7 +9658,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_196__LIST_EVERY*/ - /*_.VALSTR___V384*/ meltfptr[383] = + /*_._VALSTR___V384*/ meltfptr[383] = (melt_ptr_t) & meltcdat->dstr_196__LIST_EVERY; meltcdat->dstr_196__LIST_EVERY.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -9627,7 +9670,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_196__LIST_EVERY.slen = 10; /*inirout drout_197__LAMBDA_ */ - /*_.VALROUT___V377*/ meltfptr[376] = + /*_._VALROUT___V377*/ meltfptr[376] = (melt_ptr_t) & meltcdat->drout_197__LAMBDA_; meltcdat->drout_197__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -9635,12 +9678,12 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, "LAMBDA_ @warmelt-outobj.melt:1559", MELT_ROUTDESCR_LEN - 1); meltcdat->drout_197__LAMBDA_.nbval = 5; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_197__LAMBDA_, - meltrout_42_warmelt_outobj_LAMBDA___2__); + meltrout_42_WARMELTmiOUTOBJ_LAMBDA___2__); /*iniobj dsym_198__CLASS_OBJLOCV*/ - /*uniqueobj*/ if (! /*_.VALDATA___V385*/ meltfptr[384]) -/*_.VALDATA___V385*/ meltfptr[384] = + /*uniqueobj*/ if (! /*_._VALDATA___V385*/ meltfptr[384]) +/*_._VALDATA___V385*/ meltfptr[384] = (melt_ptr_t) & meltcdat->dsym_198__CLASS_OBJLOCV; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_198__CLASS_OBJLOCV", @@ -9660,7 +9703,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_199__CLASS_OBJLOCV*/ - /*_.VALSTR___V386*/ meltfptr[385] = + /*_._VALSTR___V386*/ meltfptr[385] = (melt_ptr_t) & meltcdat->dstr_199__CLASS_OBJLOCV; meltcdat->dstr_199__CLASS_OBJLOCV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -9672,7 +9715,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_199__CLASS_OBJLOCV.slen = 13; /*inirout drout_200__OUTPUCOD_MARKER */ - /*_.VALROUT___V387*/ meltfptr[386] = + /*_._VALROUT___V387*/ meltfptr[386] = (melt_ptr_t) & meltcdat->drout_200__OUTPUCOD_MARKER; meltcdat->drout_200__OUTPUCOD_MARKER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -9681,10 +9724,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_ROUTDESCR_LEN - 1); meltcdat->drout_200__OUTPUCOD_MARKER.nbval = 12; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_200__OUTPUCOD_MARKER, - meltrout_43_warmelt_outobj_OUTPUCOD_MARKER); + meltrout_43_WARMELTmiOUTOBJ_OUTPUCOD_MARKER); /*iniclos dclo_201__OUTPUCOD_MARKER */ - /*_.VALCLO___V389*/ meltfptr[388] = + /*_._VALCLO___V389*/ meltfptr[388] = (melt_ptr_t) & meltcdat->dclo_201__OUTPUCOD_MARKER; meltcdat->dclo_201__OUTPUCOD_MARKER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -9692,8 +9735,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_202__CLASS_ROUTINEOBJ*/ - /*uniqueobj*/ if (! /*_.VALDATA___V390*/ meltfptr[389]) -/*_.VALDATA___V390*/ meltfptr[389] = + /*uniqueobj*/ if (! /*_._VALDATA___V390*/ meltfptr[389]) +/*_._VALDATA___V390*/ meltfptr[389] = (melt_ptr_t) & meltcdat->dsym_202__CLASS_ROUTINEOBJ; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_202__CLASS_ROUTINEOBJ", @@ -9713,7 +9756,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_203__CLASS_ROUTINEOBJ*/ - /*_.VALSTR___V391*/ meltfptr[390] = + /*_._VALSTR___V391*/ meltfptr[390] = (melt_ptr_t) & meltcdat->dstr_203__CLASS_ROUTINEOBJ; meltcdat->dstr_203__CLASS_ROUTINEOBJ.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -9726,8 +9769,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_204__CLASS_PROCROUTINEOBJ*/ - /*uniqueobj*/ if (! /*_.VALDATA___V392*/ meltfptr[391]) -/*_.VALDATA___V392*/ meltfptr[391] = + /*uniqueobj*/ if (! /*_._VALDATA___V392*/ meltfptr[391]) +/*_._VALDATA___V392*/ meltfptr[391] = (melt_ptr_t) & meltcdat->dsym_204__CLASS_PROCROUTINEOBJ; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_204__CLASS_PROCROUTINEOBJ", @@ -9747,7 +9790,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_205__CLASS_PROCROUTIN*/ - /*_.VALSTR___V393*/ meltfptr[392] = + /*_._VALSTR___V393*/ meltfptr[392] = (melt_ptr_t) & meltcdat->dstr_205__CLASS_PROCROUTIN; meltcdat->dstr_205__CLASS_PROCROUTIN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -9759,7 +9802,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_205__CLASS_PROCROUTIN.slen = 20; /*inirout drout_206__LAMBDA_ */ - /*_.VALROUT___V388*/ meltfptr[387] = + /*_._VALROUT___V388*/ meltfptr[387] = (melt_ptr_t) & meltcdat->drout_206__LAMBDA_; meltcdat->drout_206__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -9767,10 +9810,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, "LAMBDA_ @warmelt-outobj.melt:1611", MELT_ROUTDESCR_LEN - 1); meltcdat->drout_206__LAMBDA_.nbval = 6; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_206__LAMBDA_, - meltrout_44_warmelt_outobj_LAMBDA___3__); + meltrout_44_WARMELTmiOUTOBJ_LAMBDA___3__); /*inirout drout_207__OUTPUT_CURFRAME_DECLSTRUCT_INIT */ - /*_.VALROUT___V394*/ meltfptr[393] = + /*_._VALROUT___V394*/ meltfptr[393] = (melt_ptr_t) & meltcdat->drout_207__OUTPUT_CURFRAME_DECLSTRUCT_INIT; meltcdat->drout_207__OUTPUT_CURFRAME_DECLSTRUCT_INIT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -9780,10 +9823,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->drout_207__OUTPUT_CURFRAME_DECLSTRUCT_INIT.nbval = 11; MELT_ROUTINE_SET_ROUTCODE (&meltcdat-> drout_207__OUTPUT_CURFRAME_DECLSTRUCT_INIT, - meltrout_45_warmelt_outobj_OUTPUT_CURFRAME_DECLSTRUCT_INIT); + meltrout_45_WARMELTmiOUTOBJ_OUTPUT_CURFRAME_DECLSTRUCT_INIT); /*iniclos dclo_208__OUTPUT_CURFRAME_DECLSTRUCT_INIT */ - /*_.VALCLO___V395*/ meltfptr[394] = + /*_._VALCLO___V395*/ meltfptr[394] = (melt_ptr_t) & meltcdat->dclo_208__OUTPUT_CURFRAME_DECLSTRUCT_INIT; meltcdat->dclo_208__OUTPUT_CURFRAME_DECLSTRUCT_INIT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -9791,8 +9834,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_209__CLASS_HOOKROUTINEOBJ*/ - /*uniqueobj*/ if (! /*_.VALDATA___V396*/ meltfptr[395]) -/*_.VALDATA___V396*/ meltfptr[395] = + /*uniqueobj*/ if (! /*_._VALDATA___V396*/ meltfptr[395]) +/*_._VALDATA___V396*/ meltfptr[395] = (melt_ptr_t) & meltcdat->dsym_209__CLASS_HOOKROUTINEOBJ; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_209__CLASS_HOOKROUTINEOBJ", @@ -9812,7 +9855,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_210__CLASS_HOOKROUTIN*/ - /*_.VALSTR___V397*/ meltfptr[396] = + /*_._VALSTR___V397*/ meltfptr[396] = (melt_ptr_t) & meltcdat->dstr_210__CLASS_HOOKROUTIN; meltcdat->dstr_210__CLASS_HOOKROUTIN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -9824,7 +9867,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_210__CLASS_HOOKROUTIN.slen = 20; /*inirout drout_211__OUTPUCOD_PROCROUTINE */ - /*_.VALROUT___V398*/ meltfptr[397] = + /*_._VALROUT___V398*/ meltfptr[397] = (melt_ptr_t) & meltcdat->drout_211__OUTPUCOD_PROCROUTINE; meltcdat->drout_211__OUTPUCOD_PROCROUTINE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -9833,10 +9876,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_ROUTDESCR_LEN - 1); meltcdat->drout_211__OUTPUCOD_PROCROUTINE.nbval = 18; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_211__OUTPUCOD_PROCROUTINE, - meltrout_46_warmelt_outobj_OUTPUCOD_PROCROUTINE); + meltrout_46_WARMELTmiOUTOBJ_OUTPUCOD_PROCROUTINE); /*iniclos dclo_212__OUTPUCOD_PROCROUTINE */ - /*_.VALCLO___V401*/ meltfptr[400] = + /*_._VALCLO___V401*/ meltfptr[400] = (melt_ptr_t) & meltcdat->dclo_212__OUTPUCOD_PROCROUTINE; meltcdat->dclo_212__OUTPUCOD_PROCROUTINE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -9844,7 +9887,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_213__*/ - /*_.VALSTR___V399*/ meltfptr[398] = (melt_ptr_t) & meltcdat->dstr_213__; + /*_._VALSTR___V399*/ meltfptr[398] = (melt_ptr_t) & meltcdat->dstr_213__; meltcdat->dstr_213__.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (meltcdat->dstr_213__.val, "**", @@ -9854,8 +9897,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_214__VARIADIC_INDEX_IDSTR*/ - /*uniqueobj*/ if (! /*_.VALDATA___V402*/ meltfptr[401]) -/*_.VALDATA___V402*/ meltfptr[401] = + /*uniqueobj*/ if (! /*_._VALDATA___V402*/ meltfptr[401]) +/*_._VALDATA___V402*/ meltfptr[401] = (melt_ptr_t) & meltcdat->dsym_214__VARIADIC_INDEX_IDSTR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_214__VARIADIC_INDEX_IDSTR", @@ -9875,7 +9918,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_215__VARIADIC_INDEX_I*/ - /*_.VALSTR___V403*/ meltfptr[402] = + /*_._VALSTR___V403*/ meltfptr[402] = (melt_ptr_t) & meltcdat->dstr_215__VARIADIC_INDEX_I; meltcdat->dstr_215__VARIADIC_INDEX_I.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -9888,8 +9931,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_216__VARIADIC_LENGTH_IDSTR*/ - /*uniqueobj*/ if (! /*_.VALDATA___V404*/ meltfptr[403]) -/*_.VALDATA___V404*/ meltfptr[403] = + /*uniqueobj*/ if (! /*_._VALDATA___V404*/ meltfptr[403]) +/*_._VALDATA___V404*/ meltfptr[403] = (melt_ptr_t) & meltcdat->dsym_216__VARIADIC_LENGTH_IDSTR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg @@ -9909,7 +9952,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_217__VARIADIC_LENGTH_*/ - /*_.VALSTR___V405*/ meltfptr[404] = + /*_._VALSTR___V405*/ meltfptr[404] = (melt_ptr_t) & meltcdat->dstr_217__VARIADIC_LENGTH_; meltcdat->dstr_217__VARIADIC_LENGTH_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -9921,7 +9964,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_217__VARIADIC_LENGTH_.slen = 21; /*inirout drout_218__LAMBDA_ */ - /*_.VALROUT___V400*/ meltfptr[399] = + /*_._VALROUT___V400*/ meltfptr[399] = (melt_ptr_t) & meltcdat->drout_218__LAMBDA_; meltcdat->drout_218__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -9929,12 +9972,12 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, "LAMBDA_ @warmelt-outobj.melt:1893", MELT_ROUTDESCR_LEN - 1); meltcdat->drout_218__LAMBDA_.nbval = 4; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_218__LAMBDA_, - meltrout_47_warmelt_outobj_LAMBDA___4__); + meltrout_47_WARMELTmiOUTOBJ_LAMBDA___4__); /*iniobj dsym_219__CLASS_OBJPUREVALUE*/ - /*uniqueobj*/ if (! /*_.VALDATA___V406*/ meltfptr[405]) -/*_.VALDATA___V406*/ meltfptr[405] = + /*uniqueobj*/ if (! /*_._VALDATA___V406*/ meltfptr[405]) +/*_._VALDATA___V406*/ meltfptr[405] = (melt_ptr_t) & meltcdat->dsym_219__CLASS_OBJPUREVALUE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_219__CLASS_OBJPUREVALUE", @@ -9954,7 +9997,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_220__CLASS_OBJPUREVAL*/ - /*_.VALSTR___V407*/ meltfptr[406] = + /*_._VALSTR___V407*/ meltfptr[406] = (melt_ptr_t) & meltcdat->dstr_220__CLASS_OBJPUREVAL; meltcdat->dstr_220__CLASS_OBJPUREVAL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -9966,7 +10009,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_220__CLASS_OBJPUREVAL.slen = 18; /*inirout drout_221__OUTPUT_CURFRAME_CDAT_STRUCT */ - /*_.VALROUT___V408*/ meltfptr[407] = + /*_._VALROUT___V408*/ meltfptr[407] = (melt_ptr_t) & meltcdat->drout_221__OUTPUT_CURFRAME_CDAT_STRUCT; meltcdat->drout_221__OUTPUT_CURFRAME_CDAT_STRUCT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -9976,17 +10019,17 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->drout_221__OUTPUT_CURFRAME_CDAT_STRUCT.nbval = 4; MELT_ROUTINE_SET_ROUTCODE (&meltcdat-> drout_221__OUTPUT_CURFRAME_CDAT_STRUCT, - meltrout_48_warmelt_outobj_OUTPUT_CURFRAME_CDAT_STRUCT); + meltrout_48_WARMELTmiOUTOBJ_OUTPUT_CURFRAME_CDAT_STRUCT); /*iniclos dclo_222__OUTPUT_CURFRAME_CDAT_STRUCT */ - /*_.VALCLO___V409*/ meltfptr[408] = + /*_._VALCLO___V409*/ meltfptr[408] = (melt_ptr_t) & meltcdat->dclo_222__OUTPUT_CURFRAME_CDAT_STRUCT; meltcdat->dclo_222__OUTPUT_CURFRAME_CDAT_STRUCT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); meltcdat->dclo_222__OUTPUT_CURFRAME_CDAT_STRUCT.nbval = 0; /*inirout drout_223__OUTPUT_CURFRAME_CDAT_FILL */ - /*_.VALROUT___V410*/ meltfptr[409] = + /*_._VALROUT___V410*/ meltfptr[409] = (melt_ptr_t) & meltcdat->drout_223__OUTPUT_CURFRAME_CDAT_FILL; meltcdat->drout_223__OUTPUT_CURFRAME_CDAT_FILL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -9995,10 +10038,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_ROUTDESCR_LEN - 1); meltcdat->drout_223__OUTPUT_CURFRAME_CDAT_FILL.nbval = 7; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_223__OUTPUT_CURFRAME_CDAT_FILL, - meltrout_49_warmelt_outobj_OUTPUT_CURFRAME_CDAT_FILL); + meltrout_49_WARMELTmiOUTOBJ_OUTPUT_CURFRAME_CDAT_FILL); /*iniclos dclo_224__OUTPUT_CURFRAME_CDAT_FILL */ - /*_.VALCLO___V413*/ meltfptr[412] = + /*_._VALCLO___V413*/ meltfptr[412] = (melt_ptr_t) & meltcdat->dclo_224__OUTPUT_CURFRAME_CDAT_FILL; meltcdat->dclo_224__OUTPUT_CURFRAME_CDAT_FILL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -10006,7 +10049,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_225__meltcdat*/ - /*_.VALSTR___V411*/ meltfptr[410] = + /*_._VALSTR___V411*/ meltfptr[410] = (melt_ptr_t) & meltcdat->dstr_225__meltcdat; meltcdat->dstr_225__meltcdat.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -10018,7 +10061,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_226__meltcdat*/ - /*_.VALSTR___V412*/ meltfptr[411] = + /*_._VALSTR___V412*/ meltfptr[411] = (melt_ptr_t) & meltcdat->dstr_226__meltcdat; meltcdat->dstr_226__meltcdat.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -10029,7 +10072,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_226__meltcdat.slen = 8; /*inirout drout_227__OUTPUCOD_INITIALMODULEROUTINE */ - /*_.VALROUT___V414*/ meltfptr[413] = + /*_._VALROUT___V414*/ meltfptr[413] = (melt_ptr_t) & meltcdat->drout_227__OUTPUCOD_INITIALMODULEROUTINE; meltcdat->drout_227__OUTPUCOD_INITIALMODULEROUTINE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -10039,10 +10082,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->drout_227__OUTPUCOD_INITIALMODULEROUTINE.nbval = 22; MELT_ROUTINE_SET_ROUTCODE (&meltcdat-> drout_227__OUTPUCOD_INITIALMODULEROUTINE, - meltrout_50_warmelt_outobj_OUTPUCOD_INITIALMODULEROUTINE); + meltrout_50_WARMELTmiOUTOBJ_OUTPUCOD_INITIALMODULEROUTINE); /*iniclos dclo_228__OUTPUCOD_INITIALMODULEROUTINE */ - /*_.VALCLO___V416*/ meltfptr[415] = + /*_._VALCLO___V416*/ meltfptr[415] = (melt_ptr_t) & meltcdat->dclo_228__OUTPUCOD_INITIALMODULEROUTINE; meltcdat->dclo_228__OUTPUCOD_INITIALMODULEROUTINE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -10050,8 +10093,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_229__CLASS_INITIAL_MODULE_ROUTINEOBJ*/ - /*uniqueobj*/ if (! /*_.VALDATA___V417*/ meltfptr[416]) -/*_.VALDATA___V417*/ meltfptr[416] = + /*uniqueobj*/ if (! /*_._VALDATA___V417*/ meltfptr[416]) +/*_._VALDATA___V417*/ meltfptr[416] = (melt_ptr_t) & meltcdat->dsym_229__CLASS_INITIAL_MODULE_ROUTINEOBJ; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg @@ -10071,7 +10114,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_230__CLASS_INITIAL_MO*/ - /*_.VALSTR___V418*/ meltfptr[417] = + /*_._VALSTR___V418*/ meltfptr[417] = (melt_ptr_t) & meltcdat->dstr_230__CLASS_INITIAL_MO; meltcdat->dstr_230__CLASS_INITIAL_MO.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -10083,7 +10126,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_230__CLASS_INITIAL_MO.slen = 31; /*inirout drout_231__LAMBDA_ */ - /*_.VALROUT___V415*/ meltfptr[414] = + /*_._VALROUT___V415*/ meltfptr[414] = (melt_ptr_t) & meltcdat->drout_231__LAMBDA_; meltcdat->drout_231__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -10091,12 +10134,12 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, "LAMBDA_ @warmelt-outobj.melt:2163", MELT_ROUTDESCR_LEN - 1); meltcdat->drout_231__LAMBDA_.nbval = 0; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_231__LAMBDA_, - meltrout_51_warmelt_outobj_LAMBDA___5__); + meltrout_51_WARMELTmiOUTOBJ_LAMBDA___5__); /*iniobj dsym_232__DISCR_LIST*/ - /*uniqueobj*/ if (! /*_.VALDATA___V419*/ meltfptr[418]) -/*_.VALDATA___V419*/ meltfptr[418] = + /*uniqueobj*/ if (! /*_._VALDATA___V419*/ meltfptr[418]) +/*_._VALDATA___V419*/ meltfptr[418] = (melt_ptr_t) & meltcdat->dsym_232__DISCR_LIST; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_232__DISCR_LIST", @@ -10116,7 +10159,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_233__DISCR_LIST*/ - /*_.VALSTR___V420*/ meltfptr[419] = + /*_._VALSTR___V420*/ meltfptr[419] = (melt_ptr_t) & meltcdat->dstr_233__DISCR_LIST; meltcdat->dstr_233__DISCR_LIST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -10129,8 +10172,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_234__LIST_TO_MULTIPLE*/ - /*uniqueobj*/ if (! /*_.VALDATA___V421*/ meltfptr[420]) -/*_.VALDATA___V421*/ meltfptr[420] = + /*uniqueobj*/ if (! /*_._VALDATA___V421*/ meltfptr[420]) +/*_._VALDATA___V421*/ meltfptr[420] = (melt_ptr_t) & meltcdat->dsym_234__LIST_TO_MULTIPLE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_234__LIST_TO_MULTIPLE", @@ -10150,7 +10193,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_235__LIST_TO_MULTIPLE*/ - /*_.VALSTR___V422*/ meltfptr[421] = + /*_._VALSTR___V422*/ meltfptr[421] = (melt_ptr_t) & meltcdat->dstr_235__LIST_TO_MULTIPLE; meltcdat->dstr_235__LIST_TO_MULTIPLE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -10163,8 +10206,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_236__DISCR_MULTIPLE*/ - /*uniqueobj*/ if (! /*_.VALDATA___V423*/ meltfptr[422]) -/*_.VALDATA___V423*/ meltfptr[422] = + /*uniqueobj*/ if (! /*_._VALDATA___V423*/ meltfptr[422]) +/*_._VALDATA___V423*/ meltfptr[422] = (melt_ptr_t) & meltcdat->dsym_236__DISCR_MULTIPLE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_236__DISCR_MULTIPLE", @@ -10184,7 +10227,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_237__DISCR_MULTIPLE*/ - /*_.VALSTR___V424*/ meltfptr[423] = + /*_._VALSTR___V424*/ meltfptr[423] = (melt_ptr_t) & meltcdat->dstr_237__DISCR_MULTIPLE; meltcdat->dstr_237__DISCR_MULTIPLE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -10197,8 +10240,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_238__DISCR_STRBUF*/ - /*uniqueobj*/ if (! /*_.VALDATA___V425*/ meltfptr[424]) -/*_.VALDATA___V425*/ meltfptr[424] = + /*uniqueobj*/ if (! /*_._VALDATA___V425*/ meltfptr[424]) +/*_._VALDATA___V425*/ meltfptr[424] = (melt_ptr_t) & meltcdat->dsym_238__DISCR_STRBUF; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_238__DISCR_STRBUF", @@ -10218,7 +10261,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_239__DISCR_STRBUF*/ - /*_.VALSTR___V426*/ meltfptr[425] = + /*_._VALSTR___V426*/ meltfptr[425] = (melt_ptr_t) & meltcdat->dstr_239__DISCR_STRBUF; meltcdat->dstr_239__DISCR_STRBUF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -10231,8 +10274,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_240__CLASS_OBJINSTR*/ - /*uniqueobj*/ if (! /*_.VALDATA___V427*/ meltfptr[426]) -/*_.VALDATA___V427*/ meltfptr[426] = + /*uniqueobj*/ if (! /*_._VALDATA___V427*/ meltfptr[426]) +/*_._VALDATA___V427*/ meltfptr[426] = (melt_ptr_t) & meltcdat->dsym_240__CLASS_OBJINSTR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_240__CLASS_OBJINSTR", @@ -10252,7 +10295,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_241__CLASS_OBJINSTR*/ - /*_.VALSTR___V428*/ meltfptr[427] = + /*_._VALSTR___V428*/ meltfptr[427] = (melt_ptr_t) & meltcdat->dstr_241__CLASS_OBJINSTR; meltcdat->dstr_241__CLASS_OBJINSTR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -10264,7 +10307,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_241__CLASS_OBJINSTR.slen = 14; /*inirout drout_242__OUTPUT_CENTRALDECL_HOOKROUTINE */ - /*_.VALROUT___V429*/ meltfptr[428] = + /*_._VALROUT___V429*/ meltfptr[428] = (melt_ptr_t) & meltcdat->drout_242__OUTPUT_CENTRALDECL_HOOKROUTINE; meltcdat->drout_242__OUTPUT_CENTRALDECL_HOOKROUTINE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -10274,10 +10317,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->drout_242__OUTPUT_CENTRALDECL_HOOKROUTINE.nbval = 9; MELT_ROUTINE_SET_ROUTCODE (&meltcdat-> drout_242__OUTPUT_CENTRALDECL_HOOKROUTINE, - meltrout_52_warmelt_outobj_OUTPUT_CENTRALDECL_HOOKROUTINE); + meltrout_52_WARMELTmiOUTOBJ_OUTPUT_CENTRALDECL_HOOKROUTINE); /*iniclos dclo_243__OUTPUT_CENTRALDECL_HOOKROUTINE */ - /*_.VALCLO___V430*/ meltfptr[429] = + /*_._VALCLO___V430*/ meltfptr[429] = (melt_ptr_t) & meltcdat->dclo_243__OUTPUT_CENTRALDECL_HOOKROUTINE; meltcdat->dclo_243__OUTPUT_CENTRALDECL_HOOKROUTINE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -10285,8 +10328,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_244__CLASS_OBJCFORMAL*/ - /*uniqueobj*/ if (! /*_.VALDATA___V431*/ meltfptr[430]) -/*_.VALDATA___V431*/ meltfptr[430] = + /*uniqueobj*/ if (! /*_._VALDATA___V431*/ meltfptr[430]) +/*_._VALDATA___V431*/ meltfptr[430] = (melt_ptr_t) & meltcdat->dsym_244__CLASS_OBJCFORMAL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_244__CLASS_OBJCFORMAL", @@ -10306,7 +10349,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_245__CLASS_OBJCFORMAL*/ - /*_.VALSTR___V432*/ meltfptr[431] = + /*_._VALSTR___V432*/ meltfptr[431] = (melt_ptr_t) & meltcdat->dstr_245__CLASS_OBJCFORMAL; meltcdat->dstr_245__CLASS_OBJCFORMAL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -10318,7 +10361,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_245__CLASS_OBJCFORMAL.slen = 16; /*inirout drout_246__OUTPUCOD_HOOKROUTINE */ - /*_.VALROUT___V433*/ meltfptr[432] = + /*_._VALROUT___V433*/ meltfptr[432] = (melt_ptr_t) & meltcdat->drout_246__OUTPUCOD_HOOKROUTINE; meltcdat->drout_246__OUTPUCOD_HOOKROUTINE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -10327,17 +10370,17 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_ROUTDESCR_LEN - 1); meltcdat->drout_246__OUTPUCOD_HOOKROUTINE.nbval = 16; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_246__OUTPUCOD_HOOKROUTINE, - meltrout_53_warmelt_outobj_OUTPUCOD_HOOKROUTINE); + meltrout_53_WARMELTmiOUTOBJ_OUTPUCOD_HOOKROUTINE); /*iniclos dclo_247__OUTPUCOD_HOOKROUTINE */ - /*_.VALCLO___V434*/ meltfptr[433] = + /*_._VALCLO___V434*/ meltfptr[433] = (melt_ptr_t) & meltcdat->dclo_247__OUTPUCOD_HOOKROUTINE; meltcdat->dclo_247__OUTPUCOD_HOOKROUTINE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); meltcdat->dclo_247__OUTPUCOD_HOOKROUTINE.nbval = 0; /*inirout drout_248__OUTPUCOD_INITIALEXTENSIONROUTINE */ - /*_.VALROUT___V435*/ meltfptr[434] = + /*_._VALROUT___V435*/ meltfptr[434] = (melt_ptr_t) & meltcdat->drout_248__OUTPUCOD_INITIALEXTENSIONROUTINE; meltcdat->drout_248__OUTPUCOD_INITIALEXTENSIONROUTINE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -10347,17 +10390,17 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->drout_248__OUTPUCOD_INITIALEXTENSIONROUTINE.nbval = 19; MELT_ROUTINE_SET_ROUTCODE (&meltcdat-> drout_248__OUTPUCOD_INITIALEXTENSIONROUTINE, - meltrout_54_warmelt_outobj_OUTPUCOD_INITIALEXTENSIONROUTINE); + meltrout_54_WARMELTmiOUTOBJ_OUTPUCOD_INITIALEXTENSIONROUTINE); /*iniclos dclo_249__OUTPUCOD_INITIALEXTENSIONROUTINE */ - /*_.VALCLO___V437*/ meltfptr[436] = + /*_._VALCLO___V437*/ meltfptr[436] = (melt_ptr_t) & meltcdat->dclo_249__OUTPUCOD_INITIALEXTENSIONROUTINE; meltcdat->dclo_249__OUTPUCOD_INITIALEXTENSIONROUTINE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); meltcdat->dclo_249__OUTPUCOD_INITIALEXTENSIONROUTINE.nbval = 0; /*inirout drout_250__LAMBDA_ */ - /*_.VALROUT___V436*/ meltfptr[435] = + /*_._VALROUT___V436*/ meltfptr[435] = (melt_ptr_t) & meltcdat->drout_250__LAMBDA_; meltcdat->drout_250__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -10365,10 +10408,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, "LAMBDA_ @warmelt-outobj.melt:2726", MELT_ROUTDESCR_LEN - 1); meltcdat->drout_250__LAMBDA_.nbval = 1; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_250__LAMBDA_, - meltrout_55_warmelt_outobj_LAMBDA___6__); + meltrout_55_WARMELTmiOUTOBJ_LAMBDA___6__); /*inirout drout_251__OUTPUCOD_GETARG */ - /*_.VALROUT___V438*/ meltfptr[437] = + /*_._VALROUT___V438*/ meltfptr[437] = (melt_ptr_t) & meltcdat->drout_251__OUTPUCOD_GETARG; meltcdat->drout_251__OUTPUCOD_GETARG.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -10377,10 +10420,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_ROUTDESCR_LEN - 1); meltcdat->drout_251__OUTPUCOD_GETARG.nbval = 9; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_251__OUTPUCOD_GETARG, - meltrout_56_warmelt_outobj_OUTPUCOD_GETARG); + meltrout_56_WARMELTmiOUTOBJ_OUTPUCOD_GETARG); /*iniclos dclo_252__OUTPUCOD_GETARG */ - /*_.VALCLO___V439*/ meltfptr[438] = + /*_._VALCLO___V439*/ meltfptr[438] = (melt_ptr_t) & meltcdat->dclo_252__OUTPUCOD_GETARG; meltcdat->dclo_252__OUTPUCOD_GETARG.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -10388,8 +10431,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_253__CLASS_OBJGETARG*/ - /*uniqueobj*/ if (! /*_.VALDATA___V440*/ meltfptr[439]) -/*_.VALDATA___V440*/ meltfptr[439] = + /*uniqueobj*/ if (! /*_._VALDATA___V440*/ meltfptr[439]) +/*_._VALDATA___V440*/ meltfptr[439] = (melt_ptr_t) & meltcdat->dsym_253__CLASS_OBJGETARG; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_253__CLASS_OBJGETARG", @@ -10409,7 +10452,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_254__CLASS_OBJGETARG*/ - /*_.VALSTR___V441*/ meltfptr[440] = + /*_._VALSTR___V441*/ meltfptr[440] = (melt_ptr_t) & meltcdat->dstr_254__CLASS_OBJGETARG; meltcdat->dstr_254__CLASS_OBJGETARG.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -10422,8 +10465,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_255__CLASS_FORMAL_BINDING*/ - /*uniqueobj*/ if (! /*_.VALDATA___V442*/ meltfptr[441]) -/*_.VALDATA___V442*/ meltfptr[441] = + /*uniqueobj*/ if (! /*_._VALDATA___V442*/ meltfptr[441]) +/*_._VALDATA___V442*/ meltfptr[441] = (melt_ptr_t) & meltcdat->dsym_255__CLASS_FORMAL_BINDING; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_255__CLASS_FORMAL_BINDING", @@ -10443,7 +10486,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_256__CLASS_FORMAL_BIN*/ - /*_.VALSTR___V443*/ meltfptr[442] = + /*_._VALSTR___V443*/ meltfptr[442] = (melt_ptr_t) & meltcdat->dstr_256__CLASS_FORMAL_BIN; meltcdat->dstr_256__CLASS_FORMAL_BIN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -10455,7 +10498,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_256__CLASS_FORMAL_BIN.slen = 20; /*inirout drout_257__OUTPUCOD_GETARGREST */ - /*_.VALROUT___V444*/ meltfptr[443] = + /*_._VALROUT___V444*/ meltfptr[443] = (melt_ptr_t) & meltcdat->drout_257__OUTPUCOD_GETARGREST; meltcdat->drout_257__OUTPUCOD_GETARGREST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -10464,10 +10507,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_ROUTDESCR_LEN - 1); meltcdat->drout_257__OUTPUCOD_GETARGREST.nbval = 11; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_257__OUTPUCOD_GETARGREST, - meltrout_57_warmelt_outobj_OUTPUCOD_GETARGREST); + meltrout_57_WARMELTmiOUTOBJ_OUTPUCOD_GETARGREST); /*iniclos dclo_258__OUTPUCOD_GETARGREST */ - /*_.VALCLO___V445*/ meltfptr[444] = + /*_._VALCLO___V445*/ meltfptr[444] = (melt_ptr_t) & meltcdat->dclo_258__OUTPUCOD_GETARGREST; meltcdat->dclo_258__OUTPUCOD_GETARGREST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -10475,8 +10518,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_259__CLASS_OBJGETARGREST*/ - /*uniqueobj*/ if (! /*_.VALDATA___V446*/ meltfptr[445]) -/*_.VALDATA___V446*/ meltfptr[445] = + /*uniqueobj*/ if (! /*_._VALDATA___V446*/ meltfptr[445]) +/*_._VALDATA___V446*/ meltfptr[445] = (melt_ptr_t) & meltcdat->dsym_259__CLASS_OBJGETARGREST; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_259__CLASS_OBJGETARGREST", @@ -10496,7 +10539,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_260__CLASS_OBJGETARGR*/ - /*_.VALSTR___V447*/ meltfptr[446] = + /*_._VALSTR___V447*/ meltfptr[446] = (melt_ptr_t) & meltcdat->dstr_260__CLASS_OBJGETARGR; meltcdat->dstr_260__CLASS_OBJGETARGR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -10508,7 +10551,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_260__CLASS_OBJGETARGR.slen = 19; /*inirout drout_261__OUTPUCOD_OBJCFORMAL */ - /*_.VALROUT___V448*/ meltfptr[447] = + /*_._VALROUT___V448*/ meltfptr[447] = (melt_ptr_t) & meltcdat->drout_261__OUTPUCOD_OBJCFORMAL; meltcdat->drout_261__OUTPUCOD_OBJCFORMAL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -10517,17 +10560,17 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_ROUTDESCR_LEN - 1); meltcdat->drout_261__OUTPUCOD_OBJCFORMAL.nbval = 2; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_261__OUTPUCOD_OBJCFORMAL, - meltrout_58_warmelt_outobj_OUTPUCOD_OBJCFORMAL); + meltrout_58_WARMELTmiOUTOBJ_OUTPUCOD_OBJCFORMAL); /*iniclos dclo_262__OUTPUCOD_OBJCFORMAL */ - /*_.VALCLO___V449*/ meltfptr[448] = + /*_._VALCLO___V449*/ meltfptr[448] = (melt_ptr_t) & meltcdat->dclo_262__OUTPUCOD_OBJCFORMAL; meltcdat->dclo_262__OUTPUCOD_OBJCFORMAL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); meltcdat->dclo_262__OUTPUCOD_OBJCFORMAL.nbval = 0; /*inirout drout_263__OUTPUCOD_OBJFETCHMODVAR */ - /*_.VALROUT___V450*/ meltfptr[449] = + /*_._VALROUT___V450*/ meltfptr[449] = (melt_ptr_t) & meltcdat->drout_263__OUTPUCOD_OBJFETCHMODVAR; meltcdat->drout_263__OUTPUCOD_OBJFETCHMODVAR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -10536,10 +10579,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_ROUTDESCR_LEN - 1); meltcdat->drout_263__OUTPUCOD_OBJFETCHMODVAR.nbval = 5; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_263__OUTPUCOD_OBJFETCHMODVAR, - meltrout_59_warmelt_outobj_OUTPUCOD_OBJFETCHMODVAR); + meltrout_59_WARMELTmiOUTOBJ_OUTPUCOD_OBJFETCHMODVAR); /*iniclos dclo_264__OUTPUCOD_OBJFETCHMODVAR */ - /*_.VALCLO___V451*/ meltfptr[450] = + /*_._VALCLO___V451*/ meltfptr[450] = (melt_ptr_t) & meltcdat->dclo_264__OUTPUCOD_OBJFETCHMODVAR; meltcdat->dclo_264__OUTPUCOD_OBJFETCHMODVAR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -10547,8 +10590,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_265__CLASS_OBJFETCHMODVAR*/ - /*uniqueobj*/ if (! /*_.VALDATA___V452*/ meltfptr[451]) -/*_.VALDATA___V452*/ meltfptr[451] = + /*uniqueobj*/ if (! /*_._VALDATA___V452*/ meltfptr[451]) +/*_._VALDATA___V452*/ meltfptr[451] = (melt_ptr_t) & meltcdat->dsym_265__CLASS_OBJFETCHMODVAR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_265__CLASS_OBJFETCHMODVAR", @@ -10568,7 +10611,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_266__CLASS_OBJFETCHMO*/ - /*_.VALSTR___V453*/ meltfptr[452] = + /*_._VALSTR___V453*/ meltfptr[452] = (melt_ptr_t) & meltcdat->dstr_266__CLASS_OBJFETCHMO; meltcdat->dstr_266__CLASS_OBJFETCHMO.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -10580,7 +10623,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_266__CLASS_OBJFETCHMO.slen = 20; /*inirout drout_267__OUTPUCOD_OBJPUTMODVAR */ - /*_.VALROUT___V454*/ meltfptr[453] = + /*_._VALROUT___V454*/ meltfptr[453] = (melt_ptr_t) & meltcdat->drout_267__OUTPUCOD_OBJPUTMODVAR; meltcdat->drout_267__OUTPUCOD_OBJPUTMODVAR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -10589,10 +10632,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_ROUTDESCR_LEN - 1); meltcdat->drout_267__OUTPUCOD_OBJPUTMODVAR.nbval = 8; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_267__OUTPUCOD_OBJPUTMODVAR, - meltrout_60_warmelt_outobj_OUTPUCOD_OBJPUTMODVAR); + meltrout_60_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTMODVAR); /*iniclos dclo_268__OUTPUCOD_OBJPUTMODVAR */ - /*_.VALCLO___V455*/ meltfptr[454] = + /*_._VALCLO___V455*/ meltfptr[454] = (melt_ptr_t) & meltcdat->dclo_268__OUTPUCOD_OBJPUTMODVAR; meltcdat->dclo_268__OUTPUCOD_OBJPUTMODVAR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -10600,8 +10643,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_269__CLASS_OBJPUTMODVAR*/ - /*uniqueobj*/ if (! /*_.VALDATA___V456*/ meltfptr[455]) -/*_.VALDATA___V456*/ meltfptr[455] = + /*uniqueobj*/ if (! /*_._VALDATA___V456*/ meltfptr[455]) +/*_._VALDATA___V456*/ meltfptr[455] = (melt_ptr_t) & meltcdat->dsym_269__CLASS_OBJPUTMODVAR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_269__CLASS_OBJPUTMODVAR", @@ -10621,7 +10664,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_270__CLASS_OBJPUTMODV*/ - /*_.VALSTR___V457*/ meltfptr[456] = + /*_._VALSTR___V457*/ meltfptr[456] = (melt_ptr_t) & meltcdat->dstr_270__CLASS_OBJPUTMODV; meltcdat->dstr_270__CLASS_OBJPUTMODV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -10633,7 +10676,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_270__CLASS_OBJPUTMODV.slen = 18; /*inirout drout_271__OUTPUCOD_OBJPUTOUTARG */ - /*_.VALROUT___V458*/ meltfptr[457] = + /*_._VALROUT___V458*/ meltfptr[457] = (melt_ptr_t) & meltcdat->drout_271__OUTPUCOD_OBJPUTOUTARG; meltcdat->drout_271__OUTPUCOD_OBJPUTOUTARG.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -10642,10 +10685,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_ROUTDESCR_LEN - 1); meltcdat->drout_271__OUTPUCOD_OBJPUTOUTARG.nbval = 8; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_271__OUTPUCOD_OBJPUTOUTARG, - meltrout_61_warmelt_outobj_OUTPUCOD_OBJPUTOUTARG); + meltrout_61_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTOUTARG); /*iniclos dclo_272__OUTPUCOD_OBJPUTOUTARG */ - /*_.VALCLO___V459*/ meltfptr[458] = + /*_._VALCLO___V459*/ meltfptr[458] = (melt_ptr_t) & meltcdat->dclo_272__OUTPUCOD_OBJPUTOUTARG; meltcdat->dclo_272__OUTPUCOD_OBJPUTOUTARG.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -10653,8 +10696,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_273__CLASS_OBJPUTOUTARG*/ - /*uniqueobj*/ if (! /*_.VALDATA___V460*/ meltfptr[459]) -/*_.VALDATA___V460*/ meltfptr[459] = + /*uniqueobj*/ if (! /*_._VALDATA___V460*/ meltfptr[459]) +/*_._VALDATA___V460*/ meltfptr[459] = (melt_ptr_t) & meltcdat->dsym_273__CLASS_OBJPUTOUTARG; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_273__CLASS_OBJPUTOUTARG", @@ -10674,7 +10717,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_274__CLASS_OBJPUTOUTA*/ - /*_.VALSTR___V461*/ meltfptr[460] = + /*_._VALSTR___V461*/ meltfptr[460] = (melt_ptr_t) & meltcdat->dstr_274__CLASS_OBJPUTOUTA; meltcdat->dstr_274__CLASS_OBJPUTOUTA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -10686,7 +10729,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_274__CLASS_OBJPUTOUTA.slen = 18; /*inirout drout_275__OUTPUCOD_OBJLOCV */ - /*_.VALROUT___V462*/ meltfptr[461] = + /*_._VALROUT___V462*/ meltfptr[461] = (melt_ptr_t) & meltcdat->drout_275__OUTPUCOD_OBJLOCV; meltcdat->drout_275__OUTPUCOD_OBJLOCV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -10695,10 +10738,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_ROUTDESCR_LEN - 1); meltcdat->drout_275__OUTPUCOD_OBJLOCV.nbval = 5; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_275__OUTPUCOD_OBJLOCV, - meltrout_62_warmelt_outobj_OUTPUCOD_OBJLOCV); + meltrout_62_WARMELTmiOUTOBJ_OUTPUCOD_OBJLOCV); /*iniclos dclo_276__OUTPUCOD_OBJLOCV */ - /*_.VALCLO___V463*/ meltfptr[462] = + /*_._VALCLO___V463*/ meltfptr[462] = (melt_ptr_t) & meltcdat->dclo_276__OUTPUCOD_OBJLOCV; meltcdat->dclo_276__OUTPUCOD_OBJLOCV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -10706,8 +10749,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_277__CTYPE_LONG*/ - /*uniqueobj*/ if (! /*_.VALDATA___V464*/ meltfptr[463]) -/*_.VALDATA___V464*/ meltfptr[463] = + /*uniqueobj*/ if (! /*_._VALDATA___V464*/ meltfptr[463]) +/*_._VALDATA___V464*/ meltfptr[463] = (melt_ptr_t) & meltcdat->dsym_277__CTYPE_LONG; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_277__CTYPE_LONG", @@ -10727,7 +10770,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_278__CTYPE_LONG*/ - /*_.VALSTR___V465*/ meltfptr[464] = + /*_._VALSTR___V465*/ meltfptr[464] = (melt_ptr_t) & meltcdat->dstr_278__CTYPE_LONG; meltcdat->dstr_278__CTYPE_LONG.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -10739,7 +10782,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_278__CTYPE_LONG.slen = 10; /*inirout drout_279__OUTPUCOD_OBJCLOCCV */ - /*_.VALROUT___V466*/ meltfptr[465] = + /*_._VALROUT___V466*/ meltfptr[465] = (melt_ptr_t) & meltcdat->drout_279__OUTPUCOD_OBJCLOCCV; meltcdat->drout_279__OUTPUCOD_OBJCLOCCV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -10748,10 +10791,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_ROUTDESCR_LEN - 1); meltcdat->drout_279__OUTPUCOD_OBJCLOCCV.nbval = 4; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_279__OUTPUCOD_OBJCLOCCV, - meltrout_63_warmelt_outobj_OUTPUCOD_OBJCLOCCV); + meltrout_63_WARMELTmiOUTOBJ_OUTPUCOD_OBJCLOCCV); /*iniclos dclo_280__OUTPUCOD_OBJCLOCCV */ - /*_.VALCLO___V467*/ meltfptr[466] = + /*_._VALCLO___V467*/ meltfptr[466] = (melt_ptr_t) & meltcdat->dclo_280__OUTPUCOD_OBJCLOCCV; meltcdat->dclo_280__OUTPUCOD_OBJCLOCCV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -10759,8 +10802,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_281__CLASS_OBJCLOCCV*/ - /*uniqueobj*/ if (! /*_.VALDATA___V468*/ meltfptr[467]) -/*_.VALDATA___V468*/ meltfptr[467] = + /*uniqueobj*/ if (! /*_._VALDATA___V468*/ meltfptr[467]) +/*_._VALDATA___V468*/ meltfptr[467] = (melt_ptr_t) & meltcdat->dsym_281__CLASS_OBJCLOCCV; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_281__CLASS_OBJCLOCCV", @@ -10780,7 +10823,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_282__CLASS_OBJCLOCCV*/ - /*_.VALSTR___V469*/ meltfptr[468] = + /*_._VALSTR___V469*/ meltfptr[468] = (melt_ptr_t) & meltcdat->dstr_282__CLASS_OBJCLOCCV; meltcdat->dstr_282__CLASS_OBJCLOCCV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -10792,7 +10835,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_282__CLASS_OBJCLOCCV.slen = 15; /*inirout drout_283__OUTPUCOD_OBJCLOHOOKV */ - /*_.VALROUT___V470*/ meltfptr[469] = + /*_._VALROUT___V470*/ meltfptr[469] = (melt_ptr_t) & meltcdat->drout_283__OUTPUCOD_OBJCLOHOOKV; meltcdat->drout_283__OUTPUCOD_OBJCLOHOOKV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -10801,10 +10844,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_ROUTDESCR_LEN - 1); meltcdat->drout_283__OUTPUCOD_OBJCLOHOOKV.nbval = 5; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_283__OUTPUCOD_OBJCLOHOOKV, - meltrout_64_warmelt_outobj_OUTPUCOD_OBJCLOHOOKV); + meltrout_64_WARMELTmiOUTOBJ_OUTPUCOD_OBJCLOHOOKV); /*iniclos dclo_284__OUTPUCOD_OBJCLOHOOKV */ - /*_.VALCLO___V471*/ meltfptr[470] = + /*_._VALCLO___V471*/ meltfptr[470] = (melt_ptr_t) & meltcdat->dclo_284__OUTPUCOD_OBJCLOHOOKV; meltcdat->dclo_284__OUTPUCOD_OBJCLOHOOKV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -10812,8 +10855,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_285__CLASS_OBJCLOHOOKV*/ - /*uniqueobj*/ if (! /*_.VALDATA___V472*/ meltfptr[471]) -/*_.VALDATA___V472*/ meltfptr[471] = + /*uniqueobj*/ if (! /*_._VALDATA___V472*/ meltfptr[471]) +/*_._VALDATA___V472*/ meltfptr[471] = (melt_ptr_t) & meltcdat->dsym_285__CLASS_OBJCLOHOOKV; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_285__CLASS_OBJCLOHOOKV", @@ -10833,7 +10876,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_286__CLASS_OBJCLOHOOK*/ - /*_.VALSTR___V473*/ meltfptr[472] = + /*_._VALSTR___V473*/ meltfptr[472] = (melt_ptr_t) & meltcdat->dstr_286__CLASS_OBJCLOHOOK; meltcdat->dstr_286__CLASS_OBJCLOHOOK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -10845,7 +10888,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_286__CLASS_OBJCLOHOOK.slen = 17; /*inirout drout_287__OUTPUCOD_OBJCONSTV */ - /*_.VALROUT___V474*/ meltfptr[473] = + /*_._VALROUT___V474*/ meltfptr[473] = (melt_ptr_t) & meltcdat->drout_287__OUTPUCOD_OBJCONSTV; meltcdat->drout_287__OUTPUCOD_OBJCONSTV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -10854,10 +10897,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_ROUTDESCR_LEN - 1); meltcdat->drout_287__OUTPUCOD_OBJCONSTV.nbval = 4; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_287__OUTPUCOD_OBJCONSTV, - meltrout_65_warmelt_outobj_OUTPUCOD_OBJCONSTV); + meltrout_65_WARMELTmiOUTOBJ_OUTPUCOD_OBJCONSTV); /*iniclos dclo_288__OUTPUCOD_OBJCONSTV */ - /*_.VALCLO___V475*/ meltfptr[474] = + /*_._VALCLO___V475*/ meltfptr[474] = (melt_ptr_t) & meltcdat->dclo_288__OUTPUCOD_OBJCONSTV; meltcdat->dclo_288__OUTPUCOD_OBJCONSTV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -10865,8 +10908,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_289__CLASS_OBJCONSTV*/ - /*uniqueobj*/ if (! /*_.VALDATA___V476*/ meltfptr[475]) -/*_.VALDATA___V476*/ meltfptr[475] = + /*uniqueobj*/ if (! /*_._VALDATA___V476*/ meltfptr[475]) +/*_._VALDATA___V476*/ meltfptr[475] = (melt_ptr_t) & meltcdat->dsym_289__CLASS_OBJCONSTV; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_289__CLASS_OBJCONSTV", @@ -10886,7 +10929,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_290__CLASS_OBJCONSTV*/ - /*_.VALSTR___V477*/ meltfptr[476] = + /*_._VALSTR___V477*/ meltfptr[476] = (melt_ptr_t) & meltcdat->dstr_290__CLASS_OBJCONSTV; meltcdat->dstr_290__CLASS_OBJCONSTV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -10898,7 +10941,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_290__CLASS_OBJCONSTV.slen = 15; /*inirout drout_291__OUTPUT_CODE_INSTRUCTIONS_LIST */ - /*_.VALROUT___V478*/ meltfptr[477] = + /*_._VALROUT___V478*/ meltfptr[477] = (melt_ptr_t) & meltcdat->drout_291__OUTPUT_CODE_INSTRUCTIONS_LIST; meltcdat->drout_291__OUTPUT_CODE_INSTRUCTIONS_LIST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -10908,10 +10951,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->drout_291__OUTPUT_CODE_INSTRUCTIONS_LIST.nbval = 7; MELT_ROUTINE_SET_ROUTCODE (&meltcdat-> drout_291__OUTPUT_CODE_INSTRUCTIONS_LIST, - meltrout_66_warmelt_outobj_OUTPUT_CODE_INSTRUCTIONS_LIST); + meltrout_66_WARMELTmiOUTOBJ_OUTPUT_CODE_INSTRUCTIONS_LIST); /*iniclos dclo_292__OUTPUT_CODE_INSTRUCTIONS_LIST */ - /*_.VALCLO___V479*/ meltfptr[478] = + /*_._VALCLO___V479*/ meltfptr[478] = (melt_ptr_t) & meltcdat->dclo_292__OUTPUT_CODE_INSTRUCTIONS_LIST; meltcdat->dclo_292__OUTPUT_CODE_INSTRUCTIONS_LIST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -10919,8 +10962,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_293__CLASS_OBJPLAINBLOCK*/ - /*uniqueobj*/ if (! /*_.VALDATA___V480*/ meltfptr[479]) -/*_.VALDATA___V480*/ meltfptr[479] = + /*uniqueobj*/ if (! /*_._VALDATA___V480*/ meltfptr[479]) +/*_._VALDATA___V480*/ meltfptr[479] = (melt_ptr_t) & meltcdat->dsym_293__CLASS_OBJPLAINBLOCK; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_293__CLASS_OBJPLAINBLOCK", @@ -10940,7 +10983,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_294__CLASS_OBJPLAINBL*/ - /*_.VALSTR___V481*/ meltfptr[480] = + /*_._VALSTR___V481*/ meltfptr[480] = (melt_ptr_t) & meltcdat->dstr_294__CLASS_OBJPLAINBL; meltcdat->dstr_294__CLASS_OBJPLAINBL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -10952,7 +10995,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_294__CLASS_OBJPLAINBL.slen = 19; /*inirout drout_295__OUTPUCOD_OBJCHECKSIGNAL */ - /*_.VALROUT___V482*/ meltfptr[481] = + /*_._VALROUT___V482*/ meltfptr[481] = (melt_ptr_t) & meltcdat->drout_295__OUTPUCOD_OBJCHECKSIGNAL; meltcdat->drout_295__OUTPUCOD_OBJCHECKSIGNAL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -10961,10 +11004,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_ROUTDESCR_LEN - 1); meltcdat->drout_295__OUTPUCOD_OBJCHECKSIGNAL.nbval = 3; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_295__OUTPUCOD_OBJCHECKSIGNAL, - meltrout_67_warmelt_outobj_OUTPUCOD_OBJCHECKSIGNAL); + meltrout_67_WARMELTmiOUTOBJ_OUTPUCOD_OBJCHECKSIGNAL); /*iniclos dclo_296__OUTPUCOD_OBJCHECKSIGNAL */ - /*_.VALCLO___V483*/ meltfptr[482] = + /*_._VALCLO___V483*/ meltfptr[482] = (melt_ptr_t) & meltcdat->dclo_296__OUTPUCOD_OBJCHECKSIGNAL; meltcdat->dclo_296__OUTPUCOD_OBJCHECKSIGNAL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -10972,8 +11015,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_297__CLASS_OBJCHECKSIGNAL*/ - /*uniqueobj*/ if (! /*_.VALDATA___V484*/ meltfptr[483]) -/*_.VALDATA___V484*/ meltfptr[483] = + /*uniqueobj*/ if (! /*_._VALDATA___V484*/ meltfptr[483]) +/*_._VALDATA___V484*/ meltfptr[483] = (melt_ptr_t) & meltcdat->dsym_297__CLASS_OBJCHECKSIGNAL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_297__CLASS_OBJCHECKSIGNAL", @@ -10993,7 +11036,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_298__CLASS_OBJCHECKSI*/ - /*_.VALSTR___V485*/ meltfptr[484] = + /*_._VALSTR___V485*/ meltfptr[484] = (melt_ptr_t) & meltcdat->dstr_298__CLASS_OBJCHECKSI; meltcdat->dstr_298__CLASS_OBJCHECKSI.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -11005,7 +11048,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_298__CLASS_OBJCHECKSI.slen = 20; /*inirout drout_299__OUTPUCOD_OBJANYBLOCK */ - /*_.VALROUT___V486*/ meltfptr[485] = + /*_._VALROUT___V486*/ meltfptr[485] = (melt_ptr_t) & meltcdat->drout_299__OUTPUCOD_OBJANYBLOCK; meltcdat->drout_299__OUTPUCOD_OBJANYBLOCK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -11014,10 +11057,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_ROUTDESCR_LEN - 1); meltcdat->drout_299__OUTPUCOD_OBJANYBLOCK.nbval = 6; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_299__OUTPUCOD_OBJANYBLOCK, - meltrout_68_warmelt_outobj_OUTPUCOD_OBJANYBLOCK); + meltrout_68_WARMELTmiOUTOBJ_OUTPUCOD_OBJANYBLOCK); /*iniclos dclo_300__OUTPUCOD_OBJANYBLOCK */ - /*_.VALCLO___V487*/ meltfptr[486] = + /*_._VALCLO___V487*/ meltfptr[486] = (melt_ptr_t) & meltcdat->dclo_300__OUTPUCOD_OBJANYBLOCK; meltcdat->dclo_300__OUTPUCOD_OBJANYBLOCK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -11025,8 +11068,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_301__CLASS_OBJANYBLOCK*/ - /*uniqueobj*/ if (! /*_.VALDATA___V488*/ meltfptr[487]) -/*_.VALDATA___V488*/ meltfptr[487] = + /*uniqueobj*/ if (! /*_._VALDATA___V488*/ meltfptr[487]) +/*_._VALDATA___V488*/ meltfptr[487] = (melt_ptr_t) & meltcdat->dsym_301__CLASS_OBJANYBLOCK; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_301__CLASS_OBJANYBLOCK", @@ -11046,7 +11089,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_302__CLASS_OBJANYBLOC*/ - /*_.VALSTR___V489*/ meltfptr[488] = + /*_._VALSTR___V489*/ meltfptr[488] = (melt_ptr_t) & meltcdat->dstr_302__CLASS_OBJANYBLOC; meltcdat->dstr_302__CLASS_OBJANYBLOC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -11058,7 +11101,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_302__CLASS_OBJANYBLOC.slen = 17; /*inirout drout_303__OUTPUCOD_OBJFLAG */ - /*_.VALROUT___V490*/ meltfptr[489] = + /*_._VALROUT___V490*/ meltfptr[489] = (melt_ptr_t) & meltcdat->drout_303__OUTPUCOD_OBJFLAG; meltcdat->drout_303__OUTPUCOD_OBJFLAG.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -11067,10 +11110,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_ROUTDESCR_LEN - 1); meltcdat->drout_303__OUTPUCOD_OBJFLAG.nbval = 3; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_303__OUTPUCOD_OBJFLAG, - meltrout_69_warmelt_outobj_OUTPUCOD_OBJFLAG); + meltrout_69_WARMELTmiOUTOBJ_OUTPUCOD_OBJFLAG); /*iniclos dclo_304__OUTPUCOD_OBJFLAG */ - /*_.VALCLO___V491*/ meltfptr[490] = + /*_._VALCLO___V491*/ meltfptr[490] = (melt_ptr_t) & meltcdat->dclo_304__OUTPUCOD_OBJFLAG; meltcdat->dclo_304__OUTPUCOD_OBJFLAG.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -11078,8 +11121,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_305__CLASS_OBJFLAG*/ - /*uniqueobj*/ if (! /*_.VALDATA___V492*/ meltfptr[491]) -/*_.VALDATA___V492*/ meltfptr[491] = + /*uniqueobj*/ if (! /*_._VALDATA___V492*/ meltfptr[491]) +/*_._VALDATA___V492*/ meltfptr[491] = (melt_ptr_t) & meltcdat->dsym_305__CLASS_OBJFLAG; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_305__CLASS_OBJFLAG", @@ -11099,7 +11142,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_306__CLASS_OBJFLAG*/ - /*_.VALSTR___V493*/ meltfptr[492] = + /*_._VALSTR___V493*/ meltfptr[492] = (melt_ptr_t) & meltcdat->dstr_306__CLASS_OBJFLAG; meltcdat->dstr_306__CLASS_OBJFLAG.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -11111,7 +11154,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_306__CLASS_OBJFLAG.slen = 13; /*inirout drout_307__OUTPUCOD_OBJMATCHFLAGBLOCK */ - /*_.VALROUT___V494*/ meltfptr[493] = + /*_._VALROUT___V494*/ meltfptr[493] = (melt_ptr_t) & meltcdat->drout_307__OUTPUCOD_OBJMATCHFLAGBLOCK; meltcdat->drout_307__OUTPUCOD_OBJMATCHFLAGBLOCK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -11120,10 +11163,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_ROUTDESCR_LEN - 1); meltcdat->drout_307__OUTPUCOD_OBJMATCHFLAGBLOCK.nbval = 8; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_307__OUTPUCOD_OBJMATCHFLAGBLOCK, - meltrout_70_warmelt_outobj_OUTPUCOD_OBJMATCHFLAGBLOCK); + meltrout_70_WARMELTmiOUTOBJ_OUTPUCOD_OBJMATCHFLAGBLOCK); /*iniclos dclo_308__OUTPUCOD_OBJMATCHFLAGBLOCK */ - /*_.VALCLO___V495*/ meltfptr[494] = + /*_._VALCLO___V495*/ meltfptr[494] = (melt_ptr_t) & meltcdat->dclo_308__OUTPUCOD_OBJMATCHFLAGBLOCK; meltcdat->dclo_308__OUTPUCOD_OBJMATCHFLAGBLOCK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -11131,8 +11174,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_309__CLASS_OBJMATCHFLAGBLOCK*/ - /*uniqueobj*/ if (! /*_.VALDATA___V496*/ meltfptr[495]) -/*_.VALDATA___V496*/ meltfptr[495] = + /*uniqueobj*/ if (! /*_._VALDATA___V496*/ meltfptr[495]) +/*_._VALDATA___V496*/ meltfptr[495] = (melt_ptr_t) & meltcdat->dsym_309__CLASS_OBJMATCHFLAGBLOCK; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg @@ -11152,7 +11195,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_310__CLASS_OBJMATCHFL*/ - /*_.VALSTR___V497*/ meltfptr[496] = + /*_._VALSTR___V497*/ meltfptr[496] = (melt_ptr_t) & meltcdat->dstr_310__CLASS_OBJMATCHFL; meltcdat->dstr_310__CLASS_OBJMATCHFL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -11164,7 +11207,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_310__CLASS_OBJMATCHFL.slen = 23; /*inirout drout_311__OUTPUCOD_OBJMULTIALLOCBLOCK */ - /*_.VALROUT___V498*/ meltfptr[497] = + /*_._VALROUT___V498*/ meltfptr[497] = (melt_ptr_t) & meltcdat->drout_311__OUTPUCOD_OBJMULTIALLOCBLOCK; meltcdat->drout_311__OUTPUCOD_OBJMULTIALLOCBLOCK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -11174,10 +11217,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->drout_311__OUTPUCOD_OBJMULTIALLOCBLOCK.nbval = 11; MELT_ROUTINE_SET_ROUTCODE (&meltcdat-> drout_311__OUTPUCOD_OBJMULTIALLOCBLOCK, - meltrout_71_warmelt_outobj_OUTPUCOD_OBJMULTIALLOCBLOCK); + meltrout_71_WARMELTmiOUTOBJ_OUTPUCOD_OBJMULTIALLOCBLOCK); /*iniclos dclo_312__OUTPUCOD_OBJMULTIALLOCBLOCK */ - /*_.VALCLO___V499*/ meltfptr[498] = + /*_._VALCLO___V499*/ meltfptr[498] = (melt_ptr_t) & meltcdat->dclo_312__OUTPUCOD_OBJMULTIALLOCBLOCK; meltcdat->dclo_312__OUTPUCOD_OBJMULTIALLOCBLOCK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -11185,8 +11228,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_313__CLASS_OBJMULTIALLOCBLOCK*/ - /*uniqueobj*/ if (! /*_.VALDATA___V500*/ meltfptr[499]) -/*_.VALDATA___V500*/ meltfptr[499] = + /*uniqueobj*/ if (! /*_._VALDATA___V500*/ meltfptr[499]) +/*_._VALDATA___V500*/ meltfptr[499] = (melt_ptr_t) & meltcdat->dsym_313__CLASS_OBJMULTIALLOCBLOCK; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg @@ -11206,7 +11249,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_314__CLASS_OBJMULTIAL*/ - /*_.VALSTR___V501*/ meltfptr[500] = + /*_._VALSTR___V501*/ meltfptr[500] = (melt_ptr_t) & meltcdat->dstr_314__CLASS_OBJMULTIAL; meltcdat->dstr_314__CLASS_OBJMULTIAL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -11219,8 +11262,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_315__DISCR_VERBATIM_STRING*/ - /*uniqueobj*/ if (! /*_.VALDATA___V502*/ meltfptr[501]) -/*_.VALDATA___V502*/ meltfptr[501] = + /*uniqueobj*/ if (! /*_._VALDATA___V502*/ meltfptr[501]) +/*_._VALDATA___V502*/ meltfptr[501] = (melt_ptr_t) & meltcdat->dsym_315__DISCR_VERBATIM_STRING; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg @@ -11240,7 +11283,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_316__DISCR_VERBATIM_S*/ - /*_.VALSTR___V503*/ meltfptr[502] = + /*_._VALSTR___V503*/ meltfptr[502] = (melt_ptr_t) & meltcdat->dstr_316__DISCR_VERBATIM_S; meltcdat->dstr_316__DISCR_VERBATIM_S.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -11252,7 +11295,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_316__DISCR_VERBATIM_S.slen = 21; /*inirout drout_317__OUTPUCOD_OBJCITERBLOCK */ - /*_.VALROUT___V504*/ meltfptr[503] = + /*_._VALROUT___V504*/ meltfptr[503] = (melt_ptr_t) & meltcdat->drout_317__OUTPUCOD_OBJCITERBLOCK; meltcdat->drout_317__OUTPUCOD_OBJCITERBLOCK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -11261,10 +11304,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_ROUTDESCR_LEN - 1); meltcdat->drout_317__OUTPUCOD_OBJCITERBLOCK.nbval = 8; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_317__OUTPUCOD_OBJCITERBLOCK, - meltrout_72_warmelt_outobj_OUTPUCOD_OBJCITERBLOCK); + meltrout_72_WARMELTmiOUTOBJ_OUTPUCOD_OBJCITERBLOCK); /*iniclos dclo_318__OUTPUCOD_OBJCITERBLOCK */ - /*_.VALCLO___V505*/ meltfptr[504] = + /*_._VALCLO___V505*/ meltfptr[504] = (melt_ptr_t) & meltcdat->dclo_318__OUTPUCOD_OBJCITERBLOCK; meltcdat->dclo_318__OUTPUCOD_OBJCITERBLOCK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -11272,8 +11315,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_319__CLASS_OBJCITERBLOCK*/ - /*uniqueobj*/ if (! /*_.VALDATA___V506*/ meltfptr[505]) -/*_.VALDATA___V506*/ meltfptr[505] = + /*uniqueobj*/ if (! /*_._VALDATA___V506*/ meltfptr[505]) +/*_._VALDATA___V506*/ meltfptr[505] = (melt_ptr_t) & meltcdat->dsym_319__CLASS_OBJCITERBLOCK; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_319__CLASS_OBJCITERBLOCK", @@ -11293,7 +11336,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_320__CLASS_OBJCITERBL*/ - /*_.VALSTR___V507*/ meltfptr[506] = + /*_._VALSTR___V507*/ meltfptr[506] = (melt_ptr_t) & meltcdat->dstr_320__CLASS_OBJCITERBL; meltcdat->dstr_320__CLASS_OBJCITERBL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -11306,8 +11349,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_321__CLASS_CITERATOR*/ - /*uniqueobj*/ if (! /*_.VALDATA___V508*/ meltfptr[507]) -/*_.VALDATA___V508*/ meltfptr[507] = + /*uniqueobj*/ if (! /*_._VALDATA___V508*/ meltfptr[507]) +/*_._VALDATA___V508*/ meltfptr[507] = (melt_ptr_t) & meltcdat->dsym_321__CLASS_CITERATOR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_321__CLASS_CITERATOR", @@ -11327,7 +11370,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_322__CLASS_CITERATOR*/ - /*_.VALSTR___V509*/ meltfptr[508] = + /*_._VALSTR___V509*/ meltfptr[508] = (melt_ptr_t) & meltcdat->dstr_322__CLASS_CITERATOR; meltcdat->dstr_322__CLASS_CITERATOR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -11339,7 +11382,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_322__CLASS_CITERATOR.slen = 15; /*inirout drout_323__OUTPUCOD_OBJCOMMENTINSTR */ - /*_.VALROUT___V510*/ meltfptr[509] = + /*_._VALROUT___V510*/ meltfptr[509] = (melt_ptr_t) & meltcdat->drout_323__OUTPUCOD_OBJCOMMENTINSTR; meltcdat->drout_323__OUTPUCOD_OBJCOMMENTINSTR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -11348,10 +11391,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_ROUTDESCR_LEN - 1); meltcdat->drout_323__OUTPUCOD_OBJCOMMENTINSTR.nbval = 6; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_323__OUTPUCOD_OBJCOMMENTINSTR, - meltrout_73_warmelt_outobj_OUTPUCOD_OBJCOMMENTINSTR); + meltrout_73_WARMELTmiOUTOBJ_OUTPUCOD_OBJCOMMENTINSTR); /*iniclos dclo_324__OUTPUCOD_OBJCOMMENTINSTR */ - /*_.VALCLO___V511*/ meltfptr[510] = + /*_._VALCLO___V511*/ meltfptr[510] = (melt_ptr_t) & meltcdat->dclo_324__OUTPUCOD_OBJCOMMENTINSTR; meltcdat->dclo_324__OUTPUCOD_OBJCOMMENTINSTR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -11359,8 +11402,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_325__CLASS_OBJCOMMENTINSTR*/ - /*uniqueobj*/ if (! /*_.VALDATA___V512*/ meltfptr[511]) -/*_.VALDATA___V512*/ meltfptr[511] = + /*uniqueobj*/ if (! /*_._VALDATA___V512*/ meltfptr[511]) +/*_._VALDATA___V512*/ meltfptr[511] = (melt_ptr_t) & meltcdat->dsym_325__CLASS_OBJCOMMENTINSTR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg @@ -11380,7 +11423,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_326__CLASS_OBJCOMMENT*/ - /*_.VALSTR___V513*/ meltfptr[512] = + /*_._VALSTR___V513*/ meltfptr[512] = (melt_ptr_t) & meltcdat->dstr_326__CLASS_OBJCOMMENT; meltcdat->dstr_326__CLASS_OBJCOMMENT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -11392,7 +11435,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_326__CLASS_OBJCOMMENT.slen = 21; /*inirout drout_327__OUTPUCOD_OBJCOMMENTEDBLOCK */ - /*_.VALROUT___V514*/ meltfptr[513] = + /*_._VALROUT___V514*/ meltfptr[513] = (melt_ptr_t) & meltcdat->drout_327__OUTPUCOD_OBJCOMMENTEDBLOCK; meltcdat->drout_327__OUTPUCOD_OBJCOMMENTEDBLOCK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -11401,10 +11444,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_ROUTDESCR_LEN - 1); meltcdat->drout_327__OUTPUCOD_OBJCOMMENTEDBLOCK.nbval = 8; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_327__OUTPUCOD_OBJCOMMENTEDBLOCK, - meltrout_74_warmelt_outobj_OUTPUCOD_OBJCOMMENTEDBLOCK); + meltrout_74_WARMELTmiOUTOBJ_OUTPUCOD_OBJCOMMENTEDBLOCK); /*iniclos dclo_328__OUTPUCOD_OBJCOMMENTEDBLOCK */ - /*_.VALCLO___V515*/ meltfptr[514] = + /*_._VALCLO___V515*/ meltfptr[514] = (melt_ptr_t) & meltcdat->dclo_328__OUTPUCOD_OBJCOMMENTEDBLOCK; meltcdat->dclo_328__OUTPUCOD_OBJCOMMENTEDBLOCK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -11412,8 +11455,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_329__CLASS_OBJCOMMENTEDBLOCK*/ - /*uniqueobj*/ if (! /*_.VALDATA___V516*/ meltfptr[515]) -/*_.VALDATA___V516*/ meltfptr[515] = + /*uniqueobj*/ if (! /*_._VALDATA___V516*/ meltfptr[515]) +/*_._VALDATA___V516*/ meltfptr[515] = (melt_ptr_t) & meltcdat->dsym_329__CLASS_OBJCOMMENTEDBLOCK; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg @@ -11433,7 +11476,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_330__CLASS_OBJCOMMENT*/ - /*_.VALSTR___V517*/ meltfptr[516] = + /*_._VALSTR___V517*/ meltfptr[516] = (melt_ptr_t) & meltcdat->dstr_330__CLASS_OBJCOMMENT; meltcdat->dstr_330__CLASS_OBJCOMMENT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -11446,8 +11489,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_331__LABELCOUNTREF*/ - /*uniqueobj*/ if (! /*_.VALDATA___V518*/ meltfptr[517]) -/*_.VALDATA___V518*/ meltfptr[517] = + /*uniqueobj*/ if (! /*_._VALDATA___V518*/ meltfptr[517]) +/*_._VALDATA___V518*/ meltfptr[517] = (melt_ptr_t) & meltcdat->dsym_331__LABELCOUNTREF; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_331__LABELCOUNTREF", @@ -11467,7 +11510,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_332__LABELCOUNTREF*/ - /*_.VALSTR___V519*/ meltfptr[518] = + /*_._VALSTR___V519*/ meltfptr[518] = (melt_ptr_t) & meltcdat->dstr_332__LABELCOUNTREF; meltcdat->dstr_332__LABELCOUNTREF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -11481,7 +11524,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_LOCATION ("warmelt-outobj.melt:3479:/ iniobj"); /*iniobj dobj_333__LABELCOUNTREF*/ -/*_.VALDATA___V520*/ meltfptr[519] = +/*_._VALDATA___V520*/ meltfptr[519] = (melt_ptr_t) & meltcdat->dobj_333__LABELCOUNTREF; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_333__LABELCOUNTREF", @@ -11495,18 +11538,18 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); meltcdat->dobj_333__LABELCOUNTREF.meltobj_class = (meltobject_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); - meltcdat->dobj_333__LABELCOUNTREF.obj_hash = 728345790; + meltcdat->dobj_333__LABELCOUNTREF.obj_hash = 1004573663; meltcdat->dobj_333__LABELCOUNTREF.obj_len = 1; /*iniboxint dint_334__ */ - /*_.VALBXINT___V521*/ meltfptr[520] = (melt_ptr_t) & meltcdat->dint_334__; + /*_._VALBXINT___V521*/ meltfptr[520] = (melt_ptr_t) & meltcdat->dint_334__; meltcdat->dint_334__.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CONSTANT_INTEGER)))); meltcdat->dint_334__.val = 0; /*inirout drout_335__OUTPUCOD_OBJLABELINSTR */ - /*_.VALROUT___V522*/ meltfptr[521] = + /*_._VALROUT___V522*/ meltfptr[521] = (melt_ptr_t) & meltcdat->drout_335__OUTPUCOD_OBJLABELINSTR; meltcdat->drout_335__OUTPUCOD_OBJLABELINSTR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -11515,10 +11558,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_ROUTDESCR_LEN - 1); meltcdat->drout_335__OUTPUCOD_OBJLABELINSTR.nbval = 10; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_335__OUTPUCOD_OBJLABELINSTR, - meltrout_75_warmelt_outobj_OUTPUCOD_OBJLABELINSTR); + meltrout_75_WARMELTmiOUTOBJ_OUTPUCOD_OBJLABELINSTR); /*iniclos dclo_336__OUTPUCOD_OBJLABELINSTR */ - /*_.VALCLO___V523*/ meltfptr[522] = + /*_._VALCLO___V523*/ meltfptr[522] = (melt_ptr_t) & meltcdat->dclo_336__OUTPUCOD_OBJLABELINSTR; meltcdat->dclo_336__OUTPUCOD_OBJLABELINSTR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -11526,8 +11569,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_337__CLASS_OBJLABELINSTR*/ - /*uniqueobj*/ if (! /*_.VALDATA___V524*/ meltfptr[523]) -/*_.VALDATA___V524*/ meltfptr[523] = + /*uniqueobj*/ if (! /*_._VALDATA___V524*/ meltfptr[523]) +/*_._VALDATA___V524*/ meltfptr[523] = (melt_ptr_t) & meltcdat->dsym_337__CLASS_OBJLABELINSTR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_337__CLASS_OBJLABELINSTR", @@ -11547,7 +11590,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_338__CLASS_OBJLABELIN*/ - /*_.VALSTR___V525*/ meltfptr[524] = + /*_._VALSTR___V525*/ meltfptr[524] = (melt_ptr_t) & meltcdat->dstr_338__CLASS_OBJLABELIN; meltcdat->dstr_338__CLASS_OBJLABELIN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -11560,8 +11603,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_339__SET_CONTENT*/ - /*uniqueobj*/ if (! /*_.VALDATA___V526*/ meltfptr[525]) -/*_.VALDATA___V526*/ meltfptr[525] = + /*uniqueobj*/ if (! /*_._VALDATA___V526*/ meltfptr[525]) +/*_._VALDATA___V526*/ meltfptr[525] = (melt_ptr_t) & meltcdat->dsym_339__SET_CONTENT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_339__SET_CONTENT", @@ -11581,7 +11624,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_340__SET_CONTENT*/ - /*_.VALSTR___V527*/ meltfptr[526] = + /*_._VALSTR___V527*/ meltfptr[526] = (melt_ptr_t) & meltcdat->dstr_340__SET_CONTENT; meltcdat->dstr_340__SET_CONTENT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -11594,8 +11637,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_341__STRING4OUT*/ - /*uniqueobj*/ if (! /*_.VALDATA___V528*/ meltfptr[527]) -/*_.VALDATA___V528*/ meltfptr[527] = + /*uniqueobj*/ if (! /*_._VALDATA___V528*/ meltfptr[527]) +/*_._VALDATA___V528*/ meltfptr[527] = (melt_ptr_t) & meltcdat->dsym_341__STRING4OUT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_341__STRING4OUT", @@ -11615,7 +11658,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_342__STRING4OUT*/ - /*_.VALSTR___V529*/ meltfptr[528] = + /*_._VALSTR___V529*/ meltfptr[528] = (melt_ptr_t) & meltcdat->dstr_342__STRING4OUT; meltcdat->dstr_342__STRING4OUT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -11627,7 +11670,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_342__STRING4OUT.slen = 10; /*inirout drout_343__OUTPUCOD_OBJGOTOINSTR */ - /*_.VALROUT___V530*/ meltfptr[529] = + /*_._VALROUT___V530*/ meltfptr[529] = (melt_ptr_t) & meltcdat->drout_343__OUTPUCOD_OBJGOTOINSTR; meltcdat->drout_343__OUTPUCOD_OBJGOTOINSTR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -11636,10 +11679,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_ROUTDESCR_LEN - 1); meltcdat->drout_343__OUTPUCOD_OBJGOTOINSTR.nbval = 4; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_343__OUTPUCOD_OBJGOTOINSTR, - meltrout_76_warmelt_outobj_OUTPUCOD_OBJGOTOINSTR); + meltrout_76_WARMELTmiOUTOBJ_OUTPUCOD_OBJGOTOINSTR); /*iniclos dclo_344__OUTPUCOD_OBJGOTOINSTR */ - /*_.VALCLO___V531*/ meltfptr[530] = + /*_._VALCLO___V531*/ meltfptr[530] = (melt_ptr_t) & meltcdat->dclo_344__OUTPUCOD_OBJGOTOINSTR; meltcdat->dclo_344__OUTPUCOD_OBJGOTOINSTR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -11647,8 +11690,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_345__CLASS_OBJGOTOINSTR*/ - /*uniqueobj*/ if (! /*_.VALDATA___V532*/ meltfptr[531]) -/*_.VALDATA___V532*/ meltfptr[531] = + /*uniqueobj*/ if (! /*_._VALDATA___V532*/ meltfptr[531]) +/*_._VALDATA___V532*/ meltfptr[531] = (melt_ptr_t) & meltcdat->dsym_345__CLASS_OBJGOTOINSTR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_345__CLASS_OBJGOTOINSTR", @@ -11668,7 +11711,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_346__CLASS_OBJGOTOINS*/ - /*_.VALSTR___V533*/ meltfptr[532] = + /*_._VALSTR___V533*/ meltfptr[532] = (melt_ptr_t) & meltcdat->dstr_346__CLASS_OBJGOTOINS; meltcdat->dstr_346__CLASS_OBJGOTOINS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -11680,7 +11723,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_346__CLASS_OBJGOTOINS.slen = 18; /*inirout drout_347__ADD2SBUF_CLONSYM */ - /*_.VALROUT___V534*/ meltfptr[533] = + /*_._VALROUT___V534*/ meltfptr[533] = (melt_ptr_t) & meltcdat->drout_347__ADD2SBUF_CLONSYM; meltcdat->drout_347__ADD2SBUF_CLONSYM.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -11689,17 +11732,17 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_ROUTDESCR_LEN - 1); meltcdat->drout_347__ADD2SBUF_CLONSYM.nbval = 3; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_347__ADD2SBUF_CLONSYM, - meltrout_77_warmelt_outobj_ADD2SBUF_CLONSYM); + meltrout_77_WARMELTmiOUTOBJ_ADD2SBUF_CLONSYM); /*iniclos dclo_348__ADD2SBUF_CLONSYM */ - /*_.VALCLO___V535*/ meltfptr[534] = + /*_._VALCLO___V535*/ meltfptr[534] = (melt_ptr_t) & meltcdat->dclo_348__ADD2SBUF_CLONSYM; meltcdat->dclo_348__ADD2SBUF_CLONSYM.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); meltcdat->dclo_348__ADD2SBUF_CLONSYM.nbval = 0; /*inirout drout_349__OUTPUCOD_OBJLOOP */ - /*_.VALROUT___V536*/ meltfptr[535] = + /*_._VALROUT___V536*/ meltfptr[535] = (melt_ptr_t) & meltcdat->drout_349__OUTPUCOD_OBJLOOP; meltcdat->drout_349__OUTPUCOD_OBJLOOP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -11708,10 +11751,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_ROUTDESCR_LEN - 1); meltcdat->drout_349__OUTPUCOD_OBJLOOP.nbval = 16; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_349__OUTPUCOD_OBJLOOP, - meltrout_78_warmelt_outobj_OUTPUCOD_OBJLOOP); + meltrout_78_WARMELTmiOUTOBJ_OUTPUCOD_OBJLOOP); /*iniclos dclo_350__OUTPUCOD_OBJLOOP */ - /*_.VALCLO___V539*/ meltfptr[538] = + /*_._VALCLO___V539*/ meltfptr[538] = (melt_ptr_t) & meltcdat->dclo_350__OUTPUCOD_OBJLOOP; meltcdat->dclo_350__OUTPUCOD_OBJLOOP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -11719,8 +11762,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_351__CLASS_OBJLOOP*/ - /*uniqueobj*/ if (! /*_.VALDATA___V540*/ meltfptr[539]) -/*_.VALDATA___V540*/ meltfptr[539] = + /*uniqueobj*/ if (! /*_._VALDATA___V540*/ meltfptr[539]) +/*_._VALDATA___V540*/ meltfptr[539] = (melt_ptr_t) & meltcdat->dsym_351__CLASS_OBJLOOP; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_351__CLASS_OBJLOOP", @@ -11740,7 +11783,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_352__CLASS_OBJLOOP*/ - /*_.VALSTR___V541*/ meltfptr[540] = + /*_._VALSTR___V541*/ meltfptr[540] = (melt_ptr_t) & meltcdat->dstr_352__CLASS_OBJLOOP; meltcdat->dstr_352__CLASS_OBJLOOP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -11752,7 +11795,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_352__CLASS_OBJLOOP.slen = 13; /*inirout drout_353__LAMBDA_ */ - /*_.VALROUT___V537*/ meltfptr[536] = + /*_._VALROUT___V537*/ meltfptr[536] = (melt_ptr_t) & meltcdat->drout_353__LAMBDA_; meltcdat->drout_353__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -11760,10 +11803,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, "LAMBDA_ @warmelt-outobj.melt:3564", MELT_ROUTDESCR_LEN - 1); meltcdat->drout_353__LAMBDA_.nbval = 2; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_353__LAMBDA_, - meltrout_79_warmelt_outobj_LAMBDA___7__); + meltrout_79_WARMELTmiOUTOBJ_LAMBDA___7__); /*inirout drout_354__LAMBDA_ */ - /*_.VALROUT___V538*/ meltfptr[537] = + /*_._VALROUT___V538*/ meltfptr[537] = (melt_ptr_t) & meltcdat->drout_354__LAMBDA_; meltcdat->drout_354__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -11771,10 +11814,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, "LAMBDA_ @warmelt-outobj.melt:3586", MELT_ROUTDESCR_LEN - 1); meltcdat->drout_354__LAMBDA_.nbval = 4; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_354__LAMBDA_, - meltrout_80_warmelt_outobj_LAMBDA___8__); + meltrout_80_WARMELTmiOUTOBJ_LAMBDA___8__); /*inirout drout_355__OUTPUCOD_OBJEXIT */ - /*_.VALROUT___V542*/ meltfptr[541] = + /*_._VALROUT___V542*/ meltfptr[541] = (melt_ptr_t) & meltcdat->drout_355__OUTPUCOD_OBJEXIT; meltcdat->drout_355__OUTPUCOD_OBJEXIT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -11783,10 +11826,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_ROUTDESCR_LEN - 1); meltcdat->drout_355__OUTPUCOD_OBJEXIT.nbval = 6; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_355__OUTPUCOD_OBJEXIT, - meltrout_81_warmelt_outobj_OUTPUCOD_OBJEXIT); + meltrout_81_WARMELTmiOUTOBJ_OUTPUCOD_OBJEXIT); /*iniclos dclo_356__OUTPUCOD_OBJEXIT */ - /*_.VALCLO___V543*/ meltfptr[542] = + /*_._VALCLO___V543*/ meltfptr[542] = (melt_ptr_t) & meltcdat->dclo_356__OUTPUCOD_OBJEXIT; meltcdat->dclo_356__OUTPUCOD_OBJEXIT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -11794,8 +11837,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_357__CLASS_OBJEXIT*/ - /*uniqueobj*/ if (! /*_.VALDATA___V544*/ meltfptr[543]) -/*_.VALDATA___V544*/ meltfptr[543] = + /*uniqueobj*/ if (! /*_._VALDATA___V544*/ meltfptr[543]) +/*_._VALDATA___V544*/ meltfptr[543] = (melt_ptr_t) & meltcdat->dsym_357__CLASS_OBJEXIT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_357__CLASS_OBJEXIT", @@ -11815,7 +11858,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_358__CLASS_OBJEXIT*/ - /*_.VALSTR___V545*/ meltfptr[544] = + /*_._VALSTR___V545*/ meltfptr[544] = (melt_ptr_t) & meltcdat->dstr_358__CLASS_OBJEXIT; meltcdat->dstr_358__CLASS_OBJEXIT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -11827,7 +11870,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_358__CLASS_OBJEXIT.slen = 13; /*inirout drout_359__OUTPUCOD_OBJAGAIN */ - /*_.VALROUT___V546*/ meltfptr[545] = + /*_._VALROUT___V546*/ meltfptr[545] = (melt_ptr_t) & meltcdat->drout_359__OUTPUCOD_OBJAGAIN; meltcdat->drout_359__OUTPUCOD_OBJAGAIN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -11836,10 +11879,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_ROUTDESCR_LEN - 1); meltcdat->drout_359__OUTPUCOD_OBJAGAIN.nbval = 6; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_359__OUTPUCOD_OBJAGAIN, - meltrout_82_warmelt_outobj_OUTPUCOD_OBJAGAIN); + meltrout_82_WARMELTmiOUTOBJ_OUTPUCOD_OBJAGAIN); /*iniclos dclo_360__OUTPUCOD_OBJAGAIN */ - /*_.VALCLO___V547*/ meltfptr[546] = + /*_._VALCLO___V547*/ meltfptr[546] = (melt_ptr_t) & meltcdat->dclo_360__OUTPUCOD_OBJAGAIN; meltcdat->dclo_360__OUTPUCOD_OBJAGAIN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -11847,8 +11890,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_361__CLASS_OBJAGAIN*/ - /*uniqueobj*/ if (! /*_.VALDATA___V548*/ meltfptr[547]) -/*_.VALDATA___V548*/ meltfptr[547] = + /*uniqueobj*/ if (! /*_._VALDATA___V548*/ meltfptr[547]) +/*_._VALDATA___V548*/ meltfptr[547] = (melt_ptr_t) & meltcdat->dsym_361__CLASS_OBJAGAIN; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_361__CLASS_OBJAGAIN", @@ -11868,7 +11911,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_362__CLASS_OBJAGAIN*/ - /*_.VALSTR___V549*/ meltfptr[548] = + /*_._VALSTR___V549*/ meltfptr[548] = (melt_ptr_t) & meltcdat->dstr_362__CLASS_OBJAGAIN; meltcdat->dstr_362__CLASS_OBJAGAIN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -11880,7 +11923,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_362__CLASS_OBJAGAIN.slen = 14; /*inirout drout_363__OUTPUCOD_OBJCOMPUTE */ - /*_.VALROUT___V550*/ meltfptr[549] = + /*_._VALROUT___V550*/ meltfptr[549] = (melt_ptr_t) & meltcdat->drout_363__OUTPUCOD_OBJCOMPUTE; meltcdat->drout_363__OUTPUCOD_OBJCOMPUTE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -11889,10 +11932,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_ROUTDESCR_LEN - 1); meltcdat->drout_363__OUTPUCOD_OBJCOMPUTE.nbval = 18; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_363__OUTPUCOD_OBJCOMPUTE, - meltrout_83_warmelt_outobj_OUTPUCOD_OBJCOMPUTE); + meltrout_83_WARMELTmiOUTOBJ_OUTPUCOD_OBJCOMPUTE); /*iniclos dclo_364__OUTPUCOD_OBJCOMPUTE */ - /*_.VALCLO___V554*/ meltfptr[553] = + /*_._VALCLO___V554*/ meltfptr[553] = (melt_ptr_t) & meltcdat->dclo_364__OUTPUCOD_OBJCOMPUTE; meltcdat->dclo_364__OUTPUCOD_OBJCOMPUTE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -11900,8 +11943,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_365__CLASS_OBJCOMPUTE*/ - /*uniqueobj*/ if (! /*_.VALDATA___V555*/ meltfptr[554]) -/*_.VALDATA___V555*/ meltfptr[554] = + /*uniqueobj*/ if (! /*_._VALDATA___V555*/ meltfptr[554]) +/*_._VALDATA___V555*/ meltfptr[554] = (melt_ptr_t) & meltcdat->dsym_365__CLASS_OBJCOMPUTE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_365__CLASS_OBJCOMPUTE", @@ -11921,7 +11964,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_366__CLASS_OBJCOMPUTE*/ - /*_.VALSTR___V556*/ meltfptr[555] = + /*_._VALSTR___V556*/ meltfptr[555] = (melt_ptr_t) & meltcdat->dstr_366__CLASS_OBJCOMPUTE; meltcdat->dstr_366__CLASS_OBJCOMPUTE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -11933,7 +11976,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_366__CLASS_OBJCOMPUTE.slen = 16; /*inirout drout_367__LAMBDA_ */ - /*_.VALROUT___V551*/ meltfptr[550] = + /*_._VALROUT___V551*/ meltfptr[550] = (melt_ptr_t) & meltcdat->drout_367__LAMBDA_; meltcdat->drout_367__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -11941,10 +11984,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, "LAMBDA_ @warmelt-outobj.melt:3654", MELT_ROUTDESCR_LEN - 1); meltcdat->drout_367__LAMBDA_.nbval = 1; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_367__LAMBDA_, - meltrout_84_warmelt_outobj_LAMBDA___9__); + meltrout_84_WARMELTmiOUTOBJ_LAMBDA___9__); /*inirout drout_368__LAMBDA_ */ - /*_.VALROUT___V552*/ meltfptr[551] = + /*_._VALROUT___V552*/ meltfptr[551] = (melt_ptr_t) & meltcdat->drout_368__LAMBDA_; meltcdat->drout_368__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -11952,12 +11995,12 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, "LAMBDA_ @warmelt-outobj.melt:3663", MELT_ROUTDESCR_LEN - 1); meltcdat->drout_368__LAMBDA_.nbval = 3; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_368__LAMBDA_, - meltrout_85_warmelt_outobj_LAMBDA___10__); + meltrout_85_WARMELTmiOUTOBJ_LAMBDA___10__); /*iniobj dsym_369__MULTIPLE_EVERY*/ - /*uniqueobj*/ if (! /*_.VALDATA___V557*/ meltfptr[556]) -/*_.VALDATA___V557*/ meltfptr[556] = + /*uniqueobj*/ if (! /*_._VALDATA___V557*/ meltfptr[556]) +/*_._VALDATA___V557*/ meltfptr[556] = (melt_ptr_t) & meltcdat->dsym_369__MULTIPLE_EVERY; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_369__MULTIPLE_EVERY", @@ -11977,7 +12020,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_370__MULTIPLE_EVERY*/ - /*_.VALSTR___V558*/ meltfptr[557] = + /*_._VALSTR___V558*/ meltfptr[557] = (melt_ptr_t) & meltcdat->dstr_370__MULTIPLE_EVERY; meltcdat->dstr_370__MULTIPLE_EVERY.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -11989,7 +12032,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_370__MULTIPLE_EVERY.slen = 14; /*inirout drout_371__LAMBDA_ */ - /*_.VALROUT___V553*/ meltfptr[552] = + /*_._VALROUT___V553*/ meltfptr[552] = (melt_ptr_t) & meltcdat->drout_371__LAMBDA_; meltcdat->drout_371__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -11997,10 +12040,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, "LAMBDA_ @warmelt-outobj.melt:3673", MELT_ROUTDESCR_LEN - 1); meltcdat->drout_371__LAMBDA_.nbval = 3; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_371__LAMBDA_, - meltrout_86_warmelt_outobj_LAMBDA___11__); + meltrout_86_WARMELTmiOUTOBJ_LAMBDA___11__); /*inirout drout_372__OUTPUCOD_OBJCOND */ - /*_.VALROUT___V559*/ meltfptr[558] = + /*_._VALROUT___V559*/ meltfptr[558] = (melt_ptr_t) & meltcdat->drout_372__OUTPUCOD_OBJCOND; meltcdat->drout_372__OUTPUCOD_OBJCOND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -12009,10 +12052,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_ROUTDESCR_LEN - 1); meltcdat->drout_372__OUTPUCOD_OBJCOND.nbval = 6; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_372__OUTPUCOD_OBJCOND, - meltrout_87_warmelt_outobj_OUTPUCOD_OBJCOND); + meltrout_87_WARMELTmiOUTOBJ_OUTPUCOD_OBJCOND); /*iniclos dclo_373__OUTPUCOD_OBJCOND */ - /*_.VALCLO___V560*/ meltfptr[559] = + /*_._VALCLO___V560*/ meltfptr[559] = (melt_ptr_t) & meltcdat->dclo_373__OUTPUCOD_OBJCOND; meltcdat->dclo_373__OUTPUCOD_OBJCOND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -12020,8 +12063,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_374__CLASS_OBJCOND*/ - /*uniqueobj*/ if (! /*_.VALDATA___V561*/ meltfptr[560]) -/*_.VALDATA___V561*/ meltfptr[560] = + /*uniqueobj*/ if (! /*_._VALDATA___V561*/ meltfptr[560]) +/*_._VALDATA___V561*/ meltfptr[560] = (melt_ptr_t) & meltcdat->dsym_374__CLASS_OBJCOND; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_374__CLASS_OBJCOND", @@ -12041,7 +12084,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_375__CLASS_OBJCOND*/ - /*_.VALSTR___V562*/ meltfptr[561] = + /*_._VALSTR___V562*/ meltfptr[561] = (melt_ptr_t) & meltcdat->dstr_375__CLASS_OBJCOND; meltcdat->dstr_375__CLASS_OBJCOND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -12053,7 +12096,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_375__CLASS_OBJCOND.slen = 13; /*inirout drout_376__OUTPUCOD_OBJCPPIF */ - /*_.VALROUT___V563*/ meltfptr[562] = + /*_._VALROUT___V563*/ meltfptr[562] = (melt_ptr_t) & meltcdat->drout_376__OUTPUCOD_OBJCPPIF; meltcdat->drout_376__OUTPUCOD_OBJCPPIF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -12062,10 +12105,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_ROUTDESCR_LEN - 1); meltcdat->drout_376__OUTPUCOD_OBJCPPIF.nbval = 6; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_376__OUTPUCOD_OBJCPPIF, - meltrout_88_warmelt_outobj_OUTPUCOD_OBJCPPIF); + meltrout_88_WARMELTmiOUTOBJ_OUTPUCOD_OBJCPPIF); /*iniclos dclo_377__OUTPUCOD_OBJCPPIF */ - /*_.VALCLO___V564*/ meltfptr[563] = + /*_._VALCLO___V564*/ meltfptr[563] = (melt_ptr_t) & meltcdat->dclo_377__OUTPUCOD_OBJCPPIF; meltcdat->dclo_377__OUTPUCOD_OBJCPPIF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -12073,8 +12116,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_378__CLASS_OBJCPPIF*/ - /*uniqueobj*/ if (! /*_.VALDATA___V565*/ meltfptr[564]) -/*_.VALDATA___V565*/ meltfptr[564] = + /*uniqueobj*/ if (! /*_._VALDATA___V565*/ meltfptr[564]) +/*_._VALDATA___V565*/ meltfptr[564] = (melt_ptr_t) & meltcdat->dsym_378__CLASS_OBJCPPIF; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_378__CLASS_OBJCPPIF", @@ -12094,7 +12137,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_379__CLASS_OBJCPPIF*/ - /*_.VALSTR___V566*/ meltfptr[565] = + /*_._VALSTR___V566*/ meltfptr[565] = (melt_ptr_t) & meltcdat->dstr_379__CLASS_OBJCPPIF; meltcdat->dstr_379__CLASS_OBJCPPIF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -12106,7 +12149,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_379__CLASS_OBJCPPIF.slen = 14; /*inirout drout_380__OUTPUCOD_OBJINTERNSYMBOL */ - /*_.VALROUT___V567*/ meltfptr[566] = + /*_._VALROUT___V567*/ meltfptr[566] = (melt_ptr_t) & meltcdat->drout_380__OUTPUCOD_OBJINTERNSYMBOL; meltcdat->drout_380__OUTPUCOD_OBJINTERNSYMBOL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -12115,10 +12158,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_ROUTDESCR_LEN - 1); meltcdat->drout_380__OUTPUCOD_OBJINTERNSYMBOL.nbval = 7; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_380__OUTPUCOD_OBJINTERNSYMBOL, - meltrout_89_warmelt_outobj_OUTPUCOD_OBJINTERNSYMBOL); + meltrout_89_WARMELTmiOUTOBJ_OUTPUCOD_OBJINTERNSYMBOL); /*iniclos dclo_381__OUTPUCOD_OBJINTERNSYMBOL */ - /*_.VALCLO___V568*/ meltfptr[567] = + /*_._VALCLO___V568*/ meltfptr[567] = (melt_ptr_t) & meltcdat->dclo_381__OUTPUCOD_OBJINTERNSYMBOL; meltcdat->dclo_381__OUTPUCOD_OBJINTERNSYMBOL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -12126,8 +12169,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_382__CLASS_OBJINTERNSYMBOL*/ - /*uniqueobj*/ if (! /*_.VALDATA___V569*/ meltfptr[568]) -/*_.VALDATA___V569*/ meltfptr[568] = + /*uniqueobj*/ if (! /*_._VALDATA___V569*/ meltfptr[568]) +/*_._VALDATA___V569*/ meltfptr[568] = (melt_ptr_t) & meltcdat->dsym_382__CLASS_OBJINTERNSYMBOL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg @@ -12147,7 +12190,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_383__CLASS_OBJINTERNS*/ - /*_.VALSTR___V570*/ meltfptr[569] = + /*_._VALSTR___V570*/ meltfptr[569] = (melt_ptr_t) & meltcdat->dstr_383__CLASS_OBJINTERNS; meltcdat->dstr_383__CLASS_OBJINTERNS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -12160,8 +12203,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_384__CLASS_NREP_DATASYMBOL*/ - /*uniqueobj*/ if (! /*_.VALDATA___V571*/ meltfptr[570]) -/*_.VALDATA___V571*/ meltfptr[570] = + /*uniqueobj*/ if (! /*_._VALDATA___V571*/ meltfptr[570]) +/*_._VALDATA___V571*/ meltfptr[570] = (melt_ptr_t) & meltcdat->dsym_384__CLASS_NREP_DATASYMBOL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg @@ -12181,7 +12224,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_385__CLASS_NREP_DATAS*/ - /*_.VALSTR___V572*/ meltfptr[571] = + /*_._VALSTR___V572*/ meltfptr[571] = (melt_ptr_t) & meltcdat->dstr_385__CLASS_NREP_DATAS; meltcdat->dstr_385__CLASS_NREP_DATAS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -12193,7 +12236,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_385__CLASS_NREP_DATAS.slen = 21; /*inirout drout_386__OUTPUCOD_OBJINTERNKEYWORD */ - /*_.VALROUT___V573*/ meltfptr[572] = + /*_._VALROUT___V573*/ meltfptr[572] = (melt_ptr_t) & meltcdat->drout_386__OUTPUCOD_OBJINTERNKEYWORD; meltcdat->drout_386__OUTPUCOD_OBJINTERNKEYWORD.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -12202,10 +12245,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_ROUTDESCR_LEN - 1); meltcdat->drout_386__OUTPUCOD_OBJINTERNKEYWORD.nbval = 6; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_386__OUTPUCOD_OBJINTERNKEYWORD, - meltrout_90_warmelt_outobj_OUTPUCOD_OBJINTERNKEYWORD); + meltrout_90_WARMELTmiOUTOBJ_OUTPUCOD_OBJINTERNKEYWORD); /*iniclos dclo_387__OUTPUCOD_OBJINTERNKEYWORD */ - /*_.VALCLO___V574*/ meltfptr[573] = + /*_._VALCLO___V574*/ meltfptr[573] = (melt_ptr_t) & meltcdat->dclo_387__OUTPUCOD_OBJINTERNKEYWORD; meltcdat->dclo_387__OUTPUCOD_OBJINTERNKEYWORD.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -12213,8 +12256,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_388__CLASS_OBJINTERNKEYWORD*/ - /*uniqueobj*/ if (! /*_.VALDATA___V575*/ meltfptr[574]) -/*_.VALDATA___V575*/ meltfptr[574] = + /*uniqueobj*/ if (! /*_._VALDATA___V575*/ meltfptr[574]) +/*_._VALDATA___V575*/ meltfptr[574] = (melt_ptr_t) & meltcdat->dsym_388__CLASS_OBJINTERNKEYWORD; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg @@ -12234,7 +12277,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_389__CLASS_OBJINTERNK*/ - /*_.VALSTR___V576*/ meltfptr[575] = + /*_._VALSTR___V576*/ meltfptr[575] = (melt_ptr_t) & meltcdat->dstr_389__CLASS_OBJINTERNK; meltcdat->dstr_389__CLASS_OBJINTERNK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -12247,8 +12290,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_390__CLASS_NREP_DATAKEYWORD*/ - /*uniqueobj*/ if (! /*_.VALDATA___V577*/ meltfptr[576]) -/*_.VALDATA___V577*/ meltfptr[576] = + /*uniqueobj*/ if (! /*_._VALDATA___V577*/ meltfptr[576]) +/*_._VALDATA___V577*/ meltfptr[576] = (melt_ptr_t) & meltcdat->dsym_390__CLASS_NREP_DATAKEYWORD; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg @@ -12268,7 +12311,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_391__CLASS_NREP_DATAK*/ - /*_.VALSTR___V578*/ meltfptr[577] = + /*_._VALSTR___V578*/ meltfptr[577] = (melt_ptr_t) & meltcdat->dstr_391__CLASS_NREP_DATAK; meltcdat->dstr_391__CLASS_NREP_DATAK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -12280,7 +12323,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_391__CLASS_NREP_DATAK.slen = 22; /*inirout drout_392__OUTPUCOD_OBJGETNAMEDSYMBOL */ - /*_.VALROUT___V579*/ meltfptr[578] = + /*_._VALROUT___V579*/ meltfptr[578] = (melt_ptr_t) & meltcdat->drout_392__OUTPUCOD_OBJGETNAMEDSYMBOL; meltcdat->drout_392__OUTPUCOD_OBJGETNAMEDSYMBOL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -12289,10 +12332,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_ROUTDESCR_LEN - 1); meltcdat->drout_392__OUTPUCOD_OBJGETNAMEDSYMBOL.nbval = 8; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_392__OUTPUCOD_OBJGETNAMEDSYMBOL, - meltrout_91_warmelt_outobj_OUTPUCOD_OBJGETNAMEDSYMBOL); + meltrout_91_WARMELTmiOUTOBJ_OUTPUCOD_OBJGETNAMEDSYMBOL); /*iniclos dclo_393__OUTPUCOD_OBJGETNAMEDSYMBOL */ - /*_.VALCLO___V580*/ meltfptr[579] = + /*_._VALCLO___V580*/ meltfptr[579] = (melt_ptr_t) & meltcdat->dclo_393__OUTPUCOD_OBJGETNAMEDSYMBOL; meltcdat->dclo_393__OUTPUCOD_OBJGETNAMEDSYMBOL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -12300,8 +12343,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_394__CLASS_OBJGETNAMEDSYMBOL*/ - /*uniqueobj*/ if (! /*_.VALDATA___V581*/ meltfptr[580]) -/*_.VALDATA___V581*/ meltfptr[580] = + /*uniqueobj*/ if (! /*_._VALDATA___V581*/ meltfptr[580]) +/*_._VALDATA___V581*/ meltfptr[580] = (melt_ptr_t) & meltcdat->dsym_394__CLASS_OBJGETNAMEDSYMBOL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg @@ -12321,7 +12364,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_395__CLASS_OBJGETNAME*/ - /*_.VALSTR___V582*/ meltfptr[581] = + /*_._VALSTR___V582*/ meltfptr[581] = (melt_ptr_t) & meltcdat->dstr_395__CLASS_OBJGETNAME; meltcdat->dstr_395__CLASS_OBJGETNAME.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -12333,7 +12376,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_395__CLASS_OBJGETNAME.slen = 23; /*inirout drout_396__OUTPUCOD_OBJGETNAMEDKEYWORD */ - /*_.VALROUT___V583*/ meltfptr[582] = + /*_._VALROUT___V583*/ meltfptr[582] = (melt_ptr_t) & meltcdat->drout_396__OUTPUCOD_OBJGETNAMEDKEYWORD; meltcdat->drout_396__OUTPUCOD_OBJGETNAMEDKEYWORD.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -12343,10 +12386,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->drout_396__OUTPUCOD_OBJGETNAMEDKEYWORD.nbval = 7; MELT_ROUTINE_SET_ROUTCODE (&meltcdat-> drout_396__OUTPUCOD_OBJGETNAMEDKEYWORD, - meltrout_92_warmelt_outobj_OUTPUCOD_OBJGETNAMEDKEYWORD); + meltrout_92_WARMELTmiOUTOBJ_OUTPUCOD_OBJGETNAMEDKEYWORD); /*iniclos dclo_397__OUTPUCOD_OBJGETNAMEDKEYWORD */ - /*_.VALCLO___V584*/ meltfptr[583] = + /*_._VALCLO___V584*/ meltfptr[583] = (melt_ptr_t) & meltcdat->dclo_397__OUTPUCOD_OBJGETNAMEDKEYWORD; meltcdat->dclo_397__OUTPUCOD_OBJGETNAMEDKEYWORD.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -12354,8 +12397,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_398__CLASS_OBJGETNAMEDKEYWORD*/ - /*uniqueobj*/ if (! /*_.VALDATA___V585*/ meltfptr[584]) -/*_.VALDATA___V585*/ meltfptr[584] = + /*uniqueobj*/ if (! /*_._VALDATA___V585*/ meltfptr[584]) +/*_._VALDATA___V585*/ meltfptr[584] = (melt_ptr_t) & meltcdat->dsym_398__CLASS_OBJGETNAMEDKEYWORD; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg @@ -12375,7 +12418,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_399__CLASS_OBJGETNAME*/ - /*_.VALSTR___V586*/ meltfptr[585] = + /*_._VALSTR___V586*/ meltfptr[585] = (melt_ptr_t) & meltcdat->dstr_399__CLASS_OBJGETNAME; meltcdat->dstr_399__CLASS_OBJGETNAME.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -12387,7 +12430,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_399__CLASS_OBJGETNAME.slen = 24; /*inirout drout_400__OUTPUCOD_OBJAPPLY */ - /*_.VALROUT___V587*/ meltfptr[586] = + /*_._VALROUT___V587*/ meltfptr[586] = (melt_ptr_t) & meltcdat->drout_400__OUTPUCOD_OBJAPPLY; meltcdat->drout_400__OUTPUCOD_OBJAPPLY.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -12396,10 +12439,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_ROUTDESCR_LEN - 1); meltcdat->drout_400__OUTPUCOD_OBJAPPLY.nbval = 18; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_400__OUTPUCOD_OBJAPPLY, - meltrout_93_warmelt_outobj_OUTPUCOD_OBJAPPLY); + meltrout_93_WARMELTmiOUTOBJ_OUTPUCOD_OBJAPPLY); /*iniclos dclo_401__OUTPUCOD_OBJAPPLY */ - /*_.VALCLO___V590*/ meltfptr[589] = + /*_._VALCLO___V590*/ meltfptr[589] = (melt_ptr_t) & meltcdat->dclo_401__OUTPUCOD_OBJAPPLY; meltcdat->dclo_401__OUTPUCOD_OBJAPPLY.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -12407,8 +12450,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_402__CLASS_OBJAPPLY*/ - /*uniqueobj*/ if (! /*_.VALDATA___V591*/ meltfptr[590]) -/*_.VALDATA___V591*/ meltfptr[590] = + /*uniqueobj*/ if (! /*_._VALDATA___V591*/ meltfptr[590]) +/*_._VALDATA___V591*/ meltfptr[590] = (melt_ptr_t) & meltcdat->dsym_402__CLASS_OBJAPPLY; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_402__CLASS_OBJAPPLY", @@ -12428,7 +12471,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_403__CLASS_OBJAPPLY*/ - /*_.VALSTR___V592*/ meltfptr[591] = + /*_._VALSTR___V592*/ meltfptr[591] = (melt_ptr_t) & meltcdat->dstr_403__CLASS_OBJAPPLY; meltcdat->dstr_403__CLASS_OBJAPPLY.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -12441,8 +12484,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_404__GET_CTYPE*/ - /*uniqueobj*/ if (! /*_.VALDATA___V593*/ meltfptr[592]) -/*_.VALDATA___V593*/ meltfptr[592] = + /*uniqueobj*/ if (! /*_._VALDATA___V593*/ meltfptr[592]) +/*_._VALDATA___V593*/ meltfptr[592] = (melt_ptr_t) & meltcdat->dsym_404__GET_CTYPE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_404__GET_CTYPE", @@ -12462,7 +12505,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_405__GET_CTYPE*/ - /*_.VALSTR___V594*/ meltfptr[593] = + /*_._VALSTR___V594*/ meltfptr[593] = (melt_ptr_t) & meltcdat->dstr_405__GET_CTYPE; meltcdat->dstr_405__GET_CTYPE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -12474,7 +12517,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_405__GET_CTYPE.slen = 9; /*inirout drout_406__LAMBDA_ */ - /*_.VALROUT___V588*/ meltfptr[587] = + /*_._VALROUT___V588*/ meltfptr[587] = (melt_ptr_t) & meltcdat->drout_406__LAMBDA_; meltcdat->drout_406__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -12482,10 +12525,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, "LAMBDA_ @warmelt-outobj.melt:3958", MELT_ROUTDESCR_LEN - 1); meltcdat->drout_406__LAMBDA_.nbval = 3; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_406__LAMBDA_, - meltrout_94_warmelt_outobj_LAMBDA___12__); + meltrout_94_WARMELTmiOUTOBJ_LAMBDA___12__); /*inirout drout_407__LAMBDA_ */ - /*_.VALROUT___V589*/ meltfptr[588] = + /*_._VALROUT___V589*/ meltfptr[588] = (melt_ptr_t) & meltcdat->drout_407__LAMBDA_; meltcdat->drout_407__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -12493,10 +12536,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, "LAMBDA_ @warmelt-outobj.melt:3975", MELT_ROUTDESCR_LEN - 1); meltcdat->drout_407__LAMBDA_.nbval = 0; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_407__LAMBDA_, - meltrout_95_warmelt_outobj_LAMBDA___13__); + meltrout_95_WARMELTmiOUTOBJ_LAMBDA___13__); /*inirout drout_408__OUTPUCOD_OBJMSEND */ - /*_.VALROUT___V595*/ meltfptr[594] = + /*_._VALROUT___V595*/ meltfptr[594] = (melt_ptr_t) & meltcdat->drout_408__OUTPUCOD_OBJMSEND; meltcdat->drout_408__OUTPUCOD_OBJMSEND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -12505,10 +12548,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_ROUTDESCR_LEN - 1); meltcdat->drout_408__OUTPUCOD_OBJMSEND.nbval = 13; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_408__OUTPUCOD_OBJMSEND, - meltrout_96_warmelt_outobj_OUTPUCOD_OBJMSEND); + meltrout_96_WARMELTmiOUTOBJ_OUTPUCOD_OBJMSEND); /*iniclos dclo_409__OUTPUCOD_OBJMSEND */ - /*_.VALCLO___V597*/ meltfptr[596] = + /*_._VALCLO___V597*/ meltfptr[596] = (melt_ptr_t) & meltcdat->dclo_409__OUTPUCOD_OBJMSEND; meltcdat->dclo_409__OUTPUCOD_OBJMSEND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -12516,8 +12559,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_410__CLASS_OBJMSEND*/ - /*uniqueobj*/ if (! /*_.VALDATA___V598*/ meltfptr[597]) -/*_.VALDATA___V598*/ meltfptr[597] = + /*uniqueobj*/ if (! /*_._VALDATA___V598*/ meltfptr[597]) +/*_._VALDATA___V598*/ meltfptr[597] = (melt_ptr_t) & meltcdat->dsym_410__CLASS_OBJMSEND; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_410__CLASS_OBJMSEND", @@ -12537,7 +12580,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_411__CLASS_OBJMSEND*/ - /*_.VALSTR___V599*/ meltfptr[598] = + /*_._VALSTR___V599*/ meltfptr[598] = (melt_ptr_t) & meltcdat->dstr_411__CLASS_OBJMSEND; meltcdat->dstr_411__CLASS_OBJMSEND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -12549,7 +12592,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_411__CLASS_OBJMSEND.slen = 14; /*inirout drout_412__LAMBDA_ */ - /*_.VALROUT___V596*/ meltfptr[595] = + /*_._VALROUT___V596*/ meltfptr[595] = (melt_ptr_t) & meltcdat->drout_412__LAMBDA_; meltcdat->drout_412__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -12557,10 +12600,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, "LAMBDA_ @warmelt-outobj.melt:4074", MELT_ROUTDESCR_LEN - 1); meltcdat->drout_412__LAMBDA_.nbval = 0; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_412__LAMBDA_, - meltrout_97_warmelt_outobj_LAMBDA___14__); + meltrout_97_WARMELTmiOUTOBJ_LAMBDA___14__); /*inirout drout_413__OUTPUCOD_OBJMULTIAPPLY */ - /*_.VALROUT___V600*/ meltfptr[599] = + /*_._VALROUT___V600*/ meltfptr[599] = (melt_ptr_t) & meltcdat->drout_413__OUTPUCOD_OBJMULTIAPPLY; meltcdat->drout_413__OUTPUCOD_OBJMULTIAPPLY.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -12569,10 +12612,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_ROUTDESCR_LEN - 1); meltcdat->drout_413__OUTPUCOD_OBJMULTIAPPLY.nbval = 24; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_413__OUTPUCOD_OBJMULTIAPPLY, - meltrout_98_warmelt_outobj_OUTPUCOD_OBJMULTIAPPLY); + meltrout_98_WARMELTmiOUTOBJ_OUTPUCOD_OBJMULTIAPPLY); /*iniclos dclo_414__OUTPUCOD_OBJMULTIAPPLY */ - /*_.VALCLO___V606*/ meltfptr[605] = + /*_._VALCLO___V606*/ meltfptr[605] = (melt_ptr_t) & meltcdat->dclo_414__OUTPUCOD_OBJMULTIAPPLY; meltcdat->dclo_414__OUTPUCOD_OBJMULTIAPPLY.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -12580,8 +12623,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_415__CLASS_OBJMULTIAPPLY*/ - /*uniqueobj*/ if (! /*_.VALDATA___V607*/ meltfptr[606]) -/*_.VALDATA___V607*/ meltfptr[606] = + /*uniqueobj*/ if (! /*_._VALDATA___V607*/ meltfptr[606]) +/*_._VALDATA___V607*/ meltfptr[606] = (melt_ptr_t) & meltcdat->dsym_415__CLASS_OBJMULTIAPPLY; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_415__CLASS_OBJMULTIAPPLY", @@ -12601,7 +12644,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_416__CLASS_OBJMULTIAP*/ - /*_.VALSTR___V608*/ meltfptr[607] = + /*_._VALSTR___V608*/ meltfptr[607] = (melt_ptr_t) & meltcdat->dstr_416__CLASS_OBJMULTIAP; meltcdat->dstr_416__CLASS_OBJMULTIAP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -12613,7 +12656,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_416__CLASS_OBJMULTIAP.slen = 19; /*inirout drout_417__LAMBDA_ */ - /*_.VALROUT___V601*/ meltfptr[600] = + /*_._VALROUT___V601*/ meltfptr[600] = (melt_ptr_t) & meltcdat->drout_417__LAMBDA_; meltcdat->drout_417__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -12621,10 +12664,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, "LAMBDA_ @warmelt-outobj.melt:4141", MELT_ROUTDESCR_LEN - 1); meltcdat->drout_417__LAMBDA_.nbval = 1; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_417__LAMBDA_, - meltrout_99_warmelt_outobj_LAMBDA___15__); + meltrout_99_WARMELTmiOUTOBJ_LAMBDA___15__); /*inirout drout_418__LAMBDA_ */ - /*_.VALROUT___V602*/ meltfptr[601] = + /*_._VALROUT___V602*/ meltfptr[601] = (melt_ptr_t) & meltcdat->drout_418__LAMBDA_; meltcdat->drout_418__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -12632,10 +12675,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, "LAMBDA_ @warmelt-outobj.melt:4184", MELT_ROUTDESCR_LEN - 1); meltcdat->drout_418__LAMBDA_.nbval = 5; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_418__LAMBDA_, - meltrout_100_warmelt_outobj_LAMBDA___16__); + meltrout_100_WARMELTmiOUTOBJ_LAMBDA___16__); /*inirout drout_419__LAMBDA_ */ - /*_.VALROUT___V603*/ meltfptr[602] = + /*_._VALROUT___V603*/ meltfptr[602] = (melt_ptr_t) & meltcdat->drout_419__LAMBDA_; meltcdat->drout_419__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -12643,10 +12686,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, "LAMBDA_ @warmelt-outobj.melt:4212", MELT_ROUTDESCR_LEN - 1); meltcdat->drout_419__LAMBDA_.nbval = 1; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_419__LAMBDA_, - meltrout_101_warmelt_outobj_LAMBDA___17__); + meltrout_101_WARMELTmiOUTOBJ_LAMBDA___17__); /*inirout drout_420__LAMBDA_ */ - /*_.VALROUT___V604*/ meltfptr[603] = + /*_._VALROUT___V604*/ meltfptr[603] = (melt_ptr_t) & meltcdat->drout_420__LAMBDA_; meltcdat->drout_420__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -12654,10 +12697,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, "LAMBDA_ @warmelt-outobj.melt:4227", MELT_ROUTDESCR_LEN - 1); meltcdat->drout_420__LAMBDA_.nbval = 0; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_420__LAMBDA_, - meltrout_102_warmelt_outobj_LAMBDA___18__); + meltrout_102_WARMELTmiOUTOBJ_LAMBDA___18__); /*inirout drout_421__LAMBDA_ */ - /*_.VALROUT___V605*/ meltfptr[604] = + /*_._VALROUT___V605*/ meltfptr[604] = (melt_ptr_t) & meltcdat->drout_421__LAMBDA_; meltcdat->drout_421__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -12665,10 +12708,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, "LAMBDA_ @warmelt-outobj.melt:4238", MELT_ROUTDESCR_LEN - 1); meltcdat->drout_421__LAMBDA_.nbval = 0; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_421__LAMBDA_, - meltrout_103_warmelt_outobj_LAMBDA___19__); + meltrout_103_WARMELTmiOUTOBJ_LAMBDA___19__); /*inirout drout_422__OUTPUCOD_OBJMULTIMSEND */ - /*_.VALROUT___V609*/ meltfptr[608] = + /*_._VALROUT___V609*/ meltfptr[608] = (melt_ptr_t) & meltcdat->drout_422__OUTPUCOD_OBJMULTIMSEND; meltcdat->drout_422__OUTPUCOD_OBJMULTIMSEND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -12677,10 +12720,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_ROUTDESCR_LEN - 1); meltcdat->drout_422__OUTPUCOD_OBJMULTIMSEND.nbval = 24; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_422__OUTPUCOD_OBJMULTIMSEND, - meltrout_104_warmelt_outobj_OUTPUCOD_OBJMULTIMSEND); + meltrout_104_WARMELTmiOUTOBJ_OUTPUCOD_OBJMULTIMSEND); /*iniclos dclo_423__OUTPUCOD_OBJMULTIMSEND */ - /*_.VALCLO___V615*/ meltfptr[614] = + /*_._VALCLO___V615*/ meltfptr[614] = (melt_ptr_t) & meltcdat->dclo_423__OUTPUCOD_OBJMULTIMSEND; meltcdat->dclo_423__OUTPUCOD_OBJMULTIMSEND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -12688,8 +12731,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_424__CLASS_OBJMULTIMSEND*/ - /*uniqueobj*/ if (! /*_.VALDATA___V616*/ meltfptr[615]) -/*_.VALDATA___V616*/ meltfptr[615] = + /*uniqueobj*/ if (! /*_._VALDATA___V616*/ meltfptr[615]) +/*_._VALDATA___V616*/ meltfptr[615] = (melt_ptr_t) & meltcdat->dsym_424__CLASS_OBJMULTIMSEND; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_424__CLASS_OBJMULTIMSEND", @@ -12709,7 +12752,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_425__CLASS_OBJMULTIMS*/ - /*_.VALSTR___V617*/ meltfptr[616] = + /*_._VALSTR___V617*/ meltfptr[616] = (melt_ptr_t) & meltcdat->dstr_425__CLASS_OBJMULTIMS; meltcdat->dstr_425__CLASS_OBJMULTIMS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -12721,7 +12764,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_425__CLASS_OBJMULTIMS.slen = 19; /*inirout drout_426__LAMBDA_ */ - /*_.VALROUT___V610*/ meltfptr[609] = + /*_._VALROUT___V610*/ meltfptr[609] = (melt_ptr_t) & meltcdat->drout_426__LAMBDA_; meltcdat->drout_426__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -12729,10 +12772,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, "LAMBDA_ @warmelt-outobj.melt:4293", MELT_ROUTDESCR_LEN - 1); meltcdat->drout_426__LAMBDA_.nbval = 1; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_426__LAMBDA_, - meltrout_105_warmelt_outobj_LAMBDA___20__); + meltrout_105_WARMELTmiOUTOBJ_LAMBDA___20__); /*inirout drout_427__LAMBDA_ */ - /*_.VALROUT___V611*/ meltfptr[610] = + /*_._VALROUT___V611*/ meltfptr[610] = (melt_ptr_t) & meltcdat->drout_427__LAMBDA_; meltcdat->drout_427__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -12740,10 +12783,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, "LAMBDA_ @warmelt-outobj.melt:4343", MELT_ROUTDESCR_LEN - 1); meltcdat->drout_427__LAMBDA_.nbval = 5; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_427__LAMBDA_, - meltrout_106_warmelt_outobj_LAMBDA___21__); + meltrout_106_WARMELTmiOUTOBJ_LAMBDA___21__); /*inirout drout_428__LAMBDA_ */ - /*_.VALROUT___V612*/ meltfptr[611] = + /*_._VALROUT___V612*/ meltfptr[611] = (melt_ptr_t) & meltcdat->drout_428__LAMBDA_; meltcdat->drout_428__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -12751,10 +12794,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, "LAMBDA_ @warmelt-outobj.melt:4371", MELT_ROUTDESCR_LEN - 1); meltcdat->drout_428__LAMBDA_.nbval = 1; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_428__LAMBDA_, - meltrout_107_warmelt_outobj_LAMBDA___22__); + meltrout_107_WARMELTmiOUTOBJ_LAMBDA___22__); /*inirout drout_429__LAMBDA_ */ - /*_.VALROUT___V613*/ meltfptr[612] = + /*_._VALROUT___V613*/ meltfptr[612] = (melt_ptr_t) & meltcdat->drout_429__LAMBDA_; meltcdat->drout_429__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -12762,10 +12805,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, "LAMBDA_ @warmelt-outobj.melt:4384", MELT_ROUTDESCR_LEN - 1); meltcdat->drout_429__LAMBDA_.nbval = 0; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_429__LAMBDA_, - meltrout_108_warmelt_outobj_LAMBDA___23__); + meltrout_108_WARMELTmiOUTOBJ_LAMBDA___23__); /*inirout drout_430__LAMBDA_ */ - /*_.VALROUT___V614*/ meltfptr[613] = + /*_._VALROUT___V614*/ meltfptr[613] = (melt_ptr_t) & meltcdat->drout_430__LAMBDA_; meltcdat->drout_430__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -12773,10 +12816,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, "LAMBDA_ @warmelt-outobj.melt:4395", MELT_ROUTDESCR_LEN - 1); meltcdat->drout_430__LAMBDA_.nbval = 0; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_430__LAMBDA_, - meltrout_109_warmelt_outobj_LAMBDA___24__); + meltrout_109_WARMELTmiOUTOBJ_LAMBDA___24__); /*inirout drout_431__OUTPUCOD_OBJCLEAR */ - /*_.VALROUT___V618*/ meltfptr[617] = + /*_._VALROUT___V618*/ meltfptr[617] = (melt_ptr_t) & meltcdat->drout_431__OUTPUCOD_OBJCLEAR; meltcdat->drout_431__OUTPUCOD_OBJCLEAR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -12785,10 +12828,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_ROUTDESCR_LEN - 1); meltcdat->drout_431__OUTPUCOD_OBJCLEAR.nbval = 5; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_431__OUTPUCOD_OBJCLEAR, - meltrout_110_warmelt_outobj_OUTPUCOD_OBJCLEAR); + meltrout_110_WARMELTmiOUTOBJ_OUTPUCOD_OBJCLEAR); /*iniclos dclo_432__OUTPUCOD_OBJCLEAR */ - /*_.VALCLO___V619*/ meltfptr[618] = + /*_._VALCLO___V619*/ meltfptr[618] = (melt_ptr_t) & meltcdat->dclo_432__OUTPUCOD_OBJCLEAR; meltcdat->dclo_432__OUTPUCOD_OBJCLEAR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -12796,8 +12839,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_433__CLASS_OBJCLEAR*/ - /*uniqueobj*/ if (! /*_.VALDATA___V620*/ meltfptr[619]) -/*_.VALDATA___V620*/ meltfptr[619] = + /*uniqueobj*/ if (! /*_._VALDATA___V620*/ meltfptr[619]) +/*_._VALDATA___V620*/ meltfptr[619] = (melt_ptr_t) & meltcdat->dsym_433__CLASS_OBJCLEAR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_433__CLASS_OBJCLEAR", @@ -12817,7 +12860,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_434__CLASS_OBJCLEAR*/ - /*_.VALSTR___V621*/ meltfptr[620] = + /*_._VALSTR___V621*/ meltfptr[620] = (melt_ptr_t) & meltcdat->dstr_434__CLASS_OBJCLEAR; meltcdat->dstr_434__CLASS_OBJCLEAR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -12829,7 +12872,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_434__CLASS_OBJCLEAR.slen = 14; /*inirout drout_435__OUTPUCOD_OBJRAWALLOCOBJ */ - /*_.VALROUT___V622*/ meltfptr[621] = + /*_._VALROUT___V622*/ meltfptr[621] = (melt_ptr_t) & meltcdat->drout_435__OUTPUCOD_OBJRAWALLOCOBJ; meltcdat->drout_435__OUTPUCOD_OBJRAWALLOCOBJ.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -12838,10 +12881,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_ROUTDESCR_LEN - 1); meltcdat->drout_435__OUTPUCOD_OBJRAWALLOCOBJ.nbval = 7; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_435__OUTPUCOD_OBJRAWALLOCOBJ, - meltrout_111_warmelt_outobj_OUTPUCOD_OBJRAWALLOCOBJ); + meltrout_111_WARMELTmiOUTOBJ_OUTPUCOD_OBJRAWALLOCOBJ); /*iniclos dclo_436__OUTPUCOD_OBJRAWALLOCOBJ */ - /*_.VALCLO___V623*/ meltfptr[622] = + /*_._VALCLO___V623*/ meltfptr[622] = (melt_ptr_t) & meltcdat->dclo_436__OUTPUCOD_OBJRAWALLOCOBJ; meltcdat->dclo_436__OUTPUCOD_OBJRAWALLOCOBJ.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -12849,8 +12892,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_437__CLASS_OBJRAWALLOCOBJ*/ - /*uniqueobj*/ if (! /*_.VALDATA___V624*/ meltfptr[623]) -/*_.VALDATA___V624*/ meltfptr[623] = + /*uniqueobj*/ if (! /*_._VALDATA___V624*/ meltfptr[623]) +/*_._VALDATA___V624*/ meltfptr[623] = (melt_ptr_t) & meltcdat->dsym_437__CLASS_OBJRAWALLOCOBJ; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_437__CLASS_OBJRAWALLOCOBJ", @@ -12870,7 +12913,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_438__CLASS_OBJRAWALLO*/ - /*_.VALSTR___V625*/ meltfptr[624] = + /*_._VALSTR___V625*/ meltfptr[624] = (melt_ptr_t) & meltcdat->dstr_438__CLASS_OBJRAWALLO; meltcdat->dstr_438__CLASS_OBJRAWALLO.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -12882,7 +12925,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_438__CLASS_OBJRAWALLO.slen = 20; /*inirout drout_439__OUTPUCOD_OBJNEWCLOSURE */ - /*_.VALROUT___V626*/ meltfptr[625] = + /*_._VALROUT___V626*/ meltfptr[625] = (melt_ptr_t) & meltcdat->drout_439__OUTPUCOD_OBJNEWCLOSURE; meltcdat->drout_439__OUTPUCOD_OBJNEWCLOSURE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -12891,10 +12934,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_ROUTDESCR_LEN - 1); meltcdat->drout_439__OUTPUCOD_OBJNEWCLOSURE.nbval = 11; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_439__OUTPUCOD_OBJNEWCLOSURE, - meltrout_112_warmelt_outobj_OUTPUCOD_OBJNEWCLOSURE); + meltrout_112_WARMELTmiOUTOBJ_OUTPUCOD_OBJNEWCLOSURE); /*iniclos dclo_440__OUTPUCOD_OBJNEWCLOSURE */ - /*_.VALCLO___V628*/ meltfptr[627] = + /*_._VALCLO___V628*/ meltfptr[627] = (melt_ptr_t) & meltcdat->dclo_440__OUTPUCOD_OBJNEWCLOSURE; meltcdat->dclo_440__OUTPUCOD_OBJNEWCLOSURE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -12902,8 +12945,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_441__CLASS_OBJNEWCLOSURE*/ - /*uniqueobj*/ if (! /*_.VALDATA___V629*/ meltfptr[628]) -/*_.VALDATA___V629*/ meltfptr[628] = + /*uniqueobj*/ if (! /*_._VALDATA___V629*/ meltfptr[628]) +/*_._VALDATA___V629*/ meltfptr[628] = (melt_ptr_t) & meltcdat->dsym_441__CLASS_OBJNEWCLOSURE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_441__CLASS_OBJNEWCLOSURE", @@ -12923,7 +12966,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_442__CLASS_OBJNEWCLOS*/ - /*_.VALSTR___V630*/ meltfptr[629] = + /*_._VALSTR___V630*/ meltfptr[629] = (melt_ptr_t) & meltcdat->dstr_442__CLASS_OBJNEWCLOS; meltcdat->dstr_442__CLASS_OBJNEWCLOS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -12935,7 +12978,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_442__CLASS_OBJNEWCLOS.slen = 19; /*inirout drout_443__LAMBDA_ */ - /*_.VALROUT___V627*/ meltfptr[626] = + /*_._VALROUT___V627*/ meltfptr[626] = (melt_ptr_t) & meltcdat->drout_443__LAMBDA_; meltcdat->drout_443__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -12943,10 +12986,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, "LAMBDA_ @warmelt-outobj.melt:4482", MELT_ROUTDESCR_LEN - 1); meltcdat->drout_443__LAMBDA_.nbval = 3; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_443__LAMBDA_, - meltrout_113_warmelt_outobj_LAMBDA___25__); + meltrout_113_WARMELTmiOUTOBJ_LAMBDA___25__); /*inirout drout_444__OUTPUCOD_OBJTOUCH */ - /*_.VALROUT___V631*/ meltfptr[630] = + /*_._VALROUT___V631*/ meltfptr[630] = (melt_ptr_t) & meltcdat->drout_444__OUTPUCOD_OBJTOUCH; meltcdat->drout_444__OUTPUCOD_OBJTOUCH.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -12955,10 +12998,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_ROUTDESCR_LEN - 1); meltcdat->drout_444__OUTPUCOD_OBJTOUCH.nbval = 3; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_444__OUTPUCOD_OBJTOUCH, - meltrout_114_warmelt_outobj_OUTPUCOD_OBJTOUCH); + meltrout_114_WARMELTmiOUTOBJ_OUTPUCOD_OBJTOUCH); /*iniclos dclo_445__OUTPUCOD_OBJTOUCH */ - /*_.VALCLO___V632*/ meltfptr[631] = + /*_._VALCLO___V632*/ meltfptr[631] = (melt_ptr_t) & meltcdat->dclo_445__OUTPUCOD_OBJTOUCH; meltcdat->dclo_445__OUTPUCOD_OBJTOUCH.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -12966,8 +13009,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_446__CLASS_OBJTOUCH*/ - /*uniqueobj*/ if (! /*_.VALDATA___V633*/ meltfptr[632]) -/*_.VALDATA___V633*/ meltfptr[632] = + /*uniqueobj*/ if (! /*_._VALDATA___V633*/ meltfptr[632]) +/*_._VALDATA___V633*/ meltfptr[632] = (melt_ptr_t) & meltcdat->dsym_446__CLASS_OBJTOUCH; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_446__CLASS_OBJTOUCH", @@ -12987,7 +13030,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_447__CLASS_OBJTOUCH*/ - /*_.VALSTR___V634*/ meltfptr[633] = + /*_._VALSTR___V634*/ meltfptr[633] = (melt_ptr_t) & meltcdat->dstr_447__CLASS_OBJTOUCH; meltcdat->dstr_447__CLASS_OBJTOUCH.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -12999,7 +13042,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_447__CLASS_OBJTOUCH.slen = 14; /*inirout drout_448__OUTPUCOD_DBGTRACEWRITEOBJ */ - /*_.VALROUT___V635*/ meltfptr[634] = + /*_._VALROUT___V635*/ meltfptr[634] = (melt_ptr_t) & meltcdat->drout_448__OUTPUCOD_DBGTRACEWRITEOBJ; meltcdat->drout_448__OUTPUCOD_DBGTRACEWRITEOBJ.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -13008,10 +13051,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_ROUTDESCR_LEN - 1); meltcdat->drout_448__OUTPUCOD_DBGTRACEWRITEOBJ.nbval = 3; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_448__OUTPUCOD_DBGTRACEWRITEOBJ, - meltrout_115_warmelt_outobj_OUTPUCOD_DBGTRACEWRITEOBJ); + meltrout_115_WARMELTmiOUTOBJ_OUTPUCOD_DBGTRACEWRITEOBJ); /*iniclos dclo_449__OUTPUCOD_DBGTRACEWRITEOBJ */ - /*_.VALCLO___V636*/ meltfptr[635] = + /*_._VALCLO___V636*/ meltfptr[635] = (melt_ptr_t) & meltcdat->dclo_449__OUTPUCOD_DBGTRACEWRITEOBJ; meltcdat->dclo_449__OUTPUCOD_DBGTRACEWRITEOBJ.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -13019,8 +13062,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_450__CLASS_OBJDBGTRACEWRITEOBJ*/ - /*uniqueobj*/ if (! /*_.VALDATA___V637*/ meltfptr[636]) -/*_.VALDATA___V637*/ meltfptr[636] = + /*uniqueobj*/ if (! /*_._VALDATA___V637*/ meltfptr[636]) +/*_._VALDATA___V637*/ meltfptr[636] = (melt_ptr_t) & meltcdat->dsym_450__CLASS_OBJDBGTRACEWRITEOBJ; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg @@ -13040,7 +13083,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_451__CLASS_OBJDBGTRAC*/ - /*_.VALSTR___V638*/ meltfptr[637] = + /*_._VALSTR___V638*/ meltfptr[637] = (melt_ptr_t) & meltcdat->dstr_451__CLASS_OBJDBGTRAC; meltcdat->dstr_451__CLASS_OBJDBGTRAC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -13052,7 +13095,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_451__CLASS_OBJDBGTRAC.slen = 25; /*inirout drout_452__OUTPUCOD_OBJPUTUPLE */ - /*_.VALROUT___V639*/ meltfptr[638] = + /*_._VALROUT___V639*/ meltfptr[638] = (melt_ptr_t) & meltcdat->drout_452__OUTPUCOD_OBJPUTUPLE; meltcdat->drout_452__OUTPUCOD_OBJPUTUPLE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -13061,10 +13104,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_ROUTDESCR_LEN - 1); meltcdat->drout_452__OUTPUCOD_OBJPUTUPLE.nbval = 6; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_452__OUTPUCOD_OBJPUTUPLE, - meltrout_116_warmelt_outobj_OUTPUCOD_OBJPUTUPLE); + meltrout_116_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTUPLE); /*iniclos dclo_453__OUTPUCOD_OBJPUTUPLE */ - /*_.VALCLO___V640*/ meltfptr[639] = + /*_._VALCLO___V640*/ meltfptr[639] = (melt_ptr_t) & meltcdat->dclo_453__OUTPUCOD_OBJPUTUPLE; meltcdat->dclo_453__OUTPUCOD_OBJPUTUPLE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -13072,8 +13115,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_454__CLASS_OBJPUTUPLE*/ - /*uniqueobj*/ if (! /*_.VALDATA___V641*/ meltfptr[640]) -/*_.VALDATA___V641*/ meltfptr[640] = + /*uniqueobj*/ if (! /*_._VALDATA___V641*/ meltfptr[640]) +/*_._VALDATA___V641*/ meltfptr[640] = (melt_ptr_t) & meltcdat->dsym_454__CLASS_OBJPUTUPLE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_454__CLASS_OBJPUTUPLE", @@ -13093,7 +13136,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_455__CLASS_OBJPUTUPLE*/ - /*_.VALSTR___V642*/ meltfptr[641] = + /*_._VALSTR___V642*/ meltfptr[641] = (melt_ptr_t) & meltcdat->dstr_455__CLASS_OBJPUTUPLE; meltcdat->dstr_455__CLASS_OBJPUTUPLE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -13106,8 +13149,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_456__OBJPUTPAIRHEAD_COUNTER*/ - /*uniqueobj*/ if (! /*_.VALDATA___V643*/ meltfptr[642]) -/*_.VALDATA___V643*/ meltfptr[642] = + /*uniqueobj*/ if (! /*_._VALDATA___V643*/ meltfptr[642]) +/*_._VALDATA___V643*/ meltfptr[642] = (melt_ptr_t) & meltcdat->dsym_456__OBJPUTPAIRHEAD_COUNTER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg @@ -13127,7 +13170,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_457__OBJPUTPAIRHEAD_C*/ - /*_.VALSTR___V644*/ meltfptr[643] = + /*_._VALSTR___V644*/ meltfptr[643] = (melt_ptr_t) & meltcdat->dstr_457__OBJPUTPAIRHEAD_C; meltcdat->dstr_457__OBJPUTPAIRHEAD_C.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -13141,7 +13184,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_LOCATION ("warmelt-outobj.melt:4620:/ iniobj"); /*iniobj dobj_458__OBJPUTPAIRHEAD_COUNTER*/ -/*_.VALDATA___V645*/ meltfptr[644] = +/*_._VALDATA___V645*/ meltfptr[644] = (melt_ptr_t) & meltcdat->dobj_458__OBJPUTPAIRHEAD_COUNTER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg @@ -13156,18 +13199,18 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); meltcdat->dobj_458__OBJPUTPAIRHEAD_COUNTER.meltobj_class = (meltobject_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); - meltcdat->dobj_458__OBJPUTPAIRHEAD_COUNTER.obj_hash = 9050059; + meltcdat->dobj_458__OBJPUTPAIRHEAD_COUNTER.obj_hash = 92404073; meltcdat->dobj_458__OBJPUTPAIRHEAD_COUNTER.obj_len = 1; /*iniboxint dint_459__ */ - /*_.VALBXINT___V646*/ meltfptr[645] = (melt_ptr_t) & meltcdat->dint_459__; + /*_._VALBXINT___V646*/ meltfptr[645] = (melt_ptr_t) & meltcdat->dint_459__; meltcdat->dint_459__.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CONSTANT_INTEGER)))); meltcdat->dint_459__.val = 0; /*inirout drout_460__OUTPUCOD_OBJPUTPAIRHEAD */ - /*_.VALROUT___V647*/ meltfptr[646] = + /*_._VALROUT___V647*/ meltfptr[646] = (melt_ptr_t) & meltcdat->drout_460__OUTPUCOD_OBJPUTPAIRHEAD; meltcdat->drout_460__OUTPUCOD_OBJPUTPAIRHEAD.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -13176,10 +13219,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_ROUTDESCR_LEN - 1); meltcdat->drout_460__OUTPUCOD_OBJPUTPAIRHEAD.nbval = 7; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_460__OUTPUCOD_OBJPUTPAIRHEAD, - meltrout_117_warmelt_outobj_OUTPUCOD_OBJPUTPAIRHEAD); + meltrout_117_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTPAIRHEAD); /*iniclos dclo_461__OUTPUCOD_OBJPUTPAIRHEAD */ - /*_.VALCLO___V648*/ meltfptr[647] = + /*_._VALCLO___V648*/ meltfptr[647] = (melt_ptr_t) & meltcdat->dclo_461__OUTPUCOD_OBJPUTPAIRHEAD; meltcdat->dclo_461__OUTPUCOD_OBJPUTPAIRHEAD.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -13187,8 +13230,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_462__CLASS_OBJPUTPAIR*/ - /*uniqueobj*/ if (! /*_.VALDATA___V649*/ meltfptr[648]) -/*_.VALDATA___V649*/ meltfptr[648] = + /*uniqueobj*/ if (! /*_._VALDATA___V649*/ meltfptr[648]) +/*_._VALDATA___V649*/ meltfptr[648] = (melt_ptr_t) & meltcdat->dsym_462__CLASS_OBJPUTPAIR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_462__CLASS_OBJPUTPAIR", @@ -13208,7 +13251,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_463__CLASS_OBJPUTPAIR*/ - /*_.VALSTR___V650*/ meltfptr[649] = + /*_._VALSTR___V650*/ meltfptr[649] = (melt_ptr_t) & meltcdat->dstr_463__CLASS_OBJPUTPAIR; meltcdat->dstr_463__CLASS_OBJPUTPAIR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -13221,8 +13264,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_464__CLASS_OBJPUTPAIRHEAD*/ - /*uniqueobj*/ if (! /*_.VALDATA___V651*/ meltfptr[650]) -/*_.VALDATA___V651*/ meltfptr[650] = + /*uniqueobj*/ if (! /*_._VALDATA___V651*/ meltfptr[650]) +/*_._VALDATA___V651*/ meltfptr[650] = (melt_ptr_t) & meltcdat->dsym_464__CLASS_OBJPUTPAIRHEAD; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_464__CLASS_OBJPUTPAIRHEAD", @@ -13242,7 +13285,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_465__CLASS_OBJPUTPAIR*/ - /*_.VALSTR___V652*/ meltfptr[651] = + /*_._VALSTR___V652*/ meltfptr[651] = (melt_ptr_t) & meltcdat->dstr_465__CLASS_OBJPUTPAIR; meltcdat->dstr_465__CLASS_OBJPUTPAIR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -13254,7 +13297,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_465__CLASS_OBJPUTPAIR.slen = 20; /*inirout drout_466__OUTPUCOD_OBJPUTPAIRTAIL */ - /*_.VALROUT___V653*/ meltfptr[652] = + /*_._VALROUT___V653*/ meltfptr[652] = (melt_ptr_t) & meltcdat->drout_466__OUTPUCOD_OBJPUTPAIRTAIL; meltcdat->drout_466__OUTPUCOD_OBJPUTPAIRTAIL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -13263,10 +13306,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_ROUTDESCR_LEN - 1); meltcdat->drout_466__OUTPUCOD_OBJPUTPAIRTAIL.nbval = 6; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_466__OUTPUCOD_OBJPUTPAIRTAIL, - meltrout_118_warmelt_outobj_OUTPUCOD_OBJPUTPAIRTAIL); + meltrout_118_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTPAIRTAIL); /*iniclos dclo_467__OUTPUCOD_OBJPUTPAIRTAIL */ - /*_.VALCLO___V654*/ meltfptr[653] = + /*_._VALCLO___V654*/ meltfptr[653] = (melt_ptr_t) & meltcdat->dclo_467__OUTPUCOD_OBJPUTPAIRTAIL; meltcdat->dclo_467__OUTPUCOD_OBJPUTPAIRTAIL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -13274,8 +13317,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_468__CLASS_OBJPUTPAIRTAIL*/ - /*uniqueobj*/ if (! /*_.VALDATA___V655*/ meltfptr[654]) -/*_.VALDATA___V655*/ meltfptr[654] = + /*uniqueobj*/ if (! /*_._VALDATA___V655*/ meltfptr[654]) +/*_._VALDATA___V655*/ meltfptr[654] = (melt_ptr_t) & meltcdat->dsym_468__CLASS_OBJPUTPAIRTAIL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_468__CLASS_OBJPUTPAIRTAIL", @@ -13295,7 +13338,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_469__CLASS_OBJPUTPAIR*/ - /*_.VALSTR___V656*/ meltfptr[655] = + /*_._VALSTR___V656*/ meltfptr[655] = (melt_ptr_t) & meltcdat->dstr_469__CLASS_OBJPUTPAIR; meltcdat->dstr_469__CLASS_OBJPUTPAIR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -13307,7 +13350,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_469__CLASS_OBJPUTPAIR.slen = 20; /*inirout drout_470__OUTPUCOD_OBJPUTLIST */ - /*_.VALROUT___V657*/ meltfptr[656] = + /*_._VALROUT___V657*/ meltfptr[656] = (melt_ptr_t) & meltcdat->drout_470__OUTPUCOD_OBJPUTLIST; meltcdat->drout_470__OUTPUCOD_OBJPUTLIST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -13316,10 +13359,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_ROUTDESCR_LEN - 1); meltcdat->drout_470__OUTPUCOD_OBJPUTLIST.nbval = 5; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_470__OUTPUCOD_OBJPUTLIST, - meltrout_119_warmelt_outobj_OUTPUCOD_OBJPUTLIST); + meltrout_119_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTLIST); /*iniclos dclo_471__OUTPUCOD_OBJPUTLIST */ - /*_.VALCLO___V658*/ meltfptr[657] = + /*_._VALCLO___V658*/ meltfptr[657] = (melt_ptr_t) & meltcdat->dclo_471__OUTPUCOD_OBJPUTLIST; meltcdat->dclo_471__OUTPUCOD_OBJPUTLIST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -13327,8 +13370,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_472__CLASS_OBJPUTLIST*/ - /*uniqueobj*/ if (! /*_.VALDATA___V659*/ meltfptr[658]) -/*_.VALDATA___V659*/ meltfptr[658] = + /*uniqueobj*/ if (! /*_._VALDATA___V659*/ meltfptr[658]) +/*_._VALDATA___V659*/ meltfptr[658] = (melt_ptr_t) & meltcdat->dsym_472__CLASS_OBJPUTLIST; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_472__CLASS_OBJPUTLIST", @@ -13348,7 +13391,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_473__CLASS_OBJPUTLIST*/ - /*_.VALSTR___V660*/ meltfptr[659] = + /*_._VALSTR___V660*/ meltfptr[659] = (melt_ptr_t) & meltcdat->dstr_473__CLASS_OBJPUTLIST; meltcdat->dstr_473__CLASS_OBJPUTLIST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -13360,7 +13403,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_473__CLASS_OBJPUTLIST.slen = 16; /*inirout drout_474__OUTPUCOD_OBJGETSLOT */ - /*_.VALROUT___V661*/ meltfptr[660] = + /*_._VALROUT___V661*/ meltfptr[660] = (melt_ptr_t) & meltcdat->drout_474__OUTPUCOD_OBJGETSLOT; meltcdat->drout_474__OUTPUCOD_OBJGETSLOT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -13369,10 +13412,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_ROUTDESCR_LEN - 1); meltcdat->drout_474__OUTPUCOD_OBJGETSLOT.nbval = 12; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_474__OUTPUCOD_OBJGETSLOT, - meltrout_120_warmelt_outobj_OUTPUCOD_OBJGETSLOT); + meltrout_120_WARMELTmiOUTOBJ_OUTPUCOD_OBJGETSLOT); /*iniclos dclo_475__OUTPUCOD_OBJGETSLOT */ - /*_.VALCLO___V663*/ meltfptr[662] = + /*_._VALCLO___V663*/ meltfptr[662] = (melt_ptr_t) & meltcdat->dclo_475__OUTPUCOD_OBJGETSLOT; meltcdat->dclo_475__OUTPUCOD_OBJGETSLOT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -13380,8 +13423,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_476__CLASS_OBJGETSLOT*/ - /*uniqueobj*/ if (! /*_.VALDATA___V664*/ meltfptr[663]) -/*_.VALDATA___V664*/ meltfptr[663] = + /*uniqueobj*/ if (! /*_._VALDATA___V664*/ meltfptr[663]) +/*_._VALDATA___V664*/ meltfptr[663] = (melt_ptr_t) & meltcdat->dsym_476__CLASS_OBJGETSLOT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_476__CLASS_OBJGETSLOT", @@ -13401,7 +13444,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_477__CLASS_OBJGETSLOT*/ - /*_.VALSTR___V665*/ meltfptr[664] = + /*_._VALSTR___V665*/ meltfptr[664] = (melt_ptr_t) & meltcdat->dstr_477__CLASS_OBJGETSLOT; meltcdat->dstr_477__CLASS_OBJGETSLOT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -13414,8 +13457,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_478__CLASS_FIELD*/ - /*uniqueobj*/ if (! /*_.VALDATA___V666*/ meltfptr[665]) -/*_.VALDATA___V666*/ meltfptr[665] = + /*uniqueobj*/ if (! /*_._VALDATA___V666*/ meltfptr[665]) +/*_._VALDATA___V666*/ meltfptr[665] = (melt_ptr_t) & meltcdat->dsym_478__CLASS_FIELD; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_478__CLASS_FIELD", @@ -13435,7 +13478,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_479__CLASS_FIELD*/ - /*_.VALSTR___V667*/ meltfptr[666] = + /*_._VALSTR___V667*/ meltfptr[666] = (melt_ptr_t) & meltcdat->dstr_479__CLASS_FIELD; meltcdat->dstr_479__CLASS_FIELD.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -13447,7 +13490,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_479__CLASS_FIELD.slen = 11; /*inirout drout_480__LAMBDA_ */ - /*_.VALROUT___V662*/ meltfptr[661] = + /*_._VALROUT___V662*/ meltfptr[661] = (melt_ptr_t) & meltcdat->drout_480__LAMBDA_; meltcdat->drout_480__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -13455,10 +13498,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, "LAMBDA_ @warmelt-outobj.melt:4732", MELT_ROUTDESCR_LEN - 1); meltcdat->drout_480__LAMBDA_.nbval = 3; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_480__LAMBDA_, - meltrout_121_warmelt_outobj_LAMBDA___26__); + meltrout_121_WARMELTmiOUTOBJ_LAMBDA___26__); /*inirout drout_481__OUTPUCOD_OBJPUTSLOT */ - /*_.VALROUT___V668*/ meltfptr[667] = + /*_._VALROUT___V668*/ meltfptr[667] = (melt_ptr_t) & meltcdat->drout_481__OUTPUCOD_OBJPUTSLOT; meltcdat->drout_481__OUTPUCOD_OBJPUTSLOT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -13467,10 +13510,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_ROUTDESCR_LEN - 1); meltcdat->drout_481__OUTPUCOD_OBJPUTSLOT.nbval = 8; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_481__OUTPUCOD_OBJPUTSLOT, - meltrout_122_warmelt_outobj_OUTPUCOD_OBJPUTSLOT); + meltrout_122_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTSLOT); /*iniclos dclo_482__OUTPUCOD_OBJPUTSLOT */ - /*_.VALCLO___V669*/ meltfptr[668] = + /*_._VALCLO___V669*/ meltfptr[668] = (melt_ptr_t) & meltcdat->dclo_482__OUTPUCOD_OBJPUTSLOT; meltcdat->dclo_482__OUTPUCOD_OBJPUTSLOT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -13478,8 +13521,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_483__CLASS_OBJPUTSLOT*/ - /*uniqueobj*/ if (! /*_.VALDATA___V670*/ meltfptr[669]) -/*_.VALDATA___V670*/ meltfptr[669] = + /*uniqueobj*/ if (! /*_._VALDATA___V670*/ meltfptr[669]) +/*_._VALDATA___V670*/ meltfptr[669] = (melt_ptr_t) & meltcdat->dsym_483__CLASS_OBJPUTSLOT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_483__CLASS_OBJPUTSLOT", @@ -13499,7 +13542,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_484__CLASS_OBJPUTSLOT*/ - /*_.VALSTR___V671*/ meltfptr[670] = + /*_._VALSTR___V671*/ meltfptr[670] = (melt_ptr_t) & meltcdat->dstr_484__CLASS_OBJPUTSLOT; meltcdat->dstr_484__CLASS_OBJPUTSLOT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -13511,7 +13554,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_484__CLASS_OBJPUTSLOT.slen = 16; /*inirout drout_485__OUTPUCOD_OBJPUTCLOSUROUT */ - /*_.VALROUT___V672*/ meltfptr[671] = + /*_._VALROUT___V672*/ meltfptr[671] = (melt_ptr_t) & meltcdat->drout_485__OUTPUCOD_OBJPUTCLOSUROUT; meltcdat->drout_485__OUTPUCOD_OBJPUTCLOSUROUT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -13520,10 +13563,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_ROUTDESCR_LEN - 1); meltcdat->drout_485__OUTPUCOD_OBJPUTCLOSUROUT.nbval = 5; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_485__OUTPUCOD_OBJPUTCLOSUROUT, - meltrout_123_warmelt_outobj_OUTPUCOD_OBJPUTCLOSUROUT); + meltrout_123_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTCLOSUROUT); /*iniclos dclo_486__OUTPUCOD_OBJPUTCLOSUROUT */ - /*_.VALCLO___V673*/ meltfptr[672] = + /*_._VALCLO___V673*/ meltfptr[672] = (melt_ptr_t) & meltcdat->dclo_486__OUTPUCOD_OBJPUTCLOSUROUT; meltcdat->dclo_486__OUTPUCOD_OBJPUTCLOSUROUT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -13531,8 +13574,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_487__CLASS_OBJPUTCLOSUROUT*/ - /*uniqueobj*/ if (! /*_.VALDATA___V674*/ meltfptr[673]) -/*_.VALDATA___V674*/ meltfptr[673] = + /*uniqueobj*/ if (! /*_._VALDATA___V674*/ meltfptr[673]) +/*_._VALDATA___V674*/ meltfptr[673] = (melt_ptr_t) & meltcdat->dsym_487__CLASS_OBJPUTCLOSUROUT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg @@ -13552,7 +13595,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_488__CLASS_OBJPUTCLOS*/ - /*_.VALSTR___V675*/ meltfptr[674] = + /*_._VALSTR___V675*/ meltfptr[674] = (melt_ptr_t) & meltcdat->dstr_488__CLASS_OBJPUTCLOS; meltcdat->dstr_488__CLASS_OBJPUTCLOS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -13564,7 +13607,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_488__CLASS_OBJPUTCLOS.slen = 21; /*inirout drout_489__OUTPUCOD_OBJPUTCLOSEDV */ - /*_.VALROUT___V676*/ meltfptr[675] = + /*_._VALROUT___V676*/ meltfptr[675] = (melt_ptr_t) & meltcdat->drout_489__OUTPUCOD_OBJPUTCLOSEDV; meltcdat->drout_489__OUTPUCOD_OBJPUTCLOSEDV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -13573,10 +13616,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_ROUTDESCR_LEN - 1); meltcdat->drout_489__OUTPUCOD_OBJPUTCLOSEDV.nbval = 5; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_489__OUTPUCOD_OBJPUTCLOSEDV, - meltrout_124_warmelt_outobj_OUTPUCOD_OBJPUTCLOSEDV); + meltrout_124_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTCLOSEDV); /*iniclos dclo_490__OUTPUCOD_OBJPUTCLOSEDV */ - /*_.VALCLO___V677*/ meltfptr[676] = + /*_._VALCLO___V677*/ meltfptr[676] = (melt_ptr_t) & meltcdat->dclo_490__OUTPUCOD_OBJPUTCLOSEDV; meltcdat->dclo_490__OUTPUCOD_OBJPUTCLOSEDV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -13584,8 +13627,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_491__CLASS_OBJPUTCLOSEDV*/ - /*uniqueobj*/ if (! /*_.VALDATA___V678*/ meltfptr[677]) -/*_.VALDATA___V678*/ meltfptr[677] = + /*uniqueobj*/ if (! /*_._VALDATA___V678*/ meltfptr[677]) +/*_._VALDATA___V678*/ meltfptr[677] = (melt_ptr_t) & meltcdat->dsym_491__CLASS_OBJPUTCLOSEDV; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_491__CLASS_OBJPUTCLOSEDV", @@ -13605,7 +13648,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_492__CLASS_OBJPUTCLOS*/ - /*_.VALSTR___V679*/ meltfptr[678] = + /*_._VALSTR___V679*/ meltfptr[678] = (melt_ptr_t) & meltcdat->dstr_492__CLASS_OBJPUTCLOS; meltcdat->dstr_492__CLASS_OBJPUTCLOS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -13617,7 +13660,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_492__CLASS_OBJPUTCLOS.slen = 19; /*inirout drout_493__OUTPUCOD_OBJPUTCLOSEDNOTNULLV */ - /*_.VALROUT___V680*/ meltfptr[679] = + /*_._VALROUT___V680*/ meltfptr[679] = (melt_ptr_t) & meltcdat->drout_493__OUTPUCOD_OBJPUTCLOSEDNOTNULLV; meltcdat->drout_493__OUTPUCOD_OBJPUTCLOSEDNOTNULLV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -13627,10 +13670,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->drout_493__OUTPUCOD_OBJPUTCLOSEDNOTNULLV.nbval = 5; MELT_ROUTINE_SET_ROUTCODE (&meltcdat-> drout_493__OUTPUCOD_OBJPUTCLOSEDNOTNULLV, - meltrout_125_warmelt_outobj_OUTPUCOD_OBJPUTCLOSEDNOTNULLV); + meltrout_125_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTCLOSEDNOTNULLV); /*iniclos dclo_494__OUTPUCOD_OBJPUTCLOSEDNOTNULLV */ - /*_.VALCLO___V681*/ meltfptr[680] = + /*_._VALCLO___V681*/ meltfptr[680] = (melt_ptr_t) & meltcdat->dclo_494__OUTPUCOD_OBJPUTCLOSEDNOTNULLV; meltcdat->dclo_494__OUTPUCOD_OBJPUTCLOSEDNOTNULLV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -13638,8 +13681,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_495__CLASS_OBJPUTCLOSEDNOTNULLV*/ - /*uniqueobj*/ if (! /*_.VALDATA___V682*/ meltfptr[681]) -/*_.VALDATA___V682*/ meltfptr[681] = + /*uniqueobj*/ if (! /*_._VALDATA___V682*/ meltfptr[681]) +/*_._VALDATA___V682*/ meltfptr[681] = (melt_ptr_t) & meltcdat->dsym_495__CLASS_OBJPUTCLOSEDNOTNULLV; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg @@ -13659,7 +13702,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_496__CLASS_OBJPUTCLOS*/ - /*_.VALSTR___V683*/ meltfptr[682] = + /*_._VALSTR___V683*/ meltfptr[682] = (melt_ptr_t) & meltcdat->dstr_496__CLASS_OBJPUTCLOS; meltcdat->dstr_496__CLASS_OBJPUTCLOS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -13671,7 +13714,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_496__CLASS_OBJPUTCLOS.slen = 26; /*inirout drout_497__OUTPUCOD_OBJPUTROUTCONST */ - /*_.VALROUT___V684*/ meltfptr[683] = + /*_._VALROUT___V684*/ meltfptr[683] = (melt_ptr_t) & meltcdat->drout_497__OUTPUCOD_OBJPUTROUTCONST; meltcdat->drout_497__OUTPUCOD_OBJPUTROUTCONST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -13680,10 +13723,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_ROUTDESCR_LEN - 1); meltcdat->drout_497__OUTPUCOD_OBJPUTROUTCONST.nbval = 6; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_497__OUTPUCOD_OBJPUTROUTCONST, - meltrout_126_warmelt_outobj_OUTPUCOD_OBJPUTROUTCONST); + meltrout_126_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTROUTCONST); /*iniclos dclo_498__OUTPUCOD_OBJPUTROUTCONST */ - /*_.VALCLO___V685*/ meltfptr[684] = + /*_._VALCLO___V685*/ meltfptr[684] = (melt_ptr_t) & meltcdat->dclo_498__OUTPUCOD_OBJPUTROUTCONST; meltcdat->dclo_498__OUTPUCOD_OBJPUTROUTCONST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -13691,8 +13734,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_499__CLASS_OBJPUTROUTCONST*/ - /*uniqueobj*/ if (! /*_.VALDATA___V686*/ meltfptr[685]) -/*_.VALDATA___V686*/ meltfptr[685] = + /*uniqueobj*/ if (! /*_._VALDATA___V686*/ meltfptr[685]) +/*_._VALDATA___V686*/ meltfptr[685] = (melt_ptr_t) & meltcdat->dsym_499__CLASS_OBJPUTROUTCONST; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg @@ -13712,7 +13755,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_500__CLASS_OBJPUTROUT*/ - /*_.VALSTR___V687*/ meltfptr[686] = + /*_._VALSTR___V687*/ meltfptr[686] = (melt_ptr_t) & meltcdat->dstr_500__CLASS_OBJPUTROUT; meltcdat->dstr_500__CLASS_OBJPUTROUT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -13724,7 +13767,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_500__CLASS_OBJPUTROUT.slen = 21; /*inirout drout_501__OUTPUCOD_OBJPUTROUTCONSTNOTNULL */ - /*_.VALROUT___V688*/ meltfptr[687] = + /*_._VALROUT___V688*/ meltfptr[687] = (melt_ptr_t) & meltcdat->drout_501__OUTPUCOD_OBJPUTROUTCONSTNOTNULL; meltcdat->drout_501__OUTPUCOD_OBJPUTROUTCONSTNOTNULL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -13734,10 +13777,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->drout_501__OUTPUCOD_OBJPUTROUTCONSTNOTNULL.nbval = 5; MELT_ROUTINE_SET_ROUTCODE (&meltcdat-> drout_501__OUTPUCOD_OBJPUTROUTCONSTNOTNULL, - meltrout_127_warmelt_outobj_OUTPUCOD_OBJPUTROUTCONSTNOTNULL); + meltrout_127_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTROUTCONSTNOTNULL); /*iniclos dclo_502__OUTPUCOD_OBJPUTROUTCONSTNOTNULL */ - /*_.VALCLO___V689*/ meltfptr[688] = + /*_._VALCLO___V689*/ meltfptr[688] = (melt_ptr_t) & meltcdat->dclo_502__OUTPUCOD_OBJPUTROUTCONSTNOTNULL; meltcdat->dclo_502__OUTPUCOD_OBJPUTROUTCONSTNOTNULL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -13745,8 +13788,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_503__CLASS_OBJPUTROUTCONSTNOTNULL*/ - /*uniqueobj*/ if (! /*_.VALDATA___V690*/ meltfptr[689]) -/*_.VALDATA___V690*/ meltfptr[689] = + /*uniqueobj*/ if (! /*_._VALDATA___V690*/ meltfptr[689]) +/*_._VALDATA___V690*/ meltfptr[689] = (melt_ptr_t) & meltcdat->dsym_503__CLASS_OBJPUTROUTCONSTNOTNULL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg @@ -13766,7 +13809,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_504__CLASS_OBJPUTROUT*/ - /*_.VALSTR___V691*/ meltfptr[690] = + /*_._VALSTR___V691*/ meltfptr[690] = (melt_ptr_t) & meltcdat->dstr_504__CLASS_OBJPUTROUT; meltcdat->dstr_504__CLASS_OBJPUTROUT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -13778,7 +13821,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_504__CLASS_OBJPUTROUT.slen = 28; /*inirout drout_505__OUTPUCOD_OBJPUTHOOKCONST */ - /*_.VALROUT___V692*/ meltfptr[691] = + /*_._VALROUT___V692*/ meltfptr[691] = (melt_ptr_t) & meltcdat->drout_505__OUTPUCOD_OBJPUTHOOKCONST; meltcdat->drout_505__OUTPUCOD_OBJPUTHOOKCONST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -13787,10 +13830,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_ROUTDESCR_LEN - 1); meltcdat->drout_505__OUTPUCOD_OBJPUTHOOKCONST.nbval = 8; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_505__OUTPUCOD_OBJPUTHOOKCONST, - meltrout_128_warmelt_outobj_OUTPUCOD_OBJPUTHOOKCONST); + meltrout_128_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTHOOKCONST); /*iniclos dclo_506__OUTPUCOD_OBJPUTHOOKCONST */ - /*_.VALCLO___V693*/ meltfptr[692] = + /*_._VALCLO___V693*/ meltfptr[692] = (melt_ptr_t) & meltcdat->dclo_506__OUTPUCOD_OBJPUTHOOKCONST; meltcdat->dclo_506__OUTPUCOD_OBJPUTHOOKCONST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -13798,8 +13841,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_507__CLASS_OBJPUTHOOKCONST*/ - /*uniqueobj*/ if (! /*_.VALDATA___V694*/ meltfptr[693]) -/*_.VALDATA___V694*/ meltfptr[693] = + /*uniqueobj*/ if (! /*_._VALDATA___V694*/ meltfptr[693]) +/*_._VALDATA___V694*/ meltfptr[693] = (melt_ptr_t) & meltcdat->dsym_507__CLASS_OBJPUTHOOKCONST; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg @@ -13819,7 +13862,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_508__CLASS_OBJPUTHOOK*/ - /*_.VALSTR___V695*/ meltfptr[694] = + /*_._VALSTR___V695*/ meltfptr[694] = (melt_ptr_t) & meltcdat->dstr_508__CLASS_OBJPUTHOOK; meltcdat->dstr_508__CLASS_OBJPUTHOOK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -13832,8 +13875,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_509__CLASS_NREP_BOUND_DATA*/ - /*uniqueobj*/ if (! /*_.VALDATA___V696*/ meltfptr[695]) -/*_.VALDATA___V696*/ meltfptr[695] = + /*uniqueobj*/ if (! /*_._VALDATA___V696*/ meltfptr[695]) +/*_._VALDATA___V696*/ meltfptr[695] = (melt_ptr_t) & meltcdat->dsym_509__CLASS_NREP_BOUND_DATA; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg @@ -13853,7 +13896,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_510__CLASS_NREP_BOUND*/ - /*_.VALSTR___V697*/ meltfptr[696] = + /*_._VALSTR___V697*/ meltfptr[696] = (melt_ptr_t) & meltcdat->dstr_510__CLASS_NREP_BOUND; meltcdat->dstr_510__CLASS_NREP_BOUND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -13865,7 +13908,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_510__CLASS_NREP_BOUND.slen = 21; /*inirout drout_511__OUTPUCOD_OBJPUTHOOKDATA */ - /*_.VALROUT___V698*/ meltfptr[697] = + /*_._VALROUT___V698*/ meltfptr[697] = (melt_ptr_t) & meltcdat->drout_511__OUTPUCOD_OBJPUTHOOKDATA; meltcdat->drout_511__OUTPUCOD_OBJPUTHOOKDATA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -13874,10 +13917,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_ROUTDESCR_LEN - 1); meltcdat->drout_511__OUTPUCOD_OBJPUTHOOKDATA.nbval = 9; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_511__OUTPUCOD_OBJPUTHOOKDATA, - meltrout_129_warmelt_outobj_OUTPUCOD_OBJPUTHOOKDATA); + meltrout_129_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTHOOKDATA); /*iniclos dclo_512__OUTPUCOD_OBJPUTHOOKDATA */ - /*_.VALCLO___V699*/ meltfptr[698] = + /*_._VALCLO___V699*/ meltfptr[698] = (melt_ptr_t) & meltcdat->dclo_512__OUTPUCOD_OBJPUTHOOKDATA; meltcdat->dclo_512__OUTPUCOD_OBJPUTHOOKDATA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -13885,8 +13928,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_513__CLASS_OBJPUTHOOKDATA*/ - /*uniqueobj*/ if (! /*_.VALDATA___V700*/ meltfptr[699]) -/*_.VALDATA___V700*/ meltfptr[699] = + /*uniqueobj*/ if (! /*_._VALDATA___V700*/ meltfptr[699]) +/*_._VALDATA___V700*/ meltfptr[699] = (melt_ptr_t) & meltcdat->dsym_513__CLASS_OBJPUTHOOKDATA; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_513__CLASS_OBJPUTHOOKDATA", @@ -13906,7 +13949,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_514__CLASS_OBJPUTHOOK*/ - /*_.VALSTR___V701*/ meltfptr[700] = + /*_._VALSTR___V701*/ meltfptr[700] = (melt_ptr_t) & meltcdat->dstr_514__CLASS_OBJPUTHOOK; meltcdat->dstr_514__CLASS_OBJPUTHOOK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -13918,7 +13961,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_514__CLASS_OBJPUTHOOK.slen = 20; /*inirout drout_515__OUTPUCOD_OBJPUTXTRARESULT */ - /*_.VALROUT___V702*/ meltfptr[701] = + /*_._VALROUT___V702*/ meltfptr[701] = (melt_ptr_t) & meltcdat->drout_515__OUTPUCOD_OBJPUTXTRARESULT; meltcdat->drout_515__OUTPUCOD_OBJPUTXTRARESULT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -13927,10 +13970,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_ROUTDESCR_LEN - 1); meltcdat->drout_515__OUTPUCOD_OBJPUTXTRARESULT.nbval = 10; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_515__OUTPUCOD_OBJPUTXTRARESULT, - meltrout_130_warmelt_outobj_OUTPUCOD_OBJPUTXTRARESULT); + meltrout_130_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTXTRARESULT); /*iniclos dclo_516__OUTPUCOD_OBJPUTXTRARESULT */ - /*_.VALCLO___V703*/ meltfptr[702] = + /*_._VALCLO___V703*/ meltfptr[702] = (melt_ptr_t) & meltcdat->dclo_516__OUTPUCOD_OBJPUTXTRARESULT; meltcdat->dclo_516__OUTPUCOD_OBJPUTXTRARESULT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -13938,8 +13981,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_517__CLASS_OBJPUTXTRARESULT*/ - /*uniqueobj*/ if (! /*_.VALDATA___V704*/ meltfptr[703]) -/*_.VALDATA___V704*/ meltfptr[703] = + /*uniqueobj*/ if (! /*_._VALDATA___V704*/ meltfptr[703]) +/*_._VALDATA___V704*/ meltfptr[703] = (melt_ptr_t) & meltcdat->dsym_517__CLASS_OBJPUTXTRARESULT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg @@ -13959,7 +14002,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_518__CLASS_OBJPUTXTRA*/ - /*_.VALSTR___V705*/ meltfptr[704] = + /*_._VALSTR___V705*/ meltfptr[704] = (melt_ptr_t) & meltcdat->dstr_518__CLASS_OBJPUTXTRA; meltcdat->dstr_518__CLASS_OBJPUTXTRA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -13971,7 +14014,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_518__CLASS_OBJPUTXTRA.slen = 22; /*inirout drout_519__OUTPUCOD_OBJEXPV */ - /*_.VALROUT___V706*/ meltfptr[705] = + /*_._VALROUT___V706*/ meltfptr[705] = (melt_ptr_t) & meltcdat->drout_519__OUTPUCOD_OBJEXPV; meltcdat->drout_519__OUTPUCOD_OBJEXPV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -13980,10 +14023,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_ROUTDESCR_LEN - 1); meltcdat->drout_519__OUTPUCOD_OBJEXPV.nbval = 5; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_519__OUTPUCOD_OBJEXPV, - meltrout_131_warmelt_outobj_OUTPUCOD_OBJEXPV); + meltrout_131_WARMELTmiOUTOBJ_OUTPUCOD_OBJEXPV); /*iniclos dclo_520__OUTPUCOD_OBJEXPV */ - /*_.VALCLO___V707*/ meltfptr[706] = + /*_._VALCLO___V707*/ meltfptr[706] = (melt_ptr_t) & meltcdat->dclo_520__OUTPUCOD_OBJEXPV; meltcdat->dclo_520__OUTPUCOD_OBJEXPV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -13991,8 +14034,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_521__CLASS_OBJEXPV*/ - /*uniqueobj*/ if (! /*_.VALDATA___V708*/ meltfptr[707]) -/*_.VALDATA___V708*/ meltfptr[707] = + /*uniqueobj*/ if (! /*_._VALDATA___V708*/ meltfptr[707]) +/*_._VALDATA___V708*/ meltfptr[707] = (melt_ptr_t) & meltcdat->dsym_521__CLASS_OBJEXPV; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_521__CLASS_OBJEXPV", @@ -14012,7 +14055,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_522__CLASS_OBJEXPV*/ - /*_.VALSTR___V709*/ meltfptr[708] = + /*_._VALSTR___V709*/ meltfptr[708] = (melt_ptr_t) & meltcdat->dstr_522__CLASS_OBJEXPV; meltcdat->dstr_522__CLASS_OBJEXPV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -14024,7 +14067,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_522__CLASS_OBJEXPV.slen = 13; /*inirout drout_523__OUTPUCOD_OBJLOCATEDEXPV */ - /*_.VALROUT___V710*/ meltfptr[709] = + /*_._VALROUT___V710*/ meltfptr[709] = (melt_ptr_t) & meltcdat->drout_523__OUTPUCOD_OBJLOCATEDEXPV; meltcdat->drout_523__OUTPUCOD_OBJLOCATEDEXPV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -14033,10 +14076,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_ROUTDESCR_LEN - 1); meltcdat->drout_523__OUTPUCOD_OBJLOCATEDEXPV.nbval = 8; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_523__OUTPUCOD_OBJLOCATEDEXPV, - meltrout_132_warmelt_outobj_OUTPUCOD_OBJLOCATEDEXPV); + meltrout_132_WARMELTmiOUTOBJ_OUTPUCOD_OBJLOCATEDEXPV); /*iniclos dclo_524__OUTPUCOD_OBJLOCATEDEXPV */ - /*_.VALCLO___V711*/ meltfptr[710] = + /*_._VALCLO___V711*/ meltfptr[710] = (melt_ptr_t) & meltcdat->dclo_524__OUTPUCOD_OBJLOCATEDEXPV; meltcdat->dclo_524__OUTPUCOD_OBJLOCATEDEXPV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -14044,8 +14087,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_525__CLASS_OBJLOCATEDEXPV*/ - /*uniqueobj*/ if (! /*_.VALDATA___V712*/ meltfptr[711]) -/*_.VALDATA___V712*/ meltfptr[711] = + /*uniqueobj*/ if (! /*_._VALDATA___V712*/ meltfptr[711]) +/*_._VALDATA___V712*/ meltfptr[711] = (melt_ptr_t) & meltcdat->dsym_525__CLASS_OBJLOCATEDEXPV; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_525__CLASS_OBJLOCATEDEXPV", @@ -14065,7 +14108,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_526__CLASS_OBJLOCATED*/ - /*_.VALSTR___V713*/ meltfptr[712] = + /*_._VALSTR___V713*/ meltfptr[712] = (melt_ptr_t) & meltcdat->dstr_526__CLASS_OBJLOCATED; meltcdat->dstr_526__CLASS_OBJLOCATED.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -14077,7 +14120,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_526__CLASS_OBJLOCATED.slen = 20; /*inirout drout_527__OUTPUCOD_VERBATIMSTRING */ - /*_.VALROUT___V714*/ meltfptr[713] = + /*_._VALROUT___V714*/ meltfptr[713] = (melt_ptr_t) & meltcdat->drout_527__OUTPUCOD_VERBATIMSTRING; meltcdat->drout_527__OUTPUCOD_VERBATIMSTRING.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -14086,17 +14129,17 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_ROUTDESCR_LEN - 1); meltcdat->drout_527__OUTPUCOD_VERBATIMSTRING.nbval = 3; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_527__OUTPUCOD_VERBATIMSTRING, - meltrout_133_warmelt_outobj_OUTPUCOD_VERBATIMSTRING); + meltrout_133_WARMELTmiOUTOBJ_OUTPUCOD_VERBATIMSTRING); /*iniclos dclo_528__OUTPUCOD_VERBATIMSTRING */ - /*_.VALCLO___V715*/ meltfptr[714] = + /*_._VALCLO___V715*/ meltfptr[714] = (melt_ptr_t) & meltcdat->dclo_528__OUTPUCOD_VERBATIMSTRING; meltcdat->dclo_528__OUTPUCOD_VERBATIMSTRING.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); meltcdat->dclo_528__OUTPUCOD_VERBATIMSTRING.nbval = 0; /*inirout drout_529__OUTPUCOD_STRING */ - /*_.VALROUT___V716*/ meltfptr[715] = + /*_._VALROUT___V716*/ meltfptr[715] = (melt_ptr_t) & meltcdat->drout_529__OUTPUCOD_STRING; meltcdat->drout_529__OUTPUCOD_STRING.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -14105,17 +14148,17 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_ROUTDESCR_LEN - 1); meltcdat->drout_529__OUTPUCOD_STRING.nbval = 3; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_529__OUTPUCOD_STRING, - meltrout_134_warmelt_outobj_OUTPUCOD_STRING); + meltrout_134_WARMELTmiOUTOBJ_OUTPUCOD_STRING); /*iniclos dclo_530__OUTPUCOD_STRING */ - /*_.VALCLO___V717*/ meltfptr[716] = + /*_._VALCLO___V717*/ meltfptr[716] = (melt_ptr_t) & meltcdat->dclo_530__OUTPUCOD_STRING; meltcdat->dclo_530__OUTPUCOD_STRING.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); meltcdat->dclo_530__OUTPUCOD_STRING.nbval = 0; /*inirout drout_531__OUTPUCOD_INTEGER */ - /*_.VALROUT___V718*/ meltfptr[717] = + /*_._VALROUT___V718*/ meltfptr[717] = (melt_ptr_t) & meltcdat->drout_531__OUTPUCOD_INTEGER; meltcdat->drout_531__OUTPUCOD_INTEGER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -14124,17 +14167,17 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_ROUTDESCR_LEN - 1); meltcdat->drout_531__OUTPUCOD_INTEGER.nbval = 0; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_531__OUTPUCOD_INTEGER, - meltrout_135_warmelt_outobj_OUTPUCOD_INTEGER); + meltrout_135_WARMELTmiOUTOBJ_OUTPUCOD_INTEGER); /*iniclos dclo_532__OUTPUCOD_INTEGER */ - /*_.VALCLO___V719*/ meltfptr[718] = + /*_._VALCLO___V719*/ meltfptr[718] = (melt_ptr_t) & meltcdat->dclo_532__OUTPUCOD_INTEGER; meltcdat->dclo_532__OUTPUCOD_INTEGER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); meltcdat->dclo_532__OUTPUCOD_INTEGER.nbval = 0; /*inirout drout_533__OUTPUCOD_FINALRETURN */ - /*_.VALROUT___V720*/ meltfptr[719] = + /*_._VALROUT___V720*/ meltfptr[719] = (melt_ptr_t) & meltcdat->drout_533__OUTPUCOD_FINALRETURN; meltcdat->drout_533__OUTPUCOD_FINALRETURN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -14143,10 +14186,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_ROUTDESCR_LEN - 1); meltcdat->drout_533__OUTPUCOD_FINALRETURN.nbval = 4; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_533__OUTPUCOD_FINALRETURN, - meltrout_136_warmelt_outobj_OUTPUCOD_FINALRETURN); + meltrout_136_WARMELTmiOUTOBJ_OUTPUCOD_FINALRETURN); /*iniclos dclo_534__OUTPUCOD_FINALRETURN */ - /*_.VALCLO___V721*/ meltfptr[720] = + /*_._VALCLO___V721*/ meltfptr[720] = (melt_ptr_t) & meltcdat->dclo_534__OUTPUCOD_FINALRETURN; meltcdat->dclo_534__OUTPUCOD_FINALRETURN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -14154,8 +14197,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_535__CLASS_OBJFINALRETURN*/ - /*uniqueobj*/ if (! /*_.VALDATA___V722*/ meltfptr[721]) -/*_.VALDATA___V722*/ meltfptr[721] = + /*uniqueobj*/ if (! /*_._VALDATA___V722*/ meltfptr[721]) +/*_._VALDATA___V722*/ meltfptr[721] = (melt_ptr_t) & meltcdat->dsym_535__CLASS_OBJFINALRETURN; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_535__CLASS_OBJFINALRETURN", @@ -14175,7 +14218,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_536__CLASS_OBJFINALRE*/ - /*_.VALSTR___V723*/ meltfptr[722] = + /*_._VALSTR___V723*/ meltfptr[722] = (melt_ptr_t) & meltcdat->dstr_536__CLASS_OBJFINALRE; meltcdat->dstr_536__CLASS_OBJFINALRE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -14187,7 +14230,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_536__CLASS_OBJFINALRE.slen = 20; /*inirout drout_537__SORTED_NAMED_DICT_TUPLE */ - /*_.VALROUT___V724*/ meltfptr[723] = + /*_._VALROUT___V724*/ meltfptr[723] = (melt_ptr_t) & meltcdat->drout_537__SORTED_NAMED_DICT_TUPLE; meltcdat->drout_537__SORTED_NAMED_DICT_TUPLE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -14196,10 +14239,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_ROUTDESCR_LEN - 1); meltcdat->drout_537__SORTED_NAMED_DICT_TUPLE.nbval = 5; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_537__SORTED_NAMED_DICT_TUPLE, - meltrout_137_warmelt_outobj_SORTED_NAMED_DICT_TUPLE); + meltrout_137_WARMELTmiOUTOBJ_SORTED_NAMED_DICT_TUPLE); /*iniclos dclo_538__SORTED_NAMED_DICT_TUPLE */ - /*_.VALCLO___V725*/ meltfptr[724] = + /*_._VALCLO___V725*/ meltfptr[724] = (melt_ptr_t) & meltcdat->dclo_538__SORTED_NAMED_DICT_TUPLE; meltcdat->dclo_538__SORTED_NAMED_DICT_TUPLE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -14207,8 +14250,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_539__COMPARE_NAMED_ALPHA*/ - /*uniqueobj*/ if (! /*_.VALDATA___V726*/ meltfptr[725]) -/*_.VALDATA___V726*/ meltfptr[725] = + /*uniqueobj*/ if (! /*_._VALDATA___V726*/ meltfptr[725]) +/*_._VALDATA___V726*/ meltfptr[725] = (melt_ptr_t) & meltcdat->dsym_539__COMPARE_NAMED_ALPHA; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_539__COMPARE_NAMED_ALPHA", @@ -14228,7 +14271,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_540__COMPARE_NAMED_AL*/ - /*_.VALSTR___V727*/ meltfptr[726] = + /*_._VALSTR___V727*/ meltfptr[726] = (melt_ptr_t) & meltcdat->dstr_540__COMPARE_NAMED_AL; meltcdat->dstr_540__COMPARE_NAMED_AL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -14240,7 +14283,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_540__COMPARE_NAMED_AL.slen = 19; /*inirout drout_541__OUTPUT_EXPORTED_OFFSETS */ - /*_.VALROUT___V728*/ meltfptr[727] = + /*_._VALROUT___V728*/ meltfptr[727] = (melt_ptr_t) & meltcdat->drout_541__OUTPUT_EXPORTED_OFFSETS; meltcdat->drout_541__OUTPUT_EXPORTED_OFFSETS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -14249,10 +14292,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_ROUTDESCR_LEN - 1); meltcdat->drout_541__OUTPUT_EXPORTED_OFFSETS.nbval = 7; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_541__OUTPUT_EXPORTED_OFFSETS, - meltrout_138_warmelt_outobj_OUTPUT_EXPORTED_OFFSETS); + meltrout_138_WARMELTmiOUTOBJ_OUTPUT_EXPORTED_OFFSETS); /*iniclos dclo_542__OUTPUT_EXPORTED_OFFSETS */ - /*_.VALCLO___V729*/ meltfptr[728] = + /*_._VALCLO___V729*/ meltfptr[728] = (melt_ptr_t) & meltcdat->dclo_542__OUTPUT_EXPORTED_OFFSETS; meltcdat->dclo_542__OUTPUT_EXPORTED_OFFSETS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -14260,8 +14303,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_543__CLASS_ANY_MODULE_CONTEXT*/ - /*uniqueobj*/ if (! /*_.VALDATA___V730*/ meltfptr[729]) -/*_.VALDATA___V730*/ meltfptr[729] = + /*uniqueobj*/ if (! /*_._VALDATA___V730*/ meltfptr[729]) +/*_._VALDATA___V730*/ meltfptr[729] = (melt_ptr_t) & meltcdat->dsym_543__CLASS_ANY_MODULE_CONTEXT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg @@ -14281,7 +14324,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_544__CLASS_ANY_MODULE*/ - /*_.VALSTR___V731*/ meltfptr[730] = + /*_._VALSTR___V731*/ meltfptr[730] = (melt_ptr_t) & meltcdat->dstr_544__CLASS_ANY_MODULE; meltcdat->dstr_544__CLASS_ANY_MODULE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -14294,8 +14337,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_545__CLASS_SECONDARY_C_FILE*/ - /*uniqueobj*/ if (! /*_.VALDATA___V732*/ meltfptr[731]) -/*_.VALDATA___V732*/ meltfptr[731] = + /*uniqueobj*/ if (! /*_._VALDATA___V732*/ meltfptr[731]) +/*_._VALDATA___V732*/ meltfptr[731] = (melt_ptr_t) & meltcdat->dsym_545__CLASS_SECONDARY_C_FILE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg @@ -14315,7 +14358,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_546__CLASS_SECONDARY_*/ - /*_.VALSTR___V733*/ meltfptr[732] = + /*_._VALSTR___V733*/ meltfptr[732] = (melt_ptr_t) & meltcdat->dstr_546__CLASS_SECONDARY_; meltcdat->dstr_546__CLASS_SECONDARY_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -14329,7 +14372,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_LOCATION ("warmelt-outobj.melt:5304:/ iniobj"); /*iniobj dobj_547__CLASS_SECONDARY_C_FILE*/ -/*_.VALDATA___V734*/ meltfptr[733] = +/*_._VALDATA___V734*/ meltfptr[733] = (melt_ptr_t) & meltcdat->dobj_547__CLASS_SECONDARY_C_FILE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg @@ -14345,12 +14388,12 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dobj_547__CLASS_SECONDARY_C_FILE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); meltcdat->dobj_547__CLASS_SECONDARY_C_FILE.obj_num = MELTOBMAG_OBJECT; - meltcdat->dobj_547__CLASS_SECONDARY_C_FILE.obj_hash = 340924915; + meltcdat->dobj_547__CLASS_SECONDARY_C_FILE.obj_hash = 64034086; meltcdat->dobj_547__CLASS_SECONDARY_C_FILE.obj_len = 8; /*inistring dstr_548__CLASS_SECONDARY_*/ - /*_.VALSTR___V735*/ meltfptr[734] = + /*_._VALSTR___V735*/ meltfptr[734] = (melt_ptr_t) & meltcdat->dstr_548__CLASS_SECONDARY_; meltcdat->dstr_548__CLASS_SECONDARY_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -14362,21 +14405,21 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_548__CLASS_SECONDARY_.slen = 22; /*inimult dtup_549__CLASS_SECONDARY_C_FILE */ - /*_.VALTUP___V736*/ meltfptr[735] = + /*_._VALTUP___V736*/ meltfptr[735] = (melt_ptr_t) & meltcdat->dtup_549__CLASS_SECONDARY_C_FILE; meltcdat->dtup_549__CLASS_SECONDARY_C_FILE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); meltcdat->dtup_549__CLASS_SECONDARY_C_FILE.nbval = 1; /*inimult dtup_550__CLASS_SECONDARY_C_FILE */ - /*_.VALTUP___V745*/ meltfptr[744] = + /*_._VALTUP___V745*/ meltfptr[744] = (melt_ptr_t) & meltcdat->dtup_550__CLASS_SECONDARY_C_FILE; meltcdat->dtup_550__CLASS_SECONDARY_C_FILE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); meltcdat->dtup_550__CLASS_SECONDARY_C_FILE.nbval = 4; /*iniobj dsym_551__SECFIL_MODNAM*/ - /*uniqueobj*/ if (! /*_.VALDATA___V746*/ meltfptr[745]) -/*_.VALDATA___V746*/ meltfptr[745] = + /*uniqueobj*/ if (! /*_._VALDATA___V746*/ meltfptr[745]) +/*_._VALDATA___V746*/ meltfptr[745] = (melt_ptr_t) & meltcdat->dsym_551__SECFIL_MODNAM; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_551__SECFIL_MODNAM", @@ -14396,7 +14439,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_552__SECFIL_MODNAM*/ - /*_.VALSTR___V747*/ meltfptr[746] = + /*_._VALSTR___V747*/ meltfptr[746] = (melt_ptr_t) & meltcdat->dstr_552__SECFIL_MODNAM; meltcdat->dstr_552__SECFIL_MODNAM.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -14410,7 +14453,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*^iniobj */ /*iniobj dobj_553__SECFIL_MODNAM*/ -/*_.VALDATA___V737*/ meltfptr[736] = +/*_._VALDATA___V737*/ meltfptr[736] = (melt_ptr_t) & meltcdat->dobj_553__SECFIL_MODNAM; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_553__SECFIL_MODNAM", @@ -14426,12 +14469,12 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dobj_553__SECFIL_MODNAM.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); meltcdat->dobj_553__SECFIL_MODNAM.obj_num = 0; - meltcdat->dobj_553__SECFIL_MODNAM.obj_hash = 234152777; + meltcdat->dobj_553__SECFIL_MODNAM.obj_hash = 696534849; meltcdat->dobj_553__SECFIL_MODNAM.obj_len = 4; /*inistring dstr_554__SECFIL_MODNAM*/ - /*_.VALSTR___V738*/ meltfptr[737] = + /*_._VALSTR___V738*/ meltfptr[737] = (melt_ptr_t) & meltcdat->dstr_554__SECFIL_MODNAM; meltcdat->dstr_554__SECFIL_MODNAM.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -14444,8 +14487,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_555__SECFIL_PATH*/ - /*uniqueobj*/ if (! /*_.VALDATA___V748*/ meltfptr[747]) -/*_.VALDATA___V748*/ meltfptr[747] = + /*uniqueobj*/ if (! /*_._VALDATA___V748*/ meltfptr[747]) +/*_._VALDATA___V748*/ meltfptr[747] = (melt_ptr_t) & meltcdat->dsym_555__SECFIL_PATH; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_555__SECFIL_PATH", @@ -14465,7 +14508,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_556__SECFIL_PATH*/ - /*_.VALSTR___V749*/ meltfptr[748] = + /*_._VALSTR___V749*/ meltfptr[748] = (melt_ptr_t) & meltcdat->dstr_556__SECFIL_PATH; meltcdat->dstr_556__SECFIL_PATH.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -14479,7 +14522,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*^iniobj */ /*iniobj dobj_557__SECFIL_PATH*/ -/*_.VALDATA___V739*/ meltfptr[738] = +/*_._VALDATA___V739*/ meltfptr[738] = (melt_ptr_t) & meltcdat->dobj_557__SECFIL_PATH; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_557__SECFIL_PATH", @@ -14495,12 +14538,12 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dobj_557__SECFIL_PATH.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); meltcdat->dobj_557__SECFIL_PATH.obj_num = 1; - meltcdat->dobj_557__SECFIL_PATH.obj_hash = 929080475; + meltcdat->dobj_557__SECFIL_PATH.obj_hash = 578245882; meltcdat->dobj_557__SECFIL_PATH.obj_len = 4; /*inistring dstr_558__SECFIL_PATH*/ - /*_.VALSTR___V740*/ meltfptr[739] = + /*_._VALSTR___V740*/ meltfptr[739] = (melt_ptr_t) & meltcdat->dstr_558__SECFIL_PATH; meltcdat->dstr_558__SECFIL_PATH.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -14513,8 +14556,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_559__SECFIL_DECLBUF*/ - /*uniqueobj*/ if (! /*_.VALDATA___V750*/ meltfptr[749]) -/*_.VALDATA___V750*/ meltfptr[749] = + /*uniqueobj*/ if (! /*_._VALDATA___V750*/ meltfptr[749]) +/*_._VALDATA___V750*/ meltfptr[749] = (melt_ptr_t) & meltcdat->dsym_559__SECFIL_DECLBUF; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_559__SECFIL_DECLBUF", @@ -14534,7 +14577,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_560__SECFIL_DECLBUF*/ - /*_.VALSTR___V751*/ meltfptr[750] = + /*_._VALSTR___V751*/ meltfptr[750] = (melt_ptr_t) & meltcdat->dstr_560__SECFIL_DECLBUF; meltcdat->dstr_560__SECFIL_DECLBUF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -14548,7 +14591,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*^iniobj */ /*iniobj dobj_561__SECFIL_DECLBUF*/ -/*_.VALDATA___V741*/ meltfptr[740] = +/*_._VALDATA___V741*/ meltfptr[740] = (melt_ptr_t) & meltcdat->dobj_561__SECFIL_DECLBUF; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_561__SECFIL_DECLBUF", @@ -14564,12 +14607,12 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dobj_561__SECFIL_DECLBUF.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); meltcdat->dobj_561__SECFIL_DECLBUF.obj_num = 2; - meltcdat->dobj_561__SECFIL_DECLBUF.obj_hash = 64034086; + meltcdat->dobj_561__SECFIL_DECLBUF.obj_hash = 655717933; meltcdat->dobj_561__SECFIL_DECLBUF.obj_len = 4; /*inistring dstr_562__SECFIL_DECLBUF*/ - /*_.VALSTR___V742*/ meltfptr[741] = + /*_._VALSTR___V742*/ meltfptr[741] = (melt_ptr_t) & meltcdat->dstr_562__SECFIL_DECLBUF; meltcdat->dstr_562__SECFIL_DECLBUF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -14582,8 +14625,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_563__SECFIL_IMPLBUF*/ - /*uniqueobj*/ if (! /*_.VALDATA___V752*/ meltfptr[751]) -/*_.VALDATA___V752*/ meltfptr[751] = + /*uniqueobj*/ if (! /*_._VALDATA___V752*/ meltfptr[751]) +/*_._VALDATA___V752*/ meltfptr[751] = (melt_ptr_t) & meltcdat->dsym_563__SECFIL_IMPLBUF; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_563__SECFIL_IMPLBUF", @@ -14603,7 +14646,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_564__SECFIL_IMPLBUF*/ - /*_.VALSTR___V753*/ meltfptr[752] = + /*_._VALSTR___V753*/ meltfptr[752] = (melt_ptr_t) & meltcdat->dstr_564__SECFIL_IMPLBUF; meltcdat->dstr_564__SECFIL_IMPLBUF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -14617,7 +14660,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*^iniobj */ /*iniobj dobj_565__SECFIL_IMPLBUF*/ -/*_.VALDATA___V743*/ meltfptr[742] = +/*_._VALDATA___V743*/ meltfptr[742] = (melt_ptr_t) & meltcdat->dobj_565__SECFIL_IMPLBUF; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_565__SECFIL_IMPLBUF", @@ -14633,12 +14676,12 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dobj_565__SECFIL_IMPLBUF.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); meltcdat->dobj_565__SECFIL_IMPLBUF.obj_num = 3; - meltcdat->dobj_565__SECFIL_IMPLBUF.obj_hash = 696534849; + meltcdat->dobj_565__SECFIL_IMPLBUF.obj_hash = 455271521; meltcdat->dobj_565__SECFIL_IMPLBUF.obj_len = 4; /*inistring dstr_566__SECFIL_IMPLBUF*/ - /*_.VALSTR___V744*/ meltfptr[743] = + /*_._VALSTR___V744*/ meltfptr[743] = (melt_ptr_t) & meltcdat->dstr_566__SECFIL_IMPLBUF; meltcdat->dstr_566__SECFIL_IMPLBUF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -14651,8 +14694,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_567__GENERATED_C_FILENAME*/ - /*uniqueobj*/ if (! /*_.VALDATA___V754*/ meltfptr[753]) -/*_.VALDATA___V754*/ meltfptr[753] = + /*uniqueobj*/ if (! /*_._VALDATA___V754*/ meltfptr[753]) +/*_._VALDATA___V754*/ meltfptr[753] = (melt_ptr_t) & meltcdat->dsym_567__GENERATED_C_FILENAME; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_567__GENERATED_C_FILENAME", @@ -14672,7 +14715,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_568__GENERATED_C_FILE*/ - /*_.VALSTR___V755*/ meltfptr[754] = + /*_._VALSTR___V755*/ meltfptr[754] = (melt_ptr_t) & meltcdat->dstr_568__GENERATED_C_FILE; meltcdat->dstr_568__GENERATED_C_FILE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -14686,7 +14729,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_LOCATION ("warmelt-outobj.melt:5313:/ iniobj"); /*iniobj dobj_569__GENERATED_C_FILENAME*/ -/*_.VALDATA___V756*/ meltfptr[755] = +/*_._VALDATA___V756*/ meltfptr[755] = (melt_ptr_t) & meltcdat->dobj_569__GENERATED_C_FILENAME; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_569__GENERATED_C_FILENAME", @@ -14701,25 +14744,25 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); meltcdat->dobj_569__GENERATED_C_FILENAME.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - meltcdat->dobj_569__GENERATED_C_FILENAME.obj_hash = 450623785; + meltcdat->dobj_569__GENERATED_C_FILENAME.obj_hash = 446529912; meltcdat->dobj_569__GENERATED_C_FILENAME.obj_len = 5; /*inimult dtup_570__GENERATED_C_FILENAME */ - /*_.VALTUP___V776*/ meltfptr[775] = + /*_._VALTUP___V776*/ meltfptr[775] = (melt_ptr_t) & meltcdat->dtup_570__GENERATED_C_FILENAME; meltcdat->dtup_570__GENERATED_C_FILENAME.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_MULTIPLE)))); meltcdat->dtup_570__GENERATED_C_FILENAME.nbval = 9; /*inimult dtup_571__GENERATED_C_FILENAME */ - /*_.VALTUP___V770*/ meltfptr[769] = + /*_._VALTUP___V770*/ meltfptr[769] = (melt_ptr_t) & meltcdat->dtup_571__GENERATED_C_FILENAME; meltcdat->dtup_571__GENERATED_C_FILENAME.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_MULTIPLE)))); meltcdat->dtup_571__GENERATED_C_FILENAME.nbval = 4; /*iniobj dsym_572__DISCR*/ - /*uniqueobj*/ if (! /*_.VALDATA___V759*/ meltfptr[758]) -/*_.VALDATA___V759*/ meltfptr[758] = + /*uniqueobj*/ if (! /*_._VALDATA___V759*/ meltfptr[758]) +/*_._VALDATA___V759*/ meltfptr[758] = (melt_ptr_t) & meltcdat->dsym_572__DISCR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_572__DISCR", @@ -14739,7 +14782,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_573__DISCR*/ - /*_.VALSTR___V760*/ meltfptr[759] = + /*_._VALSTR___V760*/ meltfptr[759] = (melt_ptr_t) & meltcdat->dstr_573__DISCR; meltcdat->dstr_573__DISCR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -14751,7 +14794,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*^iniobj */ /*iniobj dobj_574*/ -/*_.VALDATA___V758*/ meltfptr[757] = (melt_ptr_t) & meltcdat->dobj_574; +/*_._VALDATA___V758*/ meltfptr[757] = (melt_ptr_t) & meltcdat->dobj_574; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_574", melt_magic_discr ((melt_ptr_t) @@ -14767,13 +14810,13 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dobj_574.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); meltcdat->dobj_574.obj_num = 0; - meltcdat->dobj_574.obj_hash = 656174504; + meltcdat->dobj_574.obj_hash = 945837889; meltcdat->dobj_574.obj_len = 2; /*iniobj dsym_575__BASE*/ - /*uniqueobj*/ if (! /*_.VALDATA___V762*/ meltfptr[761]) -/*_.VALDATA___V762*/ meltfptr[761] = + /*uniqueobj*/ if (! /*_._VALDATA___V762*/ meltfptr[761]) +/*_._VALDATA___V762*/ meltfptr[761] = (melt_ptr_t) & meltcdat->dsym_575__BASE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_575__BASE", @@ -14793,7 +14836,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_576__BASE*/ - /*_.VALSTR___V763*/ meltfptr[762] = (melt_ptr_t) & meltcdat->dstr_576__BASE; + /*_._VALSTR___V763*/ meltfptr[762] = + (melt_ptr_t) & meltcdat->dstr_576__BASE; meltcdat->dstr_576__BASE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (meltcdat->dstr_576__BASE.val, "BASE", @@ -14804,7 +14848,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*^iniobj */ /*iniobj dobj_577*/ -/*_.VALDATA___V761*/ meltfptr[760] = (melt_ptr_t) & meltcdat->dobj_577; +/*_._VALDATA___V761*/ meltfptr[760] = (melt_ptr_t) & meltcdat->dobj_577; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_577", melt_magic_discr ((melt_ptr_t) @@ -14820,13 +14864,13 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dobj_577.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); meltcdat->dobj_577.obj_num = 1; - meltcdat->dobj_577.obj_hash = 42503578; + meltcdat->dobj_577.obj_hash = 345252160; meltcdat->dobj_577.obj_len = 2; /*iniobj dsym_578__DIR*/ - /*uniqueobj*/ if (! /*_.VALDATA___V765*/ meltfptr[764]) -/*_.VALDATA___V765*/ meltfptr[764] = + /*uniqueobj*/ if (! /*_._VALDATA___V765*/ meltfptr[764]) +/*_._VALDATA___V765*/ meltfptr[764] = (melt_ptr_t) & meltcdat->dsym_578__DIR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_578__DIR", @@ -14846,7 +14890,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_579__DIR*/ - /*_.VALSTR___V766*/ meltfptr[765] = (melt_ptr_t) & meltcdat->dstr_579__DIR; + /*_._VALSTR___V766*/ meltfptr[765] = (melt_ptr_t) & meltcdat->dstr_579__DIR; meltcdat->dstr_579__DIR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (meltcdat->dstr_579__DIR.val, "DIR", @@ -14857,7 +14901,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*^iniobj */ /*iniobj dobj_580*/ -/*_.VALDATA___V764*/ meltfptr[763] = (melt_ptr_t) & meltcdat->dobj_580; +/*_._VALDATA___V764*/ meltfptr[763] = (melt_ptr_t) & meltcdat->dobj_580; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_580", melt_magic_discr ((melt_ptr_t) @@ -14873,13 +14917,13 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dobj_580.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); meltcdat->dobj_580.obj_num = 2; - meltcdat->dobj_580.obj_hash = 910832717; + meltcdat->dobj_580.obj_hash = 576086342; meltcdat->dobj_580.obj_len = 2; /*iniobj dsym_581__NUM*/ - /*uniqueobj*/ if (! /*_.VALDATA___V768*/ meltfptr[767]) -/*_.VALDATA___V768*/ meltfptr[767] = + /*uniqueobj*/ if (! /*_._VALDATA___V768*/ meltfptr[767]) +/*_._VALDATA___V768*/ meltfptr[767] = (melt_ptr_t) & meltcdat->dsym_581__NUM; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_581__NUM", @@ -14899,7 +14943,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_582__NUM*/ - /*_.VALSTR___V769*/ meltfptr[768] = (melt_ptr_t) & meltcdat->dstr_582__NUM; + /*_._VALSTR___V769*/ meltfptr[768] = (melt_ptr_t) & meltcdat->dstr_582__NUM; meltcdat->dstr_582__NUM.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (meltcdat->dstr_582__NUM.val, "NUM", @@ -14910,7 +14954,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*^iniobj */ /*iniobj dobj_583*/ -/*_.VALDATA___V767*/ meltfptr[766] = (melt_ptr_t) & meltcdat->dobj_583; +/*_._VALDATA___V767*/ meltfptr[766] = (melt_ptr_t) & meltcdat->dobj_583; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_583", melt_magic_discr ((melt_ptr_t) @@ -14926,12 +14970,12 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dobj_583.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); meltcdat->dobj_583.obj_num = 3; - meltcdat->dobj_583.obj_hash = 938309803; + meltcdat->dobj_583.obj_hash = 410016605; meltcdat->dobj_583.obj_len = 2; /*inistring dstr_584__meltgc_new_strin*/ - /*_.VALSTR___V771*/ meltfptr[770] = + /*_._VALSTR___V771*/ meltfptr[770] = (melt_ptr_t) & meltcdat->dstr_584__meltgc_new_strin; meltcdat->dstr_584__meltgc_new_strin.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_VERBATIM_STRING)))); @@ -14944,7 +14988,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_585__melt_st*/ - /*_.VALSTR___V772*/ meltfptr[771] = + /*_._VALSTR___V772*/ meltfptr[771] = (melt_ptr_t) & meltcdat->dstr_585__melt_st; meltcdat->dstr_585__melt_st.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_VERBATIM_STRING)))); @@ -14956,7 +15000,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_586__melt_string_*/ - /*_.VALSTR___V773*/ meltfptr[772] = + /*_._VALSTR___V773*/ meltfptr[772] = (melt_ptr_t) & meltcdat->dstr_586__melt_string_; meltcdat->dstr_586__melt_string_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_VERBATIM_STRING)))); @@ -14969,7 +15013,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_587__*/ - /*_.VALSTR___V774*/ meltfptr[773] = (melt_ptr_t) & meltcdat->dstr_587__; + /*_._VALSTR___V774*/ meltfptr[773] = (melt_ptr_t) & meltcdat->dstr_587__; meltcdat->dstr_587__.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_VERBATIM_STRING)))); /*small inistring */ strncpy (meltcdat->dstr_587__.val, ")), \n (", @@ -14979,7 +15023,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_588__*/ - /*_.VALSTR___V775*/ meltfptr[774] = (melt_ptr_t) & meltcdat->dstr_588__; + /*_._VALSTR___V775*/ meltfptr[774] = (melt_ptr_t) & meltcdat->dstr_588__; meltcdat->dstr_588__.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_VERBATIM_STRING)))); /*small inistring */ strncpy (meltcdat->dstr_588__.val, "))", @@ -14989,7 +15033,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_589__GENERATED_C_FILE*/ - /*_.VALSTR___V757*/ meltfptr[756] = + /*_._VALSTR___V757*/ meltfptr[756] = (melt_ptr_t) & meltcdat->dstr_589__GENERATED_C_FILE; meltcdat->dstr_589__GENERATED_C_FILE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -15001,7 +15045,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_589__GENERATED_C_FILE.slen = 20; /*inirout drout_590__NTH_SECUNDARY_FILE */ - /*_.VALROUT___V777*/ meltfptr[776] = + /*_._VALROUT___V777*/ meltfptr[776] = (melt_ptr_t) & meltcdat->drout_590__NTH_SECUNDARY_FILE; meltcdat->drout_590__NTH_SECUNDARY_FILE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -15010,17 +15054,17 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_ROUTDESCR_LEN - 1); meltcdat->drout_590__NTH_SECUNDARY_FILE.nbval = 4; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_590__NTH_SECUNDARY_FILE, - meltrout_139_warmelt_outobj_NTH_SECUNDARY_FILE); + meltrout_139_WARMELTmiOUTOBJ_NTH_SECUNDARY_FILE); /*iniclos dclo_591__NTH_SECUNDARY_FILE */ - /*_.VALCLO___V778*/ meltfptr[777] = + /*_._VALCLO___V778*/ meltfptr[777] = (melt_ptr_t) & meltcdat->dclo_591__NTH_SECUNDARY_FILE; meltcdat->dclo_591__NTH_SECUNDARY_FILE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); meltcdat->dclo_591__NTH_SECUNDARY_FILE.nbval = 0; /*inirout drout_592__OUTPUT_MELT_DESCRIPTOR */ - /*_.VALROUT___V779*/ meltfptr[778] = + /*_._VALROUT___V779*/ meltfptr[778] = (melt_ptr_t) & meltcdat->drout_592__OUTPUT_MELT_DESCRIPTOR; meltcdat->drout_592__OUTPUT_MELT_DESCRIPTOR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -15029,10 +15073,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_ROUTDESCR_LEN - 1); meltcdat->drout_592__OUTPUT_MELT_DESCRIPTOR.nbval = 17; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_592__OUTPUT_MELT_DESCRIPTOR, - meltrout_140_warmelt_outobj_OUTPUT_MELT_DESCRIPTOR); + meltrout_140_WARMELTmiOUTOBJ_OUTPUT_MELT_DESCRIPTOR); /*iniclos dclo_593__OUTPUT_MELT_DESCRIPTOR */ - /*_.VALCLO___V786*/ meltfptr[785] = + /*_._VALCLO___V786*/ meltfptr[785] = (melt_ptr_t) & meltcdat->dclo_593__OUTPUT_MELT_DESCRIPTOR; meltcdat->dclo_593__OUTPUT_MELT_DESCRIPTOR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -15040,8 +15084,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_594__CLASS_RUNNING_EXTENSION_MODULE_CONTEXT*/ - /*uniqueobj*/ if (! /*_.VALDATA___V787*/ meltfptr[786]) -/*_.VALDATA___V787*/ meltfptr[786] = + /*uniqueobj*/ if (! /*_._VALDATA___V787*/ meltfptr[786]) +/*_._VALDATA___V787*/ meltfptr[786] = (melt_ptr_t) & meltcdat-> dsym_594__CLASS_RUNNING_EXTENSION_MODULE_CONTEXT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) @@ -15063,7 +15107,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_595__CLASS_RUNNING_EX*/ - /*_.VALSTR___V788*/ meltfptr[787] = + /*_._VALSTR___V788*/ meltfptr[787] = (melt_ptr_t) & meltcdat->dstr_595__CLASS_RUNNING_EX; meltcdat->dstr_595__CLASS_RUNNING_EX.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -15076,7 +15120,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_596__runextend*/ - /*_.VALSTR___V780*/ meltfptr[779] = + /*_._VALSTR___V780*/ meltfptr[779] = (melt_ptr_t) & meltcdat->dstr_596__runextend; meltcdat->dstr_596__runextend.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -15089,7 +15133,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_597__optimized*/ - /*_.VALSTR___V781*/ meltfptr[780] = + /*_._VALSTR___V781*/ meltfptr[780] = (melt_ptr_t) & meltcdat->dstr_597__optimized; meltcdat->dstr_597__optimized.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -15102,7 +15146,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_598__quicklybuilt*/ - /*_.VALSTR___V782*/ meltfptr[781] = + /*_._VALSTR___V782*/ meltfptr[781] = (melt_ptr_t) & meltcdat->dstr_598__quicklybuilt; meltcdat->dstr_598__quicklybuilt.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -15115,7 +15159,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_599__optimized*/ - /*_.VALSTR___V783*/ meltfptr[782] = + /*_._VALSTR___V783*/ meltfptr[782] = (melt_ptr_t) & meltcdat->dstr_599__optimized; meltcdat->dstr_599__optimized.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -15128,7 +15172,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_600__dynamic*/ - /*_.VALSTR___V784*/ meltfptr[783] = + /*_._VALSTR___V784*/ meltfptr[783] = (melt_ptr_t) & meltcdat->dstr_600__dynamic; meltcdat->dstr_600__dynamic.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -15139,7 +15183,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_601__debugnoline*/ - /*_.VALSTR___V785*/ meltfptr[784] = + /*_._VALSTR___V785*/ meltfptr[784] = (melt_ptr_t) & meltcdat->dstr_601__debugnoline; meltcdat->dstr_601__debugnoline.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -15152,8 +15196,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_602__SYNTAX_TEST_GENERATOR*/ - /*uniqueobj*/ if (! /*_.VALDATA___V789*/ meltfptr[788]) -/*_.VALDATA___V789*/ meltfptr[788] = + /*uniqueobj*/ if (! /*_._VALDATA___V789*/ meltfptr[788]) +/*_._VALDATA___V789*/ meltfptr[788] = (melt_ptr_t) & meltcdat->dsym_602__SYNTAX_TEST_GENERATOR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg @@ -15173,7 +15217,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_603__SYNTAX_TEST_GENE*/ - /*_.VALSTR___V790*/ meltfptr[789] = + /*_._VALSTR___V790*/ meltfptr[789] = (melt_ptr_t) & meltcdat->dstr_603__SYNTAX_TEST_GENE; meltcdat->dstr_603__SYNTAX_TEST_GENE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -15186,8 +15230,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_604__CLASS_SELECTOR*/ - /*uniqueobj*/ if (! /*_.VALDATA___V791*/ meltfptr[790]) -/*_.VALDATA___V791*/ meltfptr[790] = + /*uniqueobj*/ if (! /*_._VALDATA___V791*/ meltfptr[790]) +/*_._VALDATA___V791*/ meltfptr[790] = (melt_ptr_t) & meltcdat->dsym_604__CLASS_SELECTOR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_604__CLASS_SELECTOR", @@ -15207,7 +15251,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_605__CLASS_SELECTOR*/ - /*_.VALSTR___V792*/ meltfptr[791] = + /*_._VALSTR___V792*/ meltfptr[791] = (melt_ptr_t) & meltcdat->dstr_605__CLASS_SELECTOR; meltcdat->dstr_605__CLASS_SELECTOR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -15220,8 +15264,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_606__RECV*/ - /*uniqueobj*/ if (! /*_.VALDATA___V793*/ meltfptr[792]) -/*_.VALDATA___V793*/ meltfptr[792] = + /*uniqueobj*/ if (! /*_._VALDATA___V793*/ meltfptr[792]) +/*_._VALDATA___V793*/ meltfptr[792] = (melt_ptr_t) & meltcdat->dsym_606__RECV; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_606__RECV", @@ -15241,7 +15285,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_607__RECV*/ - /*_.VALSTR___V794*/ meltfptr[793] = (melt_ptr_t) & meltcdat->dstr_607__RECV; + /*_._VALSTR___V794*/ meltfptr[793] = + (melt_ptr_t) & meltcdat->dstr_607__RECV; meltcdat->dstr_607__RECV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (meltcdat->dstr_607__RECV.val, "RECV", @@ -15252,7 +15297,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_LOCATION ("warmelt-outobj.melt:5771:/ iniobj"); /*iniobj dobj_608*/ -/*_.VALDATA___V795*/ meltfptr[794] = (melt_ptr_t) & meltcdat->dobj_608; +/*_._VALDATA___V795*/ meltfptr[794] = (melt_ptr_t) & meltcdat->dobj_608; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_608", melt_magic_discr ((melt_ptr_t) @@ -15268,13 +15313,13 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dobj_608.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); meltcdat->dobj_608.obj_num = 0; - meltcdat->dobj_608.obj_hash = 559364867; + meltcdat->dobj_608.obj_hash = 24049992; meltcdat->dobj_608.obj_len = 2; /*iniobj dsym_609__GENDEV*/ - /*uniqueobj*/ if (! /*_.VALDATA___V796*/ meltfptr[795]) -/*_.VALDATA___V796*/ meltfptr[795] = + /*uniqueobj*/ if (! /*_._VALDATA___V796*/ meltfptr[795]) +/*_._VALDATA___V796*/ meltfptr[795] = (melt_ptr_t) & meltcdat->dsym_609__GENDEV; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_609__GENDEV", @@ -15294,7 +15339,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_610__GENDEV*/ - /*_.VALSTR___V797*/ meltfptr[796] = + /*_._VALSTR___V797*/ meltfptr[796] = (melt_ptr_t) & meltcdat->dstr_610__GENDEV; meltcdat->dstr_610__GENDEV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -15306,7 +15351,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*^iniobj */ /*iniobj dobj_611*/ -/*_.VALDATA___V798*/ meltfptr[797] = (melt_ptr_t) & meltcdat->dobj_611; +/*_._VALDATA___V798*/ meltfptr[797] = (melt_ptr_t) & meltcdat->dobj_611; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_611", melt_magic_discr ((melt_ptr_t) @@ -15322,13 +15367,13 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dobj_611.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); meltcdat->dobj_611.obj_num = 1; - meltcdat->dobj_611.obj_hash = 26283035; + meltcdat->dobj_611.obj_hash = 306476319; meltcdat->dobj_611.obj_len = 2; /*iniobj dsym_612__SBUF*/ - /*uniqueobj*/ if (! /*_.VALDATA___V799*/ meltfptr[798]) -/*_.VALDATA___V799*/ meltfptr[798] = + /*uniqueobj*/ if (! /*_._VALDATA___V799*/ meltfptr[798]) +/*_._VALDATA___V799*/ meltfptr[798] = (melt_ptr_t) & meltcdat->dsym_612__SBUF; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_612__SBUF", @@ -15348,7 +15393,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_613__SBUF*/ - /*_.VALSTR___V800*/ meltfptr[799] = (melt_ptr_t) & meltcdat->dstr_613__SBUF; + /*_._VALSTR___V800*/ meltfptr[799] = + (melt_ptr_t) & meltcdat->dstr_613__SBUF; meltcdat->dstr_613__SBUF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (meltcdat->dstr_613__SBUF.val, "SBUF", @@ -15359,7 +15405,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*^iniobj */ /*iniobj dobj_614*/ -/*_.VALDATA___V801*/ meltfptr[800] = (melt_ptr_t) & meltcdat->dobj_614; +/*_._VALDATA___V801*/ meltfptr[800] = (melt_ptr_t) & meltcdat->dobj_614; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_614", melt_magic_discr ((melt_ptr_t) @@ -15375,13 +15421,13 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dobj_614.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); meltcdat->dobj_614.obj_num = 2; - meltcdat->dobj_614.obj_hash = 810488826; + meltcdat->dobj_614.obj_hash = 886866977; meltcdat->dobj_614.obj_len = 2; /*iniobj dsym_615__MODCTX*/ - /*uniqueobj*/ if (! /*_.VALDATA___V802*/ meltfptr[801]) -/*_.VALDATA___V802*/ meltfptr[801] = + /*uniqueobj*/ if (! /*_._VALDATA___V802*/ meltfptr[801]) +/*_._VALDATA___V802*/ meltfptr[801] = (melt_ptr_t) & meltcdat->dsym_615__MODCTX; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_615__MODCTX", @@ -15401,7 +15447,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_616__MODCTX*/ - /*_.VALSTR___V803*/ meltfptr[802] = + /*_._VALSTR___V803*/ meltfptr[802] = (melt_ptr_t) & meltcdat->dstr_616__MODCTX; meltcdat->dstr_616__MODCTX.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -15413,7 +15459,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*^iniobj */ /*iniobj dobj_617*/ -/*_.VALDATA___V804*/ meltfptr[803] = (melt_ptr_t) & meltcdat->dobj_617; +/*_._VALDATA___V804*/ meltfptr[803] = (melt_ptr_t) & meltcdat->dobj_617; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_617", melt_magic_discr ((melt_ptr_t) @@ -15429,13 +15475,13 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dobj_617.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); meltcdat->dobj_617.obj_num = 3; - meltcdat->dobj_617.obj_hash = 204265296; + meltcdat->dobj_617.obj_hash = 99009516; meltcdat->dobj_617.obj_len = 2; /*iniobj dsym_618__IX*/ - /*uniqueobj*/ if (! /*_.VALDATA___V805*/ meltfptr[804]) -/*_.VALDATA___V805*/ meltfptr[804] = + /*uniqueobj*/ if (! /*_._VALDATA___V805*/ meltfptr[804]) +/*_._VALDATA___V805*/ meltfptr[804] = (melt_ptr_t) & meltcdat->dsym_618__IX; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_618__IX", @@ -15455,7 +15501,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_619__IX*/ - /*_.VALSTR___V806*/ meltfptr[805] = (melt_ptr_t) & meltcdat->dstr_619__IX; + /*_._VALSTR___V806*/ meltfptr[805] = (melt_ptr_t) & meltcdat->dstr_619__IX; meltcdat->dstr_619__IX.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (meltcdat->dstr_619__IX.val, "IX", @@ -15466,7 +15512,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*^iniobj */ /*iniobj dobj_620*/ -/*_.VALDATA___V807*/ meltfptr[806] = (melt_ptr_t) & meltcdat->dobj_620; +/*_._VALDATA___V807*/ meltfptr[806] = (melt_ptr_t) & meltcdat->dobj_620; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_620", melt_magic_discr ((melt_ptr_t) @@ -15482,11 +15528,11 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dobj_620.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); meltcdat->dobj_620.obj_num = 4; - meltcdat->dobj_620.obj_hash = 870328468; + meltcdat->dobj_620.obj_hash = 1051984336; meltcdat->dobj_620.obj_len = 2; /*inimult dtup_621__SYNTAX_TEST_GENERATOR */ - /*_.VALTUP___V808*/ meltfptr[807] = + /*_._VALTUP___V808*/ meltfptr[807] = (melt_ptr_t) & meltcdat->dtup_621__SYNTAX_TEST_GENERATOR; meltcdat->dtup_621__SYNTAX_TEST_GENERATOR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_MULTIPLE)))); @@ -15494,7 +15540,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*^iniobj */ /*iniobj dobj_622__SYNTAX_TEST_GENERATOR*/ -/*_.VALDATA___V809*/ meltfptr[808] = +/*_._VALDATA___V809*/ meltfptr[808] = (melt_ptr_t) & meltcdat->dobj_622__SYNTAX_TEST_GENERATOR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg @@ -15509,12 +15555,12 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); meltcdat->dobj_622__SYNTAX_TEST_GENERATOR.meltobj_class = (meltobject_ptr_t) ( /*_.CLASS_SELECTOR__V143*/ meltfptr[142]); - meltcdat->dobj_622__SYNTAX_TEST_GENERATOR.obj_hash = 805113298; + meltcdat->dobj_622__SYNTAX_TEST_GENERATOR.obj_hash = 683327469; meltcdat->dobj_622__SYNTAX_TEST_GENERATOR.obj_len = 4; /*inistring dstr_623__SYNTAX_TEST_GENE*/ - /*_.VALSTR___V810*/ meltfptr[809] = + /*_._VALSTR___V810*/ meltfptr[809] = (melt_ptr_t) & meltcdat->dstr_623__SYNTAX_TEST_GENE; meltcdat->dstr_623__SYNTAX_TEST_GENE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -15526,7 +15572,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_623__SYNTAX_TEST_GENE.slen = 21; /*inirout drout_624__SYNTESTGEN_ANY */ - /*_.VALROUT___V811*/ meltfptr[810] = + /*_._VALROUT___V811*/ meltfptr[810] = (melt_ptr_t) & meltcdat->drout_624__SYNTESTGEN_ANY; meltcdat->drout_624__SYNTESTGEN_ANY.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -15535,10 +15581,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_ROUTDESCR_LEN - 1); meltcdat->drout_624__SYNTESTGEN_ANY.nbval = 5; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_624__SYNTESTGEN_ANY, - meltrout_141_warmelt_outobj_SYNTESTGEN_ANY); + meltrout_141_WARMELTmiOUTOBJ_SYNTESTGEN_ANY); /*iniclos dclo_625__SYNTESTGEN_ANY */ - /*_.VALCLO___V812*/ meltfptr[811] = + /*_._VALCLO___V812*/ meltfptr[811] = (melt_ptr_t) & meltcdat->dclo_625__SYNTESTGEN_ANY; meltcdat->dclo_625__SYNTESTGEN_ANY.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -15546,8 +15592,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_626__CLASS_LOCATED*/ - /*uniqueobj*/ if (! /*_.VALDATA___V813*/ meltfptr[812]) -/*_.VALDATA___V813*/ meltfptr[812] = + /*uniqueobj*/ if (! /*_._VALDATA___V813*/ meltfptr[812]) +/*_._VALDATA___V813*/ meltfptr[812] = (melt_ptr_t) & meltcdat->dsym_626__CLASS_LOCATED; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_626__CLASS_LOCATED", @@ -15567,7 +15613,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_627__CLASS_LOCATED*/ - /*_.VALSTR___V814*/ meltfptr[813] = + /*_._VALSTR___V814*/ meltfptr[813] = (melt_ptr_t) & meltcdat->dstr_627__CLASS_LOCATED; meltcdat->dstr_627__CLASS_LOCATED.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -15580,8 +15626,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_628__CLASS_SOURCE_GENERATOR_DEVICE*/ - /*uniqueobj*/ if (! /*_.VALDATA___V815*/ meltfptr[814]) -/*_.VALDATA___V815*/ meltfptr[814] = + /*uniqueobj*/ if (! /*_._VALDATA___V815*/ meltfptr[814]) +/*_._VALDATA___V815*/ meltfptr[814] = (melt_ptr_t) & meltcdat->dsym_628__CLASS_SOURCE_GENERATOR_DEVICE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg @@ -15601,7 +15647,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_629__CLASS_SOURCE_GEN*/ - /*_.VALSTR___V816*/ meltfptr[815] = + /*_._VALSTR___V816*/ meltfptr[815] = (melt_ptr_t) & meltcdat->dstr_629__CLASS_SOURCE_GEN; meltcdat->dstr_629__CLASS_SOURCE_GEN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -15613,7 +15659,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_629__CLASS_SOURCE_GEN.slen = 29; /*inirout drout_630__SUBSTITUTE_FORMALS_FOR_SYNTEST */ - /*_.VALROUT___V817*/ meltfptr[816] = + /*_._VALROUT___V817*/ meltfptr[816] = (melt_ptr_t) & meltcdat->drout_630__SUBSTITUTE_FORMALS_FOR_SYNTEST; meltcdat->drout_630__SUBSTITUTE_FORMALS_FOR_SYNTEST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -15623,17 +15669,17 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->drout_630__SUBSTITUTE_FORMALS_FOR_SYNTEST.nbval = 8; MELT_ROUTINE_SET_ROUTCODE (&meltcdat-> drout_630__SUBSTITUTE_FORMALS_FOR_SYNTEST, - meltrout_142_warmelt_outobj_SUBSTITUTE_FORMALS_FOR_SYNTEST); + meltrout_142_WARMELTmiOUTOBJ_SUBSTITUTE_FORMALS_FOR_SYNTEST); /*iniclos dclo_631__SUBSTITUTE_FORMALS_FOR_SYNTEST */ - /*_.VALCLO___V818*/ meltfptr[817] = + /*_._VALCLO___V818*/ meltfptr[817] = (melt_ptr_t) & meltcdat->dclo_631__SUBSTITUTE_FORMALS_FOR_SYNTEST; meltcdat->dclo_631__SUBSTITUTE_FORMALS_FOR_SYNTEST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); meltcdat->dclo_631__SUBSTITUTE_FORMALS_FOR_SYNTEST.nbval = 0; /*inirout drout_632__EXPAND_TUPLE_FOR_SYNTEST */ - /*_.VALROUT___V819*/ meltfptr[818] = + /*_._VALROUT___V819*/ meltfptr[818] = (melt_ptr_t) & meltcdat->drout_632__EXPAND_TUPLE_FOR_SYNTEST; meltcdat->drout_632__EXPAND_TUPLE_FOR_SYNTEST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -15642,17 +15688,17 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_ROUTDESCR_LEN - 1); meltcdat->drout_632__EXPAND_TUPLE_FOR_SYNTEST.nbval = 3; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_632__EXPAND_TUPLE_FOR_SYNTEST, - meltrout_143_warmelt_outobj_EXPAND_TUPLE_FOR_SYNTEST); + meltrout_143_WARMELTmiOUTOBJ_EXPAND_TUPLE_FOR_SYNTEST); /*iniclos dclo_633__EXPAND_TUPLE_FOR_SYNTEST */ - /*_.VALCLO___V820*/ meltfptr[819] = + /*_._VALCLO___V820*/ meltfptr[819] = (melt_ptr_t) & meltcdat->dclo_633__EXPAND_TUPLE_FOR_SYNTEST; meltcdat->dclo_633__EXPAND_TUPLE_FOR_SYNTEST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); meltcdat->dclo_633__EXPAND_TUPLE_FOR_SYNTEST.nbval = 0; /*inirout drout_634__SYNTESTGEN_PRIMITIVE */ - /*_.VALROUT___V821*/ meltfptr[820] = + /*_._VALROUT___V821*/ meltfptr[820] = (melt_ptr_t) & meltcdat->drout_634__SYNTESTGEN_PRIMITIVE; meltcdat->drout_634__SYNTESTGEN_PRIMITIVE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -15661,10 +15707,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_ROUTDESCR_LEN - 1); meltcdat->drout_634__SYNTESTGEN_PRIMITIVE.nbval = 14; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_634__SYNTESTGEN_PRIMITIVE, - meltrout_144_warmelt_outobj_SYNTESTGEN_PRIMITIVE); + meltrout_144_WARMELTmiOUTOBJ_SYNTESTGEN_PRIMITIVE); /*iniclos dclo_635__SYNTESTGEN_PRIMITIVE */ - /*_.VALCLO___V822*/ meltfptr[821] = + /*_._VALCLO___V822*/ meltfptr[821] = (melt_ptr_t) & meltcdat->dclo_635__SYNTESTGEN_PRIMITIVE; meltcdat->dclo_635__SYNTESTGEN_PRIMITIVE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -15672,8 +15718,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_636__CLASS_PRIMITIVE*/ - /*uniqueobj*/ if (! /*_.VALDATA___V823*/ meltfptr[822]) -/*_.VALDATA___V823*/ meltfptr[822] = + /*uniqueobj*/ if (! /*_._VALDATA___V823*/ meltfptr[822]) +/*_._VALDATA___V823*/ meltfptr[822] = (melt_ptr_t) & meltcdat->dsym_636__CLASS_PRIMITIVE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_636__CLASS_PRIMITIVE", @@ -15693,7 +15739,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_637__CLASS_PRIMITIVE*/ - /*_.VALSTR___V824*/ meltfptr[823] = + /*_._VALSTR___V824*/ meltfptr[823] = (melt_ptr_t) & meltcdat->dstr_637__CLASS_PRIMITIVE; meltcdat->dstr_637__CLASS_PRIMITIVE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -15706,8 +15752,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_638__CLASS_SOURCE_DEFPRIMITIVE*/ - /*uniqueobj*/ if (! /*_.VALDATA___V825*/ meltfptr[824]) -/*_.VALDATA___V825*/ meltfptr[824] = + /*uniqueobj*/ if (! /*_._VALDATA___V825*/ meltfptr[824]) +/*_._VALDATA___V825*/ meltfptr[824] = (melt_ptr_t) & meltcdat->dsym_638__CLASS_SOURCE_DEFPRIMITIVE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg @@ -15727,7 +15773,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_639__CLASS_SOURCE_DEF*/ - /*_.VALSTR___V826*/ meltfptr[825] = + /*_._VALSTR___V826*/ meltfptr[825] = (melt_ptr_t) & meltcdat->dstr_639__CLASS_SOURCE_DEF; meltcdat->dstr_639__CLASS_SOURCE_DEF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -15740,8 +15786,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_640__DISCR_MAP_OBJECTS*/ - /*uniqueobj*/ if (! /*_.VALDATA___V827*/ meltfptr[826]) -/*_.VALDATA___V827*/ meltfptr[826] = + /*uniqueobj*/ if (! /*_._VALDATA___V827*/ meltfptr[826]) +/*_._VALDATA___V827*/ meltfptr[826] = (melt_ptr_t) & meltcdat->dsym_640__DISCR_MAP_OBJECTS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_640__DISCR_MAP_OBJECTS", @@ -15761,7 +15807,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_641__DISCR_MAP_OBJECT*/ - /*_.VALSTR___V828*/ meltfptr[827] = + /*_._VALSTR___V828*/ meltfptr[827] = (melt_ptr_t) & meltcdat->dstr_641__DISCR_MAP_OBJECT; meltcdat->dstr_641__DISCR_MAP_OBJECT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -15773,7 +15819,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_641__DISCR_MAP_OBJECT.slen = 17; /*inirout drout_642__SYNTESTGEN_CITERATOR */ - /*_.VALROUT___V829*/ meltfptr[828] = + /*_._VALROUT___V829*/ meltfptr[828] = (melt_ptr_t) & meltcdat->drout_642__SYNTESTGEN_CITERATOR; meltcdat->drout_642__SYNTESTGEN_CITERATOR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -15782,10 +15828,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_ROUTDESCR_LEN - 1); meltcdat->drout_642__SYNTESTGEN_CITERATOR.nbval = 15; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_642__SYNTESTGEN_CITERATOR, - meltrout_145_warmelt_outobj_SYNTESTGEN_CITERATOR); + meltrout_145_WARMELTmiOUTOBJ_SYNTESTGEN_CITERATOR); /*iniclos dclo_643__SYNTESTGEN_CITERATOR */ - /*_.VALCLO___V830*/ meltfptr[829] = + /*_._VALCLO___V830*/ meltfptr[829] = (melt_ptr_t) & meltcdat->dclo_643__SYNTESTGEN_CITERATOR; meltcdat->dclo_643__SYNTESTGEN_CITERATOR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -15793,8 +15839,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_644__CLASS_SOURCE_DEFCITERATOR*/ - /*uniqueobj*/ if (! /*_.VALDATA___V831*/ meltfptr[830]) -/*_.VALDATA___V831*/ meltfptr[830] = + /*uniqueobj*/ if (! /*_._VALDATA___V831*/ meltfptr[830]) +/*_._VALDATA___V831*/ meltfptr[830] = (melt_ptr_t) & meltcdat->dsym_644__CLASS_SOURCE_DEFCITERATOR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg @@ -15814,7 +15860,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_645__CLASS_SOURCE_DEF*/ - /*_.VALSTR___V832*/ meltfptr[831] = + /*_._VALSTR___V832*/ meltfptr[831] = (melt_ptr_t) & meltcdat->dstr_645__CLASS_SOURCE_DEF; meltcdat->dstr_645__CLASS_SOURCE_DEF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -15826,7 +15872,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_645__CLASS_SOURCE_DEF.slen = 25; /*inirout drout_646__SYNTESTGEN_CMATCHER */ - /*_.VALROUT___V833*/ meltfptr[832] = + /*_._VALROUT___V833*/ meltfptr[832] = (melt_ptr_t) & meltcdat->drout_646__SYNTESTGEN_CMATCHER; meltcdat->drout_646__SYNTESTGEN_CMATCHER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -15835,10 +15881,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_ROUTDESCR_LEN - 1); meltcdat->drout_646__SYNTESTGEN_CMATCHER.nbval = 18; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_646__SYNTESTGEN_CMATCHER, - meltrout_146_warmelt_outobj_SYNTESTGEN_CMATCHER); + meltrout_146_WARMELTmiOUTOBJ_SYNTESTGEN_CMATCHER); /*iniclos dclo_647__SYNTESTGEN_CMATCHER */ - /*_.VALCLO___V836*/ meltfptr[835] = + /*_._VALCLO___V836*/ meltfptr[835] = (melt_ptr_t) & meltcdat->dclo_647__SYNTESTGEN_CMATCHER; meltcdat->dclo_647__SYNTESTGEN_CMATCHER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -15846,8 +15892,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_648__CLASS_CMATCHER*/ - /*uniqueobj*/ if (! /*_.VALDATA___V837*/ meltfptr[836]) -/*_.VALDATA___V837*/ meltfptr[836] = + /*uniqueobj*/ if (! /*_._VALDATA___V837*/ meltfptr[836]) +/*_._VALDATA___V837*/ meltfptr[836] = (melt_ptr_t) & meltcdat->dsym_648__CLASS_CMATCHER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_648__CLASS_CMATCHER", @@ -15867,7 +15913,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_649__CLASS_CMATCHER*/ - /*_.VALSTR___V838*/ meltfptr[837] = + /*_._VALSTR___V838*/ meltfptr[837] = (melt_ptr_t) & meltcdat->dstr_649__CLASS_CMATCHER; meltcdat->dstr_649__CLASS_CMATCHER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -15880,8 +15926,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_650__CLASS_ANY_MATCHER*/ - /*uniqueobj*/ if (! /*_.VALDATA___V839*/ meltfptr[838]) -/*_.VALDATA___V839*/ meltfptr[838] = + /*uniqueobj*/ if (! /*_._VALDATA___V839*/ meltfptr[838]) +/*_._VALDATA___V839*/ meltfptr[838] = (melt_ptr_t) & meltcdat->dsym_650__CLASS_ANY_MATCHER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_650__CLASS_ANY_MATCHER", @@ -15901,7 +15947,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_651__CLASS_ANY_MATCHE*/ - /*_.VALSTR___V840*/ meltfptr[839] = + /*_._VALSTR___V840*/ meltfptr[839] = (melt_ptr_t) & meltcdat->dstr_651__CLASS_ANY_MATCHE; meltcdat->dstr_651__CLASS_ANY_MATCHE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -15914,8 +15960,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_652__CLASS_SOURCE_DEFCMATCHER*/ - /*uniqueobj*/ if (! /*_.VALDATA___V841*/ meltfptr[840]) -/*_.VALDATA___V841*/ meltfptr[840] = + /*uniqueobj*/ if (! /*_._VALDATA___V841*/ meltfptr[840]) +/*_._VALDATA___V841*/ meltfptr[840] = (melt_ptr_t) & meltcdat->dsym_652__CLASS_SOURCE_DEFCMATCHER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg @@ -15935,7 +15981,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_653__CLASS_SOURCE_DEF*/ - /*_.VALSTR___V842*/ meltfptr[841] = + /*_._VALSTR___V842*/ meltfptr[841] = (melt_ptr_t) & meltcdat->dstr_653__CLASS_SOURCE_DEF; meltcdat->dstr_653__CLASS_SOURCE_DEF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -15948,7 +15994,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_654__cmatcher_oper_*/ - /*_.VALSTR___V834*/ meltfptr[833] = + /*_._VALSTR___V834*/ meltfptr[833] = (melt_ptr_t) & meltcdat->dstr_654__cmatcher_oper_; meltcdat->dstr_654__cmatcher_oper_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -15961,7 +16007,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_655__*/ - /*_.VALSTR___V835*/ meltfptr[834] = (melt_ptr_t) & meltcdat->dstr_655__; + /*_._VALSTR___V835*/ meltfptr[834] = (melt_ptr_t) & meltcdat->dstr_655__; meltcdat->dstr_655__.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (meltcdat->dstr_655__.val, " = ", @@ -15970,7 +16016,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_655__.slen = 3; /*inirout drout_656__EMIT_SYNTAX_TESTING_ROUTINE */ - /*_.VALROUT___V843*/ meltfptr[842] = + /*_._VALROUT___V843*/ meltfptr[842] = (melt_ptr_t) & meltcdat->drout_656__EMIT_SYNTAX_TESTING_ROUTINE; meltcdat->drout_656__EMIT_SYNTAX_TESTING_ROUTINE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -15980,17 +16026,17 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->drout_656__EMIT_SYNTAX_TESTING_ROUTINE.nbval = 7; MELT_ROUTINE_SET_ROUTCODE (&meltcdat-> drout_656__EMIT_SYNTAX_TESTING_ROUTINE, - meltrout_147_warmelt_outobj_EMIT_SYNTAX_TESTING_ROUTINE); + meltrout_147_WARMELTmiOUTOBJ_EMIT_SYNTAX_TESTING_ROUTINE); /*iniclos dclo_657__EMIT_SYNTAX_TESTING_ROUTINE */ - /*_.VALCLO___V844*/ meltfptr[843] = + /*_._VALCLO___V844*/ meltfptr[843] = (melt_ptr_t) & meltcdat->dclo_657__EMIT_SYNTAX_TESTING_ROUTINE; meltcdat->dclo_657__EMIT_SYNTAX_TESTING_ROUTINE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); meltcdat->dclo_657__EMIT_SYNTAX_TESTING_ROUTINE.nbval = 0; /*inirout drout_658__NORMALIZE_MACROEXPANDED_LIST */ - /*_.VALROUT___V845*/ meltfptr[844] = + /*_._VALROUT___V845*/ meltfptr[844] = (melt_ptr_t) & meltcdat->drout_658__NORMALIZE_MACROEXPANDED_LIST; meltcdat->drout_658__NORMALIZE_MACROEXPANDED_LIST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -16000,10 +16046,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->drout_658__NORMALIZE_MACROEXPANDED_LIST.nbval = 14; MELT_ROUTINE_SET_ROUTCODE (&meltcdat-> drout_658__NORMALIZE_MACROEXPANDED_LIST, - meltrout_148_warmelt_outobj_NORMALIZE_MACROEXPANDED_LIST); + meltrout_148_WARMELTmiOUTOBJ_NORMALIZE_MACROEXPANDED_LIST); /*iniclos dclo_659__NORMALIZE_MACROEXPANDED_LIST */ - /*_.VALCLO___V847*/ meltfptr[846] = + /*_._VALCLO___V847*/ meltfptr[846] = (melt_ptr_t) & meltcdat->dclo_659__NORMALIZE_MACROEXPANDED_LIST; meltcdat->dclo_659__NORMALIZE_MACROEXPANDED_LIST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -16011,8 +16057,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_660__CLASS_NORMALIZATION_CONTEXT*/ - /*uniqueobj*/ if (! /*_.VALDATA___V848*/ meltfptr[847]) -/*_.VALDATA___V848*/ meltfptr[847] = + /*uniqueobj*/ if (! /*_._VALDATA___V848*/ meltfptr[847]) +/*_._VALDATA___V848*/ meltfptr[847] = (melt_ptr_t) & meltcdat->dsym_660__CLASS_NORMALIZATION_CONTEXT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg @@ -16032,7 +16078,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_661__CLASS_NORMALIZAT*/ - /*_.VALSTR___V849*/ meltfptr[848] = + /*_._VALSTR___V849*/ meltfptr[848] = (melt_ptr_t) & meltcdat->dstr_661__CLASS_NORMALIZAT; meltcdat->dstr_661__CLASS_NORMALIZAT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -16045,8 +16091,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_662__CLASS_ENVIRONMENT*/ - /*uniqueobj*/ if (! /*_.VALDATA___V850*/ meltfptr[849]) -/*_.VALDATA___V850*/ meltfptr[849] = + /*uniqueobj*/ if (! /*_._VALDATA___V850*/ meltfptr[849]) +/*_._VALDATA___V850*/ meltfptr[849] = (melt_ptr_t) & meltcdat->dsym_662__CLASS_ENVIRONMENT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_662__CLASS_ENVIRONMENT", @@ -16066,7 +16112,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_663__CLASS_ENVIRONMEN*/ - /*_.VALSTR___V851*/ meltfptr[850] = + /*_._VALSTR___V851*/ meltfptr[850] = (melt_ptr_t) & meltcdat->dstr_663__CLASS_ENVIRONMEN; meltcdat->dstr_663__CLASS_ENVIRONMEN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -16079,8 +16125,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_664__CLASS_SOURCE*/ - /*uniqueobj*/ if (! /*_.VALDATA___V852*/ meltfptr[851]) -/*_.VALDATA___V852*/ meltfptr[851] = + /*uniqueobj*/ if (! /*_._VALDATA___V852*/ meltfptr[851]) +/*_._VALDATA___V852*/ meltfptr[851] = (melt_ptr_t) & meltcdat->dsym_664__CLASS_SOURCE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_664__CLASS_SOURCE", @@ -16100,7 +16146,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_665__CLASS_SOURCE*/ - /*_.VALSTR___V853*/ meltfptr[852] = + /*_._VALSTR___V853*/ meltfptr[852] = (melt_ptr_t) & meltcdat->dstr_665__CLASS_SOURCE; meltcdat->dstr_665__CLASS_SOURCE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -16113,8 +16159,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_666__CLASS_SOURCE_UPDATE_CURRENT_MODULE_ENVIRONMENT_REFERENCE*/ - /*uniqueobj*/ if (! /*_.VALDATA___V854*/ meltfptr[853]) -/*_.VALDATA___V854*/ meltfptr[853] = + /*uniqueobj*/ if (! /*_._VALDATA___V854*/ meltfptr[853]) +/*_._VALDATA___V854*/ meltfptr[853] = (melt_ptr_t) & meltcdat-> dsym_666__CLASS_SOURCE_UPDATE_CURRENT_MODULE_ENVIRONMENT_REFERENCE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) @@ -16141,7 +16187,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_667__CLASS_SOURCE_UPD*/ - /*_.VALSTR___V855*/ meltfptr[854] = + /*_._VALSTR___V855*/ meltfptr[854] = (melt_ptr_t) & meltcdat->dstr_667__CLASS_SOURCE_UPD; meltcdat->dstr_667__CLASS_SOURCE_UPD.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -16154,7 +16200,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_668__at_very_start*/ - /*_.VALSTR___V846*/ meltfptr[845] = + /*_._VALSTR___V846*/ meltfptr[845] = (melt_ptr_t) & meltcdat->dstr_668__at_very_start; meltcdat->dstr_668__at_very_start.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -16167,8 +16213,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_669__CLASS_SOURCE_COMMENT*/ - /*uniqueobj*/ if (! /*_.VALDATA___V856*/ meltfptr[855]) -/*_.VALDATA___V856*/ meltfptr[855] = + /*uniqueobj*/ if (! /*_._VALDATA___V856*/ meltfptr[855]) +/*_._VALDATA___V856*/ meltfptr[855] = (melt_ptr_t) & meltcdat->dsym_669__CLASS_SOURCE_COMMENT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_669__CLASS_SOURCE_COMMENT", @@ -16188,7 +16234,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_670__CLASS_SOURCE_COM*/ - /*_.VALSTR___V857*/ meltfptr[856] = + /*_._VALSTR___V857*/ meltfptr[856] = (melt_ptr_t) & meltcdat->dstr_670__CLASS_SOURCE_COM; meltcdat->dstr_670__CLASS_SOURCE_COM.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -16201,8 +16247,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_671__NORMAL_EXP*/ - /*uniqueobj*/ if (! /*_.VALDATA___V858*/ meltfptr[857]) -/*_.VALDATA___V858*/ meltfptr[857] = + /*uniqueobj*/ if (! /*_._VALDATA___V858*/ meltfptr[857]) +/*_._VALDATA___V858*/ meltfptr[857] = (melt_ptr_t) & meltcdat->dsym_671__NORMAL_EXP; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_671__NORMAL_EXP", @@ -16222,7 +16268,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_672__NORMAL_EXP*/ - /*_.VALSTR___V859*/ meltfptr[858] = + /*_._VALSTR___V859*/ meltfptr[858] = (melt_ptr_t) & meltcdat->dstr_672__NORMAL_EXP; meltcdat->dstr_672__NORMAL_EXP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -16235,8 +16281,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_673__CLASS_NREP_ANYPROC*/ - /*uniqueobj*/ if (! /*_.VALDATA___V860*/ meltfptr[859]) -/*_.VALDATA___V860*/ meltfptr[859] = + /*uniqueobj*/ if (! /*_._VALDATA___V860*/ meltfptr[859]) +/*_._VALDATA___V860*/ meltfptr[859] = (melt_ptr_t) & meltcdat->dsym_673__CLASS_NREP_ANYPROC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_673__CLASS_NREP_ANYPROC", @@ -16256,7 +16302,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_674__CLASS_NREP_ANYPR*/ - /*_.VALSTR___V861*/ meltfptr[860] = + /*_._VALSTR___V861*/ meltfptr[860] = (melt_ptr_t) & meltcdat->dstr_674__CLASS_NREP_ANYPR; meltcdat->dstr_674__CLASS_NREP_ANYPR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -16269,8 +16315,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_675__WRAP_NORMAL_LET1*/ - /*uniqueobj*/ if (! /*_.VALDATA___V862*/ meltfptr[861]) -/*_.VALDATA___V862*/ meltfptr[861] = + /*uniqueobj*/ if (! /*_._VALDATA___V862*/ meltfptr[861]) +/*_._VALDATA___V862*/ meltfptr[861] = (melt_ptr_t) & meltcdat->dsym_675__WRAP_NORMAL_LET1; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_675__WRAP_NORMAL_LET1", @@ -16290,7 +16336,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_676__WRAP_NORMAL_LET1*/ - /*_.VALSTR___V863*/ meltfptr[862] = + /*_._VALSTR___V863*/ meltfptr[862] = (melt_ptr_t) & meltcdat->dstr_676__WRAP_NORMAL_LET1; meltcdat->dstr_676__WRAP_NORMAL_LET1.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -16303,8 +16349,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_677__CLASS_NREP_INITPROC*/ - /*uniqueobj*/ if (! /*_.VALDATA___V864*/ meltfptr[863]) -/*_.VALDATA___V864*/ meltfptr[863] = + /*uniqueobj*/ if (! /*_._VALDATA___V864*/ meltfptr[863]) +/*_._VALDATA___V864*/ meltfptr[863] = (melt_ptr_t) & meltcdat->dsym_677__CLASS_NREP_INITPROC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_677__CLASS_NREP_INITPROC", @@ -16324,7 +16370,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_678__CLASS_NREP_INITP*/ - /*_.VALSTR___V865*/ meltfptr[864] = + /*_._VALSTR___V865*/ meltfptr[864] = (melt_ptr_t) & meltcdat->dstr_678__CLASS_NREP_INITP; meltcdat->dstr_678__CLASS_NREP_INITP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -16336,7 +16382,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_678__CLASS_NREP_INITP.slen = 19; /*inirout drout_679__OUTPUT_HOOKS_WITH_MODVAR */ - /*_.VALROUT___V866*/ meltfptr[865] = + /*_._VALROUT___V866*/ meltfptr[865] = (melt_ptr_t) & meltcdat->drout_679__OUTPUT_HOOKS_WITH_MODVAR; meltcdat->drout_679__OUTPUT_HOOKS_WITH_MODVAR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -16345,10 +16391,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_ROUTDESCR_LEN - 1); meltcdat->drout_679__OUTPUT_HOOKS_WITH_MODVAR.nbval = 11; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_679__OUTPUT_HOOKS_WITH_MODVAR, - meltrout_149_warmelt_outobj_OUTPUT_HOOKS_WITH_MODVAR); + meltrout_149_WARMELTmiOUTOBJ_OUTPUT_HOOKS_WITH_MODVAR); /*iniclos dclo_680__OUTPUT_HOOKS_WITH_MODVAR */ - /*_.VALCLO___V867*/ meltfptr[866] = + /*_._VALCLO___V867*/ meltfptr[866] = (melt_ptr_t) & meltcdat->dclo_680__OUTPUT_HOOKS_WITH_MODVAR; meltcdat->dclo_680__OUTPUT_HOOKS_WITH_MODVAR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -16356,8 +16402,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_681__CLASS_NREP_DATAHOOK*/ - /*uniqueobj*/ if (! /*_.VALDATA___V868*/ meltfptr[867]) -/*_.VALDATA___V868*/ meltfptr[867] = + /*uniqueobj*/ if (! /*_._VALDATA___V868*/ meltfptr[867]) +/*_._VALDATA___V868*/ meltfptr[867] = (melt_ptr_t) & meltcdat->dsym_681__CLASS_NREP_DATAHOOK; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_681__CLASS_NREP_DATAHOOK", @@ -16377,7 +16423,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_682__CLASS_NREP_DATAH*/ - /*_.VALSTR___V869*/ meltfptr[868] = + /*_._VALSTR___V869*/ meltfptr[868] = (melt_ptr_t) & meltcdat->dstr_682__CLASS_NREP_DATAH; meltcdat->dstr_682__CLASS_NREP_DATAH.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -16389,7 +16435,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_682__CLASS_NREP_DATAH.slen = 19; /*inirout drout_683__TRANSLATE_MACROEXPANDED_LIST */ - /*_.VALROUT___V870*/ meltfptr[869] = + /*_._VALROUT___V870*/ meltfptr[869] = (melt_ptr_t) & meltcdat->drout_683__TRANSLATE_MACROEXPANDED_LIST; meltcdat->drout_683__TRANSLATE_MACROEXPANDED_LIST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -16399,10 +16445,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->drout_683__TRANSLATE_MACROEXPANDED_LIST.nbval = 43; MELT_ROUTINE_SET_ROUTCODE (&meltcdat-> drout_683__TRANSLATE_MACROEXPANDED_LIST, - meltrout_150_warmelt_outobj_TRANSLATE_MACROEXPANDED_LIST); + meltrout_150_WARMELTmiOUTOBJ_TRANSLATE_MACROEXPANDED_LIST); /*iniclos dclo_684__TRANSLATE_MACROEXPANDED_LIST */ - /*_.VALCLO___V874*/ meltfptr[873] = + /*_._VALCLO___V874*/ meltfptr[873] = (melt_ptr_t) & meltcdat->dclo_684__TRANSLATE_MACROEXPANDED_LIST; meltcdat->dclo_684__TRANSLATE_MACROEXPANDED_LIST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -16410,7 +16456,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_685__MELT_translation*/ - /*_.VALSTR___V871*/ meltfptr[870] = + /*_._VALSTR___V871*/ meltfptr[870] = (melt_ptr_t) & meltcdat->dstr_685__MELT_translation; meltcdat->dstr_685__MELT_translation.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -16423,8 +16469,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_686__COMPILE2OBJ_HOOK*/ - /*uniqueobj*/ if (! /*_.VALDATA___V875*/ meltfptr[874]) -/*_.VALDATA___V875*/ meltfptr[874] = + /*uniqueobj*/ if (! /*_._VALDATA___V875*/ meltfptr[874]) +/*_._VALDATA___V875*/ meltfptr[874] = (melt_ptr_t) & meltcdat->dsym_686__COMPILE2OBJ_HOOK; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_686__COMPILE2OBJ_HOOK", @@ -16444,7 +16490,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_687__COMPILE2OBJ_HOOK*/ - /*_.VALSTR___V876*/ meltfptr[875] = + /*_._VALSTR___V876*/ meltfptr[875] = (melt_ptr_t) & meltcdat->dstr_687__COMPILE2OBJ_HOOK; meltcdat->dstr_687__COMPILE2OBJ_HOOK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -16457,8 +16503,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_688__COMPILE2OBJ_PROCEDURE*/ - /*uniqueobj*/ if (! /*_.VALDATA___V877*/ meltfptr[876]) -/*_.VALDATA___V877*/ meltfptr[876] = + /*uniqueobj*/ if (! /*_._VALDATA___V877*/ meltfptr[876]) +/*_._VALDATA___V877*/ meltfptr[876] = (melt_ptr_t) & meltcdat->dsym_688__COMPILE2OBJ_PROCEDURE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg @@ -16478,7 +16524,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_689__COMPILE2OBJ_PROC*/ - /*_.VALSTR___V878*/ meltfptr[877] = + /*_._VALSTR___V878*/ meltfptr[877] = (melt_ptr_t) & meltcdat->dstr_689__COMPILE2OBJ_PROC; meltcdat->dstr_689__COMPILE2OBJ_PROC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -16491,7 +16537,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_690__MELT_translation*/ - /*_.VALSTR___V872*/ meltfptr[871] = + /*_._VALSTR___V872*/ meltfptr[871] = (melt_ptr_t) & meltcdat->dstr_690__MELT_translation; meltcdat->dstr_690__MELT_translation.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -16504,8 +16550,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_691__CLASS_SOURCE_CHEADER*/ - /*uniqueobj*/ if (! /*_.VALDATA___V879*/ meltfptr[878]) -/*_.VALDATA___V879*/ meltfptr[878] = + /*uniqueobj*/ if (! /*_._VALDATA___V879*/ meltfptr[878]) +/*_._VALDATA___V879*/ meltfptr[878] = (melt_ptr_t) & meltcdat->dsym_691__CLASS_SOURCE_CHEADER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_691__CLASS_SOURCE_CHEADER", @@ -16525,7 +16571,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_692__CLASS_SOURCE_CHE*/ - /*_.VALSTR___V880*/ meltfptr[879] = + /*_._VALSTR___V880*/ meltfptr[879] = (melt_ptr_t) & meltcdat->dstr_692__CLASS_SOURCE_CHE; meltcdat->dstr_692__CLASS_SOURCE_CHE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -16538,8 +16584,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_693__CLASS_SOURCE_CODE_STRING*/ - /*uniqueobj*/ if (! /*_.VALDATA___V881*/ meltfptr[880]) -/*_.VALDATA___V881*/ meltfptr[880] = + /*uniqueobj*/ if (! /*_._VALDATA___V881*/ meltfptr[880]) +/*_._VALDATA___V881*/ meltfptr[880] = (melt_ptr_t) & meltcdat->dsym_693__CLASS_SOURCE_CODE_STRING; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg @@ -16559,7 +16605,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_694__CLASS_SOURCE_COD*/ - /*_.VALSTR___V882*/ meltfptr[881] = + /*_._VALSTR___V882*/ meltfptr[881] = (melt_ptr_t) & meltcdat->dstr_694__CLASS_SOURCE_COD; meltcdat->dstr_694__CLASS_SOURCE_COD.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -16572,8 +16618,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_695__CLASS_SOURCE_CIMPLEMENT*/ - /*uniqueobj*/ if (! /*_.VALDATA___V883*/ meltfptr[882]) -/*_.VALDATA___V883*/ meltfptr[882] = + /*uniqueobj*/ if (! /*_._VALDATA___V883*/ meltfptr[882]) +/*_._VALDATA___V883*/ meltfptr[882] = (melt_ptr_t) & meltcdat->dsym_695__CLASS_SOURCE_CIMPLEMENT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg @@ -16593,7 +16639,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_696__CLASS_SOURCE_CIM*/ - /*_.VALSTR___V884*/ meltfptr[883] = + /*_._VALSTR___V884*/ meltfptr[883] = (melt_ptr_t) & meltcdat->dstr_696__CLASS_SOURCE_CIM; meltcdat->dstr_696__CLASS_SOURCE_CIM.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -16606,7 +16652,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_697__MELT_translation*/ - /*_.VALSTR___V873*/ meltfptr[872] = + /*_._VALSTR___V873*/ meltfptr[872] = (melt_ptr_t) & meltcdat->dstr_697__MELT_translation; meltcdat->dstr_697__MELT_translation.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -16618,7 +16664,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_697__MELT_translation.slen = 45; /*inirout drout_698__FATAL_COMPILE_ERROR */ - /*_.VALROUT___V885*/ meltfptr[884] = + /*_._VALROUT___V885*/ meltfptr[884] = (melt_ptr_t) & meltcdat->drout_698__FATAL_COMPILE_ERROR; meltcdat->drout_698__FATAL_COMPILE_ERROR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -16627,17 +16673,17 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_ROUTDESCR_LEN - 1); meltcdat->drout_698__FATAL_COMPILE_ERROR.nbval = 0; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_698__FATAL_COMPILE_ERROR, - meltrout_151_warmelt_outobj_FATAL_COMPILE_ERROR); + meltrout_151_WARMELTmiOUTOBJ_FATAL_COMPILE_ERROR); /*iniclos dclo_699__FATAL_COMPILE_ERROR */ - /*_.VALCLO___V886*/ meltfptr[885] = + /*_._VALCLO___V886*/ meltfptr[885] = (melt_ptr_t) & meltcdat->dclo_699__FATAL_COMPILE_ERROR; meltcdat->dclo_699__FATAL_COMPILE_ERROR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); meltcdat->dclo_699__FATAL_COMPILE_ERROR.nbval = 0; /*inirout drout_700__COMPILE_LIST_SEXPR */ - /*_.VALROUT___V887*/ meltfptr[886] = + /*_._VALROUT___V887*/ meltfptr[886] = (melt_ptr_t) & meltcdat->drout_700__COMPILE_LIST_SEXPR; meltcdat->drout_700__COMPILE_LIST_SEXPR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -16646,10 +16692,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_ROUTDESCR_LEN - 1); meltcdat->drout_700__COMPILE_LIST_SEXPR.nbval = 16; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_700__COMPILE_LIST_SEXPR, - meltrout_152_warmelt_outobj_COMPILE_LIST_SEXPR); + meltrout_152_WARMELTmiOUTOBJ_COMPILE_LIST_SEXPR); /*iniclos dclo_701__COMPILE_LIST_SEXPR */ - /*_.VALCLO___V889*/ meltfptr[888] = + /*_._VALCLO___V889*/ meltfptr[888] = (melt_ptr_t) & meltcdat->dclo_701__COMPILE_LIST_SEXPR; meltcdat->dclo_701__COMPILE_LIST_SEXPR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -16657,8 +16703,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_702__CLASS_MODULE_CONTEXT*/ - /*uniqueobj*/ if (! /*_.VALDATA___V890*/ meltfptr[889]) -/*_.VALDATA___V890*/ meltfptr[889] = + /*uniqueobj*/ if (! /*_._VALDATA___V890*/ meltfptr[889]) +/*_._VALDATA___V890*/ meltfptr[889] = (melt_ptr_t) & meltcdat->dsym_702__CLASS_MODULE_CONTEXT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_702__CLASS_MODULE_CONTEXT", @@ -16678,7 +16724,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_703__CLASS_MODULE_CON*/ - /*_.VALSTR___V891*/ meltfptr[890] = + /*_._VALSTR___V891*/ meltfptr[890] = (melt_ptr_t) & meltcdat->dstr_703__CLASS_MODULE_CON; meltcdat->dstr_703__CLASS_MODULE_CON.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -16691,8 +16737,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_704__DISCR_MAP_STRINGS*/ - /*uniqueobj*/ if (! /*_.VALDATA___V892*/ meltfptr[891]) -/*_.VALDATA___V892*/ meltfptr[891] = + /*uniqueobj*/ if (! /*_._VALDATA___V892*/ meltfptr[891]) +/*_._VALDATA___V892*/ meltfptr[891] = (melt_ptr_t) & meltcdat->dsym_704__DISCR_MAP_STRINGS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_704__DISCR_MAP_STRINGS", @@ -16712,7 +16758,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_705__DISCR_MAP_STRING*/ - /*_.VALSTR___V893*/ meltfptr[892] = + /*_._VALSTR___V893*/ meltfptr[892] = (melt_ptr_t) & meltcdat->dstr_705__DISCR_MAP_STRING; meltcdat->dstr_705__DISCR_MAP_STRING.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -16724,7 +16770,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_705__DISCR_MAP_STRING.slen = 17; /*inirout drout_706__LAMBDA_ */ - /*_.VALROUT___V888*/ meltfptr[887] = + /*_._VALROUT___V888*/ meltfptr[887] = (melt_ptr_t) & meltcdat->drout_706__LAMBDA_; meltcdat->drout_706__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -16732,12 +16778,12 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, "LAMBDA_ @warmelt-outobj.melt:6934", MELT_ROUTDESCR_LEN - 1); meltcdat->drout_706__LAMBDA_.nbval = 1; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_706__LAMBDA_, - meltrout_153_warmelt_outobj_LAMBDA___27__); + meltrout_153_WARMELTmiOUTOBJ_LAMBDA___27__); /*iniobj dsym_707__CREATE_NORMCONTEXT*/ - /*uniqueobj*/ if (! /*_.VALDATA___V894*/ meltfptr[893]) -/*_.VALDATA___V894*/ meltfptr[893] = + /*uniqueobj*/ if (! /*_._VALDATA___V894*/ meltfptr[893]) +/*_._VALDATA___V894*/ meltfptr[893] = (melt_ptr_t) & meltcdat->dsym_707__CREATE_NORMCONTEXT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_707__CREATE_NORMCONTEXT", @@ -16757,7 +16803,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_708__CREATE_NORMCONTE*/ - /*_.VALSTR___V895*/ meltfptr[894] = + /*_._VALSTR___V895*/ meltfptr[894] = (melt_ptr_t) & meltcdat->dstr_708__CREATE_NORMCONTE; meltcdat->dstr_708__CREATE_NORMCONTE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -16770,8 +16816,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_709__INITIAL_ENVIRONMENT*/ - /*uniqueobj*/ if (! /*_.VALDATA___V896*/ meltfptr[895]) -/*_.VALDATA___V896*/ meltfptr[895] = + /*uniqueobj*/ if (! /*_._VALDATA___V896*/ meltfptr[895]) +/*_._VALDATA___V896*/ meltfptr[895] = (melt_ptr_t) & meltcdat->dsym_709__INITIAL_ENVIRONMENT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_709__INITIAL_ENVIRONMENT", @@ -16791,7 +16837,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_710__INITIAL_ENVIRONM*/ - /*_.VALSTR___V897*/ meltfptr[896] = + /*_._VALSTR___V897*/ meltfptr[896] = (melt_ptr_t) & meltcdat->dstr_710__INITIAL_ENVIRONM; meltcdat->dstr_710__INITIAL_ENVIRONM.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -16804,8 +16850,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_711__MACROEXPAND_TOPLEVEL_LIST*/ - /*uniqueobj*/ if (! /*_.VALDATA___V898*/ meltfptr[897]) -/*_.VALDATA___V898*/ meltfptr[897] = + /*uniqueobj*/ if (! /*_._VALDATA___V898*/ meltfptr[897]) +/*_._VALDATA___V898*/ meltfptr[897] = (melt_ptr_t) & meltcdat->dsym_711__MACROEXPAND_TOPLEVEL_LIST; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg @@ -16825,7 +16871,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_712__MACROEXPAND_TOPL*/ - /*_.VALSTR___V899*/ meltfptr[898] = + /*_._VALSTR___V899*/ meltfptr[898] = (melt_ptr_t) & meltcdat->dstr_712__MACROEXPAND_TOPL; meltcdat->dstr_712__MACROEXPAND_TOPL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -16838,8 +16884,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_713__MACROEXPAND_1*/ - /*uniqueobj*/ if (! /*_.VALDATA___V900*/ meltfptr[899]) -/*_.VALDATA___V900*/ meltfptr[899] = + /*uniqueobj*/ if (! /*_._VALDATA___V900*/ meltfptr[899]) +/*_._VALDATA___V900*/ meltfptr[899] = (melt_ptr_t) & meltcdat->dsym_713__MACROEXPAND_1; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_713__MACROEXPAND_1", @@ -16859,7 +16905,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_714__MACROEXPAND_1*/ - /*_.VALSTR___V901*/ meltfptr[900] = + /*_._VALSTR___V901*/ meltfptr[900] = (melt_ptr_t) & meltcdat->dstr_714__MACROEXPAND_1; meltcdat->dstr_714__MACROEXPAND_1.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -16872,8 +16918,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_715__COMPILE2OBJ_INITPROC*/ - /*uniqueobj*/ if (! /*_.VALDATA___V902*/ meltfptr[901]) -/*_.VALDATA___V902*/ meltfptr[901] = + /*uniqueobj*/ if (! /*_._VALDATA___V902*/ meltfptr[901]) +/*_._VALDATA___V902*/ meltfptr[901] = (melt_ptr_t) & meltcdat->dsym_715__COMPILE2OBJ_INITPROC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_715__COMPILE2OBJ_INITPROC", @@ -16893,7 +16939,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_716__COMPILE2OBJ_INIT*/ - /*_.VALSTR___V903*/ meltfptr[902] = + /*_._VALSTR___V903*/ meltfptr[902] = (melt_ptr_t) & meltcdat->dstr_716__COMPILE2OBJ_INIT; meltcdat->dstr_716__COMPILE2OBJ_INIT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -16906,8 +16952,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_717__MELT_RUN_EXTENSION*/ - /*uniqueobj*/ if (! /*_.VALDATA___V904*/ meltfptr[903]) -/*_.VALDATA___V904*/ meltfptr[903] = + /*uniqueobj*/ if (! /*_._VALDATA___V904*/ meltfptr[903]) +/*_._VALDATA___V904*/ meltfptr[903] = (melt_ptr_t) & meltcdat->dsym_717__MELT_RUN_EXTENSION; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_717__MELT_RUN_EXTENSION", @@ -16927,7 +16973,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_718__MELT_RUN_EXTENSI*/ - /*_.VALSTR___V905*/ meltfptr[904] = + /*_._VALSTR___V905*/ meltfptr[904] = (melt_ptr_t) & meltcdat->dstr_718__MELT_RUN_EXTENSI; meltcdat->dstr_718__MELT_RUN_EXTENSI.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -16941,7 +16987,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_LOCATION ("warmelt-outobj.melt:6980:/ iniobj"); /*iniobj dobj_719__MELT_RUN_EXTENSION*/ -/*_.VALDATA___V906*/ meltfptr[905] = +/*_._VALDATA___V906*/ meltfptr[905] = (melt_ptr_t) & meltcdat->dobj_719__MELT_RUN_EXTENSION; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_719__MELT_RUN_EXTENSION", @@ -16956,25 +17002,25 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); meltcdat->dobj_719__MELT_RUN_EXTENSION.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - meltcdat->dobj_719__MELT_RUN_EXTENSION.obj_hash = 846755955; + meltcdat->dobj_719__MELT_RUN_EXTENSION.obj_hash = 768069057; meltcdat->dobj_719__MELT_RUN_EXTENSION.obj_len = 5; /*inimult dtup_720__MELT_RUN_EXTENSION */ - /*_.VALTUP___V922*/ meltfptr[921] = + /*_._VALTUP___V922*/ meltfptr[921] = (melt_ptr_t) & meltcdat->dtup_720__MELT_RUN_EXTENSION; meltcdat->dtup_720__MELT_RUN_EXTENSION.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_MULTIPLE)))); meltcdat->dtup_720__MELT_RUN_EXTENSION.nbval = 7; /*inimult dtup_721__MELT_RUN_EXTENSION */ - /*_.VALTUP___V917*/ meltfptr[916] = + /*_._VALTUP___V917*/ meltfptr[916] = (melt_ptr_t) & meltcdat->dtup_721__MELT_RUN_EXTENSION; meltcdat->dtup_721__MELT_RUN_EXTENSION.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_MULTIPLE)))); meltcdat->dtup_721__MELT_RUN_EXTENSION.nbval = 3; /*iniobj dsym_722__BASENAME*/ - /*uniqueobj*/ if (! /*_.VALDATA___V909*/ meltfptr[908]) -/*_.VALDATA___V909*/ meltfptr[908] = + /*uniqueobj*/ if (! /*_._VALDATA___V909*/ meltfptr[908]) +/*_._VALDATA___V909*/ meltfptr[908] = (melt_ptr_t) & meltcdat->dsym_722__BASENAME; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_722__BASENAME", @@ -16994,7 +17040,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_723__BASENAME*/ - /*_.VALSTR___V910*/ meltfptr[909] = + /*_._VALSTR___V910*/ meltfptr[909] = (melt_ptr_t) & meltcdat->dstr_723__BASENAME; meltcdat->dstr_723__BASENAME.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -17007,7 +17053,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*^iniobj */ /*iniobj dobj_724*/ -/*_.VALDATA___V908*/ meltfptr[907] = (melt_ptr_t) & meltcdat->dobj_724; +/*_._VALDATA___V908*/ meltfptr[907] = (melt_ptr_t) & meltcdat->dobj_724; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_724", melt_magic_discr ((melt_ptr_t) @@ -17023,13 +17069,13 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dobj_724.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); meltcdat->dobj_724.obj_num = 0; - meltcdat->dobj_724.obj_hash = 533316314; + meltcdat->dobj_724.obj_hash = 634552696; meltcdat->dobj_724.obj_len = 2; /*iniobj dsym_725__ENV*/ - /*uniqueobj*/ if (! /*_.VALDATA___V912*/ meltfptr[911]) -/*_.VALDATA___V912*/ meltfptr[911] = + /*uniqueobj*/ if (! /*_._VALDATA___V912*/ meltfptr[911]) +/*_._VALDATA___V912*/ meltfptr[911] = (melt_ptr_t) & meltcdat->dsym_725__ENV; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_725__ENV", @@ -17049,7 +17095,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_726__ENV*/ - /*_.VALSTR___V913*/ meltfptr[912] = (melt_ptr_t) & meltcdat->dstr_726__ENV; + /*_._VALSTR___V913*/ meltfptr[912] = (melt_ptr_t) & meltcdat->dstr_726__ENV; meltcdat->dstr_726__ENV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (meltcdat->dstr_726__ENV.val, "ENV", @@ -17060,7 +17106,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*^iniobj */ /*iniobj dobj_727*/ -/*_.VALDATA___V911*/ meltfptr[910] = (melt_ptr_t) & meltcdat->dobj_727; +/*_._VALDATA___V911*/ meltfptr[910] = (melt_ptr_t) & meltcdat->dobj_727; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_727", melt_magic_discr ((melt_ptr_t) @@ -17076,13 +17122,13 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dobj_727.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); meltcdat->dobj_727.obj_num = 1; - meltcdat->dobj_727.obj_hash = 316758605; + meltcdat->dobj_727.obj_hash = 422918483; meltcdat->dobj_727.obj_len = 2; /*iniobj dsym_728__LITVAL*/ - /*uniqueobj*/ if (! /*_.VALDATA___V915*/ meltfptr[914]) -/*_.VALDATA___V915*/ meltfptr[914] = + /*uniqueobj*/ if (! /*_._VALDATA___V915*/ meltfptr[914]) +/*_._VALDATA___V915*/ meltfptr[914] = (melt_ptr_t) & meltcdat->dsym_728__LITVAL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_728__LITVAL", @@ -17102,7 +17148,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_729__LITVAL*/ - /*_.VALSTR___V916*/ meltfptr[915] = + /*_._VALSTR___V916*/ meltfptr[915] = (melt_ptr_t) & meltcdat->dstr_729__LITVAL; meltcdat->dstr_729__LITVAL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -17114,7 +17160,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*^iniobj */ /*iniobj dobj_730*/ -/*_.VALDATA___V914*/ meltfptr[913] = (melt_ptr_t) & meltcdat->dobj_730; +/*_._VALDATA___V914*/ meltfptr[913] = (melt_ptr_t) & meltcdat->dobj_730; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_730", melt_magic_discr ((melt_ptr_t) @@ -17130,12 +17176,12 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dobj_730.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); meltcdat->dobj_730.obj_num = 2; - meltcdat->dobj_730.obj_hash = 174928518; + meltcdat->dobj_730.obj_hash = 6000663; meltcdat->dobj_730.obj_len = 2; /*inistring dstr_731__melt_run_ext*/ - /*_.VALSTR___V918*/ meltfptr[917] = + /*_._VALSTR___V918*/ meltfptr[917] = (melt_ptr_t) & meltcdat->dstr_731__melt_run_ext; meltcdat->dstr_731__melt_run_ext.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_VERBATIM_STRING)))); @@ -17147,7 +17193,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_732__melt_p*/ - /*_.VALSTR___V919*/ meltfptr[918] = + /*_._VALSTR___V919*/ meltfptr[918] = (melt_ptr_t) & meltcdat->dstr_732__melt_p; meltcdat->dstr_732__melt_p.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_VERBATIM_STRING)))); @@ -17159,7 +17205,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_733__melt_p*/ - /*_.VALSTR___V920*/ meltfptr[919] = + /*_._VALSTR___V920*/ meltfptr[919] = (melt_ptr_t) & meltcdat->dstr_733__melt_p; meltcdat->dstr_733__melt_p.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_VERBATIM_STRING)))); @@ -17171,7 +17217,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_734__*/ - /*_.VALSTR___V921*/ meltfptr[920] = (melt_ptr_t) & meltcdat->dstr_734__; + /*_._VALSTR___V921*/ meltfptr[920] = (melt_ptr_t) & meltcdat->dstr_734__; meltcdat->dstr_734__.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_VERBATIM_STRING)))); /*small inistring */ strncpy (meltcdat->dstr_734__.val, ") ", @@ -17181,7 +17227,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_735__MELT_RUN_EXTENSI*/ - /*_.VALSTR___V907*/ meltfptr[906] = + /*_._VALSTR___V907*/ meltfptr[906] = (melt_ptr_t) & meltcdat->dstr_735__MELT_RUN_EXTENSI; meltcdat->dstr_735__MELT_RUN_EXTENSI.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -17193,7 +17239,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_735__MELT_RUN_EXTENSI.slen = 18; /*inirout drout_736__AUTOBOX_NORMAL_RETURN */ - /*_.VALROUT___V923*/ meltfptr[922] = + /*_._VALROUT___V923*/ meltfptr[922] = (melt_ptr_t) & meltcdat->drout_736__AUTOBOX_NORMAL_RETURN; meltcdat->drout_736__AUTOBOX_NORMAL_RETURN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -17202,10 +17248,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_ROUTDESCR_LEN - 1); meltcdat->drout_736__AUTOBOX_NORMAL_RETURN.nbval = 19; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_736__AUTOBOX_NORMAL_RETURN, - meltrout_154_warmelt_outobj_AUTOBOX_NORMAL_RETURN); + meltrout_154_WARMELTmiOUTOBJ_AUTOBOX_NORMAL_RETURN); /*iniclos dclo_737__AUTOBOX_NORMAL_RETURN */ - /*_.VALCLO___V932*/ meltfptr[931] = + /*_._VALCLO___V932*/ meltfptr[931] = (melt_ptr_t) & meltcdat->dclo_737__AUTOBOX_NORMAL_RETURN; meltcdat->dclo_737__AUTOBOX_NORMAL_RETURN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -17213,8 +17259,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_738__CLONE_SYMBOL*/ - /*uniqueobj*/ if (! /*_.VALDATA___V933*/ meltfptr[932]) -/*_.VALDATA___V933*/ meltfptr[932] = + /*uniqueobj*/ if (! /*_._VALDATA___V933*/ meltfptr[932]) +/*_._VALDATA___V933*/ meltfptr[932] = (melt_ptr_t) & meltcdat->dsym_738__CLONE_SYMBOL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_738__CLONE_SYMBOL", @@ -17234,7 +17280,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_739__CLONE_SYMBOL*/ - /*_.VALSTR___V934*/ meltfptr[933] = + /*_._VALSTR___V934*/ meltfptr[933] = (melt_ptr_t) & meltcdat->dstr_739__CLONE_SYMBOL; meltcdat->dstr_739__CLONE_SYMBOL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -17247,8 +17293,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_740__RETAUTOBOXVAL*/ - /*uniqueobj*/ if (! /*_.VALDATA___V924*/ meltfptr[923]) -/*_.VALDATA___V924*/ meltfptr[923] = + /*uniqueobj*/ if (! /*_._VALDATA___V924*/ meltfptr[923]) +/*_._VALDATA___V924*/ meltfptr[923] = (melt_ptr_t) & meltcdat->dsym_740__RETAUTOBOXVAL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_740__RETAUTOBOXVAL", @@ -17268,7 +17314,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_741__RETAUTOBOXVAL*/ - /*_.VALSTR___V925*/ meltfptr[924] = + /*_._VALSTR___V925*/ meltfptr[924] = (melt_ptr_t) & meltcdat->dstr_741__RETAUTOBOXVAL; meltcdat->dstr_741__RETAUTOBOXVAL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -17281,8 +17327,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_742__CLASS_NORMAL_LET_BINDING*/ - /*uniqueobj*/ if (! /*_.VALDATA___V935*/ meltfptr[934]) -/*_.VALDATA___V935*/ meltfptr[934] = + /*uniqueobj*/ if (! /*_._VALDATA___V935*/ meltfptr[934]) +/*_._VALDATA___V935*/ meltfptr[934] = (melt_ptr_t) & meltcdat->dsym_742__CLASS_NORMAL_LET_BINDING; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg @@ -17302,7 +17348,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_743__CLASS_NORMAL_LET*/ - /*_.VALSTR___V936*/ meltfptr[935] = + /*_._VALSTR___V936*/ meltfptr[935] = (melt_ptr_t) & meltcdat->dstr_743__CLASS_NORMAL_LET; meltcdat->dstr_743__CLASS_NORMAL_LET.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -17315,8 +17361,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_744__CLASS_NREP_LOCSYMOCC*/ - /*uniqueobj*/ if (! /*_.VALDATA___V937*/ meltfptr[936]) -/*_.VALDATA___V937*/ meltfptr[936] = + /*uniqueobj*/ if (! /*_._VALDATA___V937*/ meltfptr[936]) +/*_._VALDATA___V937*/ meltfptr[936] = (melt_ptr_t) & meltcdat->dsym_744__CLASS_NREP_LOCSYMOCC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_744__CLASS_NREP_LOCSYMOCC", @@ -17336,7 +17382,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_745__CLASS_NREP_LOCSY*/ - /*_.VALSTR___V938*/ meltfptr[937] = + /*_._VALSTR___V938*/ meltfptr[937] = (melt_ptr_t) & meltcdat->dstr_745__CLASS_NREP_LOCSY; meltcdat->dstr_745__CLASS_NREP_LOCSY.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -17349,8 +17395,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_746__CLASS_NREP_RETURN*/ - /*uniqueobj*/ if (! /*_.VALDATA___V939*/ meltfptr[938]) -/*_.VALDATA___V939*/ meltfptr[938] = + /*uniqueobj*/ if (! /*_._VALDATA___V939*/ meltfptr[938]) +/*_._VALDATA___V939*/ meltfptr[938] = (melt_ptr_t) & meltcdat->dsym_746__CLASS_NREP_RETURN; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_746__CLASS_NREP_RETURN", @@ -17370,7 +17416,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_747__CLASS_NREP_RETUR*/ - /*_.VALSTR___V940*/ meltfptr[939] = + /*_._VALSTR___V940*/ meltfptr[939] = (melt_ptr_t) & meltcdat->dstr_747__CLASS_NREP_RETUR; meltcdat->dstr_747__CLASS_NREP_RETUR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -17383,8 +17429,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_748__CLASS_NREP_CHUNK*/ - /*uniqueobj*/ if (! /*_.VALDATA___V941*/ meltfptr[940]) -/*_.VALDATA___V941*/ meltfptr[940] = + /*uniqueobj*/ if (! /*_._VALDATA___V941*/ meltfptr[940]) +/*_._VALDATA___V941*/ meltfptr[940] = (melt_ptr_t) & meltcdat->dsym_748__CLASS_NREP_CHUNK; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_748__CLASS_NREP_CHUNK", @@ -17404,7 +17450,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_749__CLASS_NREP_CHUNK*/ - /*_.VALSTR___V942*/ meltfptr[941] = + /*_._VALSTR___V942*/ meltfptr[941] = (melt_ptr_t) & meltcdat->dstr_749__CLASS_NREP_CHUNK; meltcdat->dstr_749__CLASS_NREP_CHUNK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -17417,8 +17463,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_750__AUTOBOXLONG*/ - /*uniqueobj*/ if (! /*_.VALDATA___V926*/ meltfptr[925]) -/*_.VALDATA___V926*/ meltfptr[925] = + /*uniqueobj*/ if (! /*_._VALDATA___V926*/ meltfptr[925]) +/*_._VALDATA___V926*/ meltfptr[925] = (melt_ptr_t) & meltcdat->dsym_750__AUTOBOXLONG; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_750__AUTOBOXLONG", @@ -17438,7 +17484,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_751__AUTOBOXLONG*/ - /*_.VALSTR___V927*/ meltfptr[926] = + /*_._VALSTR___V927*/ meltfptr[926] = (melt_ptr_t) & meltcdat->dstr_751__AUTOBOXLONG; meltcdat->dstr_751__AUTOBOXLONG.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -17451,8 +17497,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_752__CLASS_LET_BINDING*/ - /*uniqueobj*/ if (! /*_.VALDATA___V943*/ meltfptr[942]) -/*_.VALDATA___V943*/ meltfptr[942] = + /*uniqueobj*/ if (! /*_._VALDATA___V943*/ meltfptr[942]) +/*_._VALDATA___V943*/ meltfptr[942] = (melt_ptr_t) & meltcdat->dsym_752__CLASS_LET_BINDING; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_752__CLASS_LET_BINDING", @@ -17472,7 +17518,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_753__CLASS_LET_BINDIN*/ - /*_.VALSTR___V944*/ meltfptr[943] = + /*_._VALSTR___V944*/ meltfptr[943] = (melt_ptr_t) & meltcdat->dstr_753__CLASS_LET_BINDIN; meltcdat->dstr_753__CLASS_LET_BINDIN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -17485,8 +17531,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_754__CTYPE_CSTRING*/ - /*uniqueobj*/ if (! /*_.VALDATA___V945*/ meltfptr[944]) -/*_.VALDATA___V945*/ meltfptr[944] = + /*uniqueobj*/ if (! /*_._VALDATA___V945*/ meltfptr[944]) +/*_._VALDATA___V945*/ meltfptr[944] = (melt_ptr_t) & meltcdat->dsym_754__CTYPE_CSTRING; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_754__CTYPE_CSTRING", @@ -17506,7 +17552,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_755__CTYPE_CSTRING*/ - /*_.VALSTR___V946*/ meltfptr[945] = + /*_._VALSTR___V946*/ meltfptr[945] = (melt_ptr_t) & meltcdat->dstr_755__CTYPE_CSTRING; meltcdat->dstr_755__CTYPE_CSTRING.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -17519,8 +17565,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_756__AUTOBOXSTRING*/ - /*uniqueobj*/ if (! /*_.VALDATA___V928*/ meltfptr[927]) -/*_.VALDATA___V928*/ meltfptr[927] = + /*uniqueobj*/ if (! /*_._VALDATA___V928*/ meltfptr[927]) +/*_._VALDATA___V928*/ meltfptr[927] = (melt_ptr_t) & meltcdat->dsym_756__AUTOBOXSTRING; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_756__AUTOBOXSTRING", @@ -17540,7 +17586,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_757__AUTOBOXSTRING*/ - /*_.VALSTR___V929*/ meltfptr[928] = + /*_._VALSTR___V929*/ meltfptr[928] = (melt_ptr_t) & meltcdat->dstr_757__AUTOBOXSTRING; meltcdat->dstr_757__AUTOBOXSTRING.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -17553,8 +17599,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_758__CLASS_CTYPE_GTY*/ - /*uniqueobj*/ if (! /*_.VALDATA___V947*/ meltfptr[946]) -/*_.VALDATA___V947*/ meltfptr[946] = + /*uniqueobj*/ if (! /*_._VALDATA___V947*/ meltfptr[946]) +/*_._VALDATA___V947*/ meltfptr[946] = (melt_ptr_t) & meltcdat->dsym_758__CLASS_CTYPE_GTY; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_758__CLASS_CTYPE_GTY", @@ -17574,7 +17620,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_759__CLASS_CTYPE_GTY*/ - /*_.VALSTR___V948*/ meltfptr[947] = + /*_._VALSTR___V948*/ meltfptr[947] = (melt_ptr_t) & meltcdat->dstr_759__CLASS_CTYPE_GTY; meltcdat->dstr_759__CLASS_CTYPE_GTY.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -17587,8 +17633,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_760__AUTOBOXGTY*/ - /*uniqueobj*/ if (! /*_.VALDATA___V930*/ meltfptr[929]) -/*_.VALDATA___V930*/ meltfptr[929] = + /*uniqueobj*/ if (! /*_._VALDATA___V930*/ meltfptr[929]) +/*_._VALDATA___V930*/ meltfptr[929] = (melt_ptr_t) & meltcdat->dsym_760__AUTOBOXGTY; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_760__AUTOBOXGTY", @@ -17608,7 +17654,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_761__AUTOBOXGTY*/ - /*_.VALSTR___V931*/ meltfptr[930] = + /*_._VALSTR___V931*/ meltfptr[930] = (melt_ptr_t) & meltcdat->dstr_761__AUTOBOXGTY; meltcdat->dstr_761__AUTOBOXGTY.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -17620,7 +17666,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_761__AUTOBOXGTY.slen = 10; /*inirout drout_762__TRANSLATE_RUN_MELT_EXPRESSIONS */ - /*_.VALROUT___V949*/ meltfptr[948] = + /*_._VALROUT___V949*/ meltfptr[948] = (melt_ptr_t) & meltcdat->drout_762__TRANSLATE_RUN_MELT_EXPRESSIONS; meltcdat->drout_762__TRANSLATE_RUN_MELT_EXPRESSIONS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -17630,17 +17676,17 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->drout_762__TRANSLATE_RUN_MELT_EXPRESSIONS.nbval = 41; MELT_ROUTINE_SET_ROUTCODE (&meltcdat-> drout_762__TRANSLATE_RUN_MELT_EXPRESSIONS, - meltrout_155_warmelt_outobj_TRANSLATE_RUN_MELT_EXPRESSIONS); + meltrout_155_WARMELTmiOUTOBJ_TRANSLATE_RUN_MELT_EXPRESSIONS); /*iniclos dclo_763__TRANSLATE_RUN_MELT_EXPRESSIONS */ - /*_.VALCLO___V961*/ meltfptr[960] = + /*_._VALCLO___V961*/ meltfptr[960] = (melt_ptr_t) & meltcdat->dclo_763__TRANSLATE_RUN_MELT_EXPRESSIONS; meltcdat->dclo_763__TRANSLATE_RUN_MELT_EXPRESSIONS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); meltcdat->dclo_763__TRANSLATE_RUN_MELT_EXPRESSIONS.nbval = 0; /*inirout drout_764__LAMBDA_ */ - /*_.VALROUT___V950*/ meltfptr[949] = + /*_._VALROUT___V950*/ meltfptr[949] = (melt_ptr_t) & meltcdat->drout_764__LAMBDA_; meltcdat->drout_764__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -17648,12 +17694,12 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, "LAMBDA_ @warmelt-outobj.melt:7155", MELT_ROUTDESCR_LEN - 1); meltcdat->drout_764__LAMBDA_.nbval = 3; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_764__LAMBDA_, - meltrout_156_warmelt_outobj_LAMBDA___28__); + meltrout_156_WARMELTmiOUTOBJ_LAMBDA___28__); /*iniobj dsym_765__TRUE*/ - /*uniqueobj*/ if (! /*_.VALDATA___V951*/ meltfptr[950]) -/*_.VALDATA___V951*/ meltfptr[950] = + /*uniqueobj*/ if (! /*_._VALDATA___V951*/ meltfptr[950]) +/*_._VALDATA___V951*/ meltfptr[950] = (melt_ptr_t) & meltcdat->dsym_765__TRUE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_765__TRUE", @@ -17673,7 +17719,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_766__TRUE*/ - /*_.VALSTR___V952*/ meltfptr[951] = (melt_ptr_t) & meltcdat->dstr_766__TRUE; + /*_._VALSTR___V952*/ meltfptr[951] = + (melt_ptr_t) & meltcdat->dstr_766__TRUE; meltcdat->dstr_766__TRUE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (meltcdat->dstr_766__TRUE.val, "TRUE", @@ -17683,8 +17730,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_767__CREATE_NORMAL_EXTENDING_CONTEXT*/ - /*uniqueobj*/ if (! /*_.VALDATA___V962*/ meltfptr[961]) -/*_.VALDATA___V962*/ meltfptr[961] = + /*uniqueobj*/ if (! /*_._VALDATA___V962*/ meltfptr[961]) +/*_._VALDATA___V962*/ meltfptr[961] = (melt_ptr_t) & meltcdat->dsym_767__CREATE_NORMAL_EXTENDING_CONTEXT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg @@ -17704,7 +17751,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_768__CREATE_NORMAL_EX*/ - /*_.VALSTR___V963*/ meltfptr[962] = + /*_._VALSTR___V963*/ meltfptr[962] = (melt_ptr_t) & meltcdat->dstr_768__CREATE_NORMAL_EX; meltcdat->dstr_768__CREATE_NORMAL_EX.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -17716,7 +17763,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_768__CREATE_NORMAL_EX.slen = 31; /*inirout drout_769__LAMBDA_ */ - /*_.VALROUT___V953*/ meltfptr[952] = + /*_._VALROUT___V953*/ meltfptr[952] = (melt_ptr_t) & meltcdat->drout_769__LAMBDA_; meltcdat->drout_769__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -17724,12 +17771,12 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, "LAMBDA_ @warmelt-outobj.melt:7202", MELT_ROUTDESCR_LEN - 1); meltcdat->drout_769__LAMBDA_.nbval = 5; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_769__LAMBDA_, - meltrout_157_warmelt_outobj_LAMBDA___29__); + meltrout_157_WARMELTmiOUTOBJ_LAMBDA___29__); /*iniobj dsym_770__CLASS_SEXPR*/ - /*uniqueobj*/ if (! /*_.VALDATA___V964*/ meltfptr[963]) -/*_.VALDATA___V964*/ meltfptr[963] = + /*uniqueobj*/ if (! /*_._VALDATA___V964*/ meltfptr[963]) +/*_._VALDATA___V964*/ meltfptr[963] = (melt_ptr_t) & meltcdat->dsym_770__CLASS_SEXPR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_770__CLASS_SEXPR", @@ -17749,7 +17796,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_771__CLASS_SEXPR*/ - /*_.VALSTR___V965*/ meltfptr[964] = + /*_._VALSTR___V965*/ meltfptr[964] = (melt_ptr_t) & meltcdat->dstr_771__CLASS_SEXPR; meltcdat->dstr_771__CLASS_SEXPR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -17762,7 +17809,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_772__Bad_expression*/ - /*_.VALSTR___V954*/ meltfptr[953] = + /*_._VALSTR___V954*/ meltfptr[953] = (melt_ptr_t) & meltcdat->dstr_772__Bad_expression; meltcdat->dstr_772__Bad_expression.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -17775,7 +17822,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_773__No_expressions*/ - /*_.VALSTR___V955*/ meltfptr[954] = + /*_._VALSTR___V955*/ meltfptr[954] = (melt_ptr_t) & meltcdat->dstr_773__No_expressions; meltcdat->dstr_773__No_expressions.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -17788,7 +17835,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_774__runtime_invalid_*/ - /*_.VALSTR___V956*/ meltfptr[955] = + /*_._VALSTR___V956*/ meltfptr[955] = (melt_ptr_t) & meltcdat->dstr_774__runtime_invalid_; meltcdat->dstr_774__runtime_invalid_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -17800,7 +17847,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_774__runtime_invalid_.slen = 27; /*inirout drout_775__LAMBDA_ */ - /*_.VALROUT___V957*/ meltfptr[956] = + /*_._VALROUT___V957*/ meltfptr[956] = (melt_ptr_t) & meltcdat->drout_775__LAMBDA_; meltcdat->drout_775__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -17808,11 +17855,11 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, "LAMBDA_ @warmelt-outobj.melt:7265", MELT_ROUTDESCR_LEN - 1); meltcdat->drout_775__LAMBDA_.nbval = 9; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_775__LAMBDA_, - meltrout_158_warmelt_outobj_LAMBDA___30__); + meltrout_158_WARMELTmiOUTOBJ_LAMBDA___30__); /*inistring dstr_776__runtime_macroexp*/ - /*_.VALSTR___V958*/ meltfptr[957] = + /*_._VALSTR___V958*/ meltfptr[957] = (melt_ptr_t) & meltcdat->dstr_776__runtime_macroexp; meltcdat->dstr_776__runtime_macroexp.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -17825,8 +17872,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_777__COMPILE2OBJ_INITEXTENDPROC*/ - /*uniqueobj*/ if (! /*_.VALDATA___V966*/ meltfptr[965]) -/*_.VALDATA___V966*/ meltfptr[965] = + /*uniqueobj*/ if (! /*_._VALDATA___V966*/ meltfptr[965]) +/*_._VALDATA___V966*/ meltfptr[965] = (melt_ptr_t) & meltcdat->dsym_777__COMPILE2OBJ_INITEXTENDPROC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg @@ -17846,7 +17893,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_778__COMPILE2OBJ_INIT*/ - /*_.VALSTR___V967*/ meltfptr[966] = + /*_._VALSTR___V967*/ meltfptr[966] = (melt_ptr_t) & meltcdat->dstr_778__COMPILE2OBJ_INIT; meltcdat->dstr_778__COMPILE2OBJ_INIT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -17859,7 +17906,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_779__runtime_translat*/ - /*_.VALSTR___V959*/ meltfptr[958] = + /*_._VALSTR___V959*/ meltfptr[958] = (melt_ptr_t) & meltcdat->dstr_779__runtime_translat; meltcdat->dstr_779__runtime_translat.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -17872,7 +17919,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_780__runextend*/ - /*_.VALSTR___V960*/ meltfptr[959] = + /*_._VALSTR___V960*/ meltfptr[959] = (melt_ptr_t) & meltcdat->dstr_780__runextend; meltcdat->dstr_780__runextend.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -17885,8 +17932,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_781__CLASS_LITERAL_VALUE*/ - /*uniqueobj*/ if (! /*_.VALDATA___V968*/ meltfptr[967]) -/*_.VALDATA___V968*/ meltfptr[967] = + /*uniqueobj*/ if (! /*_._VALDATA___V968*/ meltfptr[967]) +/*_._VALDATA___V968*/ meltfptr[967] = (melt_ptr_t) & meltcdat->dsym_781__CLASS_LITERAL_VALUE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_781__CLASS_LITERAL_VALUE", @@ -17906,7 +17953,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_782__CLASS_LITERAL_VA*/ - /*_.VALSTR___V969*/ meltfptr[968] = + /*_._VALSTR___V969*/ meltfptr[968] = (melt_ptr_t) & meltcdat->dstr_782__CLASS_LITERAL_VA; meltcdat->dstr_782__CLASS_LITERAL_VA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -17918,7 +17965,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_782__CLASS_LITERAL_VA.slen = 19; /*inirout drout_783__READ_MELT_EXPRESSIONS */ - /*_.VALROUT___V970*/ meltfptr[969] = + /*_._VALROUT___V970*/ meltfptr[969] = (melt_ptr_t) & meltcdat->drout_783__READ_MELT_EXPRESSIONS; meltcdat->drout_783__READ_MELT_EXPRESSIONS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -17927,10 +17974,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, MELT_ROUTDESCR_LEN - 1); meltcdat->drout_783__READ_MELT_EXPRESSIONS.nbval = 6; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_783__READ_MELT_EXPRESSIONS, - meltrout_159_warmelt_outobj_READ_MELT_EXPRESSIONS); + meltrout_159_WARMELTmiOUTOBJ_READ_MELT_EXPRESSIONS); /*iniclos dclo_784__READ_MELT_EXPRESSIONS */ - /*_.VALCLO___V971*/ meltfptr[970] = + /*_._VALCLO___V971*/ meltfptr[970] = (melt_ptr_t) & meltcdat->dclo_784__READ_MELT_EXPRESSIONS; meltcdat->dclo_784__READ_MELT_EXPRESSIONS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -17938,8 +17985,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_785__LIST_APPEND2LIST*/ - /*uniqueobj*/ if (! /*_.VALDATA___V972*/ meltfptr[971]) -/*_.VALDATA___V972*/ meltfptr[971] = + /*uniqueobj*/ if (! /*_._VALDATA___V972*/ meltfptr[971]) +/*_._VALDATA___V972*/ meltfptr[971] = (melt_ptr_t) & meltcdat->dsym_785__LIST_APPEND2LIST; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_785__LIST_APPEND2LIST", @@ -17959,7 +18006,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_786__LIST_APPEND2LIST*/ - /*_.VALSTR___V973*/ meltfptr[972] = + /*_._VALSTR___V973*/ meltfptr[972] = (melt_ptr_t) & meltcdat->dstr_786__LIST_APPEND2LIST; meltcdat->dstr_786__LIST_APPEND2LIST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -17971,7 +18018,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->dstr_786__LIST_APPEND2LIST.slen = 16; /*inirout drout_787__TRANSLATE_TO_C_MODULE_MELT_SOURCES */ - /*_.VALROUT___V974*/ meltfptr[973] = + /*_._VALROUT___V974*/ meltfptr[973] = (melt_ptr_t) & meltcdat->drout_787__TRANSLATE_TO_C_MODULE_MELT_SOURCES; meltcdat->drout_787__TRANSLATE_TO_C_MODULE_MELT_SOURCES.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -17981,17 +18028,17 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, meltcdat->drout_787__TRANSLATE_TO_C_MODULE_MELT_SOURCES.nbval = 5; MELT_ROUTINE_SET_ROUTCODE (&meltcdat-> drout_787__TRANSLATE_TO_C_MODULE_MELT_SOURCES, - meltrout_160_warmelt_outobj_TRANSLATE_TO_C_MODULE_MELT_SOURCES); + meltrout_160_WARMELTmiOUTOBJ_TRANSLATE_TO_C_MODULE_MELT_SOURCES); /*iniclos dclo_788__TRANSLATE_TO_C_MODULE_MELT_SOURCES */ - /*_.VALCLO___V975*/ meltfptr[974] = + /*_._VALCLO___V975*/ meltfptr[974] = (melt_ptr_t) & meltcdat->dclo_788__TRANSLATE_TO_C_MODULE_MELT_SOURCES; meltcdat->dclo_788__TRANSLATE_TO_C_MODULE_MELT_SOURCES.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); meltcdat->dclo_788__TRANSLATE_TO_C_MODULE_MELT_SOURCES.nbval = 0; /*inirout drout_789__GENERATE_GPLV3PLUS_COPYRIGHT_NOTICE_C_COMMENT */ - /*_.VALROUT___V976*/ meltfptr[975] = + /*_._VALROUT___V976*/ meltfptr[975] = (melt_ptr_t) & meltcdat-> drout_789__GENERATE_GPLV3PLUS_COPYRIGHT_NOTICE_C_COMMENT; meltcdat->drout_789__GENERATE_GPLV3PLUS_COPYRIGHT_NOTICE_C_COMMENT.discr = @@ -18004,10 +18051,10 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, 0; MELT_ROUTINE_SET_ROUTCODE (&meltcdat-> drout_789__GENERATE_GPLV3PLUS_COPYRIGHT_NOTICE_C_COMMENT, - meltrout_161_warmelt_outobj_GENERATE_GPLV3PLUS_COPYRIGHT_NOTICE_C_COMMENT); + meltrout_161_WARMELTmiOUTOBJ_GENERATE_GPLV3PLUS_COPYRIGHT_NOTICE_C_COMMENT); /*iniclos dclo_790__GENERATE_GPLV3PLUS_COPYRIGHT_NOTICE_C_COMMENT */ - /*_.VALCLO___V977*/ meltfptr[976] = + /*_._VALCLO___V977*/ meltfptr[976] = (melt_ptr_t) & meltcdat-> dclo_790__GENERATE_GPLV3PLUS_COPYRIGHT_NOTICE_C_COMMENT; meltcdat->dclo_790__GENERATE_GPLV3PLUS_COPYRIGHT_NOTICE_C_COMMENT.discr = @@ -18016,8 +18063,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_791__COMPILE_LIST_SEXPR*/ - /*uniqueobj*/ if (! /*_.VALDATA___V978*/ meltfptr[977]) -/*_.VALDATA___V978*/ meltfptr[977] = + /*uniqueobj*/ if (! /*_._VALDATA___V978*/ meltfptr[977]) +/*_._VALDATA___V978*/ meltfptr[977] = (melt_ptr_t) & meltcdat->dsym_791__COMPILE_LIST_SEXPR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_791__COMPILE_LIST_SEXPR", @@ -18037,7 +18084,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_792__COMPILE_LIST_SEX*/ - /*_.VALSTR___V979*/ meltfptr[978] = + /*_._VALSTR___V979*/ meltfptr[978] = (melt_ptr_t) & meltcdat->dstr_792__COMPILE_LIST_SEX; meltcdat->dstr_792__COMPILE_LIST_SEX.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -18050,8 +18097,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_793__GENERATE_GPLV3PLUS_COPYRIGHT_NOTICE_C_COMMENT*/ - /*uniqueobj*/ if (! /*_.VALDATA___V980*/ meltfptr[979]) -/*_.VALDATA___V980*/ meltfptr[979] = + /*uniqueobj*/ if (! /*_._VALDATA___V980*/ meltfptr[979]) +/*_._VALDATA___V980*/ meltfptr[979] = (melt_ptr_t) & meltcdat-> dsym_793__GENERATE_GPLV3PLUS_COPYRIGHT_NOTICE_C_COMMENT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) @@ -18075,7 +18122,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_794__GENERATE_GPLV3PL*/ - /*_.VALSTR___V981*/ meltfptr[980] = + /*_._VALSTR___V981*/ meltfptr[980] = (melt_ptr_t) & meltcdat->dstr_794__GENERATE_GPLV3PL; meltcdat->dstr_794__GENERATE_GPLV3PL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -18088,8 +18135,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_795__GET_CODE_BUFFER_LIMIT*/ - /*uniqueobj*/ if (! /*_.VALDATA___V982*/ meltfptr[981]) -/*_.VALDATA___V982*/ meltfptr[981] = + /*uniqueobj*/ if (! /*_._VALDATA___V982*/ meltfptr[981]) +/*_._VALDATA___V982*/ meltfptr[981] = (melt_ptr_t) & meltcdat->dsym_795__GET_CODE_BUFFER_LIMIT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg @@ -18109,7 +18156,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_796__GET_CODE_BUFFER_*/ - /*_.VALSTR___V983*/ meltfptr[982] = + /*_._VALSTR___V983*/ meltfptr[982] = (melt_ptr_t) & meltcdat->dstr_796__GET_CODE_BUFFER_; meltcdat->dstr_796__GET_CODE_BUFFER_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -18122,8 +18169,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_797__PUT_CODE_BUFFER_LIMIT*/ - /*uniqueobj*/ if (! /*_.VALDATA___V984*/ meltfptr[983]) -/*_.VALDATA___V984*/ meltfptr[983] = + /*uniqueobj*/ if (! /*_._VALDATA___V984*/ meltfptr[983]) +/*_._VALDATA___V984*/ meltfptr[983] = (melt_ptr_t) & meltcdat->dsym_797__PUT_CODE_BUFFER_LIMIT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg @@ -18143,7 +18190,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_798__PUT_CODE_BUFFER_*/ - /*_.VALSTR___V985*/ meltfptr[984] = + /*_._VALSTR___V985*/ meltfptr[984] = (melt_ptr_t) & meltcdat->dstr_798__PUT_CODE_BUFFER_; meltcdat->dstr_798__PUT_CODE_BUFFER_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -18156,8 +18203,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_799__TRANSLATE_TO_C_MODULE_MELT_SOURCES*/ - /*uniqueobj*/ if (! /*_.VALDATA___V986*/ meltfptr[985]) -/*_.VALDATA___V986*/ meltfptr[985] = + /*uniqueobj*/ if (! /*_._VALDATA___V986*/ meltfptr[985]) +/*_._VALDATA___V986*/ meltfptr[985] = (melt_ptr_t) & meltcdat->dsym_799__TRANSLATE_TO_C_MODULE_MELT_SOURCES; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg @@ -18177,7 +18224,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_800__TRANSLATE_TO_C_M*/ - /*_.VALSTR___V987*/ meltfptr[986] = + /*_._VALSTR___V987*/ meltfptr[986] = (melt_ptr_t) & meltcdat->dstr_800__TRANSLATE_TO_C_M; meltcdat->dstr_800__TRANSLATE_TO_C_M.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -18190,8 +18237,8 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*iniobj dsym_801__TRANSLATE_RUN_MELT_EXPRESSIONS*/ - /*uniqueobj*/ if (! /*_.VALDATA___V988*/ meltfptr[987]) -/*_.VALDATA___V988*/ meltfptr[987] = + /*uniqueobj*/ if (! /*_._VALDATA___V988*/ meltfptr[987]) +/*_._VALDATA___V988*/ meltfptr[987] = (melt_ptr_t) & meltcdat->dsym_801__TRANSLATE_RUN_MELT_EXPRESSIONS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg @@ -18211,7 +18258,7 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, /*inistring dstr_802__TRANSLATE_RUN_ME*/ - /*_.VALSTR___V989*/ meltfptr[988] = + /*_._VALSTR___V989*/ meltfptr[988] = (melt_ptr_t) & meltcdat->dstr_802__TRANSLATE_RUN_ME; meltcdat->dstr_802__TRANSLATE_RUN_ME.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -18225,14 +18272,14 @@ initialize_module_meltdata_warmelt_outobj (meltinitial_frame_t * iniframp__, melt_prohibit_garbcoll = FALSE; #undef meltfram__ -} /*end initialize_module_meltdata_warmelt_outobj */ +} /*end initialize_module_meltdata_WARMELTmiOUTOBJ */ #if MELT_HAVE_DEBUG -const char meltmodule_warmelt_outobj__melt_have_debug_enabled[] = +const char meltmodule_WARMELTmiOUTOBJ__melt_have_debug_enabled[] = "MELT module warmelt-outobj have debug enabled"; #else /*!MELT_HAVE_DEBUG */ -const char meltmodule_warmelt_outobj__melt_have_debug_disabled[] = +const char meltmodule_WARMELTmiOUTOBJ__melt_have_debug_disabled[] = "MELT module warmelt-outobj have debug disabled"; #endif /*MELT_HAVE_DEBUG */ @@ -18258,24 +18305,25 @@ melt_start_this_module (void *modargp_) /*melt_start_this_module is initial declstructinit */ memset (&meltfram__, 0, sizeof (meltfram__)); -/* declstructinit initial routine melt_start_this_module minihash 10*/ +/* declstructinit initial routine melt_start_this_module minihash 3862*/ meltfram__.mcfr_prev = (struct melt_callframe_st *) melt_topframe; melt_topframe = (struct melt_callframe_st *) &meltfram__; /**initial routine prologue**/ /* set initial frame marking */ - ((struct melt_callframe_st *) &meltfram__)->mcfr_nbvar = /*minihash */ -10; + ((struct melt_callframe_st *) &meltfram__)->mcfr_nbvar = + /*minihash */ -3862; ((struct melt_callframe_st *) &meltfram__)->mcfr_forwmarkrout = - meltmod__warmelt_outobj__forward_or_mark_module_start_frame; + meltmod__WARMELTmiOUTOBJ__forward_or_mark_module_start_frame; /**COMMENT: get previous environment **/ ; /*^compute */ - /*_.PREVENV___V4*/ meltfptr[3] = /*getprevenv */ (melt_ptr_t) modargp_; + /*_._PREVENV___V4*/ meltfptr[3] = /*getprevenv */ (melt_ptr_t) modargp_; /*^comment */ /**COMMENT: compute boxloc **/ ; /*^cond */ - /*cond */ if ( /*_.CONTENV___V2*/ meltfptr[1]) /*then */ + /*cond */ if ( /*_._CONTENV___V2*/ meltfptr[1]) /*then */ { } else @@ -18284,13 +18332,13 @@ melt_start_this_module (void *modargp_) /*^compute */ /* compile2obj_initproc emitted initialization of environment reference for warmelt-outobj */ - if ( /*_.PREVENV___V4*/ meltfptr[3]) + if ( /*_._PREVENV___V4*/ meltfptr[3]) { if (!melt_flag_bootstrapping) warning (0, "MELT is creating a fresh environment reference for warmelt-outobj"); - /*_.CONTENV___V2*/ meltfptr[1] = melthookproc_HOOK_FRESH_ENVIRONMENT_REFERENCE_MAKER - ((melt_ptr_t) /*_.PREVENV___V4*/ meltfptr[3], "warmelt-outobj"); + /*_._CONTENV___V2*/ meltfptr[1] = melthookproc_HOOK_FRESH_ENVIRONMENT_REFERENCE_MAKER + ((melt_ptr_t) /*_._PREVENV___V4*/ meltfptr[3], "warmelt-outobj"); } else /* no prevenv */ { @@ -18307,14 +18355,14 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:BUFFER_LIMIT_CONT */ - if (NULL == /*_.VALDATA___V188*/ meltfptr[187]) + if (NULL == /*_._VALDATA___V188*/ meltfptr[187]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol BUFFER_LIMIT_CONT without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_BUFFER_LIMIT_CONT = melthookproc_HOOK_NAMED_SYMBOL ("BUFFER_LIMIT_CONT", (long) MELT_GET); - /*_.VALDATA___V188*/ meltfptr[187] = + /*_._VALDATA___V188*/ meltfptr[187] = (melt_ptr_t) meltsy_BUFFER_LIMIT_CONT; } /*endgetnamedsym BUFFER_LIMIT_CONT */ @@ -18322,14 +18370,14 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_REFERENCE */ - if (NULL == /*_.VALDATA___V190*/ meltfptr[189]) + if (NULL == /*_._VALDATA___V190*/ meltfptr[189]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_REFERENCE without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_CLASS_REFERENCE = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_REFERENCE", (long) MELT_GET); - /*_.VALDATA___V190*/ meltfptr[189] = + /*_._VALDATA___V190*/ meltfptr[189] = (melt_ptr_t) meltsy_CLASS_REFERENCE; } /*endgetnamedsym CLASS_REFERENCE */ @@ -18337,21 +18385,22 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:MELT_DEBUG_FUN */ - if (NULL == /*_.VALDATA___V198*/ meltfptr[197]) + if (NULL == /*_._VALDATA___V198*/ meltfptr[197]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol MELT_DEBUG_FUN without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_MELT_DEBUG_FUN = melthookproc_HOOK_NAMED_SYMBOL ("MELT_DEBUG_FUN", (long) MELT_GET); - /*_.VALDATA___V198*/ meltfptr[197] = (melt_ptr_t) meltsy_MELT_DEBUG_FUN; + /*_._VALDATA___V198*/ meltfptr[197] = + (melt_ptr_t) meltsy_MELT_DEBUG_FUN; } /*endgetnamedsym MELT_DEBUG_FUN */ /*^getnamedsymbol */ /*getnamedsym:DISCR_CONSTANT_INTEGER */ - if (NULL == /*_.VALDATA___V200*/ meltfptr[199]) + if (NULL == /*_._VALDATA___V200*/ meltfptr[199]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol DISCR_CONSTANT_INTEGER without initial environment @@ -18359,7 +18408,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_DISCR_CONSTANT_INTEGER = melthookproc_HOOK_NAMED_SYMBOL ("DISCR_CONSTANT_INTEGER", (long) MELT_GET); - /*_.VALDATA___V200*/ meltfptr[199] = + /*_._VALDATA___V200*/ meltfptr[199] = (melt_ptr_t) meltsy_DISCR_CONSTANT_INTEGER; } /*endgetnamedsym DISCR_CONSTANT_INTEGER */ @@ -18367,14 +18416,14 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:REGISTER_OPTION */ - if (NULL == /*_.VALDATA___V204*/ meltfptr[203]) + if (NULL == /*_._VALDATA___V204*/ meltfptr[203]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol REGISTER_OPTION without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_REGISTER_OPTION = melthookproc_HOOK_NAMED_SYMBOL ("REGISTER_OPTION", (long) MELT_GET); - /*_.VALDATA___V204*/ meltfptr[203] = + /*_._VALDATA___V204*/ meltfptr[203] = (melt_ptr_t) meltsy_REGISTER_OPTION; } /*endgetnamedsym REGISTER_OPTION */ @@ -18382,14 +18431,14 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CODE_BUFFER_LIMIT */ - if (NULL == /*_.VALDATA___V206*/ meltfptr[205]) + if (NULL == /*_._VALDATA___V206*/ meltfptr[205]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CODE_BUFFER_LIMIT without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_CODE_BUFFER_LIMIT = melthookproc_HOOK_NAMED_SYMBOL ("CODE_BUFFER_LIMIT", (long) MELT_GET); - /*_.VALDATA___V206*/ meltfptr[205] = + /*_._VALDATA___V206*/ meltfptr[205] = (melt_ptr_t) meltsy_CODE_BUFFER_LIMIT; } /*endgetnamedsym CODE_BUFFER_LIMIT */ @@ -18397,7 +18446,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_NORMAL_MODULE_VARIABLE_BINDING */ - if (NULL == /*_.VALDATA___V212*/ meltfptr[211]) + if (NULL == /*_._VALDATA___V212*/ meltfptr[211]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_NORMAL_MODULE_VARIABLE_BINDING without initial environment @@ -18405,7 +18454,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_NORMAL_MODULE_VARIABLE_BINDING = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_NORMAL_MODULE_VARIABLE_BINDING", (long) MELT_GET); - /*_.VALDATA___V212*/ meltfptr[211] = + /*_._VALDATA___V212*/ meltfptr[211] = (melt_ptr_t) meltsy_CLASS_NORMAL_MODULE_VARIABLE_BINDING; } /*endgetnamedsym CLASS_NORMAL_MODULE_VARIABLE_BINDING */ @@ -18413,14 +18462,14 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_ANY_BINDING */ - if (NULL == /*_.VALDATA___V214*/ meltfptr[213]) + if (NULL == /*_._VALDATA___V214*/ meltfptr[213]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_ANY_BINDING without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_CLASS_ANY_BINDING = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_ANY_BINDING", (long) MELT_GET); - /*_.VALDATA___V214*/ meltfptr[213] = + /*_._VALDATA___V214*/ meltfptr[213] = (melt_ptr_t) meltsy_CLASS_ANY_BINDING; } /*endgetnamedsym CLASS_ANY_BINDING */ @@ -18428,7 +18477,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_CLONED_SYMBOL */ - if (NULL == /*_.VALDATA___V216*/ meltfptr[215]) + if (NULL == /*_._VALDATA___V216*/ meltfptr[215]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_CLONED_SYMBOL without initial environment @@ -18436,7 +18485,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_CLONED_SYMBOL = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_CLONED_SYMBOL", (long) MELT_GET); - /*_.VALDATA___V216*/ meltfptr[215] = + /*_._VALDATA___V216*/ meltfptr[215] = (melt_ptr_t) meltsy_CLASS_CLONED_SYMBOL; } /*endgetnamedsym CLASS_CLONED_SYMBOL */ @@ -18444,84 +18493,85 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_NAMED */ - if (NULL == /*_.VALDATA___V218*/ meltfptr[217]) + if (NULL == /*_._VALDATA___V218*/ meltfptr[217]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_NAMED without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_CLASS_NAMED = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_NAMED", (long) MELT_GET); - /*_.VALDATA___V218*/ meltfptr[217] = (melt_ptr_t) meltsy_CLASS_NAMED; + /*_._VALDATA___V218*/ meltfptr[217] = (melt_ptr_t) meltsy_CLASS_NAMED; } /*endgetnamedsym CLASS_NAMED */ /*^getnamedsymbol */ /*getnamedsym:ADD2OUT */ - if (NULL == /*_.VALDATA___V220*/ meltfptr[219]) + if (NULL == /*_._VALDATA___V220*/ meltfptr[219]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol ADD2OUT without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_ADD2OUT = melthookproc_HOOK_NAMED_SYMBOL ("ADD2OUT", (long) MELT_GET); - /*_.VALDATA___V220*/ meltfptr[219] = (melt_ptr_t) meltsy_ADD2OUT; + /*_._VALDATA___V220*/ meltfptr[219] = (melt_ptr_t) meltsy_ADD2OUT; } /*endgetnamedsym ADD2OUT */ /*^getnamedsymbol */ /*getnamedsym:CLASS_SYMBOL */ - if (NULL == /*_.VALDATA___V222*/ meltfptr[221]) + if (NULL == /*_._VALDATA___V222*/ meltfptr[221]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_SYMBOL without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_CLASS_SYMBOL = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_SYMBOL", (long) MELT_GET); - /*_.VALDATA___V222*/ meltfptr[221] = (melt_ptr_t) meltsy_CLASS_SYMBOL; + /*_._VALDATA___V222*/ meltfptr[221] = (melt_ptr_t) meltsy_CLASS_SYMBOL; } /*endgetnamedsym CLASS_SYMBOL */ /*^getnamedsymbol */ /*getnamedsym:INSTALL_METHOD */ - if (NULL == /*_.VALDATA___V226*/ meltfptr[225]) + if (NULL == /*_._VALDATA___V226*/ meltfptr[225]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol INSTALL_METHOD without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_INSTALL_METHOD = melthookproc_HOOK_NAMED_SYMBOL ("INSTALL_METHOD", (long) MELT_GET); - /*_.VALDATA___V226*/ meltfptr[225] = (melt_ptr_t) meltsy_INSTALL_METHOD; + /*_._VALDATA___V226*/ meltfptr[225] = + (melt_ptr_t) meltsy_INSTALL_METHOD; } /*endgetnamedsym INSTALL_METHOD */ /*^getnamedsymbol */ /*getnamedsym:CLASS_ROOT */ - if (NULL == /*_.VALDATA___V228*/ meltfptr[227]) + if (NULL == /*_._VALDATA___V228*/ meltfptr[227]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_ROOT without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_CLASS_ROOT = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_ROOT", (long) MELT_GET); - /*_.VALDATA___V228*/ meltfptr[227] = (melt_ptr_t) meltsy_CLASS_ROOT; + /*_._VALDATA___V228*/ meltfptr[227] = (melt_ptr_t) meltsy_CLASS_ROOT; } /*endgetnamedsym CLASS_ROOT */ /*^getnamedsymbol */ /*getnamedsym:OUTPUT_C_DECLINIT */ - if (NULL == /*_.VALDATA___V230*/ meltfptr[229]) + if (NULL == /*_._VALDATA___V230*/ meltfptr[229]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol OUTPUT_C_DECLINIT without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_OUTPUT_C_DECLINIT = melthookproc_HOOK_NAMED_SYMBOL ("OUTPUT_C_DECLINIT", (long) MELT_GET); - /*_.VALDATA___V230*/ meltfptr[229] = + /*_._VALDATA___V230*/ meltfptr[229] = (melt_ptr_t) meltsy_OUTPUT_C_DECLINIT; } /*endgetnamedsym OUTPUT_C_DECLINIT */ @@ -18529,14 +18579,14 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJINITELEM */ - if (NULL == /*_.VALDATA___V234*/ meltfptr[233]) + if (NULL == /*_._VALDATA___V234*/ meltfptr[233]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJINITELEM without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_CLASS_OBJINITELEM = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJINITELEM", (long) MELT_GET); - /*_.VALDATA___V234*/ meltfptr[233] = + /*_._VALDATA___V234*/ meltfptr[233] = (melt_ptr_t) meltsy_CLASS_OBJINITELEM; } /*endgetnamedsym CLASS_OBJINITELEM */ @@ -18544,21 +18594,21 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:OUTPUT_C_CODE */ - if (NULL == /*_.VALDATA___V236*/ meltfptr[235]) + if (NULL == /*_._VALDATA___V236*/ meltfptr[235]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol OUTPUT_C_CODE without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_OUTPUT_C_CODE = melthookproc_HOOK_NAMED_SYMBOL ("OUTPUT_C_CODE", (long) MELT_GET); - /*_.VALDATA___V236*/ meltfptr[235] = (melt_ptr_t) meltsy_OUTPUT_C_CODE; + /*_._VALDATA___V236*/ meltfptr[235] = (melt_ptr_t) meltsy_OUTPUT_C_CODE; } /*endgetnamedsym OUTPUT_C_CODE */ /*^getnamedsymbol */ /*getnamedsym:OUTPUT_C_INITIAL_FILL */ - if (NULL == /*_.VALDATA___V240*/ meltfptr[239]) + if (NULL == /*_._VALDATA___V240*/ meltfptr[239]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol OUTPUT_C_INITIAL_FILL without initial environment @@ -18566,7 +18616,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_OUTPUT_C_INITIAL_FILL = melthookproc_HOOK_NAMED_SYMBOL ("OUTPUT_C_INITIAL_FILL", (long) MELT_GET); - /*_.VALDATA___V240*/ meltfptr[239] = + /*_._VALDATA___V240*/ meltfptr[239] = (melt_ptr_t) meltsy_OUTPUT_C_INITIAL_FILL; } /*endgetnamedsym OUTPUT_C_INITIAL_FILL */ @@ -18574,7 +18624,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:OUTPUT_C_INITIAL_PREDEF */ - if (NULL == /*_.VALDATA___V244*/ meltfptr[243]) + if (NULL == /*_._VALDATA___V244*/ meltfptr[243]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol OUTPUT_C_INITIAL_PREDEF without initial environment @@ -18582,7 +18632,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_OUTPUT_C_INITIAL_PREDEF = melthookproc_HOOK_NAMED_SYMBOL ("OUTPUT_C_INITIAL_PREDEF", (long) MELT_GET); - /*_.VALDATA___V244*/ meltfptr[243] = + /*_._VALDATA___V244*/ meltfptr[243] = (melt_ptr_t) meltsy_OUTPUT_C_INITIAL_PREDEF; } /*endgetnamedsym OUTPUT_C_INITIAL_PREDEF */ @@ -18590,28 +18640,28 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:OBPREDEF */ - if (NULL == /*_.VALDATA___V248*/ meltfptr[247]) + if (NULL == /*_._VALDATA___V248*/ meltfptr[247]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol OBPREDEF without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_OBPREDEF = melthookproc_HOOK_NAMED_SYMBOL ("OBPREDEF", (long) MELT_GET); - /*_.VALDATA___V248*/ meltfptr[247] = (melt_ptr_t) meltsy_OBPREDEF; + /*_._VALDATA___V248*/ meltfptr[247] = (melt_ptr_t) meltsy_OBPREDEF; } /*endgetnamedsym OBPREDEF */ /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJPREDEF */ - if (NULL == /*_.VALDATA___V252*/ meltfptr[251]) + if (NULL == /*_._VALDATA___V252*/ meltfptr[251]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJPREDEF without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_CLASS_OBJPREDEF = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJPREDEF", (long) MELT_GET); - /*_.VALDATA___V252*/ meltfptr[251] = + /*_._VALDATA___V252*/ meltfptr[251] = (melt_ptr_t) meltsy_CLASS_OBJPREDEF; } /*endgetnamedsym CLASS_OBJPREDEF */ @@ -18619,21 +18669,21 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJNIL */ - if (NULL == /*_.VALDATA___V256*/ meltfptr[255]) + if (NULL == /*_._VALDATA___V256*/ meltfptr[255]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJNIL without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_CLASS_OBJNIL = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJNIL", (long) MELT_GET); - /*_.VALDATA___V256*/ meltfptr[255] = (melt_ptr_t) meltsy_CLASS_OBJNIL; + /*_._VALDATA___V256*/ meltfptr[255] = (melt_ptr_t) meltsy_CLASS_OBJNIL; } /*endgetnamedsym CLASS_OBJNIL */ /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJEXPANDPUREVAL */ - if (NULL == /*_.VALDATA___V266*/ meltfptr[265]) + if (NULL == /*_._VALDATA___V266*/ meltfptr[265]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJEXPANDPUREVAL without initial environment @@ -18641,7 +18691,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_OBJEXPANDPUREVAL = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJEXPANDPUREVAL", (long) MELT_GET); - /*_.VALDATA___V266*/ meltfptr[265] = + /*_._VALDATA___V266*/ meltfptr[265] = (melt_ptr_t) meltsy_CLASS_OBJEXPANDPUREVAL; } /*endgetnamedsym CLASS_OBJEXPANDPUREVAL */ @@ -18649,56 +18699,57 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJVALUE */ - if (NULL == /*_.VALDATA___V268*/ meltfptr[267]) + if (NULL == /*_._VALDATA___V268*/ meltfptr[267]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJVALUE without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_CLASS_OBJVALUE = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJVALUE", (long) MELT_GET); - /*_.VALDATA___V268*/ meltfptr[267] = (melt_ptr_t) meltsy_CLASS_OBJVALUE; + /*_._VALDATA___V268*/ meltfptr[267] = + (melt_ptr_t) meltsy_CLASS_OBJVALUE; } /*endgetnamedsym CLASS_OBJVALUE */ /*^getnamedsymbol */ /*getnamedsym:CLASS_CTYPE */ - if (NULL == /*_.VALDATA___V270*/ meltfptr[269]) + if (NULL == /*_._VALDATA___V270*/ meltfptr[269]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_CTYPE without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_CLASS_CTYPE = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_CTYPE", (long) MELT_GET); - /*_.VALDATA___V270*/ meltfptr[269] = (melt_ptr_t) meltsy_CLASS_CTYPE; + /*_._VALDATA___V270*/ meltfptr[269] = (melt_ptr_t) meltsy_CLASS_CTYPE; } /*endgetnamedsym CLASS_CTYPE */ /*^getnamedsymbol */ /*getnamedsym:CTYPE_VOID */ - if (NULL == /*_.VALDATA___V272*/ meltfptr[271]) + if (NULL == /*_._VALDATA___V272*/ meltfptr[271]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CTYPE_VOID without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_CTYPE_VOID = melthookproc_HOOK_NAMED_SYMBOL ("CTYPE_VOID", (long) MELT_GET); - /*_.VALDATA___V272*/ meltfptr[271] = (melt_ptr_t) meltsy_CTYPE_VOID; + /*_._VALDATA___V272*/ meltfptr[271] = (melt_ptr_t) meltsy_CTYPE_VOID; } /*endgetnamedsym CTYPE_VOID */ /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJHOOKNTH */ - if (NULL == /*_.VALDATA___V276*/ meltfptr[275]) + if (NULL == /*_._VALDATA___V276*/ meltfptr[275]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJHOOKNTH without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_CLASS_OBJHOOKNTH = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJHOOKNTH", (long) MELT_GET); - /*_.VALDATA___V276*/ meltfptr[275] = + /*_._VALDATA___V276*/ meltfptr[275] = (melt_ptr_t) meltsy_CLASS_OBJHOOKNTH; } /*endgetnamedsym CLASS_OBJHOOKNTH */ @@ -18706,21 +18757,21 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CTYPE_VALUE */ - if (NULL == /*_.VALDATA___V278*/ meltfptr[277]) + if (NULL == /*_._VALDATA___V278*/ meltfptr[277]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CTYPE_VALUE without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_CTYPE_VALUE = melthookproc_HOOK_NAMED_SYMBOL ("CTYPE_VALUE", (long) MELT_GET); - /*_.VALDATA___V278*/ meltfptr[277] = (melt_ptr_t) meltsy_CTYPE_VALUE; + /*_._VALDATA___V278*/ meltfptr[277] = (melt_ptr_t) meltsy_CTYPE_VALUE; } /*endgetnamedsym CTYPE_VALUE */ /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJINITOBJECT */ - if (NULL == /*_.VALDATA___V282*/ meltfptr[281]) + if (NULL == /*_._VALDATA___V282*/ meltfptr[281]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJINITOBJECT without initial environment @@ -18728,7 +18779,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_OBJINITOBJECT = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJINITOBJECT", (long) MELT_GET); - /*_.VALDATA___V282*/ meltfptr[281] = + /*_._VALDATA___V282*/ meltfptr[281] = (melt_ptr_t) meltsy_CLASS_OBJINITOBJECT; } /*endgetnamedsym CLASS_OBJINITOBJECT */ @@ -18736,7 +18787,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_DATAINSTANCE */ - if (NULL == /*_.VALDATA___V286*/ meltfptr[285]) + if (NULL == /*_._VALDATA___V286*/ meltfptr[285]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_NREP_DATAINSTANCE without initial environment @@ -18744,7 +18795,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_NREP_DATAINSTANCE = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_NREP_DATAINSTANCE", (long) MELT_GET); - /*_.VALDATA___V286*/ meltfptr[285] = + /*_._VALDATA___V286*/ meltfptr[285] = (melt_ptr_t) meltsy_CLASS_NREP_DATAINSTANCE; } /*endgetnamedsym CLASS_NREP_DATAINSTANCE */ @@ -18752,21 +18803,21 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_CLASS */ - if (NULL == /*_.VALDATA___V288*/ meltfptr[287]) + if (NULL == /*_._VALDATA___V288*/ meltfptr[287]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_CLASS without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_CLASS_CLASS = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_CLASS", (long) MELT_GET); - /*_.VALDATA___V288*/ meltfptr[287] = (melt_ptr_t) meltsy_CLASS_CLASS; + /*_._VALDATA___V288*/ meltfptr[287] = (melt_ptr_t) meltsy_CLASS_CLASS; } /*endgetnamedsym CLASS_CLASS */ /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJINITUNIQUEOBJECT */ - if (NULL == /*_.VALDATA___V290*/ meltfptr[289]) + if (NULL == /*_._VALDATA___V290*/ meltfptr[289]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJINITUNIQUEOBJECT without initial environment @@ -18774,7 +18825,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_OBJINITUNIQUEOBJECT = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJINITUNIQUEOBJECT", (long) MELT_GET); - /*_.VALDATA___V290*/ meltfptr[289] = + /*_._VALDATA___V290*/ meltfptr[289] = (melt_ptr_t) meltsy_CLASS_OBJINITUNIQUEOBJECT; } /*endgetnamedsym CLASS_OBJINITUNIQUEOBJECT */ @@ -18782,28 +18833,29 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_NIL */ - if (NULL == /*_.VALDATA___V294*/ meltfptr[293]) + if (NULL == /*_._VALDATA___V294*/ meltfptr[293]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_NREP_NIL without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_CLASS_NREP_NIL = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_NREP_NIL", (long) MELT_GET); - /*_.VALDATA___V294*/ meltfptr[293] = (melt_ptr_t) meltsy_CLASS_NREP_NIL; + /*_._VALDATA___V294*/ meltfptr[293] = + (melt_ptr_t) meltsy_CLASS_NREP_NIL; } /*endgetnamedsym CLASS_NREP_NIL */ /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJINITHOOK */ - if (NULL == /*_.VALDATA___V298*/ meltfptr[297]) + if (NULL == /*_._VALDATA___V298*/ meltfptr[297]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJINITHOOK without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_CLASS_OBJINITHOOK = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJINITHOOK", (long) MELT_GET); - /*_.VALDATA___V298*/ meltfptr[297] = + /*_._VALDATA___V298*/ meltfptr[297] = (melt_ptr_t) meltsy_CLASS_OBJINITHOOK; } /*endgetnamedsym CLASS_OBJINITHOOK */ @@ -18811,21 +18863,21 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP */ - if (NULL == /*_.VALDATA___V300*/ meltfptr[299]) + if (NULL == /*_._VALDATA___V300*/ meltfptr[299]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_NREP without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_CLASS_NREP = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_NREP", (long) MELT_GET); - /*_.VALDATA___V300*/ meltfptr[299] = (melt_ptr_t) meltsy_CLASS_NREP; + /*_._VALDATA___V300*/ meltfptr[299] = (melt_ptr_t) meltsy_CLASS_NREP; } /*endgetnamedsym CLASS_NREP */ /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJINITMULTIPLE */ - if (NULL == /*_.VALDATA___V304*/ meltfptr[303]) + if (NULL == /*_._VALDATA___V304*/ meltfptr[303]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJINITMULTIPLE without initial environment @@ -18833,7 +18885,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_OBJINITMULTIPLE = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJINITMULTIPLE", (long) MELT_GET); - /*_.VALDATA___V304*/ meltfptr[303] = + /*_._VALDATA___V304*/ meltfptr[303] = (melt_ptr_t) meltsy_CLASS_OBJINITMULTIPLE; } /*endgetnamedsym CLASS_OBJINITMULTIPLE */ @@ -18841,7 +18893,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJINITCLOSURE */ - if (NULL == /*_.VALDATA___V310*/ meltfptr[309]) + if (NULL == /*_._VALDATA___V310*/ meltfptr[309]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJINITCLOSURE without initial environment @@ -18849,7 +18901,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_OBJINITCLOSURE = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJINITCLOSURE", (long) MELT_GET); - /*_.VALDATA___V310*/ meltfptr[309] = + /*_._VALDATA___V310*/ meltfptr[309] = (melt_ptr_t) meltsy_CLASS_OBJINITCLOSURE; } /*endgetnamedsym CLASS_OBJINITCLOSURE */ @@ -18857,7 +18909,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJINITROUTINE */ - if (NULL == /*_.VALDATA___V316*/ meltfptr[315]) + if (NULL == /*_._VALDATA___V316*/ meltfptr[315]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJINITROUTINE without initial environment @@ -18865,7 +18917,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_OBJINITROUTINE = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJINITROUTINE", (long) MELT_GET); - /*_.VALDATA___V316*/ meltfptr[315] = + /*_._VALDATA___V316*/ meltfptr[315] = (melt_ptr_t) meltsy_CLASS_OBJINITROUTINE; } /*endgetnamedsym CLASS_OBJINITROUTINE */ @@ -18873,7 +18925,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_DATAROUTINE */ - if (NULL == /*_.VALDATA___V320*/ meltfptr[319]) + if (NULL == /*_._VALDATA___V320*/ meltfptr[319]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_NREP_DATAROUTINE without initial environment @@ -18881,7 +18933,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_NREP_DATAROUTINE = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_NREP_DATAROUTINE", (long) MELT_GET); - /*_.VALDATA___V320*/ meltfptr[319] = + /*_._VALDATA___V320*/ meltfptr[319] = (melt_ptr_t) meltsy_CLASS_NREP_DATAROUTINE; } /*endgetnamedsym CLASS_NREP_DATAROUTINE */ @@ -18889,7 +18941,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_ROUTPROC */ - if (NULL == /*_.VALDATA___V322*/ meltfptr[321]) + if (NULL == /*_._VALDATA___V322*/ meltfptr[321]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_NREP_ROUTPROC without initial environment @@ -18897,7 +18949,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_NREP_ROUTPROC = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_NREP_ROUTPROC", (long) MELT_GET); - /*_.VALDATA___V322*/ meltfptr[321] = + /*_._VALDATA___V322*/ meltfptr[321] = (melt_ptr_t) meltsy_CLASS_NREP_ROUTPROC; } /*endgetnamedsym CLASS_NREP_ROUTPROC */ @@ -18905,7 +18957,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_HOOKPROC */ - if (NULL == /*_.VALDATA___V328*/ meltfptr[327]) + if (NULL == /*_._VALDATA___V328*/ meltfptr[327]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_NREP_HOOKPROC without initial environment @@ -18913,7 +18965,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_NREP_HOOKPROC = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_NREP_HOOKPROC", (long) MELT_GET); - /*_.VALDATA___V328*/ meltfptr[327] = + /*_._VALDATA___V328*/ meltfptr[327] = (melt_ptr_t) meltsy_CLASS_NREP_HOOKPROC; } /*endgetnamedsym CLASS_NREP_HOOKPROC */ @@ -18921,7 +18973,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJINITSTRING */ - if (NULL == /*_.VALDATA___V332*/ meltfptr[331]) + if (NULL == /*_._VALDATA___V332*/ meltfptr[331]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJINITSTRING without initial environment @@ -18929,7 +18981,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_OBJINITSTRING = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJINITSTRING", (long) MELT_GET); - /*_.VALDATA___V332*/ meltfptr[331] = + /*_._VALDATA___V332*/ meltfptr[331] = (melt_ptr_t) meltsy_CLASS_OBJINITSTRING; } /*endgetnamedsym CLASS_OBJINITSTRING */ @@ -18937,7 +18989,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJINITBOXINTEGER */ - if (NULL == /*_.VALDATA___V338*/ meltfptr[337]) + if (NULL == /*_._VALDATA___V338*/ meltfptr[337]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJINITBOXINTEGER without initial environment @@ -18945,7 +18997,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_OBJINITBOXINTEGER = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJINITBOXINTEGER", (long) MELT_GET); - /*_.VALDATA___V338*/ meltfptr[337] = + /*_._VALDATA___V338*/ meltfptr[337] = (melt_ptr_t) meltsy_CLASS_OBJINITBOXINTEGER; } /*endgetnamedsym CLASS_OBJINITBOXINTEGER */ @@ -18953,14 +19005,14 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJINITPAIR */ - if (NULL == /*_.VALDATA___V344*/ meltfptr[343]) + if (NULL == /*_._VALDATA___V344*/ meltfptr[343]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJINITPAIR without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_CLASS_OBJINITPAIR = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJINITPAIR", (long) MELT_GET); - /*_.VALDATA___V344*/ meltfptr[343] = + /*_._VALDATA___V344*/ meltfptr[343] = (melt_ptr_t) meltsy_CLASS_OBJINITPAIR; } /*endgetnamedsym CLASS_OBJINITPAIR */ @@ -18968,14 +19020,14 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJINITLIST */ - if (NULL == /*_.VALDATA___V350*/ meltfptr[349]) + if (NULL == /*_._VALDATA___V350*/ meltfptr[349]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJINITLIST without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_CLASS_OBJINITLIST = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJINITLIST", (long) MELT_GET); - /*_.VALDATA___V350*/ meltfptr[349] = + /*_._VALDATA___V350*/ meltfptr[349] = (melt_ptr_t) meltsy_CLASS_OBJINITLIST; } /*endgetnamedsym CLASS_OBJINITLIST */ @@ -18983,7 +19035,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:DISCR_ANY_RECEIVER */ - if (NULL == /*_.VALDATA___V356*/ meltfptr[355]) + if (NULL == /*_._VALDATA___V356*/ meltfptr[355]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol DISCR_ANY_RECEIVER without initial environment @@ -18991,7 +19043,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_DISCR_ANY_RECEIVER = melthookproc_HOOK_NAMED_SYMBOL ("DISCR_ANY_RECEIVER", (long) MELT_GET); - /*_.VALDATA___V356*/ meltfptr[355] = + /*_._VALDATA___V356*/ meltfptr[355] = (melt_ptr_t) meltsy_DISCR_ANY_RECEIVER; } /*endgetnamedsym DISCR_ANY_RECEIVER */ @@ -18999,7 +19051,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:DISCR_NULL_RECEIVER */ - if (NULL == /*_.VALDATA___V360*/ meltfptr[359]) + if (NULL == /*_._VALDATA___V360*/ meltfptr[359]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol DISCR_NULL_RECEIVER without initial environment @@ -19007,7 +19059,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_DISCR_NULL_RECEIVER = melthookproc_HOOK_NAMED_SYMBOL ("DISCR_NULL_RECEIVER", (long) MELT_GET); - /*_.VALDATA___V360*/ meltfptr[359] = + /*_._VALDATA___V360*/ meltfptr[359] = (melt_ptr_t) meltsy_DISCR_NULL_RECEIVER; } /*endgetnamedsym DISCR_NULL_RECEIVER */ @@ -19015,7 +19067,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:DISPLAY_DEBUG_MESSAGE */ - if (NULL == /*_.VALDATA___V364*/ meltfptr[363]) + if (NULL == /*_._VALDATA___V364*/ meltfptr[363]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol DISPLAY_DEBUG_MESSAGE without initial environment @@ -19023,7 +19075,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_DISPLAY_DEBUG_MESSAGE = melthookproc_HOOK_NAMED_SYMBOL ("DISPLAY_DEBUG_MESSAGE", (long) MELT_GET); - /*_.VALDATA___V364*/ meltfptr[363] = + /*_._VALDATA___V364*/ meltfptr[363] = (melt_ptr_t) meltsy_DISPLAY_DEBUG_MESSAGE; } /*endgetnamedsym DISPLAY_DEBUG_MESSAGE */ @@ -19031,14 +19083,14 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:PREVLOC_CONTAINER */ - if (NULL == /*_.VALDATA___V366*/ meltfptr[365]) + if (NULL == /*_._VALDATA___V366*/ meltfptr[365]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol PREVLOC_CONTAINER without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_PREVLOC_CONTAINER = melthookproc_HOOK_NAMED_SYMBOL ("PREVLOC_CONTAINER", (long) MELT_GET); - /*_.VALDATA___V366*/ meltfptr[365] = + /*_._VALDATA___V366*/ meltfptr[365] = (melt_ptr_t) meltsy_PREVLOC_CONTAINER; } /*endgetnamedsym PREVLOC_CONTAINER */ @@ -19046,7 +19098,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:PREVIMPLBUF_CONTAINER */ - if (NULL == /*_.VALDATA___V368*/ meltfptr[367]) + if (NULL == /*_._VALDATA___V368*/ meltfptr[367]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol PREVIMPLBUF_CONTAINER without initial environment @@ -19054,7 +19106,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_PREVIMPLBUF_CONTAINER = melthookproc_HOOK_NAMED_SYMBOL ("PREVIMPLBUF_CONTAINER", (long) MELT_GET); - /*_.VALDATA___V368*/ meltfptr[367] = + /*_._VALDATA___V368*/ meltfptr[367] = (melt_ptr_t) meltsy_PREVIMPLBUF_CONTAINER; } /*endgetnamedsym PREVIMPLBUF_CONTAINER */ @@ -19062,35 +19114,35 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:DISCR_INTEGER */ - if (NULL == /*_.VALDATA___V372*/ meltfptr[371]) + if (NULL == /*_._VALDATA___V372*/ meltfptr[371]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol DISCR_INTEGER without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_DISCR_INTEGER = melthookproc_HOOK_NAMED_SYMBOL ("DISCR_INTEGER", (long) MELT_GET); - /*_.VALDATA___V372*/ meltfptr[371] = (melt_ptr_t) meltsy_DISCR_INTEGER; + /*_._VALDATA___V372*/ meltfptr[371] = (melt_ptr_t) meltsy_DISCR_INTEGER; } /*endgetnamedsym DISCR_INTEGER */ /*^getnamedsymbol */ /*getnamedsym:DISCR_STRING */ - if (NULL == /*_.VALDATA___V374*/ meltfptr[373]) + if (NULL == /*_._VALDATA___V374*/ meltfptr[373]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol DISCR_STRING without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_DISCR_STRING = melthookproc_HOOK_NAMED_SYMBOL ("DISCR_STRING", (long) MELT_GET); - /*_.VALDATA___V374*/ meltfptr[373] = (melt_ptr_t) meltsy_DISCR_STRING; + /*_._VALDATA___V374*/ meltfptr[373] = (melt_ptr_t) meltsy_DISCR_STRING; } /*endgetnamedsym DISCR_STRING */ /*^getnamedsymbol */ /*getnamedsym:CLASS_INITIAL_EXTENSION_ROUTINEOBJ */ - if (NULL == /*_.VALDATA___V379*/ meltfptr[378]) + if (NULL == /*_._VALDATA___V379*/ meltfptr[378]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_INITIAL_EXTENSION_ROUTINEOBJ without initial environment @@ -19098,7 +19150,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_INITIAL_EXTENSION_ROUTINEOBJ = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_INITIAL_EXTENSION_ROUTINEOBJ", (long) MELT_GET); - /*_.VALDATA___V379*/ meltfptr[378] = + /*_._VALDATA___V379*/ meltfptr[378] = (melt_ptr_t) meltsy_CLASS_INITIAL_EXTENSION_ROUTINEOBJ; } /*endgetnamedsym CLASS_INITIAL_EXTENSION_ROUTINEOBJ */ @@ -19106,7 +19158,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_INITIALROUTINEOBJ */ - if (NULL == /*_.VALDATA___V381*/ meltfptr[380]) + if (NULL == /*_._VALDATA___V381*/ meltfptr[380]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_INITIALROUTINEOBJ without initial environment @@ -19114,7 +19166,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_INITIALROUTINEOBJ = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_INITIALROUTINEOBJ", (long) MELT_GET); - /*_.VALDATA___V381*/ meltfptr[380] = + /*_._VALDATA___V381*/ meltfptr[380] = (melt_ptr_t) meltsy_CLASS_INITIALROUTINEOBJ; } /*endgetnamedsym CLASS_INITIALROUTINEOBJ */ @@ -19122,42 +19174,42 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:LIST_EVERY */ - if (NULL == /*_.VALDATA___V383*/ meltfptr[382]) + if (NULL == /*_._VALDATA___V383*/ meltfptr[382]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol LIST_EVERY without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_LIST_EVERY = melthookproc_HOOK_NAMED_SYMBOL ("LIST_EVERY", (long) MELT_GET); - /*_.VALDATA___V383*/ meltfptr[382] = (melt_ptr_t) meltsy_LIST_EVERY; + /*_._VALDATA___V383*/ meltfptr[382] = (melt_ptr_t) meltsy_LIST_EVERY; } /*endgetnamedsym LIST_EVERY */ /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJLOCV */ - if (NULL == /*_.VALDATA___V385*/ meltfptr[384]) + if (NULL == /*_._VALDATA___V385*/ meltfptr[384]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJLOCV without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_CLASS_OBJLOCV = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJLOCV", (long) MELT_GET); - /*_.VALDATA___V385*/ meltfptr[384] = (melt_ptr_t) meltsy_CLASS_OBJLOCV; + /*_._VALDATA___V385*/ meltfptr[384] = (melt_ptr_t) meltsy_CLASS_OBJLOCV; } /*endgetnamedsym CLASS_OBJLOCV */ /*^getnamedsymbol */ /*getnamedsym:CLASS_ROUTINEOBJ */ - if (NULL == /*_.VALDATA___V390*/ meltfptr[389]) + if (NULL == /*_._VALDATA___V390*/ meltfptr[389]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_ROUTINEOBJ without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_CLASS_ROUTINEOBJ = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_ROUTINEOBJ", (long) MELT_GET); - /*_.VALDATA___V390*/ meltfptr[389] = + /*_._VALDATA___V390*/ meltfptr[389] = (melt_ptr_t) meltsy_CLASS_ROUTINEOBJ; } /*endgetnamedsym CLASS_ROUTINEOBJ */ @@ -19165,7 +19217,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_PROCROUTINEOBJ */ - if (NULL == /*_.VALDATA___V392*/ meltfptr[391]) + if (NULL == /*_._VALDATA___V392*/ meltfptr[391]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_PROCROUTINEOBJ without initial environment @@ -19173,7 +19225,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_PROCROUTINEOBJ = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_PROCROUTINEOBJ", (long) MELT_GET); - /*_.VALDATA___V392*/ meltfptr[391] = + /*_._VALDATA___V392*/ meltfptr[391] = (melt_ptr_t) meltsy_CLASS_PROCROUTINEOBJ; } /*endgetnamedsym CLASS_PROCROUTINEOBJ */ @@ -19181,7 +19233,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_HOOKROUTINEOBJ */ - if (NULL == /*_.VALDATA___V396*/ meltfptr[395]) + if (NULL == /*_._VALDATA___V396*/ meltfptr[395]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_HOOKROUTINEOBJ without initial environment @@ -19189,7 +19241,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_HOOKROUTINEOBJ = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_HOOKROUTINEOBJ", (long) MELT_GET); - /*_.VALDATA___V396*/ meltfptr[395] = + /*_._VALDATA___V396*/ meltfptr[395] = (melt_ptr_t) meltsy_CLASS_HOOKROUTINEOBJ; } /*endgetnamedsym CLASS_HOOKROUTINEOBJ */ @@ -19197,7 +19249,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:VARIADIC_INDEX_IDSTR */ - if (NULL == /*_.VALDATA___V402*/ meltfptr[401]) + if (NULL == /*_._VALDATA___V402*/ meltfptr[401]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol VARIADIC_INDEX_IDSTR without initial environment @@ -19205,7 +19257,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_VARIADIC_INDEX_IDSTR = melthookproc_HOOK_NAMED_SYMBOL ("VARIADIC_INDEX_IDSTR", (long) MELT_GET); - /*_.VALDATA___V402*/ meltfptr[401] = + /*_._VALDATA___V402*/ meltfptr[401] = (melt_ptr_t) meltsy_VARIADIC_INDEX_IDSTR; } /*endgetnamedsym VARIADIC_INDEX_IDSTR */ @@ -19213,7 +19265,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:VARIADIC_LENGTH_IDSTR */ - if (NULL == /*_.VALDATA___V404*/ meltfptr[403]) + if (NULL == /*_._VALDATA___V404*/ meltfptr[403]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol VARIADIC_LENGTH_IDSTR without initial environment @@ -19221,7 +19273,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_VARIADIC_LENGTH_IDSTR = melthookproc_HOOK_NAMED_SYMBOL ("VARIADIC_LENGTH_IDSTR", (long) MELT_GET); - /*_.VALDATA___V404*/ meltfptr[403] = + /*_._VALDATA___V404*/ meltfptr[403] = (melt_ptr_t) meltsy_VARIADIC_LENGTH_IDSTR; } /*endgetnamedsym VARIADIC_LENGTH_IDSTR */ @@ -19229,7 +19281,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJPUREVALUE */ - if (NULL == /*_.VALDATA___V406*/ meltfptr[405]) + if (NULL == /*_._VALDATA___V406*/ meltfptr[405]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJPUREVALUE without initial environment @@ -19237,7 +19289,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_OBJPUREVALUE = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJPUREVALUE", (long) MELT_GET); - /*_.VALDATA___V406*/ meltfptr[405] = + /*_._VALDATA___V406*/ meltfptr[405] = (melt_ptr_t) meltsy_CLASS_OBJPUREVALUE; } /*endgetnamedsym CLASS_OBJPUREVALUE */ @@ -19245,7 +19297,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_INITIAL_MODULE_ROUTINEOBJ */ - if (NULL == /*_.VALDATA___V417*/ meltfptr[416]) + if (NULL == /*_._VALDATA___V417*/ meltfptr[416]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_INITIAL_MODULE_ROUTINEOBJ without initial environment @@ -19253,7 +19305,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_INITIAL_MODULE_ROUTINEOBJ = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_INITIAL_MODULE_ROUTINEOBJ", (long) MELT_GET); - /*_.VALDATA___V417*/ meltfptr[416] = + /*_._VALDATA___V417*/ meltfptr[416] = (melt_ptr_t) meltsy_CLASS_INITIAL_MODULE_ROUTINEOBJ; } /*endgetnamedsym CLASS_INITIAL_MODULE_ROUTINEOBJ */ @@ -19261,28 +19313,28 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:DISCR_LIST */ - if (NULL == /*_.VALDATA___V419*/ meltfptr[418]) + if (NULL == /*_._VALDATA___V419*/ meltfptr[418]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol DISCR_LIST without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_DISCR_LIST = melthookproc_HOOK_NAMED_SYMBOL ("DISCR_LIST", (long) MELT_GET); - /*_.VALDATA___V419*/ meltfptr[418] = (melt_ptr_t) meltsy_DISCR_LIST; + /*_._VALDATA___V419*/ meltfptr[418] = (melt_ptr_t) meltsy_DISCR_LIST; } /*endgetnamedsym DISCR_LIST */ /*^getnamedsymbol */ /*getnamedsym:LIST_TO_MULTIPLE */ - if (NULL == /*_.VALDATA___V421*/ meltfptr[420]) + if (NULL == /*_._VALDATA___V421*/ meltfptr[420]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol LIST_TO_MULTIPLE without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_LIST_TO_MULTIPLE = melthookproc_HOOK_NAMED_SYMBOL ("LIST_TO_MULTIPLE", (long) MELT_GET); - /*_.VALDATA___V421*/ meltfptr[420] = + /*_._VALDATA___V421*/ meltfptr[420] = (melt_ptr_t) meltsy_LIST_TO_MULTIPLE; } /*endgetnamedsym LIST_TO_MULTIPLE */ @@ -19290,56 +19342,58 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:DISCR_MULTIPLE */ - if (NULL == /*_.VALDATA___V423*/ meltfptr[422]) + if (NULL == /*_._VALDATA___V423*/ meltfptr[422]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol DISCR_MULTIPLE without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_DISCR_MULTIPLE = melthookproc_HOOK_NAMED_SYMBOL ("DISCR_MULTIPLE", (long) MELT_GET); - /*_.VALDATA___V423*/ meltfptr[422] = (melt_ptr_t) meltsy_DISCR_MULTIPLE; + /*_._VALDATA___V423*/ meltfptr[422] = + (melt_ptr_t) meltsy_DISCR_MULTIPLE; } /*endgetnamedsym DISCR_MULTIPLE */ /*^getnamedsymbol */ /*getnamedsym:DISCR_STRBUF */ - if (NULL == /*_.VALDATA___V425*/ meltfptr[424]) + if (NULL == /*_._VALDATA___V425*/ meltfptr[424]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol DISCR_STRBUF without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_DISCR_STRBUF = melthookproc_HOOK_NAMED_SYMBOL ("DISCR_STRBUF", (long) MELT_GET); - /*_.VALDATA___V425*/ meltfptr[424] = (melt_ptr_t) meltsy_DISCR_STRBUF; + /*_._VALDATA___V425*/ meltfptr[424] = (melt_ptr_t) meltsy_DISCR_STRBUF; } /*endgetnamedsym DISCR_STRBUF */ /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJINSTR */ - if (NULL == /*_.VALDATA___V427*/ meltfptr[426]) + if (NULL == /*_._VALDATA___V427*/ meltfptr[426]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJINSTR without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_CLASS_OBJINSTR = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJINSTR", (long) MELT_GET); - /*_.VALDATA___V427*/ meltfptr[426] = (melt_ptr_t) meltsy_CLASS_OBJINSTR; + /*_._VALDATA___V427*/ meltfptr[426] = + (melt_ptr_t) meltsy_CLASS_OBJINSTR; } /*endgetnamedsym CLASS_OBJINSTR */ /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJCFORMAL */ - if (NULL == /*_.VALDATA___V431*/ meltfptr[430]) + if (NULL == /*_._VALDATA___V431*/ meltfptr[430]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJCFORMAL without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_CLASS_OBJCFORMAL = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJCFORMAL", (long) MELT_GET); - /*_.VALDATA___V431*/ meltfptr[430] = + /*_._VALDATA___V431*/ meltfptr[430] = (melt_ptr_t) meltsy_CLASS_OBJCFORMAL; } /*endgetnamedsym CLASS_OBJCFORMAL */ @@ -19347,14 +19401,14 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJGETARG */ - if (NULL == /*_.VALDATA___V440*/ meltfptr[439]) + if (NULL == /*_._VALDATA___V440*/ meltfptr[439]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJGETARG without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_CLASS_OBJGETARG = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJGETARG", (long) MELT_GET); - /*_.VALDATA___V440*/ meltfptr[439] = + /*_._VALDATA___V440*/ meltfptr[439] = (melt_ptr_t) meltsy_CLASS_OBJGETARG; } /*endgetnamedsym CLASS_OBJGETARG */ @@ -19362,7 +19416,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_FORMAL_BINDING */ - if (NULL == /*_.VALDATA___V442*/ meltfptr[441]) + if (NULL == /*_._VALDATA___V442*/ meltfptr[441]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_FORMAL_BINDING without initial environment @@ -19370,7 +19424,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_FORMAL_BINDING = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_FORMAL_BINDING", (long) MELT_GET); - /*_.VALDATA___V442*/ meltfptr[441] = + /*_._VALDATA___V442*/ meltfptr[441] = (melt_ptr_t) meltsy_CLASS_FORMAL_BINDING; } /*endgetnamedsym CLASS_FORMAL_BINDING */ @@ -19378,7 +19432,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJGETARGREST */ - if (NULL == /*_.VALDATA___V446*/ meltfptr[445]) + if (NULL == /*_._VALDATA___V446*/ meltfptr[445]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJGETARGREST without initial environment @@ -19386,7 +19440,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_OBJGETARGREST = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJGETARGREST", (long) MELT_GET); - /*_.VALDATA___V446*/ meltfptr[445] = + /*_._VALDATA___V446*/ meltfptr[445] = (melt_ptr_t) meltsy_CLASS_OBJGETARGREST; } /*endgetnamedsym CLASS_OBJGETARGREST */ @@ -19394,7 +19448,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJFETCHMODVAR */ - if (NULL == /*_.VALDATA___V452*/ meltfptr[451]) + if (NULL == /*_._VALDATA___V452*/ meltfptr[451]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJFETCHMODVAR without initial environment @@ -19402,7 +19456,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_OBJFETCHMODVAR = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJFETCHMODVAR", (long) MELT_GET); - /*_.VALDATA___V452*/ meltfptr[451] = + /*_._VALDATA___V452*/ meltfptr[451] = (melt_ptr_t) meltsy_CLASS_OBJFETCHMODVAR; } /*endgetnamedsym CLASS_OBJFETCHMODVAR */ @@ -19410,7 +19464,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJPUTMODVAR */ - if (NULL == /*_.VALDATA___V456*/ meltfptr[455]) + if (NULL == /*_._VALDATA___V456*/ meltfptr[455]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJPUTMODVAR without initial environment @@ -19418,7 +19472,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_OBJPUTMODVAR = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJPUTMODVAR", (long) MELT_GET); - /*_.VALDATA___V456*/ meltfptr[455] = + /*_._VALDATA___V456*/ meltfptr[455] = (melt_ptr_t) meltsy_CLASS_OBJPUTMODVAR; } /*endgetnamedsym CLASS_OBJPUTMODVAR */ @@ -19426,7 +19480,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJPUTOUTARG */ - if (NULL == /*_.VALDATA___V460*/ meltfptr[459]) + if (NULL == /*_._VALDATA___V460*/ meltfptr[459]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJPUTOUTARG without initial environment @@ -19434,7 +19488,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_OBJPUTOUTARG = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJPUTOUTARG", (long) MELT_GET); - /*_.VALDATA___V460*/ meltfptr[459] = + /*_._VALDATA___V460*/ meltfptr[459] = (melt_ptr_t) meltsy_CLASS_OBJPUTOUTARG; } /*endgetnamedsym CLASS_OBJPUTOUTARG */ @@ -19442,28 +19496,28 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CTYPE_LONG */ - if (NULL == /*_.VALDATA___V464*/ meltfptr[463]) + if (NULL == /*_._VALDATA___V464*/ meltfptr[463]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CTYPE_LONG without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_CTYPE_LONG = melthookproc_HOOK_NAMED_SYMBOL ("CTYPE_LONG", (long) MELT_GET); - /*_.VALDATA___V464*/ meltfptr[463] = (melt_ptr_t) meltsy_CTYPE_LONG; + /*_._VALDATA___V464*/ meltfptr[463] = (melt_ptr_t) meltsy_CTYPE_LONG; } /*endgetnamedsym CTYPE_LONG */ /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJCLOCCV */ - if (NULL == /*_.VALDATA___V468*/ meltfptr[467]) + if (NULL == /*_._VALDATA___V468*/ meltfptr[467]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJCLOCCV without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_CLASS_OBJCLOCCV = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJCLOCCV", (long) MELT_GET); - /*_.VALDATA___V468*/ meltfptr[467] = + /*_._VALDATA___V468*/ meltfptr[467] = (melt_ptr_t) meltsy_CLASS_OBJCLOCCV; } /*endgetnamedsym CLASS_OBJCLOCCV */ @@ -19471,14 +19525,14 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJCLOHOOKV */ - if (NULL == /*_.VALDATA___V472*/ meltfptr[471]) + if (NULL == /*_._VALDATA___V472*/ meltfptr[471]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJCLOHOOKV without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_CLASS_OBJCLOHOOKV = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJCLOHOOKV", (long) MELT_GET); - /*_.VALDATA___V472*/ meltfptr[471] = + /*_._VALDATA___V472*/ meltfptr[471] = (melt_ptr_t) meltsy_CLASS_OBJCLOHOOKV; } /*endgetnamedsym CLASS_OBJCLOHOOKV */ @@ -19486,14 +19540,14 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJCONSTV */ - if (NULL == /*_.VALDATA___V476*/ meltfptr[475]) + if (NULL == /*_._VALDATA___V476*/ meltfptr[475]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJCONSTV without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_CLASS_OBJCONSTV = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJCONSTV", (long) MELT_GET); - /*_.VALDATA___V476*/ meltfptr[475] = + /*_._VALDATA___V476*/ meltfptr[475] = (melt_ptr_t) meltsy_CLASS_OBJCONSTV; } /*endgetnamedsym CLASS_OBJCONSTV */ @@ -19501,7 +19555,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJPLAINBLOCK */ - if (NULL == /*_.VALDATA___V480*/ meltfptr[479]) + if (NULL == /*_._VALDATA___V480*/ meltfptr[479]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJPLAINBLOCK without initial environment @@ -19509,7 +19563,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_OBJPLAINBLOCK = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJPLAINBLOCK", (long) MELT_GET); - /*_.VALDATA___V480*/ meltfptr[479] = + /*_._VALDATA___V480*/ meltfptr[479] = (melt_ptr_t) meltsy_CLASS_OBJPLAINBLOCK; } /*endgetnamedsym CLASS_OBJPLAINBLOCK */ @@ -19517,7 +19571,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJCHECKSIGNAL */ - if (NULL == /*_.VALDATA___V484*/ meltfptr[483]) + if (NULL == /*_._VALDATA___V484*/ meltfptr[483]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJCHECKSIGNAL without initial environment @@ -19525,7 +19579,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_OBJCHECKSIGNAL = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJCHECKSIGNAL", (long) MELT_GET); - /*_.VALDATA___V484*/ meltfptr[483] = + /*_._VALDATA___V484*/ meltfptr[483] = (melt_ptr_t) meltsy_CLASS_OBJCHECKSIGNAL; } /*endgetnamedsym CLASS_OBJCHECKSIGNAL */ @@ -19533,14 +19587,14 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJANYBLOCK */ - if (NULL == /*_.VALDATA___V488*/ meltfptr[487]) + if (NULL == /*_._VALDATA___V488*/ meltfptr[487]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJANYBLOCK without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_CLASS_OBJANYBLOCK = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJANYBLOCK", (long) MELT_GET); - /*_.VALDATA___V488*/ meltfptr[487] = + /*_._VALDATA___V488*/ meltfptr[487] = (melt_ptr_t) meltsy_CLASS_OBJANYBLOCK; } /*endgetnamedsym CLASS_OBJANYBLOCK */ @@ -19548,21 +19602,21 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJFLAG */ - if (NULL == /*_.VALDATA___V492*/ meltfptr[491]) + if (NULL == /*_._VALDATA___V492*/ meltfptr[491]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJFLAG without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_CLASS_OBJFLAG = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJFLAG", (long) MELT_GET); - /*_.VALDATA___V492*/ meltfptr[491] = (melt_ptr_t) meltsy_CLASS_OBJFLAG; + /*_._VALDATA___V492*/ meltfptr[491] = (melt_ptr_t) meltsy_CLASS_OBJFLAG; } /*endgetnamedsym CLASS_OBJFLAG */ /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJMATCHFLAGBLOCK */ - if (NULL == /*_.VALDATA___V496*/ meltfptr[495]) + if (NULL == /*_._VALDATA___V496*/ meltfptr[495]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJMATCHFLAGBLOCK without initial environment @@ -19570,7 +19624,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_OBJMATCHFLAGBLOCK = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJMATCHFLAGBLOCK", (long) MELT_GET); - /*_.VALDATA___V496*/ meltfptr[495] = + /*_._VALDATA___V496*/ meltfptr[495] = (melt_ptr_t) meltsy_CLASS_OBJMATCHFLAGBLOCK; } /*endgetnamedsym CLASS_OBJMATCHFLAGBLOCK */ @@ -19578,7 +19632,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJMULTIALLOCBLOCK */ - if (NULL == /*_.VALDATA___V500*/ meltfptr[499]) + if (NULL == /*_._VALDATA___V500*/ meltfptr[499]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJMULTIALLOCBLOCK without initial environment @@ -19586,7 +19640,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_OBJMULTIALLOCBLOCK = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJMULTIALLOCBLOCK", (long) MELT_GET); - /*_.VALDATA___V500*/ meltfptr[499] = + /*_._VALDATA___V500*/ meltfptr[499] = (melt_ptr_t) meltsy_CLASS_OBJMULTIALLOCBLOCK; } /*endgetnamedsym CLASS_OBJMULTIALLOCBLOCK */ @@ -19594,7 +19648,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:DISCR_VERBATIM_STRING */ - if (NULL == /*_.VALDATA___V502*/ meltfptr[501]) + if (NULL == /*_._VALDATA___V502*/ meltfptr[501]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol DISCR_VERBATIM_STRING without initial environment @@ -19602,7 +19656,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_DISCR_VERBATIM_STRING = melthookproc_HOOK_NAMED_SYMBOL ("DISCR_VERBATIM_STRING", (long) MELT_GET); - /*_.VALDATA___V502*/ meltfptr[501] = + /*_._VALDATA___V502*/ meltfptr[501] = (melt_ptr_t) meltsy_DISCR_VERBATIM_STRING; } /*endgetnamedsym DISCR_VERBATIM_STRING */ @@ -19610,7 +19664,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJCITERBLOCK */ - if (NULL == /*_.VALDATA___V506*/ meltfptr[505]) + if (NULL == /*_._VALDATA___V506*/ meltfptr[505]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJCITERBLOCK without initial environment @@ -19618,7 +19672,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_OBJCITERBLOCK = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJCITERBLOCK", (long) MELT_GET); - /*_.VALDATA___V506*/ meltfptr[505] = + /*_._VALDATA___V506*/ meltfptr[505] = (melt_ptr_t) meltsy_CLASS_OBJCITERBLOCK; } /*endgetnamedsym CLASS_OBJCITERBLOCK */ @@ -19626,14 +19680,14 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_CITERATOR */ - if (NULL == /*_.VALDATA___V508*/ meltfptr[507]) + if (NULL == /*_._VALDATA___V508*/ meltfptr[507]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_CITERATOR without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_CLASS_CITERATOR = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_CITERATOR", (long) MELT_GET); - /*_.VALDATA___V508*/ meltfptr[507] = + /*_._VALDATA___V508*/ meltfptr[507] = (melt_ptr_t) meltsy_CLASS_CITERATOR; } /*endgetnamedsym CLASS_CITERATOR */ @@ -19641,7 +19695,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJCOMMENTINSTR */ - if (NULL == /*_.VALDATA___V512*/ meltfptr[511]) + if (NULL == /*_._VALDATA___V512*/ meltfptr[511]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJCOMMENTINSTR without initial environment @@ -19649,7 +19703,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_OBJCOMMENTINSTR = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJCOMMENTINSTR", (long) MELT_GET); - /*_.VALDATA___V512*/ meltfptr[511] = + /*_._VALDATA___V512*/ meltfptr[511] = (melt_ptr_t) meltsy_CLASS_OBJCOMMENTINSTR; } /*endgetnamedsym CLASS_OBJCOMMENTINSTR */ @@ -19657,7 +19711,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJCOMMENTEDBLOCK */ - if (NULL == /*_.VALDATA___V516*/ meltfptr[515]) + if (NULL == /*_._VALDATA___V516*/ meltfptr[515]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJCOMMENTEDBLOCK without initial environment @@ -19665,7 +19719,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_OBJCOMMENTEDBLOCK = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJCOMMENTEDBLOCK", (long) MELT_GET); - /*_.VALDATA___V516*/ meltfptr[515] = + /*_._VALDATA___V516*/ meltfptr[515] = (melt_ptr_t) meltsy_CLASS_OBJCOMMENTEDBLOCK; } /*endgetnamedsym CLASS_OBJCOMMENTEDBLOCK */ @@ -19673,21 +19727,21 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:LABELCOUNTREF */ - if (NULL == /*_.VALDATA___V518*/ meltfptr[517]) + if (NULL == /*_._VALDATA___V518*/ meltfptr[517]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol LABELCOUNTREF without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_LABELCOUNTREF = melthookproc_HOOK_NAMED_SYMBOL ("LABELCOUNTREF", (long) MELT_GET); - /*_.VALDATA___V518*/ meltfptr[517] = (melt_ptr_t) meltsy_LABELCOUNTREF; + /*_._VALDATA___V518*/ meltfptr[517] = (melt_ptr_t) meltsy_LABELCOUNTREF; } /*endgetnamedsym LABELCOUNTREF */ /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJLABELINSTR */ - if (NULL == /*_.VALDATA___V524*/ meltfptr[523]) + if (NULL == /*_._VALDATA___V524*/ meltfptr[523]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJLABELINSTR without initial environment @@ -19695,7 +19749,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_OBJLABELINSTR = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJLABELINSTR", (long) MELT_GET); - /*_.VALDATA___V524*/ meltfptr[523] = + /*_._VALDATA___V524*/ meltfptr[523] = (melt_ptr_t) meltsy_CLASS_OBJLABELINSTR; } /*endgetnamedsym CLASS_OBJLABELINSTR */ @@ -19703,35 +19757,35 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:SET_CONTENT */ - if (NULL == /*_.VALDATA___V526*/ meltfptr[525]) + if (NULL == /*_._VALDATA___V526*/ meltfptr[525]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol SET_CONTENT without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_SET_CONTENT = melthookproc_HOOK_NAMED_SYMBOL ("SET_CONTENT", (long) MELT_GET); - /*_.VALDATA___V526*/ meltfptr[525] = (melt_ptr_t) meltsy_SET_CONTENT; + /*_._VALDATA___V526*/ meltfptr[525] = (melt_ptr_t) meltsy_SET_CONTENT; } /*endgetnamedsym SET_CONTENT */ /*^getnamedsymbol */ /*getnamedsym:STRING4OUT */ - if (NULL == /*_.VALDATA___V528*/ meltfptr[527]) + if (NULL == /*_._VALDATA___V528*/ meltfptr[527]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol STRING4OUT without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_STRING4OUT = melthookproc_HOOK_NAMED_SYMBOL ("STRING4OUT", (long) MELT_GET); - /*_.VALDATA___V528*/ meltfptr[527] = (melt_ptr_t) meltsy_STRING4OUT; + /*_._VALDATA___V528*/ meltfptr[527] = (melt_ptr_t) meltsy_STRING4OUT; } /*endgetnamedsym STRING4OUT */ /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJGOTOINSTR */ - if (NULL == /*_.VALDATA___V532*/ meltfptr[531]) + if (NULL == /*_._VALDATA___V532*/ meltfptr[531]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJGOTOINSTR without initial environment @@ -19739,7 +19793,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_OBJGOTOINSTR = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJGOTOINSTR", (long) MELT_GET); - /*_.VALDATA___V532*/ meltfptr[531] = + /*_._VALDATA___V532*/ meltfptr[531] = (melt_ptr_t) meltsy_CLASS_OBJGOTOINSTR; } /*endgetnamedsym CLASS_OBJGOTOINSTR */ @@ -19747,56 +19801,57 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJLOOP */ - if (NULL == /*_.VALDATA___V540*/ meltfptr[539]) + if (NULL == /*_._VALDATA___V540*/ meltfptr[539]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJLOOP without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_CLASS_OBJLOOP = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJLOOP", (long) MELT_GET); - /*_.VALDATA___V540*/ meltfptr[539] = (melt_ptr_t) meltsy_CLASS_OBJLOOP; + /*_._VALDATA___V540*/ meltfptr[539] = (melt_ptr_t) meltsy_CLASS_OBJLOOP; } /*endgetnamedsym CLASS_OBJLOOP */ /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJEXIT */ - if (NULL == /*_.VALDATA___V544*/ meltfptr[543]) + if (NULL == /*_._VALDATA___V544*/ meltfptr[543]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJEXIT without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_CLASS_OBJEXIT = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJEXIT", (long) MELT_GET); - /*_.VALDATA___V544*/ meltfptr[543] = (melt_ptr_t) meltsy_CLASS_OBJEXIT; + /*_._VALDATA___V544*/ meltfptr[543] = (melt_ptr_t) meltsy_CLASS_OBJEXIT; } /*endgetnamedsym CLASS_OBJEXIT */ /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJAGAIN */ - if (NULL == /*_.VALDATA___V548*/ meltfptr[547]) + if (NULL == /*_._VALDATA___V548*/ meltfptr[547]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJAGAIN without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_CLASS_OBJAGAIN = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJAGAIN", (long) MELT_GET); - /*_.VALDATA___V548*/ meltfptr[547] = (melt_ptr_t) meltsy_CLASS_OBJAGAIN; + /*_._VALDATA___V548*/ meltfptr[547] = + (melt_ptr_t) meltsy_CLASS_OBJAGAIN; } /*endgetnamedsym CLASS_OBJAGAIN */ /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJCOMPUTE */ - if (NULL == /*_.VALDATA___V555*/ meltfptr[554]) + if (NULL == /*_._VALDATA___V555*/ meltfptr[554]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJCOMPUTE without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_CLASS_OBJCOMPUTE = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJCOMPUTE", (long) MELT_GET); - /*_.VALDATA___V555*/ meltfptr[554] = + /*_._VALDATA___V555*/ meltfptr[554] = (melt_ptr_t) meltsy_CLASS_OBJCOMPUTE; } /*endgetnamedsym CLASS_OBJCOMPUTE */ @@ -19804,49 +19859,51 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:MULTIPLE_EVERY */ - if (NULL == /*_.VALDATA___V557*/ meltfptr[556]) + if (NULL == /*_._VALDATA___V557*/ meltfptr[556]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol MULTIPLE_EVERY without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_MULTIPLE_EVERY = melthookproc_HOOK_NAMED_SYMBOL ("MULTIPLE_EVERY", (long) MELT_GET); - /*_.VALDATA___V557*/ meltfptr[556] = (melt_ptr_t) meltsy_MULTIPLE_EVERY; + /*_._VALDATA___V557*/ meltfptr[556] = + (melt_ptr_t) meltsy_MULTIPLE_EVERY; } /*endgetnamedsym MULTIPLE_EVERY */ /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJCOND */ - if (NULL == /*_.VALDATA___V561*/ meltfptr[560]) + if (NULL == /*_._VALDATA___V561*/ meltfptr[560]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJCOND without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_CLASS_OBJCOND = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJCOND", (long) MELT_GET); - /*_.VALDATA___V561*/ meltfptr[560] = (melt_ptr_t) meltsy_CLASS_OBJCOND; + /*_._VALDATA___V561*/ meltfptr[560] = (melt_ptr_t) meltsy_CLASS_OBJCOND; } /*endgetnamedsym CLASS_OBJCOND */ /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJCPPIF */ - if (NULL == /*_.VALDATA___V565*/ meltfptr[564]) + if (NULL == /*_._VALDATA___V565*/ meltfptr[564]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJCPPIF without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_CLASS_OBJCPPIF = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJCPPIF", (long) MELT_GET); - /*_.VALDATA___V565*/ meltfptr[564] = (melt_ptr_t) meltsy_CLASS_OBJCPPIF; + /*_._VALDATA___V565*/ meltfptr[564] = + (melt_ptr_t) meltsy_CLASS_OBJCPPIF; } /*endgetnamedsym CLASS_OBJCPPIF */ /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJINTERNSYMBOL */ - if (NULL == /*_.VALDATA___V569*/ meltfptr[568]) + if (NULL == /*_._VALDATA___V569*/ meltfptr[568]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJINTERNSYMBOL without initial environment @@ -19854,7 +19911,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_OBJINTERNSYMBOL = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJINTERNSYMBOL", (long) MELT_GET); - /*_.VALDATA___V569*/ meltfptr[568] = + /*_._VALDATA___V569*/ meltfptr[568] = (melt_ptr_t) meltsy_CLASS_OBJINTERNSYMBOL; } /*endgetnamedsym CLASS_OBJINTERNSYMBOL */ @@ -19862,7 +19919,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_DATASYMBOL */ - if (NULL == /*_.VALDATA___V571*/ meltfptr[570]) + if (NULL == /*_._VALDATA___V571*/ meltfptr[570]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_NREP_DATASYMBOL without initial environment @@ -19870,7 +19927,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_NREP_DATASYMBOL = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_NREP_DATASYMBOL", (long) MELT_GET); - /*_.VALDATA___V571*/ meltfptr[570] = + /*_._VALDATA___V571*/ meltfptr[570] = (melt_ptr_t) meltsy_CLASS_NREP_DATASYMBOL; } /*endgetnamedsym CLASS_NREP_DATASYMBOL */ @@ -19878,7 +19935,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJINTERNKEYWORD */ - if (NULL == /*_.VALDATA___V575*/ meltfptr[574]) + if (NULL == /*_._VALDATA___V575*/ meltfptr[574]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJINTERNKEYWORD without initial environment @@ -19886,7 +19943,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_OBJINTERNKEYWORD = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJINTERNKEYWORD", (long) MELT_GET); - /*_.VALDATA___V575*/ meltfptr[574] = + /*_._VALDATA___V575*/ meltfptr[574] = (melt_ptr_t) meltsy_CLASS_OBJINTERNKEYWORD; } /*endgetnamedsym CLASS_OBJINTERNKEYWORD */ @@ -19894,7 +19951,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_DATAKEYWORD */ - if (NULL == /*_.VALDATA___V577*/ meltfptr[576]) + if (NULL == /*_._VALDATA___V577*/ meltfptr[576]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_NREP_DATAKEYWORD without initial environment @@ -19902,7 +19959,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_NREP_DATAKEYWORD = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_NREP_DATAKEYWORD", (long) MELT_GET); - /*_.VALDATA___V577*/ meltfptr[576] = + /*_._VALDATA___V577*/ meltfptr[576] = (melt_ptr_t) meltsy_CLASS_NREP_DATAKEYWORD; } /*endgetnamedsym CLASS_NREP_DATAKEYWORD */ @@ -19910,7 +19967,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJGETNAMEDSYMBOL */ - if (NULL == /*_.VALDATA___V581*/ meltfptr[580]) + if (NULL == /*_._VALDATA___V581*/ meltfptr[580]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJGETNAMEDSYMBOL without initial environment @@ -19918,7 +19975,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_OBJGETNAMEDSYMBOL = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJGETNAMEDSYMBOL", (long) MELT_GET); - /*_.VALDATA___V581*/ meltfptr[580] = + /*_._VALDATA___V581*/ meltfptr[580] = (melt_ptr_t) meltsy_CLASS_OBJGETNAMEDSYMBOL; } /*endgetnamedsym CLASS_OBJGETNAMEDSYMBOL */ @@ -19926,7 +19983,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJGETNAMEDKEYWORD */ - if (NULL == /*_.VALDATA___V585*/ meltfptr[584]) + if (NULL == /*_._VALDATA___V585*/ meltfptr[584]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJGETNAMEDKEYWORD without initial environment @@ -19934,7 +19991,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_OBJGETNAMEDKEYWORD = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJGETNAMEDKEYWORD", (long) MELT_GET); - /*_.VALDATA___V585*/ meltfptr[584] = + /*_._VALDATA___V585*/ meltfptr[584] = (melt_ptr_t) meltsy_CLASS_OBJGETNAMEDKEYWORD; } /*endgetnamedsym CLASS_OBJGETNAMEDKEYWORD */ @@ -19942,49 +19999,51 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJAPPLY */ - if (NULL == /*_.VALDATA___V591*/ meltfptr[590]) + if (NULL == /*_._VALDATA___V591*/ meltfptr[590]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJAPPLY without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_CLASS_OBJAPPLY = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJAPPLY", (long) MELT_GET); - /*_.VALDATA___V591*/ meltfptr[590] = (melt_ptr_t) meltsy_CLASS_OBJAPPLY; + /*_._VALDATA___V591*/ meltfptr[590] = + (melt_ptr_t) meltsy_CLASS_OBJAPPLY; } /*endgetnamedsym CLASS_OBJAPPLY */ /*^getnamedsymbol */ /*getnamedsym:GET_CTYPE */ - if (NULL == /*_.VALDATA___V593*/ meltfptr[592]) + if (NULL == /*_._VALDATA___V593*/ meltfptr[592]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol GET_CTYPE without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_GET_CTYPE = melthookproc_HOOK_NAMED_SYMBOL ("GET_CTYPE", (long) MELT_GET); - /*_.VALDATA___V593*/ meltfptr[592] = (melt_ptr_t) meltsy_GET_CTYPE; + /*_._VALDATA___V593*/ meltfptr[592] = (melt_ptr_t) meltsy_GET_CTYPE; } /*endgetnamedsym GET_CTYPE */ /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJMSEND */ - if (NULL == /*_.VALDATA___V598*/ meltfptr[597]) + if (NULL == /*_._VALDATA___V598*/ meltfptr[597]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJMSEND without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_CLASS_OBJMSEND = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJMSEND", (long) MELT_GET); - /*_.VALDATA___V598*/ meltfptr[597] = (melt_ptr_t) meltsy_CLASS_OBJMSEND; + /*_._VALDATA___V598*/ meltfptr[597] = + (melt_ptr_t) meltsy_CLASS_OBJMSEND; } /*endgetnamedsym CLASS_OBJMSEND */ /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJMULTIAPPLY */ - if (NULL == /*_.VALDATA___V607*/ meltfptr[606]) + if (NULL == /*_._VALDATA___V607*/ meltfptr[606]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJMULTIAPPLY without initial environment @@ -19992,7 +20051,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_OBJMULTIAPPLY = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJMULTIAPPLY", (long) MELT_GET); - /*_.VALDATA___V607*/ meltfptr[606] = + /*_._VALDATA___V607*/ meltfptr[606] = (melt_ptr_t) meltsy_CLASS_OBJMULTIAPPLY; } /*endgetnamedsym CLASS_OBJMULTIAPPLY */ @@ -20000,7 +20059,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJMULTIMSEND */ - if (NULL == /*_.VALDATA___V616*/ meltfptr[615]) + if (NULL == /*_._VALDATA___V616*/ meltfptr[615]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJMULTIMSEND without initial environment @@ -20008,7 +20067,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_OBJMULTIMSEND = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJMULTIMSEND", (long) MELT_GET); - /*_.VALDATA___V616*/ meltfptr[615] = + /*_._VALDATA___V616*/ meltfptr[615] = (melt_ptr_t) meltsy_CLASS_OBJMULTIMSEND; } /*endgetnamedsym CLASS_OBJMULTIMSEND */ @@ -20016,21 +20075,22 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJCLEAR */ - if (NULL == /*_.VALDATA___V620*/ meltfptr[619]) + if (NULL == /*_._VALDATA___V620*/ meltfptr[619]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJCLEAR without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_CLASS_OBJCLEAR = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJCLEAR", (long) MELT_GET); - /*_.VALDATA___V620*/ meltfptr[619] = (melt_ptr_t) meltsy_CLASS_OBJCLEAR; + /*_._VALDATA___V620*/ meltfptr[619] = + (melt_ptr_t) meltsy_CLASS_OBJCLEAR; } /*endgetnamedsym CLASS_OBJCLEAR */ /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJRAWALLOCOBJ */ - if (NULL == /*_.VALDATA___V624*/ meltfptr[623]) + if (NULL == /*_._VALDATA___V624*/ meltfptr[623]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJRAWALLOCOBJ without initial environment @@ -20038,7 +20098,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_OBJRAWALLOCOBJ = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJRAWALLOCOBJ", (long) MELT_GET); - /*_.VALDATA___V624*/ meltfptr[623] = + /*_._VALDATA___V624*/ meltfptr[623] = (melt_ptr_t) meltsy_CLASS_OBJRAWALLOCOBJ; } /*endgetnamedsym CLASS_OBJRAWALLOCOBJ */ @@ -20046,7 +20106,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJNEWCLOSURE */ - if (NULL == /*_.VALDATA___V629*/ meltfptr[628]) + if (NULL == /*_._VALDATA___V629*/ meltfptr[628]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJNEWCLOSURE without initial environment @@ -20054,7 +20114,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_OBJNEWCLOSURE = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJNEWCLOSURE", (long) MELT_GET); - /*_.VALDATA___V629*/ meltfptr[628] = + /*_._VALDATA___V629*/ meltfptr[628] = (melt_ptr_t) meltsy_CLASS_OBJNEWCLOSURE; } /*endgetnamedsym CLASS_OBJNEWCLOSURE */ @@ -20062,21 +20122,22 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJTOUCH */ - if (NULL == /*_.VALDATA___V633*/ meltfptr[632]) + if (NULL == /*_._VALDATA___V633*/ meltfptr[632]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJTOUCH without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_CLASS_OBJTOUCH = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJTOUCH", (long) MELT_GET); - /*_.VALDATA___V633*/ meltfptr[632] = (melt_ptr_t) meltsy_CLASS_OBJTOUCH; + /*_._VALDATA___V633*/ meltfptr[632] = + (melt_ptr_t) meltsy_CLASS_OBJTOUCH; } /*endgetnamedsym CLASS_OBJTOUCH */ /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJDBGTRACEWRITEOBJ */ - if (NULL == /*_.VALDATA___V637*/ meltfptr[636]) + if (NULL == /*_._VALDATA___V637*/ meltfptr[636]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJDBGTRACEWRITEOBJ without initial environment @@ -20084,7 +20145,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_OBJDBGTRACEWRITEOBJ = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJDBGTRACEWRITEOBJ", (long) MELT_GET); - /*_.VALDATA___V637*/ meltfptr[636] = + /*_._VALDATA___V637*/ meltfptr[636] = (melt_ptr_t) meltsy_CLASS_OBJDBGTRACEWRITEOBJ; } /*endgetnamedsym CLASS_OBJDBGTRACEWRITEOBJ */ @@ -20092,14 +20153,14 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJPUTUPLE */ - if (NULL == /*_.VALDATA___V641*/ meltfptr[640]) + if (NULL == /*_._VALDATA___V641*/ meltfptr[640]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJPUTUPLE without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_CLASS_OBJPUTUPLE = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJPUTUPLE", (long) MELT_GET); - /*_.VALDATA___V641*/ meltfptr[640] = + /*_._VALDATA___V641*/ meltfptr[640] = (melt_ptr_t) meltsy_CLASS_OBJPUTUPLE; } /*endgetnamedsym CLASS_OBJPUTUPLE */ @@ -20107,7 +20168,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:OBJPUTPAIRHEAD_COUNTER */ - if (NULL == /*_.VALDATA___V643*/ meltfptr[642]) + if (NULL == /*_._VALDATA___V643*/ meltfptr[642]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol OBJPUTPAIRHEAD_COUNTER without initial environment @@ -20115,7 +20176,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_OBJPUTPAIRHEAD_COUNTER = melthookproc_HOOK_NAMED_SYMBOL ("OBJPUTPAIRHEAD_COUNTER", (long) MELT_GET); - /*_.VALDATA___V643*/ meltfptr[642] = + /*_._VALDATA___V643*/ meltfptr[642] = (melt_ptr_t) meltsy_OBJPUTPAIRHEAD_COUNTER; } /*endgetnamedsym OBJPUTPAIRHEAD_COUNTER */ @@ -20123,14 +20184,14 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJPUTPAIR */ - if (NULL == /*_.VALDATA___V649*/ meltfptr[648]) + if (NULL == /*_._VALDATA___V649*/ meltfptr[648]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJPUTPAIR without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_CLASS_OBJPUTPAIR = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJPUTPAIR", (long) MELT_GET); - /*_.VALDATA___V649*/ meltfptr[648] = + /*_._VALDATA___V649*/ meltfptr[648] = (melt_ptr_t) meltsy_CLASS_OBJPUTPAIR; } /*endgetnamedsym CLASS_OBJPUTPAIR */ @@ -20138,7 +20199,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJPUTPAIRHEAD */ - if (NULL == /*_.VALDATA___V651*/ meltfptr[650]) + if (NULL == /*_._VALDATA___V651*/ meltfptr[650]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJPUTPAIRHEAD without initial environment @@ -20146,7 +20207,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_OBJPUTPAIRHEAD = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJPUTPAIRHEAD", (long) MELT_GET); - /*_.VALDATA___V651*/ meltfptr[650] = + /*_._VALDATA___V651*/ meltfptr[650] = (melt_ptr_t) meltsy_CLASS_OBJPUTPAIRHEAD; } /*endgetnamedsym CLASS_OBJPUTPAIRHEAD */ @@ -20154,7 +20215,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJPUTPAIRTAIL */ - if (NULL == /*_.VALDATA___V655*/ meltfptr[654]) + if (NULL == /*_._VALDATA___V655*/ meltfptr[654]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJPUTPAIRTAIL without initial environment @@ -20162,7 +20223,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_OBJPUTPAIRTAIL = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJPUTPAIRTAIL", (long) MELT_GET); - /*_.VALDATA___V655*/ meltfptr[654] = + /*_._VALDATA___V655*/ meltfptr[654] = (melt_ptr_t) meltsy_CLASS_OBJPUTPAIRTAIL; } /*endgetnamedsym CLASS_OBJPUTPAIRTAIL */ @@ -20170,14 +20231,14 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJPUTLIST */ - if (NULL == /*_.VALDATA___V659*/ meltfptr[658]) + if (NULL == /*_._VALDATA___V659*/ meltfptr[658]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJPUTLIST without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_CLASS_OBJPUTLIST = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJPUTLIST", (long) MELT_GET); - /*_.VALDATA___V659*/ meltfptr[658] = + /*_._VALDATA___V659*/ meltfptr[658] = (melt_ptr_t) meltsy_CLASS_OBJPUTLIST; } /*endgetnamedsym CLASS_OBJPUTLIST */ @@ -20185,14 +20246,14 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJGETSLOT */ - if (NULL == /*_.VALDATA___V664*/ meltfptr[663]) + if (NULL == /*_._VALDATA___V664*/ meltfptr[663]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJGETSLOT without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_CLASS_OBJGETSLOT = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJGETSLOT", (long) MELT_GET); - /*_.VALDATA___V664*/ meltfptr[663] = + /*_._VALDATA___V664*/ meltfptr[663] = (melt_ptr_t) meltsy_CLASS_OBJGETSLOT; } /*endgetnamedsym CLASS_OBJGETSLOT */ @@ -20200,28 +20261,28 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_FIELD */ - if (NULL == /*_.VALDATA___V666*/ meltfptr[665]) + if (NULL == /*_._VALDATA___V666*/ meltfptr[665]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_FIELD without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_CLASS_FIELD = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_FIELD", (long) MELT_GET); - /*_.VALDATA___V666*/ meltfptr[665] = (melt_ptr_t) meltsy_CLASS_FIELD; + /*_._VALDATA___V666*/ meltfptr[665] = (melt_ptr_t) meltsy_CLASS_FIELD; } /*endgetnamedsym CLASS_FIELD */ /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJPUTSLOT */ - if (NULL == /*_.VALDATA___V670*/ meltfptr[669]) + if (NULL == /*_._VALDATA___V670*/ meltfptr[669]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJPUTSLOT without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_CLASS_OBJPUTSLOT = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJPUTSLOT", (long) MELT_GET); - /*_.VALDATA___V670*/ meltfptr[669] = + /*_._VALDATA___V670*/ meltfptr[669] = (melt_ptr_t) meltsy_CLASS_OBJPUTSLOT; } /*endgetnamedsym CLASS_OBJPUTSLOT */ @@ -20229,7 +20290,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJPUTCLOSUROUT */ - if (NULL == /*_.VALDATA___V674*/ meltfptr[673]) + if (NULL == /*_._VALDATA___V674*/ meltfptr[673]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJPUTCLOSUROUT without initial environment @@ -20237,7 +20298,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_OBJPUTCLOSUROUT = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJPUTCLOSUROUT", (long) MELT_GET); - /*_.VALDATA___V674*/ meltfptr[673] = + /*_._VALDATA___V674*/ meltfptr[673] = (melt_ptr_t) meltsy_CLASS_OBJPUTCLOSUROUT; } /*endgetnamedsym CLASS_OBJPUTCLOSUROUT */ @@ -20245,7 +20306,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJPUTCLOSEDV */ - if (NULL == /*_.VALDATA___V678*/ meltfptr[677]) + if (NULL == /*_._VALDATA___V678*/ meltfptr[677]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJPUTCLOSEDV without initial environment @@ -20253,7 +20314,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_OBJPUTCLOSEDV = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJPUTCLOSEDV", (long) MELT_GET); - /*_.VALDATA___V678*/ meltfptr[677] = + /*_._VALDATA___V678*/ meltfptr[677] = (melt_ptr_t) meltsy_CLASS_OBJPUTCLOSEDV; } /*endgetnamedsym CLASS_OBJPUTCLOSEDV */ @@ -20261,7 +20322,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJPUTCLOSEDNOTNULLV */ - if (NULL == /*_.VALDATA___V682*/ meltfptr[681]) + if (NULL == /*_._VALDATA___V682*/ meltfptr[681]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJPUTCLOSEDNOTNULLV without initial environment @@ -20269,7 +20330,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_OBJPUTCLOSEDNOTNULLV = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJPUTCLOSEDNOTNULLV", (long) MELT_GET); - /*_.VALDATA___V682*/ meltfptr[681] = + /*_._VALDATA___V682*/ meltfptr[681] = (melt_ptr_t) meltsy_CLASS_OBJPUTCLOSEDNOTNULLV; } /*endgetnamedsym CLASS_OBJPUTCLOSEDNOTNULLV */ @@ -20277,7 +20338,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJPUTROUTCONST */ - if (NULL == /*_.VALDATA___V686*/ meltfptr[685]) + if (NULL == /*_._VALDATA___V686*/ meltfptr[685]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJPUTROUTCONST without initial environment @@ -20285,7 +20346,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_OBJPUTROUTCONST = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJPUTROUTCONST", (long) MELT_GET); - /*_.VALDATA___V686*/ meltfptr[685] = + /*_._VALDATA___V686*/ meltfptr[685] = (melt_ptr_t) meltsy_CLASS_OBJPUTROUTCONST; } /*endgetnamedsym CLASS_OBJPUTROUTCONST */ @@ -20293,7 +20354,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJPUTROUTCONSTNOTNULL */ - if (NULL == /*_.VALDATA___V690*/ meltfptr[689]) + if (NULL == /*_._VALDATA___V690*/ meltfptr[689]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJPUTROUTCONSTNOTNULL without initial environment @@ -20301,7 +20362,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_OBJPUTROUTCONSTNOTNULL = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJPUTROUTCONSTNOTNULL", (long) MELT_GET); - /*_.VALDATA___V690*/ meltfptr[689] = + /*_._VALDATA___V690*/ meltfptr[689] = (melt_ptr_t) meltsy_CLASS_OBJPUTROUTCONSTNOTNULL; } /*endgetnamedsym CLASS_OBJPUTROUTCONSTNOTNULL */ @@ -20309,7 +20370,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJPUTHOOKCONST */ - if (NULL == /*_.VALDATA___V694*/ meltfptr[693]) + if (NULL == /*_._VALDATA___V694*/ meltfptr[693]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJPUTHOOKCONST without initial environment @@ -20317,7 +20378,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_OBJPUTHOOKCONST = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJPUTHOOKCONST", (long) MELT_GET); - /*_.VALDATA___V694*/ meltfptr[693] = + /*_._VALDATA___V694*/ meltfptr[693] = (melt_ptr_t) meltsy_CLASS_OBJPUTHOOKCONST; } /*endgetnamedsym CLASS_OBJPUTHOOKCONST */ @@ -20325,7 +20386,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_BOUND_DATA */ - if (NULL == /*_.VALDATA___V696*/ meltfptr[695]) + if (NULL == /*_._VALDATA___V696*/ meltfptr[695]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_NREP_BOUND_DATA without initial environment @@ -20333,7 +20394,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_NREP_BOUND_DATA = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_NREP_BOUND_DATA", (long) MELT_GET); - /*_.VALDATA___V696*/ meltfptr[695] = + /*_._VALDATA___V696*/ meltfptr[695] = (melt_ptr_t) meltsy_CLASS_NREP_BOUND_DATA; } /*endgetnamedsym CLASS_NREP_BOUND_DATA */ @@ -20341,7 +20402,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJPUTHOOKDATA */ - if (NULL == /*_.VALDATA___V700*/ meltfptr[699]) + if (NULL == /*_._VALDATA___V700*/ meltfptr[699]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJPUTHOOKDATA without initial environment @@ -20349,7 +20410,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_OBJPUTHOOKDATA = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJPUTHOOKDATA", (long) MELT_GET); - /*_.VALDATA___V700*/ meltfptr[699] = + /*_._VALDATA___V700*/ meltfptr[699] = (melt_ptr_t) meltsy_CLASS_OBJPUTHOOKDATA; } /*endgetnamedsym CLASS_OBJPUTHOOKDATA */ @@ -20357,7 +20418,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJPUTXTRARESULT */ - if (NULL == /*_.VALDATA___V704*/ meltfptr[703]) + if (NULL == /*_._VALDATA___V704*/ meltfptr[703]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJPUTXTRARESULT without initial environment @@ -20365,7 +20426,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_OBJPUTXTRARESULT = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJPUTXTRARESULT", (long) MELT_GET); - /*_.VALDATA___V704*/ meltfptr[703] = + /*_._VALDATA___V704*/ meltfptr[703] = (melt_ptr_t) meltsy_CLASS_OBJPUTXTRARESULT; } /*endgetnamedsym CLASS_OBJPUTXTRARESULT */ @@ -20373,21 +20434,21 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJEXPV */ - if (NULL == /*_.VALDATA___V708*/ meltfptr[707]) + if (NULL == /*_._VALDATA___V708*/ meltfptr[707]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJEXPV without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_CLASS_OBJEXPV = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJEXPV", (long) MELT_GET); - /*_.VALDATA___V708*/ meltfptr[707] = (melt_ptr_t) meltsy_CLASS_OBJEXPV; + /*_._VALDATA___V708*/ meltfptr[707] = (melt_ptr_t) meltsy_CLASS_OBJEXPV; } /*endgetnamedsym CLASS_OBJEXPV */ /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJLOCATEDEXPV */ - if (NULL == /*_.VALDATA___V712*/ meltfptr[711]) + if (NULL == /*_._VALDATA___V712*/ meltfptr[711]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJLOCATEDEXPV without initial environment @@ -20395,7 +20456,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_OBJLOCATEDEXPV = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJLOCATEDEXPV", (long) MELT_GET); - /*_.VALDATA___V712*/ meltfptr[711] = + /*_._VALDATA___V712*/ meltfptr[711] = (melt_ptr_t) meltsy_CLASS_OBJLOCATEDEXPV; } /*endgetnamedsym CLASS_OBJLOCATEDEXPV */ @@ -20403,7 +20464,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJFINALRETURN */ - if (NULL == /*_.VALDATA___V722*/ meltfptr[721]) + if (NULL == /*_._VALDATA___V722*/ meltfptr[721]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJFINALRETURN without initial environment @@ -20411,7 +20472,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_OBJFINALRETURN = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJFINALRETURN", (long) MELT_GET); - /*_.VALDATA___V722*/ meltfptr[721] = + /*_._VALDATA___V722*/ meltfptr[721] = (melt_ptr_t) meltsy_CLASS_OBJFINALRETURN; } /*endgetnamedsym CLASS_OBJFINALRETURN */ @@ -20419,7 +20480,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:COMPARE_NAMED_ALPHA */ - if (NULL == /*_.VALDATA___V726*/ meltfptr[725]) + if (NULL == /*_._VALDATA___V726*/ meltfptr[725]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol COMPARE_NAMED_ALPHA without initial environment @@ -20427,7 +20488,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_COMPARE_NAMED_ALPHA = melthookproc_HOOK_NAMED_SYMBOL ("COMPARE_NAMED_ALPHA", (long) MELT_GET); - /*_.VALDATA___V726*/ meltfptr[725] = + /*_._VALDATA___V726*/ meltfptr[725] = (melt_ptr_t) meltsy_COMPARE_NAMED_ALPHA; } /*endgetnamedsym COMPARE_NAMED_ALPHA */ @@ -20435,7 +20496,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_ANY_MODULE_CONTEXT */ - if (NULL == /*_.VALDATA___V730*/ meltfptr[729]) + if (NULL == /*_._VALDATA___V730*/ meltfptr[729]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_ANY_MODULE_CONTEXT without initial environment @@ -20443,7 +20504,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_ANY_MODULE_CONTEXT = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_ANY_MODULE_CONTEXT", (long) MELT_GET); - /*_.VALDATA___V730*/ meltfptr[729] = + /*_._VALDATA___V730*/ meltfptr[729] = (melt_ptr_t) meltsy_CLASS_ANY_MODULE_CONTEXT; } /*endgetnamedsym CLASS_ANY_MODULE_CONTEXT */ @@ -20451,7 +20512,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_SECONDARY_C_FILE */ - if (NULL == /*_.VALDATA___V732*/ meltfptr[731]) + if (NULL == /*_._VALDATA___V732*/ meltfptr[731]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_SECONDARY_C_FILE without initial environment @@ -20459,7 +20520,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_SECONDARY_C_FILE = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_SECONDARY_C_FILE", (long) MELT_GET); - /*_.VALDATA___V732*/ meltfptr[731] = + /*_._VALDATA___V732*/ meltfptr[731] = (melt_ptr_t) meltsy_CLASS_SECONDARY_C_FILE; } /*endgetnamedsym CLASS_SECONDARY_C_FILE */ @@ -20467,63 +20528,65 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:SECFIL_MODNAM */ - if (NULL == /*_.VALDATA___V746*/ meltfptr[745]) + if (NULL == /*_._VALDATA___V746*/ meltfptr[745]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol SECFIL_MODNAM without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_SECFIL_MODNAM = melthookproc_HOOK_NAMED_SYMBOL ("SECFIL_MODNAM", (long) MELT_GET); - /*_.VALDATA___V746*/ meltfptr[745] = (melt_ptr_t) meltsy_SECFIL_MODNAM; + /*_._VALDATA___V746*/ meltfptr[745] = (melt_ptr_t) meltsy_SECFIL_MODNAM; } /*endgetnamedsym SECFIL_MODNAM */ /*^getnamedsymbol */ /*getnamedsym:SECFIL_PATH */ - if (NULL == /*_.VALDATA___V748*/ meltfptr[747]) + if (NULL == /*_._VALDATA___V748*/ meltfptr[747]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol SECFIL_PATH without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_SECFIL_PATH = melthookproc_HOOK_NAMED_SYMBOL ("SECFIL_PATH", (long) MELT_GET); - /*_.VALDATA___V748*/ meltfptr[747] = (melt_ptr_t) meltsy_SECFIL_PATH; + /*_._VALDATA___V748*/ meltfptr[747] = (melt_ptr_t) meltsy_SECFIL_PATH; } /*endgetnamedsym SECFIL_PATH */ /*^getnamedsymbol */ /*getnamedsym:SECFIL_DECLBUF */ - if (NULL == /*_.VALDATA___V750*/ meltfptr[749]) + if (NULL == /*_._VALDATA___V750*/ meltfptr[749]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol SECFIL_DECLBUF without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_SECFIL_DECLBUF = melthookproc_HOOK_NAMED_SYMBOL ("SECFIL_DECLBUF", (long) MELT_GET); - /*_.VALDATA___V750*/ meltfptr[749] = (melt_ptr_t) meltsy_SECFIL_DECLBUF; + /*_._VALDATA___V750*/ meltfptr[749] = + (melt_ptr_t) meltsy_SECFIL_DECLBUF; } /*endgetnamedsym SECFIL_DECLBUF */ /*^getnamedsymbol */ /*getnamedsym:SECFIL_IMPLBUF */ - if (NULL == /*_.VALDATA___V752*/ meltfptr[751]) + if (NULL == /*_._VALDATA___V752*/ meltfptr[751]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol SECFIL_IMPLBUF without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_SECFIL_IMPLBUF = melthookproc_HOOK_NAMED_SYMBOL ("SECFIL_IMPLBUF", (long) MELT_GET); - /*_.VALDATA___V752*/ meltfptr[751] = (melt_ptr_t) meltsy_SECFIL_IMPLBUF; + /*_._VALDATA___V752*/ meltfptr[751] = + (melt_ptr_t) meltsy_SECFIL_IMPLBUF; } /*endgetnamedsym SECFIL_IMPLBUF */ /*^getnamedsymbol */ /*getnamedsym:GENERATED_C_FILENAME */ - if (NULL == /*_.VALDATA___V754*/ meltfptr[753]) + if (NULL == /*_._VALDATA___V754*/ meltfptr[753]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol GENERATED_C_FILENAME without initial environment @@ -20531,7 +20594,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_GENERATED_C_FILENAME = melthookproc_HOOK_NAMED_SYMBOL ("GENERATED_C_FILENAME", (long) MELT_GET); - /*_.VALDATA___V754*/ meltfptr[753] = + /*_._VALDATA___V754*/ meltfptr[753] = (melt_ptr_t) meltsy_GENERATED_C_FILENAME; } /*endgetnamedsym GENERATED_C_FILENAME */ @@ -20539,63 +20602,63 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:DISCR */ - if (NULL == /*_.VALDATA___V759*/ meltfptr[758]) + if (NULL == /*_._VALDATA___V759*/ meltfptr[758]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol DISCR without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_DISCR = melthookproc_HOOK_NAMED_SYMBOL ("DISCR", (long) MELT_GET); - /*_.VALDATA___V759*/ meltfptr[758] = (melt_ptr_t) meltsy_DISCR; + /*_._VALDATA___V759*/ meltfptr[758] = (melt_ptr_t) meltsy_DISCR; } /*endgetnamedsym DISCR */ /*^getnamedsymbol */ /*getnamedsym:BASE */ - if (NULL == /*_.VALDATA___V762*/ meltfptr[761]) + if (NULL == /*_._VALDATA___V762*/ meltfptr[761]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol BASE without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_BASE = melthookproc_HOOK_NAMED_SYMBOL ("BASE", (long) MELT_GET); - /*_.VALDATA___V762*/ meltfptr[761] = (melt_ptr_t) meltsy_BASE; + /*_._VALDATA___V762*/ meltfptr[761] = (melt_ptr_t) meltsy_BASE; } /*endgetnamedsym BASE */ /*^getnamedsymbol */ /*getnamedsym:DIR */ - if (NULL == /*_.VALDATA___V765*/ meltfptr[764]) + if (NULL == /*_._VALDATA___V765*/ meltfptr[764]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol DIR without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_DIR = melthookproc_HOOK_NAMED_SYMBOL ("DIR", (long) MELT_GET); - /*_.VALDATA___V765*/ meltfptr[764] = (melt_ptr_t) meltsy_DIR; + /*_._VALDATA___V765*/ meltfptr[764] = (melt_ptr_t) meltsy_DIR; } /*endgetnamedsym DIR */ /*^getnamedsymbol */ /*getnamedsym:NUM */ - if (NULL == /*_.VALDATA___V768*/ meltfptr[767]) + if (NULL == /*_._VALDATA___V768*/ meltfptr[767]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol NUM without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_NUM = melthookproc_HOOK_NAMED_SYMBOL ("NUM", (long) MELT_GET); - /*_.VALDATA___V768*/ meltfptr[767] = (melt_ptr_t) meltsy_NUM; + /*_._VALDATA___V768*/ meltfptr[767] = (melt_ptr_t) meltsy_NUM; } /*endgetnamedsym NUM */ /*^getnamedsymbol */ /*getnamedsym:CLASS_RUNNING_EXTENSION_MODULE_CONTEXT */ - if (NULL == /*_.VALDATA___V787*/ meltfptr[786]) + if (NULL == /*_._VALDATA___V787*/ meltfptr[786]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_RUNNING_EXTENSION_MODULE_CONTEXT without initial environment @@ -20603,7 +20666,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_RUNNING_EXTENSION_MODULE_CONTEXT = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_RUNNING_EXTENSION_MODULE_CONTEXT", (long) MELT_GET); - /*_.VALDATA___V787*/ meltfptr[786] = + /*_._VALDATA___V787*/ meltfptr[786] = (melt_ptr_t) meltsy_CLASS_RUNNING_EXTENSION_MODULE_CONTEXT; } /*endgetnamedsym CLASS_RUNNING_EXTENSION_MODULE_CONTEXT */ @@ -20611,7 +20674,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:SYNTAX_TEST_GENERATOR */ - if (NULL == /*_.VALDATA___V789*/ meltfptr[788]) + if (NULL == /*_._VALDATA___V789*/ meltfptr[788]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol SYNTAX_TEST_GENERATOR without initial environment @@ -20619,7 +20682,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_SYNTAX_TEST_GENERATOR = melthookproc_HOOK_NAMED_SYMBOL ("SYNTAX_TEST_GENERATOR", (long) MELT_GET); - /*_.VALDATA___V789*/ meltfptr[788] = + /*_._VALDATA___V789*/ meltfptr[788] = (melt_ptr_t) meltsy_SYNTAX_TEST_GENERATOR; } /*endgetnamedsym SYNTAX_TEST_GENERATOR */ @@ -20627,105 +20690,106 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_SELECTOR */ - if (NULL == /*_.VALDATA___V791*/ meltfptr[790]) + if (NULL == /*_._VALDATA___V791*/ meltfptr[790]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_SELECTOR without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_CLASS_SELECTOR = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_SELECTOR", (long) MELT_GET); - /*_.VALDATA___V791*/ meltfptr[790] = (melt_ptr_t) meltsy_CLASS_SELECTOR; + /*_._VALDATA___V791*/ meltfptr[790] = + (melt_ptr_t) meltsy_CLASS_SELECTOR; } /*endgetnamedsym CLASS_SELECTOR */ /*^getnamedsymbol */ /*getnamedsym:RECV */ - if (NULL == /*_.VALDATA___V793*/ meltfptr[792]) + if (NULL == /*_._VALDATA___V793*/ meltfptr[792]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol RECV without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_RECV = melthookproc_HOOK_NAMED_SYMBOL ("RECV", (long) MELT_GET); - /*_.VALDATA___V793*/ meltfptr[792] = (melt_ptr_t) meltsy_RECV; + /*_._VALDATA___V793*/ meltfptr[792] = (melt_ptr_t) meltsy_RECV; } /*endgetnamedsym RECV */ /*^getnamedsymbol */ /*getnamedsym:GENDEV */ - if (NULL == /*_.VALDATA___V796*/ meltfptr[795]) + if (NULL == /*_._VALDATA___V796*/ meltfptr[795]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol GENDEV without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_GENDEV = melthookproc_HOOK_NAMED_SYMBOL ("GENDEV", (long) MELT_GET); - /*_.VALDATA___V796*/ meltfptr[795] = (melt_ptr_t) meltsy_GENDEV; + /*_._VALDATA___V796*/ meltfptr[795] = (melt_ptr_t) meltsy_GENDEV; } /*endgetnamedsym GENDEV */ /*^getnamedsymbol */ /*getnamedsym:SBUF */ - if (NULL == /*_.VALDATA___V799*/ meltfptr[798]) + if (NULL == /*_._VALDATA___V799*/ meltfptr[798]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol SBUF without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_SBUF = melthookproc_HOOK_NAMED_SYMBOL ("SBUF", (long) MELT_GET); - /*_.VALDATA___V799*/ meltfptr[798] = (melt_ptr_t) meltsy_SBUF; + /*_._VALDATA___V799*/ meltfptr[798] = (melt_ptr_t) meltsy_SBUF; } /*endgetnamedsym SBUF */ /*^getnamedsymbol */ /*getnamedsym:MODCTX */ - if (NULL == /*_.VALDATA___V802*/ meltfptr[801]) + if (NULL == /*_._VALDATA___V802*/ meltfptr[801]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol MODCTX without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_MODCTX = melthookproc_HOOK_NAMED_SYMBOL ("MODCTX", (long) MELT_GET); - /*_.VALDATA___V802*/ meltfptr[801] = (melt_ptr_t) meltsy_MODCTX; + /*_._VALDATA___V802*/ meltfptr[801] = (melt_ptr_t) meltsy_MODCTX; } /*endgetnamedsym MODCTX */ /*^getnamedsymbol */ /*getnamedsym:IX */ - if (NULL == /*_.VALDATA___V805*/ meltfptr[804]) + if (NULL == /*_._VALDATA___V805*/ meltfptr[804]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol IX without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_IX = melthookproc_HOOK_NAMED_SYMBOL ("IX", (long) MELT_GET); - /*_.VALDATA___V805*/ meltfptr[804] = (melt_ptr_t) meltsy_IX; + /*_._VALDATA___V805*/ meltfptr[804] = (melt_ptr_t) meltsy_IX; } /*endgetnamedsym IX */ /*^getnamedsymbol */ /*getnamedsym:CLASS_LOCATED */ - if (NULL == /*_.VALDATA___V813*/ meltfptr[812]) + if (NULL == /*_._VALDATA___V813*/ meltfptr[812]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_LOCATED without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_CLASS_LOCATED = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_LOCATED", (long) MELT_GET); - /*_.VALDATA___V813*/ meltfptr[812] = (melt_ptr_t) meltsy_CLASS_LOCATED; + /*_._VALDATA___V813*/ meltfptr[812] = (melt_ptr_t) meltsy_CLASS_LOCATED; } /*endgetnamedsym CLASS_LOCATED */ /*^getnamedsymbol */ /*getnamedsym:CLASS_SOURCE_GENERATOR_DEVICE */ - if (NULL == /*_.VALDATA___V815*/ meltfptr[814]) + if (NULL == /*_._VALDATA___V815*/ meltfptr[814]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_SOURCE_GENERATOR_DEVICE without initial environment @@ -20733,7 +20797,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_SOURCE_GENERATOR_DEVICE = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_SOURCE_GENERATOR_DEVICE", (long) MELT_GET); - /*_.VALDATA___V815*/ meltfptr[814] = + /*_._VALDATA___V815*/ meltfptr[814] = (melt_ptr_t) meltsy_CLASS_SOURCE_GENERATOR_DEVICE; } /*endgetnamedsym CLASS_SOURCE_GENERATOR_DEVICE */ @@ -20741,14 +20805,14 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_PRIMITIVE */ - if (NULL == /*_.VALDATA___V823*/ meltfptr[822]) + if (NULL == /*_._VALDATA___V823*/ meltfptr[822]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_PRIMITIVE without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_CLASS_PRIMITIVE = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_PRIMITIVE", (long) MELT_GET); - /*_.VALDATA___V823*/ meltfptr[822] = + /*_._VALDATA___V823*/ meltfptr[822] = (melt_ptr_t) meltsy_CLASS_PRIMITIVE; } /*endgetnamedsym CLASS_PRIMITIVE */ @@ -20756,7 +20820,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_SOURCE_DEFPRIMITIVE */ - if (NULL == /*_.VALDATA___V825*/ meltfptr[824]) + if (NULL == /*_._VALDATA___V825*/ meltfptr[824]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_SOURCE_DEFPRIMITIVE without initial environment @@ -20764,7 +20828,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_SOURCE_DEFPRIMITIVE = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_SOURCE_DEFPRIMITIVE", (long) MELT_GET); - /*_.VALDATA___V825*/ meltfptr[824] = + /*_._VALDATA___V825*/ meltfptr[824] = (melt_ptr_t) meltsy_CLASS_SOURCE_DEFPRIMITIVE; } /*endgetnamedsym CLASS_SOURCE_DEFPRIMITIVE */ @@ -20772,14 +20836,14 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:DISCR_MAP_OBJECTS */ - if (NULL == /*_.VALDATA___V827*/ meltfptr[826]) + if (NULL == /*_._VALDATA___V827*/ meltfptr[826]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol DISCR_MAP_OBJECTS without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_DISCR_MAP_OBJECTS = melthookproc_HOOK_NAMED_SYMBOL ("DISCR_MAP_OBJECTS", (long) MELT_GET); - /*_.VALDATA___V827*/ meltfptr[826] = + /*_._VALDATA___V827*/ meltfptr[826] = (melt_ptr_t) meltsy_DISCR_MAP_OBJECTS; } /*endgetnamedsym DISCR_MAP_OBJECTS */ @@ -20787,7 +20851,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_SOURCE_DEFCITERATOR */ - if (NULL == /*_.VALDATA___V831*/ meltfptr[830]) + if (NULL == /*_._VALDATA___V831*/ meltfptr[830]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_SOURCE_DEFCITERATOR without initial environment @@ -20795,7 +20859,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_SOURCE_DEFCITERATOR = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_SOURCE_DEFCITERATOR", (long) MELT_GET); - /*_.VALDATA___V831*/ meltfptr[830] = + /*_._VALDATA___V831*/ meltfptr[830] = (melt_ptr_t) meltsy_CLASS_SOURCE_DEFCITERATOR; } /*endgetnamedsym CLASS_SOURCE_DEFCITERATOR */ @@ -20803,28 +20867,29 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_CMATCHER */ - if (NULL == /*_.VALDATA___V837*/ meltfptr[836]) + if (NULL == /*_._VALDATA___V837*/ meltfptr[836]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_CMATCHER without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_CLASS_CMATCHER = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_CMATCHER", (long) MELT_GET); - /*_.VALDATA___V837*/ meltfptr[836] = (melt_ptr_t) meltsy_CLASS_CMATCHER; + /*_._VALDATA___V837*/ meltfptr[836] = + (melt_ptr_t) meltsy_CLASS_CMATCHER; } /*endgetnamedsym CLASS_CMATCHER */ /*^getnamedsymbol */ /*getnamedsym:CLASS_ANY_MATCHER */ - if (NULL == /*_.VALDATA___V839*/ meltfptr[838]) + if (NULL == /*_._VALDATA___V839*/ meltfptr[838]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_ANY_MATCHER without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_CLASS_ANY_MATCHER = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_ANY_MATCHER", (long) MELT_GET); - /*_.VALDATA___V839*/ meltfptr[838] = + /*_._VALDATA___V839*/ meltfptr[838] = (melt_ptr_t) meltsy_CLASS_ANY_MATCHER; } /*endgetnamedsym CLASS_ANY_MATCHER */ @@ -20832,7 +20897,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_SOURCE_DEFCMATCHER */ - if (NULL == /*_.VALDATA___V841*/ meltfptr[840]) + if (NULL == /*_._VALDATA___V841*/ meltfptr[840]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_SOURCE_DEFCMATCHER without initial environment @@ -20840,7 +20905,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_SOURCE_DEFCMATCHER = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_SOURCE_DEFCMATCHER", (long) MELT_GET); - /*_.VALDATA___V841*/ meltfptr[840] = + /*_._VALDATA___V841*/ meltfptr[840] = (melt_ptr_t) meltsy_CLASS_SOURCE_DEFCMATCHER; } /*endgetnamedsym CLASS_SOURCE_DEFCMATCHER */ @@ -20848,7 +20913,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_NORMALIZATION_CONTEXT */ - if (NULL == /*_.VALDATA___V848*/ meltfptr[847]) + if (NULL == /*_._VALDATA___V848*/ meltfptr[847]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_NORMALIZATION_CONTEXT without initial environment @@ -20856,7 +20921,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_NORMALIZATION_CONTEXT = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_NORMALIZATION_CONTEXT", (long) MELT_GET); - /*_.VALDATA___V848*/ meltfptr[847] = + /*_._VALDATA___V848*/ meltfptr[847] = (melt_ptr_t) meltsy_CLASS_NORMALIZATION_CONTEXT; } /*endgetnamedsym CLASS_NORMALIZATION_CONTEXT */ @@ -20864,14 +20929,14 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_ENVIRONMENT */ - if (NULL == /*_.VALDATA___V850*/ meltfptr[849]) + if (NULL == /*_._VALDATA___V850*/ meltfptr[849]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_ENVIRONMENT without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_CLASS_ENVIRONMENT = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_ENVIRONMENT", (long) MELT_GET); - /*_.VALDATA___V850*/ meltfptr[849] = + /*_._VALDATA___V850*/ meltfptr[849] = (melt_ptr_t) meltsy_CLASS_ENVIRONMENT; } /*endgetnamedsym CLASS_ENVIRONMENT */ @@ -20879,21 +20944,21 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_SOURCE */ - if (NULL == /*_.VALDATA___V852*/ meltfptr[851]) + if (NULL == /*_._VALDATA___V852*/ meltfptr[851]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_SOURCE without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_CLASS_SOURCE = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_SOURCE", (long) MELT_GET); - /*_.VALDATA___V852*/ meltfptr[851] = (melt_ptr_t) meltsy_CLASS_SOURCE; + /*_._VALDATA___V852*/ meltfptr[851] = (melt_ptr_t) meltsy_CLASS_SOURCE; } /*endgetnamedsym CLASS_SOURCE */ /*^getnamedsymbol */ /*getnamedsym:CLASS_SOURCE_UPDATE_CURRENT_MODULE_ENVIRONMENT_REFERENCE */ - if (NULL == /*_.VALDATA___V854*/ meltfptr[853]) + if (NULL == /*_._VALDATA___V854*/ meltfptr[853]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_SOURCE_UPDATE_CURRENT_MODULE_ENVIRONMENT_REFERENCE without initial environment @@ -20903,7 +20968,7 @@ melt_start_this_module (void *modargp_) melthookproc_HOOK_NAMED_SYMBOL ("CLASS_SOURCE_UPDATE_CURRENT_MODULE_ENVIRONMENT_REFERENCE", (long) MELT_GET); - /*_.VALDATA___V854*/ meltfptr[853] = + /*_._VALDATA___V854*/ meltfptr[853] = (melt_ptr_t) meltsy_CLASS_SOURCE_UPDATE_CURRENT_MODULE_ENVIRONMENT_REFERENCE; } /*endgetnamedsym CLASS_SOURCE_UPDATE_CURRENT_MODULE_ENVIRONMENT_REFERENCE */ @@ -20912,7 +20977,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_SOURCE_COMMENT */ - if (NULL == /*_.VALDATA___V856*/ meltfptr[855]) + if (NULL == /*_._VALDATA___V856*/ meltfptr[855]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_SOURCE_COMMENT without initial environment @@ -20920,7 +20985,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_SOURCE_COMMENT = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_SOURCE_COMMENT", (long) MELT_GET); - /*_.VALDATA___V856*/ meltfptr[855] = + /*_._VALDATA___V856*/ meltfptr[855] = (melt_ptr_t) meltsy_CLASS_SOURCE_COMMENT; } /*endgetnamedsym CLASS_SOURCE_COMMENT */ @@ -20928,21 +20993,21 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:NORMAL_EXP */ - if (NULL == /*_.VALDATA___V858*/ meltfptr[857]) + if (NULL == /*_._VALDATA___V858*/ meltfptr[857]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol NORMAL_EXP without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_NORMAL_EXP = melthookproc_HOOK_NAMED_SYMBOL ("NORMAL_EXP", (long) MELT_GET); - /*_.VALDATA___V858*/ meltfptr[857] = (melt_ptr_t) meltsy_NORMAL_EXP; + /*_._VALDATA___V858*/ meltfptr[857] = (melt_ptr_t) meltsy_NORMAL_EXP; } /*endgetnamedsym NORMAL_EXP */ /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_ANYPROC */ - if (NULL == /*_.VALDATA___V860*/ meltfptr[859]) + if (NULL == /*_._VALDATA___V860*/ meltfptr[859]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_NREP_ANYPROC without initial environment @@ -20950,7 +21015,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_NREP_ANYPROC = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_NREP_ANYPROC", (long) MELT_GET); - /*_.VALDATA___V860*/ meltfptr[859] = + /*_._VALDATA___V860*/ meltfptr[859] = (melt_ptr_t) meltsy_CLASS_NREP_ANYPROC; } /*endgetnamedsym CLASS_NREP_ANYPROC */ @@ -20958,14 +21023,14 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:WRAP_NORMAL_LET1 */ - if (NULL == /*_.VALDATA___V862*/ meltfptr[861]) + if (NULL == /*_._VALDATA___V862*/ meltfptr[861]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol WRAP_NORMAL_LET1 without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_WRAP_NORMAL_LET1 = melthookproc_HOOK_NAMED_SYMBOL ("WRAP_NORMAL_LET1", (long) MELT_GET); - /*_.VALDATA___V862*/ meltfptr[861] = + /*_._VALDATA___V862*/ meltfptr[861] = (melt_ptr_t) meltsy_WRAP_NORMAL_LET1; } /*endgetnamedsym WRAP_NORMAL_LET1 */ @@ -20973,7 +21038,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_INITPROC */ - if (NULL == /*_.VALDATA___V864*/ meltfptr[863]) + if (NULL == /*_._VALDATA___V864*/ meltfptr[863]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_NREP_INITPROC without initial environment @@ -20981,7 +21046,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_NREP_INITPROC = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_NREP_INITPROC", (long) MELT_GET); - /*_.VALDATA___V864*/ meltfptr[863] = + /*_._VALDATA___V864*/ meltfptr[863] = (melt_ptr_t) meltsy_CLASS_NREP_INITPROC; } /*endgetnamedsym CLASS_NREP_INITPROC */ @@ -20989,7 +21054,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_DATAHOOK */ - if (NULL == /*_.VALDATA___V868*/ meltfptr[867]) + if (NULL == /*_._VALDATA___V868*/ meltfptr[867]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_NREP_DATAHOOK without initial environment @@ -20997,7 +21062,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_NREP_DATAHOOK = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_NREP_DATAHOOK", (long) MELT_GET); - /*_.VALDATA___V868*/ meltfptr[867] = + /*_._VALDATA___V868*/ meltfptr[867] = (melt_ptr_t) meltsy_CLASS_NREP_DATAHOOK; } /*endgetnamedsym CLASS_NREP_DATAHOOK */ @@ -21005,14 +21070,14 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:COMPILE2OBJ_HOOK */ - if (NULL == /*_.VALDATA___V875*/ meltfptr[874]) + if (NULL == /*_._VALDATA___V875*/ meltfptr[874]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol COMPILE2OBJ_HOOK without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_COMPILE2OBJ_HOOK = melthookproc_HOOK_NAMED_SYMBOL ("COMPILE2OBJ_HOOK", (long) MELT_GET); - /*_.VALDATA___V875*/ meltfptr[874] = + /*_._VALDATA___V875*/ meltfptr[874] = (melt_ptr_t) meltsy_COMPILE2OBJ_HOOK; } /*endgetnamedsym COMPILE2OBJ_HOOK */ @@ -21020,7 +21085,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:COMPILE2OBJ_PROCEDURE */ - if (NULL == /*_.VALDATA___V877*/ meltfptr[876]) + if (NULL == /*_._VALDATA___V877*/ meltfptr[876]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol COMPILE2OBJ_PROCEDURE without initial environment @@ -21028,7 +21093,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_COMPILE2OBJ_PROCEDURE = melthookproc_HOOK_NAMED_SYMBOL ("COMPILE2OBJ_PROCEDURE", (long) MELT_GET); - /*_.VALDATA___V877*/ meltfptr[876] = + /*_._VALDATA___V877*/ meltfptr[876] = (melt_ptr_t) meltsy_COMPILE2OBJ_PROCEDURE; } /*endgetnamedsym COMPILE2OBJ_PROCEDURE */ @@ -21036,7 +21101,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_SOURCE_CHEADER */ - if (NULL == /*_.VALDATA___V879*/ meltfptr[878]) + if (NULL == /*_._VALDATA___V879*/ meltfptr[878]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_SOURCE_CHEADER without initial environment @@ -21044,7 +21109,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_SOURCE_CHEADER = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_SOURCE_CHEADER", (long) MELT_GET); - /*_.VALDATA___V879*/ meltfptr[878] = + /*_._VALDATA___V879*/ meltfptr[878] = (melt_ptr_t) meltsy_CLASS_SOURCE_CHEADER; } /*endgetnamedsym CLASS_SOURCE_CHEADER */ @@ -21052,7 +21117,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_SOURCE_CODE_STRING */ - if (NULL == /*_.VALDATA___V881*/ meltfptr[880]) + if (NULL == /*_._VALDATA___V881*/ meltfptr[880]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_SOURCE_CODE_STRING without initial environment @@ -21060,7 +21125,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_SOURCE_CODE_STRING = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_SOURCE_CODE_STRING", (long) MELT_GET); - /*_.VALDATA___V881*/ meltfptr[880] = + /*_._VALDATA___V881*/ meltfptr[880] = (melt_ptr_t) meltsy_CLASS_SOURCE_CODE_STRING; } /*endgetnamedsym CLASS_SOURCE_CODE_STRING */ @@ -21068,7 +21133,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_SOURCE_CIMPLEMENT */ - if (NULL == /*_.VALDATA___V883*/ meltfptr[882]) + if (NULL == /*_._VALDATA___V883*/ meltfptr[882]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_SOURCE_CIMPLEMENT without initial environment @@ -21076,7 +21141,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_SOURCE_CIMPLEMENT = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_SOURCE_CIMPLEMENT", (long) MELT_GET); - /*_.VALDATA___V883*/ meltfptr[882] = + /*_._VALDATA___V883*/ meltfptr[882] = (melt_ptr_t) meltsy_CLASS_SOURCE_CIMPLEMENT; } /*endgetnamedsym CLASS_SOURCE_CIMPLEMENT */ @@ -21084,7 +21149,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_MODULE_CONTEXT */ - if (NULL == /*_.VALDATA___V890*/ meltfptr[889]) + if (NULL == /*_._VALDATA___V890*/ meltfptr[889]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_MODULE_CONTEXT without initial environment @@ -21092,7 +21157,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_MODULE_CONTEXT = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_MODULE_CONTEXT", (long) MELT_GET); - /*_.VALDATA___V890*/ meltfptr[889] = + /*_._VALDATA___V890*/ meltfptr[889] = (melt_ptr_t) meltsy_CLASS_MODULE_CONTEXT; } /*endgetnamedsym CLASS_MODULE_CONTEXT */ @@ -21100,14 +21165,14 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:DISCR_MAP_STRINGS */ - if (NULL == /*_.VALDATA___V892*/ meltfptr[891]) + if (NULL == /*_._VALDATA___V892*/ meltfptr[891]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol DISCR_MAP_STRINGS without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_DISCR_MAP_STRINGS = melthookproc_HOOK_NAMED_SYMBOL ("DISCR_MAP_STRINGS", (long) MELT_GET); - /*_.VALDATA___V892*/ meltfptr[891] = + /*_._VALDATA___V892*/ meltfptr[891] = (melt_ptr_t) meltsy_DISCR_MAP_STRINGS; } /*endgetnamedsym DISCR_MAP_STRINGS */ @@ -21115,7 +21180,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CREATE_NORMCONTEXT */ - if (NULL == /*_.VALDATA___V894*/ meltfptr[893]) + if (NULL == /*_._VALDATA___V894*/ meltfptr[893]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CREATE_NORMCONTEXT without initial environment @@ -21123,7 +21188,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CREATE_NORMCONTEXT = melthookproc_HOOK_NAMED_SYMBOL ("CREATE_NORMCONTEXT", (long) MELT_GET); - /*_.VALDATA___V894*/ meltfptr[893] = + /*_._VALDATA___V894*/ meltfptr[893] = (melt_ptr_t) meltsy_CREATE_NORMCONTEXT; } /*endgetnamedsym CREATE_NORMCONTEXT */ @@ -21131,7 +21196,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:INITIAL_ENVIRONMENT */ - if (NULL == /*_.VALDATA___V896*/ meltfptr[895]) + if (NULL == /*_._VALDATA___V896*/ meltfptr[895]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol INITIAL_ENVIRONMENT without initial environment @@ -21139,7 +21204,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_INITIAL_ENVIRONMENT = melthookproc_HOOK_NAMED_SYMBOL ("INITIAL_ENVIRONMENT", (long) MELT_GET); - /*_.VALDATA___V896*/ meltfptr[895] = + /*_._VALDATA___V896*/ meltfptr[895] = (melt_ptr_t) meltsy_INITIAL_ENVIRONMENT; } /*endgetnamedsym INITIAL_ENVIRONMENT */ @@ -21147,7 +21212,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:MACROEXPAND_TOPLEVEL_LIST */ - if (NULL == /*_.VALDATA___V898*/ meltfptr[897]) + if (NULL == /*_._VALDATA___V898*/ meltfptr[897]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol MACROEXPAND_TOPLEVEL_LIST without initial environment @@ -21155,7 +21220,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_MACROEXPAND_TOPLEVEL_LIST = melthookproc_HOOK_NAMED_SYMBOL ("MACROEXPAND_TOPLEVEL_LIST", (long) MELT_GET); - /*_.VALDATA___V898*/ meltfptr[897] = + /*_._VALDATA___V898*/ meltfptr[897] = (melt_ptr_t) meltsy_MACROEXPAND_TOPLEVEL_LIST; } /*endgetnamedsym MACROEXPAND_TOPLEVEL_LIST */ @@ -21163,21 +21228,21 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:MACROEXPAND_1 */ - if (NULL == /*_.VALDATA___V900*/ meltfptr[899]) + if (NULL == /*_._VALDATA___V900*/ meltfptr[899]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol MACROEXPAND_1 without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_MACROEXPAND_1 = melthookproc_HOOK_NAMED_SYMBOL ("MACROEXPAND_1", (long) MELT_GET); - /*_.VALDATA___V900*/ meltfptr[899] = (melt_ptr_t) meltsy_MACROEXPAND_1; + /*_._VALDATA___V900*/ meltfptr[899] = (melt_ptr_t) meltsy_MACROEXPAND_1; } /*endgetnamedsym MACROEXPAND_1 */ /*^getnamedsymbol */ /*getnamedsym:COMPILE2OBJ_INITPROC */ - if (NULL == /*_.VALDATA___V902*/ meltfptr[901]) + if (NULL == /*_._VALDATA___V902*/ meltfptr[901]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol COMPILE2OBJ_INITPROC without initial environment @@ -21185,7 +21250,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_COMPILE2OBJ_INITPROC = melthookproc_HOOK_NAMED_SYMBOL ("COMPILE2OBJ_INITPROC", (long) MELT_GET); - /*_.VALDATA___V902*/ meltfptr[901] = + /*_._VALDATA___V902*/ meltfptr[901] = (melt_ptr_t) meltsy_COMPILE2OBJ_INITPROC; } /*endgetnamedsym COMPILE2OBJ_INITPROC */ @@ -21193,7 +21258,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:MELT_RUN_EXTENSION */ - if (NULL == /*_.VALDATA___V904*/ meltfptr[903]) + if (NULL == /*_._VALDATA___V904*/ meltfptr[903]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol MELT_RUN_EXTENSION without initial environment @@ -21201,7 +21266,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_MELT_RUN_EXTENSION = melthookproc_HOOK_NAMED_SYMBOL ("MELT_RUN_EXTENSION", (long) MELT_GET); - /*_.VALDATA___V904*/ meltfptr[903] = + /*_._VALDATA___V904*/ meltfptr[903] = (melt_ptr_t) meltsy_MELT_RUN_EXTENSION; } /*endgetnamedsym MELT_RUN_EXTENSION */ @@ -21209,77 +21274,77 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:BASENAME */ - if (NULL == /*_.VALDATA___V909*/ meltfptr[908]) + if (NULL == /*_._VALDATA___V909*/ meltfptr[908]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol BASENAME without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_BASENAME = melthookproc_HOOK_NAMED_SYMBOL ("BASENAME", (long) MELT_GET); - /*_.VALDATA___V909*/ meltfptr[908] = (melt_ptr_t) meltsy_BASENAME; + /*_._VALDATA___V909*/ meltfptr[908] = (melt_ptr_t) meltsy_BASENAME; } /*endgetnamedsym BASENAME */ /*^getnamedsymbol */ /*getnamedsym:ENV */ - if (NULL == /*_.VALDATA___V912*/ meltfptr[911]) + if (NULL == /*_._VALDATA___V912*/ meltfptr[911]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol ENV without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_ENV = melthookproc_HOOK_NAMED_SYMBOL ("ENV", (long) MELT_GET); - /*_.VALDATA___V912*/ meltfptr[911] = (melt_ptr_t) meltsy_ENV; + /*_._VALDATA___V912*/ meltfptr[911] = (melt_ptr_t) meltsy_ENV; } /*endgetnamedsym ENV */ /*^getnamedsymbol */ /*getnamedsym:LITVAL */ - if (NULL == /*_.VALDATA___V915*/ meltfptr[914]) + if (NULL == /*_._VALDATA___V915*/ meltfptr[914]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol LITVAL without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_LITVAL = melthookproc_HOOK_NAMED_SYMBOL ("LITVAL", (long) MELT_GET); - /*_.VALDATA___V915*/ meltfptr[914] = (melt_ptr_t) meltsy_LITVAL; + /*_._VALDATA___V915*/ meltfptr[914] = (melt_ptr_t) meltsy_LITVAL; } /*endgetnamedsym LITVAL */ /*^getnamedsymbol */ /*getnamedsym:CLONE_SYMBOL */ - if (NULL == /*_.VALDATA___V933*/ meltfptr[932]) + if (NULL == /*_._VALDATA___V933*/ meltfptr[932]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLONE_SYMBOL without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_CLONE_SYMBOL = melthookproc_HOOK_NAMED_SYMBOL ("CLONE_SYMBOL", (long) MELT_GET); - /*_.VALDATA___V933*/ meltfptr[932] = (melt_ptr_t) meltsy_CLONE_SYMBOL; + /*_._VALDATA___V933*/ meltfptr[932] = (melt_ptr_t) meltsy_CLONE_SYMBOL; } /*endgetnamedsym CLONE_SYMBOL */ /*^getnamedsymbol */ /*getnamedsym:RETAUTOBOXVAL */ - if (NULL == /*_.VALDATA___V924*/ meltfptr[923]) + if (NULL == /*_._VALDATA___V924*/ meltfptr[923]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol RETAUTOBOXVAL without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_RETAUTOBOXVAL = melthookproc_HOOK_NAMED_SYMBOL ("RETAUTOBOXVAL", (long) MELT_GET); - /*_.VALDATA___V924*/ meltfptr[923] = (melt_ptr_t) meltsy_RETAUTOBOXVAL; + /*_._VALDATA___V924*/ meltfptr[923] = (melt_ptr_t) meltsy_RETAUTOBOXVAL; } /*endgetnamedsym RETAUTOBOXVAL */ /*^getnamedsymbol */ /*getnamedsym:CLASS_NORMAL_LET_BINDING */ - if (NULL == /*_.VALDATA___V935*/ meltfptr[934]) + if (NULL == /*_._VALDATA___V935*/ meltfptr[934]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_NORMAL_LET_BINDING without initial environment @@ -21287,7 +21352,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_NORMAL_LET_BINDING = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_NORMAL_LET_BINDING", (long) MELT_GET); - /*_.VALDATA___V935*/ meltfptr[934] = + /*_._VALDATA___V935*/ meltfptr[934] = (melt_ptr_t) meltsy_CLASS_NORMAL_LET_BINDING; } /*endgetnamedsym CLASS_NORMAL_LET_BINDING */ @@ -21295,7 +21360,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_LOCSYMOCC */ - if (NULL == /*_.VALDATA___V937*/ meltfptr[936]) + if (NULL == /*_._VALDATA___V937*/ meltfptr[936]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_NREP_LOCSYMOCC without initial environment @@ -21303,7 +21368,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_NREP_LOCSYMOCC = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_NREP_LOCSYMOCC", (long) MELT_GET); - /*_.VALDATA___V937*/ meltfptr[936] = + /*_._VALDATA___V937*/ meltfptr[936] = (melt_ptr_t) meltsy_CLASS_NREP_LOCSYMOCC; } /*endgetnamedsym CLASS_NREP_LOCSYMOCC */ @@ -21311,14 +21376,14 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_RETURN */ - if (NULL == /*_.VALDATA___V939*/ meltfptr[938]) + if (NULL == /*_._VALDATA___V939*/ meltfptr[938]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_NREP_RETURN without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_CLASS_NREP_RETURN = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_NREP_RETURN", (long) MELT_GET); - /*_.VALDATA___V939*/ meltfptr[938] = + /*_._VALDATA___V939*/ meltfptr[938] = (melt_ptr_t) meltsy_CLASS_NREP_RETURN; } /*endgetnamedsym CLASS_NREP_RETURN */ @@ -21326,14 +21391,14 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_CHUNK */ - if (NULL == /*_.VALDATA___V941*/ meltfptr[940]) + if (NULL == /*_._VALDATA___V941*/ meltfptr[940]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_NREP_CHUNK without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_CLASS_NREP_CHUNK = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_NREP_CHUNK", (long) MELT_GET); - /*_.VALDATA___V941*/ meltfptr[940] = + /*_._VALDATA___V941*/ meltfptr[940] = (melt_ptr_t) meltsy_CLASS_NREP_CHUNK; } /*endgetnamedsym CLASS_NREP_CHUNK */ @@ -21341,28 +21406,28 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:AUTOBOXLONG */ - if (NULL == /*_.VALDATA___V926*/ meltfptr[925]) + if (NULL == /*_._VALDATA___V926*/ meltfptr[925]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol AUTOBOXLONG without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_AUTOBOXLONG = melthookproc_HOOK_NAMED_SYMBOL ("AUTOBOXLONG", (long) MELT_GET); - /*_.VALDATA___V926*/ meltfptr[925] = (melt_ptr_t) meltsy_AUTOBOXLONG; + /*_._VALDATA___V926*/ meltfptr[925] = (melt_ptr_t) meltsy_AUTOBOXLONG; } /*endgetnamedsym AUTOBOXLONG */ /*^getnamedsymbol */ /*getnamedsym:CLASS_LET_BINDING */ - if (NULL == /*_.VALDATA___V943*/ meltfptr[942]) + if (NULL == /*_._VALDATA___V943*/ meltfptr[942]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_LET_BINDING without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_CLASS_LET_BINDING = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_LET_BINDING", (long) MELT_GET); - /*_.VALDATA___V943*/ meltfptr[942] = + /*_._VALDATA___V943*/ meltfptr[942] = (melt_ptr_t) meltsy_CLASS_LET_BINDING; } /*endgetnamedsym CLASS_LET_BINDING */ @@ -21370,42 +21435,42 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CTYPE_CSTRING */ - if (NULL == /*_.VALDATA___V945*/ meltfptr[944]) + if (NULL == /*_._VALDATA___V945*/ meltfptr[944]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CTYPE_CSTRING without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_CTYPE_CSTRING = melthookproc_HOOK_NAMED_SYMBOL ("CTYPE_CSTRING", (long) MELT_GET); - /*_.VALDATA___V945*/ meltfptr[944] = (melt_ptr_t) meltsy_CTYPE_CSTRING; + /*_._VALDATA___V945*/ meltfptr[944] = (melt_ptr_t) meltsy_CTYPE_CSTRING; } /*endgetnamedsym CTYPE_CSTRING */ /*^getnamedsymbol */ /*getnamedsym:AUTOBOXSTRING */ - if (NULL == /*_.VALDATA___V928*/ meltfptr[927]) + if (NULL == /*_._VALDATA___V928*/ meltfptr[927]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol AUTOBOXSTRING without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_AUTOBOXSTRING = melthookproc_HOOK_NAMED_SYMBOL ("AUTOBOXSTRING", (long) MELT_GET); - /*_.VALDATA___V928*/ meltfptr[927] = (melt_ptr_t) meltsy_AUTOBOXSTRING; + /*_._VALDATA___V928*/ meltfptr[927] = (melt_ptr_t) meltsy_AUTOBOXSTRING; } /*endgetnamedsym AUTOBOXSTRING */ /*^getnamedsymbol */ /*getnamedsym:CLASS_CTYPE_GTY */ - if (NULL == /*_.VALDATA___V947*/ meltfptr[946]) + if (NULL == /*_._VALDATA___V947*/ meltfptr[946]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_CTYPE_GTY without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_CLASS_CTYPE_GTY = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_CTYPE_GTY", (long) MELT_GET); - /*_.VALDATA___V947*/ meltfptr[946] = + /*_._VALDATA___V947*/ meltfptr[946] = (melt_ptr_t) meltsy_CLASS_CTYPE_GTY; } /*endgetnamedsym CLASS_CTYPE_GTY */ @@ -21413,14 +21478,14 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:AUTOBOXGTY */ - if (NULL == /*_.VALDATA___V930*/ meltfptr[929]) + if (NULL == /*_._VALDATA___V930*/ meltfptr[929]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol AUTOBOXGTY without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_AUTOBOXGTY = melthookproc_HOOK_NAMED_SYMBOL ("AUTOBOXGTY", (long) MELT_GET); - /*_.VALDATA___V930*/ meltfptr[929] = (melt_ptr_t) meltsy_AUTOBOXGTY; + /*_._VALDATA___V930*/ meltfptr[929] = (melt_ptr_t) meltsy_AUTOBOXGTY; } /*endgetnamedsym AUTOBOXGTY */ @@ -21430,14 +21495,14 @@ melt_start_this_module (void *modargp_) melt_ptr_t kw_TRUE = melthookproc_HOOK_NAMED_KEYWORD ("TRUE", (long) MELT_GET); if (kw_TRUE) - /*_.VALDATA___V951*/ + /*_._VALDATA___V951*/ meltfptr[950] = (melt_ptr_t) kw_TRUE; } /*^getnamedsymbol */ /*getnamedsym:CREATE_NORMAL_EXTENDING_CONTEXT */ - if (NULL == /*_.VALDATA___V962*/ meltfptr[961]) + if (NULL == /*_._VALDATA___V962*/ meltfptr[961]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CREATE_NORMAL_EXTENDING_CONTEXT without initial environment @@ -21445,7 +21510,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CREATE_NORMAL_EXTENDING_CONTEXT = melthookproc_HOOK_NAMED_SYMBOL ("CREATE_NORMAL_EXTENDING_CONTEXT", (long) MELT_GET); - /*_.VALDATA___V962*/ meltfptr[961] = + /*_._VALDATA___V962*/ meltfptr[961] = (melt_ptr_t) meltsy_CREATE_NORMAL_EXTENDING_CONTEXT; } /*endgetnamedsym CREATE_NORMAL_EXTENDING_CONTEXT */ @@ -21453,21 +21518,21 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_SEXPR */ - if (NULL == /*_.VALDATA___V964*/ meltfptr[963]) + if (NULL == /*_._VALDATA___V964*/ meltfptr[963]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_SEXPR without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_CLASS_SEXPR = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_SEXPR", (long) MELT_GET); - /*_.VALDATA___V964*/ meltfptr[963] = (melt_ptr_t) meltsy_CLASS_SEXPR; + /*_._VALDATA___V964*/ meltfptr[963] = (melt_ptr_t) meltsy_CLASS_SEXPR; } /*endgetnamedsym CLASS_SEXPR */ /*^getnamedsymbol */ /*getnamedsym:COMPILE2OBJ_INITEXTENDPROC */ - if (NULL == /*_.VALDATA___V966*/ meltfptr[965]) + if (NULL == /*_._VALDATA___V966*/ meltfptr[965]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol COMPILE2OBJ_INITEXTENDPROC without initial environment @@ -21475,7 +21540,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_COMPILE2OBJ_INITEXTENDPROC = melthookproc_HOOK_NAMED_SYMBOL ("COMPILE2OBJ_INITEXTENDPROC", (long) MELT_GET); - /*_.VALDATA___V966*/ meltfptr[965] = + /*_._VALDATA___V966*/ meltfptr[965] = (melt_ptr_t) meltsy_COMPILE2OBJ_INITEXTENDPROC; } /*endgetnamedsym COMPILE2OBJ_INITEXTENDPROC */ @@ -21483,7 +21548,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_LITERAL_VALUE */ - if (NULL == /*_.VALDATA___V968*/ meltfptr[967]) + if (NULL == /*_._VALDATA___V968*/ meltfptr[967]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_LITERAL_VALUE without initial environment @@ -21491,7 +21556,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_LITERAL_VALUE = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_LITERAL_VALUE", (long) MELT_GET); - /*_.VALDATA___V968*/ meltfptr[967] = + /*_._VALDATA___V968*/ meltfptr[967] = (melt_ptr_t) meltsy_CLASS_LITERAL_VALUE; } /*endgetnamedsym CLASS_LITERAL_VALUE */ @@ -21499,14 +21564,14 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:LIST_APPEND2LIST */ - if (NULL == /*_.VALDATA___V972*/ meltfptr[971]) + if (NULL == /*_._VALDATA___V972*/ meltfptr[971]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol LIST_APPEND2LIST without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_LIST_APPEND2LIST = melthookproc_HOOK_NAMED_SYMBOL ("LIST_APPEND2LIST", (long) MELT_GET); - /*_.VALDATA___V972*/ meltfptr[971] = + /*_._VALDATA___V972*/ meltfptr[971] = (melt_ptr_t) meltsy_LIST_APPEND2LIST; } /*endgetnamedsym LIST_APPEND2LIST */ @@ -21514,7 +21579,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:COMPILE_LIST_SEXPR */ - if (NULL == /*_.VALDATA___V978*/ meltfptr[977]) + if (NULL == /*_._VALDATA___V978*/ meltfptr[977]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol COMPILE_LIST_SEXPR without initial environment @@ -21522,7 +21587,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_COMPILE_LIST_SEXPR = melthookproc_HOOK_NAMED_SYMBOL ("COMPILE_LIST_SEXPR", (long) MELT_GET); - /*_.VALDATA___V978*/ meltfptr[977] = + /*_._VALDATA___V978*/ meltfptr[977] = (melt_ptr_t) meltsy_COMPILE_LIST_SEXPR; } /*endgetnamedsym COMPILE_LIST_SEXPR */ @@ -21530,7 +21595,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:GENERATE_GPLV3PLUS_COPYRIGHT_NOTICE_C_COMMENT */ - if (NULL == /*_.VALDATA___V980*/ meltfptr[979]) + if (NULL == /*_._VALDATA___V980*/ meltfptr[979]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol GENERATE_GPLV3PLUS_COPYRIGHT_NOTICE_C_COMMENT without initial environment @@ -21538,7 +21603,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_GENERATE_GPLV3PLUS_COPYRIGHT_NOTICE_C_COMMENT = melthookproc_HOOK_NAMED_SYMBOL ("GENERATE_GPLV3PLUS_COPYRIGHT_NOTICE_C_COMMENT", (long) MELT_GET); - /*_.VALDATA___V980*/ meltfptr[979] = + /*_._VALDATA___V980*/ meltfptr[979] = (melt_ptr_t) meltsy_GENERATE_GPLV3PLUS_COPYRIGHT_NOTICE_C_COMMENT; } /*endgetnamedsym GENERATE_GPLV3PLUS_COPYRIGHT_NOTICE_C_COMMENT */ @@ -21546,7 +21611,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:GET_CODE_BUFFER_LIMIT */ - if (NULL == /*_.VALDATA___V982*/ meltfptr[981]) + if (NULL == /*_._VALDATA___V982*/ meltfptr[981]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol GET_CODE_BUFFER_LIMIT without initial environment @@ -21554,7 +21619,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_GET_CODE_BUFFER_LIMIT = melthookproc_HOOK_NAMED_SYMBOL ("GET_CODE_BUFFER_LIMIT", (long) MELT_GET); - /*_.VALDATA___V982*/ meltfptr[981] = + /*_._VALDATA___V982*/ meltfptr[981] = (melt_ptr_t) meltsy_GET_CODE_BUFFER_LIMIT; } /*endgetnamedsym GET_CODE_BUFFER_LIMIT */ @@ -21562,7 +21627,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:PUT_CODE_BUFFER_LIMIT */ - if (NULL == /*_.VALDATA___V984*/ meltfptr[983]) + if (NULL == /*_._VALDATA___V984*/ meltfptr[983]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol PUT_CODE_BUFFER_LIMIT without initial environment @@ -21570,7 +21635,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_PUT_CODE_BUFFER_LIMIT = melthookproc_HOOK_NAMED_SYMBOL ("PUT_CODE_BUFFER_LIMIT", (long) MELT_GET); - /*_.VALDATA___V984*/ meltfptr[983] = + /*_._VALDATA___V984*/ meltfptr[983] = (melt_ptr_t) meltsy_PUT_CODE_BUFFER_LIMIT; } /*endgetnamedsym PUT_CODE_BUFFER_LIMIT */ @@ -21578,7 +21643,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:TRANSLATE_TO_C_MODULE_MELT_SOURCES */ - if (NULL == /*_.VALDATA___V986*/ meltfptr[985]) + if (NULL == /*_._VALDATA___V986*/ meltfptr[985]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol TRANSLATE_TO_C_MODULE_MELT_SOURCES without initial environment @@ -21586,7 +21651,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_TRANSLATE_TO_C_MODULE_MELT_SOURCES = melthookproc_HOOK_NAMED_SYMBOL ("TRANSLATE_TO_C_MODULE_MELT_SOURCES", (long) MELT_GET); - /*_.VALDATA___V986*/ meltfptr[985] = + /*_._VALDATA___V986*/ meltfptr[985] = (melt_ptr_t) meltsy_TRANSLATE_TO_C_MODULE_MELT_SOURCES; } /*endgetnamedsym TRANSLATE_TO_C_MODULE_MELT_SOURCES */ @@ -21594,7 +21659,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:TRANSLATE_RUN_MELT_EXPRESSIONS */ - if (NULL == /*_.VALDATA___V988*/ meltfptr[987]) + if (NULL == /*_._VALDATA___V988*/ meltfptr[987]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol TRANSLATE_RUN_MELT_EXPRESSIONS without initial environment @@ -21602,7 +21667,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_TRANSLATE_RUN_MELT_EXPRESSIONS = melthookproc_HOOK_NAMED_SYMBOL ("TRANSLATE_RUN_MELT_EXPRESSIONS", (long) MELT_GET); - /*_.VALDATA___V988*/ meltfptr[987] = + /*_._VALDATA___V988*/ meltfptr[987] = (melt_ptr_t) meltsy_TRANSLATE_RUN_MELT_EXPRESSIONS; } /*endgetnamedsym TRANSLATE_RUN_MELT_EXPRESSIONS */ @@ -21617,7 +21682,7 @@ melt_start_this_module (void *modargp_) (melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (INITIAL_SYSTEM_DATA)))) /*=obj*/ ; melt_object_get_field (slot, obj, 8, "SYSDATA_VALUE_IMPORTER"); - /*_.VALIMPORT___V6*/ meltfptr[5] = slot; + /*_._VALIMPORT___V6*/ meltfptr[5] = slot; }; /*^comment */ @@ -21629,14 +21694,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_REFERENCE"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_REFERENCE__V7*/ meltfptr[6] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V190*/ meltfptr[189]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V190*/ meltfptr[189]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -21647,14 +21712,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "MELT_DEBUG_FUN"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V198*/ meltfptr[197]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V198*/ meltfptr[197]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -21665,14 +21730,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "DISCR_CONSTANT_INTEGER"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.DISCR_CONSTANT_INTEGER__V9*/ meltfptr[8] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V200*/ meltfptr[199]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V200*/ meltfptr[199]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -21683,14 +21748,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "REGISTER_OPTION"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.REGISTER_OPTION__V10*/ meltfptr[9] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V204*/ meltfptr[203]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V204*/ meltfptr[203]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -21701,14 +21766,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_NORMAL_MODULE_VARIABLE_BINDING"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_NORMAL_MODULE_VARIABLE_BINDING__V11*/ meltfptr[10] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V212*/ meltfptr[211]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V212*/ meltfptr[211]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -21719,14 +21784,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_ANY_BINDING"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_ANY_BINDING__V12*/ meltfptr[11] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V214*/ meltfptr[213]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V214*/ meltfptr[213]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -21737,14 +21802,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_CLONED_SYMBOL"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_CLONED_SYMBOL__V13*/ meltfptr[12] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V216*/ meltfptr[215]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V216*/ meltfptr[215]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -21755,14 +21820,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_NAMED"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_NAMED__V14*/ meltfptr[13] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V218*/ meltfptr[217]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V218*/ meltfptr[217]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -21773,14 +21838,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "ADD2OUT"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.ADD2OUT__V15*/ meltfptr[14] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V220*/ meltfptr[219]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V220*/ meltfptr[219]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -21791,14 +21856,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_SYMBOL"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_SYMBOL__V16*/ meltfptr[15] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V222*/ meltfptr[221]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V222*/ meltfptr[221]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -21809,14 +21874,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "INSTALL_METHOD"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.INSTALL_METHOD__V17*/ meltfptr[16] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V226*/ meltfptr[225]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V226*/ meltfptr[225]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -21827,14 +21892,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_ROOT"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_ROOT__V18*/ meltfptr[17] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V228*/ meltfptr[227]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V228*/ meltfptr[227]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -21845,14 +21910,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "OUTPUT_C_DECLINIT"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.OUTPUT_C_DECLINIT__V19*/ meltfptr[18] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V230*/ meltfptr[229]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V230*/ meltfptr[229]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -21863,14 +21928,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_OBJINITELEM"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_OBJINITELEM__V20*/ meltfptr[19] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V234*/ meltfptr[233]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V234*/ meltfptr[233]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -21881,14 +21946,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "OUTPUT_C_CODE"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.OUTPUT_C_CODE__V21*/ meltfptr[20] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V236*/ meltfptr[235]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V236*/ meltfptr[235]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -21899,14 +21964,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "OUTPUT_C_INITIAL_FILL"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.OUTPUT_C_INITIAL_FILL__V22*/ meltfptr[21] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V240*/ meltfptr[239]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V240*/ meltfptr[239]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -21917,14 +21982,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "OUTPUT_C_INITIAL_PREDEF"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.OUTPUT_C_INITIAL_PREDEF__V23*/ meltfptr[22] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V244*/ meltfptr[243]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V244*/ meltfptr[243]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -21935,14 +22000,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "OBPREDEF"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.OBPREDEF__V24*/ meltfptr[23] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V248*/ meltfptr[247]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V248*/ meltfptr[247]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -21953,14 +22018,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_OBJPREDEF"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_OBJPREDEF__V25*/ meltfptr[24] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V252*/ meltfptr[251]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V252*/ meltfptr[251]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -21971,14 +22036,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_OBJNIL"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_OBJNIL__V26*/ meltfptr[25] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V256*/ meltfptr[255]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V256*/ meltfptr[255]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -21989,14 +22054,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_OBJEXPANDPUREVAL"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_OBJEXPANDPUREVAL__V27*/ meltfptr[26] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V266*/ meltfptr[265]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V266*/ meltfptr[265]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -22007,14 +22072,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_OBJVALUE"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_OBJVALUE__V28*/ meltfptr[27] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V268*/ meltfptr[267]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V268*/ meltfptr[267]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -22025,14 +22090,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_CTYPE"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_CTYPE__V29*/ meltfptr[28] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V270*/ meltfptr[269]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V270*/ meltfptr[269]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -22043,14 +22108,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CTYPE_VOID"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CTYPE_VOID__V30*/ meltfptr[29] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V272*/ meltfptr[271]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V272*/ meltfptr[271]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -22061,14 +22126,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_OBJHOOKNTH"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_OBJHOOKNTH__V31*/ meltfptr[30] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V276*/ meltfptr[275]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V276*/ meltfptr[275]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -22079,14 +22144,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CTYPE_VALUE"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CTYPE_VALUE__V32*/ meltfptr[31] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V278*/ meltfptr[277]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V278*/ meltfptr[277]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -22097,14 +22162,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_OBJINITOBJECT"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_OBJINITOBJECT__V33*/ meltfptr[32] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V282*/ meltfptr[281]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V282*/ meltfptr[281]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -22115,14 +22180,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_NREP_DATAINSTANCE"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_NREP_DATAINSTANCE__V34*/ meltfptr[33] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V286*/ meltfptr[285]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V286*/ meltfptr[285]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -22133,14 +22198,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_CLASS"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_CLASS__V35*/ meltfptr[34] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V288*/ meltfptr[287]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V288*/ meltfptr[287]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -22151,14 +22216,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_OBJINITUNIQUEOBJECT"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_OBJINITUNIQUEOBJECT__V36*/ meltfptr[35] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V290*/ meltfptr[289]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V290*/ meltfptr[289]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -22169,14 +22234,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_NREP_NIL"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_NREP_NIL__V37*/ meltfptr[36] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V294*/ meltfptr[293]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V294*/ meltfptr[293]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -22187,14 +22252,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_OBJINITHOOK"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_OBJINITHOOK__V38*/ meltfptr[37] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V298*/ meltfptr[297]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V298*/ meltfptr[297]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -22205,14 +22270,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_NREP"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_NREP__V39*/ meltfptr[38] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V300*/ meltfptr[299]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V300*/ meltfptr[299]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -22223,14 +22288,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_OBJINITMULTIPLE"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_OBJINITMULTIPLE__V40*/ meltfptr[39] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V304*/ meltfptr[303]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V304*/ meltfptr[303]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -22241,14 +22306,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_OBJINITCLOSURE"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_OBJINITCLOSURE__V41*/ meltfptr[40] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V310*/ meltfptr[309]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V310*/ meltfptr[309]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -22259,14 +22324,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_OBJINITROUTINE"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_OBJINITROUTINE__V42*/ meltfptr[41] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V316*/ meltfptr[315]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V316*/ meltfptr[315]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -22277,14 +22342,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_NREP_DATAROUTINE"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_NREP_DATAROUTINE__V43*/ meltfptr[42] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V320*/ meltfptr[319]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V320*/ meltfptr[319]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -22295,14 +22360,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_NREP_ROUTPROC"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_NREP_ROUTPROC__V44*/ meltfptr[43] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V322*/ meltfptr[321]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V322*/ meltfptr[321]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -22313,14 +22378,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_NREP_HOOKPROC"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_NREP_HOOKPROC__V45*/ meltfptr[44] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V328*/ meltfptr[327]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V328*/ meltfptr[327]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -22331,14 +22396,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_OBJINITSTRING"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_OBJINITSTRING__V46*/ meltfptr[45] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V332*/ meltfptr[331]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V332*/ meltfptr[331]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -22349,14 +22414,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_OBJINITBOXINTEGER"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_OBJINITBOXINTEGER__V47*/ meltfptr[46] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V338*/ meltfptr[337]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V338*/ meltfptr[337]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -22367,14 +22432,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_OBJINITPAIR"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_OBJINITPAIR__V48*/ meltfptr[47] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V344*/ meltfptr[343]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V344*/ meltfptr[343]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -22385,14 +22450,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_OBJINITLIST"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_OBJINITLIST__V49*/ meltfptr[48] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V350*/ meltfptr[349]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V350*/ meltfptr[349]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -22403,14 +22468,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "DISCR_ANY_RECEIVER"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.DISCR_ANY_RECEIVER__V50*/ meltfptr[49] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V356*/ meltfptr[355]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V356*/ meltfptr[355]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -22421,14 +22486,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "DISCR_NULL_RECEIVER"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.DISCR_NULL_RECEIVER__V51*/ meltfptr[50] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V360*/ meltfptr[359]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V360*/ meltfptr[359]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -22439,14 +22504,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "DISPLAY_DEBUG_MESSAGE"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.DISPLAY_DEBUG_MESSAGE__V52*/ meltfptr[51] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V364*/ meltfptr[363]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V364*/ meltfptr[363]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -22457,14 +22522,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "DISCR_INTEGER"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.DISCR_INTEGER__V53*/ meltfptr[52] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V372*/ meltfptr[371]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V372*/ meltfptr[371]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -22475,14 +22540,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "DISCR_STRING"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.DISCR_STRING__V54*/ meltfptr[53] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V374*/ meltfptr[373]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V374*/ meltfptr[373]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -22493,14 +22558,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_INITIAL_EXTENSION_ROUTINEOBJ"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_INITIAL_EXTENSION_ROUTINEOBJ__V55*/ meltfptr[54] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V379*/ meltfptr[378]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V379*/ meltfptr[378]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -22511,14 +22576,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_INITIALROUTINEOBJ"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_INITIALROUTINEOBJ__V56*/ meltfptr[55] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V381*/ meltfptr[380]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V381*/ meltfptr[380]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -22529,14 +22594,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "LIST_EVERY"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.LIST_EVERY__V57*/ meltfptr[56] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V383*/ meltfptr[382]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V383*/ meltfptr[382]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -22547,14 +22612,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_OBJLOCV"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_OBJLOCV__V58*/ meltfptr[57] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V385*/ meltfptr[384]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V385*/ meltfptr[384]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -22565,14 +22630,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_ROUTINEOBJ"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_ROUTINEOBJ__V59*/ meltfptr[58] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V390*/ meltfptr[389]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V390*/ meltfptr[389]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -22583,14 +22648,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_PROCROUTINEOBJ"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_PROCROUTINEOBJ__V60*/ meltfptr[59] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V392*/ meltfptr[391]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V392*/ meltfptr[391]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -22601,14 +22666,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_HOOKROUTINEOBJ"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_HOOKROUTINEOBJ__V61*/ meltfptr[60] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V396*/ meltfptr[395]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V396*/ meltfptr[395]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -22619,14 +22684,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "VARIADIC_INDEX_IDSTR"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.VARIADIC_INDEX_IDSTR__V62*/ meltfptr[61] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V402*/ meltfptr[401]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V402*/ meltfptr[401]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -22637,14 +22702,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "VARIADIC_LENGTH_IDSTR"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.VARIADIC_LENGTH_IDSTR__V63*/ meltfptr[62] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V404*/ meltfptr[403]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V404*/ meltfptr[403]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -22655,14 +22720,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_OBJPUREVALUE"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_OBJPUREVALUE__V64*/ meltfptr[63] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V406*/ meltfptr[405]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V406*/ meltfptr[405]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -22673,14 +22738,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_INITIAL_MODULE_ROUTINEOBJ"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_INITIAL_MODULE_ROUTINEOBJ__V65*/ meltfptr[64] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V417*/ meltfptr[416]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V417*/ meltfptr[416]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -22691,14 +22756,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "DISCR_LIST"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.DISCR_LIST__V66*/ meltfptr[65] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V419*/ meltfptr[418]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V419*/ meltfptr[418]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -22709,14 +22774,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "LIST_TO_MULTIPLE"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.LIST_TO_MULTIPLE__V67*/ meltfptr[66] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V421*/ meltfptr[420]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V421*/ meltfptr[420]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -22727,14 +22792,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "DISCR_MULTIPLE"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.DISCR_MULTIPLE__V68*/ meltfptr[67] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V423*/ meltfptr[422]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V423*/ meltfptr[422]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -22745,14 +22810,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "DISCR_STRBUF"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.DISCR_STRBUF__V69*/ meltfptr[68] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V425*/ meltfptr[424]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V425*/ meltfptr[424]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -22763,14 +22828,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_OBJINSTR"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_OBJINSTR__V70*/ meltfptr[69] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V427*/ meltfptr[426]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V427*/ meltfptr[426]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -22781,14 +22846,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_OBJCFORMAL"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_OBJCFORMAL__V71*/ meltfptr[70] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V431*/ meltfptr[430]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V431*/ meltfptr[430]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -22799,14 +22864,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_OBJGETARG"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_OBJGETARG__V72*/ meltfptr[71] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V440*/ meltfptr[439]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V440*/ meltfptr[439]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -22817,14 +22882,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_FORMAL_BINDING"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_FORMAL_BINDING__V73*/ meltfptr[72] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V442*/ meltfptr[441]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V442*/ meltfptr[441]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -22835,14 +22900,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_OBJGETARGREST"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_OBJGETARGREST__V74*/ meltfptr[73] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V446*/ meltfptr[445]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V446*/ meltfptr[445]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -22853,14 +22918,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_OBJFETCHMODVAR"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_OBJFETCHMODVAR__V75*/ meltfptr[74] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V452*/ meltfptr[451]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V452*/ meltfptr[451]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -22871,14 +22936,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_OBJPUTMODVAR"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_OBJPUTMODVAR__V76*/ meltfptr[75] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V456*/ meltfptr[455]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V456*/ meltfptr[455]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -22889,14 +22954,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_OBJPUTOUTARG"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_OBJPUTOUTARG__V77*/ meltfptr[76] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V460*/ meltfptr[459]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V460*/ meltfptr[459]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -22907,14 +22972,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CTYPE_LONG"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CTYPE_LONG__V78*/ meltfptr[77] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V464*/ meltfptr[463]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V464*/ meltfptr[463]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -22925,14 +22990,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_OBJCLOCCV"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_OBJCLOCCV__V79*/ meltfptr[78] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V468*/ meltfptr[467]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V468*/ meltfptr[467]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -22943,14 +23008,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_OBJCLOHOOKV"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_OBJCLOHOOKV__V80*/ meltfptr[79] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V472*/ meltfptr[471]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V472*/ meltfptr[471]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -22961,14 +23026,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_OBJCONSTV"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_OBJCONSTV__V81*/ meltfptr[80] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V476*/ meltfptr[475]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V476*/ meltfptr[475]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -22979,14 +23044,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_OBJPLAINBLOCK"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_OBJPLAINBLOCK__V82*/ meltfptr[81] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V480*/ meltfptr[479]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V480*/ meltfptr[479]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -22997,14 +23062,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_OBJCHECKSIGNAL"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_OBJCHECKSIGNAL__V83*/ meltfptr[82] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V484*/ meltfptr[483]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V484*/ meltfptr[483]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -23015,14 +23080,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_OBJANYBLOCK"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_OBJANYBLOCK__V84*/ meltfptr[83] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V488*/ meltfptr[487]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V488*/ meltfptr[487]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -23033,14 +23098,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_OBJFLAG"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_OBJFLAG__V85*/ meltfptr[84] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V492*/ meltfptr[491]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V492*/ meltfptr[491]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -23051,14 +23116,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_OBJMATCHFLAGBLOCK"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_OBJMATCHFLAGBLOCK__V86*/ meltfptr[85] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V496*/ meltfptr[495]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V496*/ meltfptr[495]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -23069,14 +23134,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_OBJMULTIALLOCBLOCK"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_OBJMULTIALLOCBLOCK__V87*/ meltfptr[86] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V500*/ meltfptr[499]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V500*/ meltfptr[499]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -23087,14 +23152,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "DISCR_VERBATIM_STRING"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.DISCR_VERBATIM_STRING__V88*/ meltfptr[87] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V502*/ meltfptr[501]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V502*/ meltfptr[501]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -23105,14 +23170,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_OBJCITERBLOCK"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_OBJCITERBLOCK__V89*/ meltfptr[88] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V506*/ meltfptr[505]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V506*/ meltfptr[505]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -23123,14 +23188,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_CITERATOR"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_CITERATOR__V90*/ meltfptr[89] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V508*/ meltfptr[507]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V508*/ meltfptr[507]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -23141,14 +23206,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_OBJCOMMENTINSTR"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_OBJCOMMENTINSTR__V91*/ meltfptr[90] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V512*/ meltfptr[511]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V512*/ meltfptr[511]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -23159,14 +23224,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_OBJCOMMENTEDBLOCK"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_OBJCOMMENTEDBLOCK__V92*/ meltfptr[91] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V516*/ meltfptr[515]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V516*/ meltfptr[515]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -23177,14 +23242,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_OBJLABELINSTR"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_OBJLABELINSTR__V93*/ meltfptr[92] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V524*/ meltfptr[523]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V524*/ meltfptr[523]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -23195,14 +23260,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "SET_CONTENT"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.SET_CONTENT__V94*/ meltfptr[93] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V526*/ meltfptr[525]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V526*/ meltfptr[525]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -23213,14 +23278,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "STRING4OUT"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.STRING4OUT__V95*/ meltfptr[94] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V528*/ meltfptr[527]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V528*/ meltfptr[527]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -23231,14 +23296,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_OBJGOTOINSTR"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_OBJGOTOINSTR__V96*/ meltfptr[95] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V532*/ meltfptr[531]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V532*/ meltfptr[531]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -23249,14 +23314,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_OBJLOOP"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_OBJLOOP__V97*/ meltfptr[96] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V540*/ meltfptr[539]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V540*/ meltfptr[539]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -23267,14 +23332,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_OBJEXIT"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_OBJEXIT__V98*/ meltfptr[97] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V544*/ meltfptr[543]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V544*/ meltfptr[543]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -23285,14 +23350,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_OBJAGAIN"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_OBJAGAIN__V99*/ meltfptr[98] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V548*/ meltfptr[547]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V548*/ meltfptr[547]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -23303,14 +23368,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_OBJCOMPUTE"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_OBJCOMPUTE__V100*/ meltfptr[99] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V555*/ meltfptr[554]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V555*/ meltfptr[554]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -23321,14 +23386,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "MULTIPLE_EVERY"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.MULTIPLE_EVERY__V101*/ meltfptr[100] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V557*/ meltfptr[556]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V557*/ meltfptr[556]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -23339,14 +23404,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_OBJCOND"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_OBJCOND__V102*/ meltfptr[101] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V561*/ meltfptr[560]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V561*/ meltfptr[560]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -23357,14 +23422,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_OBJCPPIF"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_OBJCPPIF__V103*/ meltfptr[102] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V565*/ meltfptr[564]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V565*/ meltfptr[564]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -23375,14 +23440,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_OBJINTERNSYMBOL"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_OBJINTERNSYMBOL__V104*/ meltfptr[103] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V569*/ meltfptr[568]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V569*/ meltfptr[568]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -23393,14 +23458,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_NREP_DATASYMBOL"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_NREP_DATASYMBOL__V105*/ meltfptr[104] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V571*/ meltfptr[570]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V571*/ meltfptr[570]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -23411,14 +23476,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_OBJINTERNKEYWORD"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_OBJINTERNKEYWORD__V106*/ meltfptr[105] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V575*/ meltfptr[574]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V575*/ meltfptr[574]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -23429,14 +23494,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_NREP_DATAKEYWORD"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_NREP_DATAKEYWORD__V107*/ meltfptr[106] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V577*/ meltfptr[576]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V577*/ meltfptr[576]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -23447,14 +23512,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_OBJGETNAMEDSYMBOL"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_OBJGETNAMEDSYMBOL__V108*/ meltfptr[107] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V581*/ meltfptr[580]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V581*/ meltfptr[580]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -23465,14 +23530,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_OBJGETNAMEDKEYWORD"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_OBJGETNAMEDKEYWORD__V109*/ meltfptr[108] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V585*/ meltfptr[584]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V585*/ meltfptr[584]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -23483,14 +23548,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_OBJAPPLY"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_OBJAPPLY__V110*/ meltfptr[109] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V591*/ meltfptr[590]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V591*/ meltfptr[590]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -23501,14 +23566,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "GET_CTYPE"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.GET_CTYPE__V111*/ meltfptr[110] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V593*/ meltfptr[592]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V593*/ meltfptr[592]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -23519,14 +23584,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_OBJMSEND"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_OBJMSEND__V112*/ meltfptr[111] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V598*/ meltfptr[597]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V598*/ meltfptr[597]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -23537,14 +23602,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_OBJMULTIAPPLY"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_OBJMULTIAPPLY__V113*/ meltfptr[112] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V607*/ meltfptr[606]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V607*/ meltfptr[606]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -23555,14 +23620,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_OBJMULTIMSEND"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_OBJMULTIMSEND__V114*/ meltfptr[113] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V616*/ meltfptr[615]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V616*/ meltfptr[615]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -23573,14 +23638,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_OBJCLEAR"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_OBJCLEAR__V115*/ meltfptr[114] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V620*/ meltfptr[619]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V620*/ meltfptr[619]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -23591,14 +23656,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_OBJRAWALLOCOBJ"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_OBJRAWALLOCOBJ__V116*/ meltfptr[115] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V624*/ meltfptr[623]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V624*/ meltfptr[623]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -23609,14 +23674,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_OBJNEWCLOSURE"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_OBJNEWCLOSURE__V117*/ meltfptr[116] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V629*/ meltfptr[628]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V629*/ meltfptr[628]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -23627,14 +23692,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_OBJTOUCH"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_OBJTOUCH__V118*/ meltfptr[117] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V633*/ meltfptr[632]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V633*/ meltfptr[632]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -23645,14 +23710,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_OBJDBGTRACEWRITEOBJ"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_OBJDBGTRACEWRITEOBJ__V119*/ meltfptr[118] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V637*/ meltfptr[636]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V637*/ meltfptr[636]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -23663,14 +23728,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_OBJPUTUPLE"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_OBJPUTUPLE__V120*/ meltfptr[119] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V641*/ meltfptr[640]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V641*/ meltfptr[640]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -23681,14 +23746,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_OBJPUTPAIR"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_OBJPUTPAIR__V121*/ meltfptr[120] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V649*/ meltfptr[648]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V649*/ meltfptr[648]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -23699,14 +23764,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_OBJPUTPAIRHEAD"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_OBJPUTPAIRHEAD__V122*/ meltfptr[121] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V651*/ meltfptr[650]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V651*/ meltfptr[650]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -23717,14 +23782,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_OBJPUTPAIRTAIL"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_OBJPUTPAIRTAIL__V123*/ meltfptr[122] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V655*/ meltfptr[654]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V655*/ meltfptr[654]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -23735,14 +23800,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_OBJPUTLIST"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_OBJPUTLIST__V124*/ meltfptr[123] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V659*/ meltfptr[658]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V659*/ meltfptr[658]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -23753,14 +23818,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_OBJGETSLOT"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_OBJGETSLOT__V125*/ meltfptr[124] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V664*/ meltfptr[663]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V664*/ meltfptr[663]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -23771,14 +23836,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_FIELD"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_FIELD__V126*/ meltfptr[125] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V666*/ meltfptr[665]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V666*/ meltfptr[665]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -23789,14 +23854,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_OBJPUTSLOT"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_OBJPUTSLOT__V127*/ meltfptr[126] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V670*/ meltfptr[669]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V670*/ meltfptr[669]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -23807,14 +23872,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_OBJPUTCLOSUROUT"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_OBJPUTCLOSUROUT__V128*/ meltfptr[127] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V674*/ meltfptr[673]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V674*/ meltfptr[673]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -23825,14 +23890,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_OBJPUTCLOSEDV"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_OBJPUTCLOSEDV__V129*/ meltfptr[128] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V678*/ meltfptr[677]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V678*/ meltfptr[677]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -23843,14 +23908,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_OBJPUTCLOSEDNOTNULLV"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_OBJPUTCLOSEDNOTNULLV__V130*/ meltfptr[129] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V682*/ meltfptr[681]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V682*/ meltfptr[681]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -23861,14 +23926,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_OBJPUTROUTCONST"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_OBJPUTROUTCONST__V131*/ meltfptr[130] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V686*/ meltfptr[685]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V686*/ meltfptr[685]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -23879,14 +23944,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_OBJPUTROUTCONSTNOTNULL"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_OBJPUTROUTCONSTNOTNULL__V132*/ meltfptr[131] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V690*/ meltfptr[689]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V690*/ meltfptr[689]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -23897,14 +23962,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_OBJPUTHOOKCONST"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_OBJPUTHOOKCONST__V133*/ meltfptr[132] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V694*/ meltfptr[693]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V694*/ meltfptr[693]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -23915,14 +23980,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_NREP_BOUND_DATA"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_NREP_BOUND_DATA__V134*/ meltfptr[133] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V696*/ meltfptr[695]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V696*/ meltfptr[695]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -23933,14 +23998,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_OBJPUTHOOKDATA"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_OBJPUTHOOKDATA__V135*/ meltfptr[134] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V700*/ meltfptr[699]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V700*/ meltfptr[699]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -23951,14 +24016,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_OBJPUTXTRARESULT"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_OBJPUTXTRARESULT__V136*/ meltfptr[135] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V704*/ meltfptr[703]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V704*/ meltfptr[703]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -23969,14 +24034,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_OBJEXPV"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_OBJEXPV__V137*/ meltfptr[136] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V708*/ meltfptr[707]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V708*/ meltfptr[707]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -23987,14 +24052,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_OBJLOCATEDEXPV"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_OBJLOCATEDEXPV__V138*/ meltfptr[137] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V712*/ meltfptr[711]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V712*/ meltfptr[711]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -24005,14 +24070,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_OBJFINALRETURN"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_OBJFINALRETURN__V139*/ meltfptr[138] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V722*/ meltfptr[721]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V722*/ meltfptr[721]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -24023,14 +24088,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "COMPARE_NAMED_ALPHA"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.COMPARE_NAMED_ALPHA__V140*/ meltfptr[139] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V726*/ meltfptr[725]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V726*/ meltfptr[725]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -24041,14 +24106,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_ANY_MODULE_CONTEXT"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_ANY_MODULE_CONTEXT__V141*/ meltfptr[140] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V730*/ meltfptr[729]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V730*/ meltfptr[729]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -24059,14 +24124,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_RUNNING_EXTENSION_MODULE_CONTEXT"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_RUNNING_EXTENSION_MODULE_CONTEXT__V142*/ meltfptr[141] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V787*/ meltfptr[786]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V787*/ meltfptr[786]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -24077,14 +24142,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_SELECTOR"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_SELECTOR__V143*/ meltfptr[142] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V791*/ meltfptr[790]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V791*/ meltfptr[790]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -24095,14 +24160,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_LOCATED"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_LOCATED__V144*/ meltfptr[143] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V813*/ meltfptr[812]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V813*/ meltfptr[812]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -24113,14 +24178,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_SOURCE_GENERATOR_DEVICE"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_SOURCE_GENERATOR_DEVICE__V145*/ meltfptr[144] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V815*/ meltfptr[814]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V815*/ meltfptr[814]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -24131,14 +24196,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_PRIMITIVE"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_PRIMITIVE__V146*/ meltfptr[145] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V823*/ meltfptr[822]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V823*/ meltfptr[822]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -24149,14 +24214,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_SOURCE_DEFPRIMITIVE"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_SOURCE_DEFPRIMITIVE__V147*/ meltfptr[146] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V825*/ meltfptr[824]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V825*/ meltfptr[824]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -24167,14 +24232,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "DISCR_MAP_OBJECTS"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.DISCR_MAP_OBJECTS__V148*/ meltfptr[147] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V827*/ meltfptr[826]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V827*/ meltfptr[826]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -24185,14 +24250,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_SOURCE_DEFCITERATOR"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_SOURCE_DEFCITERATOR__V149*/ meltfptr[148] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V831*/ meltfptr[830]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V831*/ meltfptr[830]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -24203,14 +24268,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_CMATCHER"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_CMATCHER__V150*/ meltfptr[149] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V837*/ meltfptr[836]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V837*/ meltfptr[836]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -24221,14 +24286,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_ANY_MATCHER"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_ANY_MATCHER__V151*/ meltfptr[150] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V839*/ meltfptr[838]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V839*/ meltfptr[838]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -24239,14 +24304,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_SOURCE_DEFCMATCHER"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_SOURCE_DEFCMATCHER__V152*/ meltfptr[151] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V841*/ meltfptr[840]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V841*/ meltfptr[840]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -24257,14 +24322,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_NORMALIZATION_CONTEXT"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_NORMALIZATION_CONTEXT__V153*/ meltfptr[152] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V848*/ meltfptr[847]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V848*/ meltfptr[847]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -24275,14 +24340,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_ENVIRONMENT"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_ENVIRONMENT__V154*/ meltfptr[153] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V850*/ meltfptr[849]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V850*/ meltfptr[849]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -24293,14 +24358,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_SOURCE"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_SOURCE__V155*/ meltfptr[154] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V852*/ meltfptr[851]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V852*/ meltfptr[851]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -24311,7 +24376,7 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_SOURCE_UPDATE_CURRENT_MODULE_ENVIRONMENT_REFERENCE"; @@ -24319,8 +24384,8 @@ melt_start_this_module (void *modargp_) argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_SOURCE_UPDATE_CURRENT_MODULE_ENVIRONMENT_REFERENCE__V156*/ meltfptr[155] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V854*/ meltfptr[853]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V854*/ meltfptr[853]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -24331,14 +24396,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_SOURCE_COMMENT"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_SOURCE_COMMENT__V157*/ meltfptr[156] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V856*/ meltfptr[855]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V856*/ meltfptr[855]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -24349,14 +24414,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "NORMAL_EXP"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.NORMAL_EXP__V158*/ meltfptr[157] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V858*/ meltfptr[857]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V858*/ meltfptr[857]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -24367,14 +24432,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_NREP_ANYPROC"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_NREP_ANYPROC__V159*/ meltfptr[158] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V860*/ meltfptr[859]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V860*/ meltfptr[859]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -24385,14 +24450,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "WRAP_NORMAL_LET1"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.WRAP_NORMAL_LET1__V160*/ meltfptr[159] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V862*/ meltfptr[861]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V862*/ meltfptr[861]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -24403,14 +24468,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_NREP_INITPROC"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_NREP_INITPROC__V161*/ meltfptr[160] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V864*/ meltfptr[863]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V864*/ meltfptr[863]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -24421,14 +24486,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_NREP_DATAHOOK"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_NREP_DATAHOOK__V162*/ meltfptr[161] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V868*/ meltfptr[867]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V868*/ meltfptr[867]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -24439,14 +24504,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "COMPILE2OBJ_HOOK"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.COMPILE2OBJ_HOOK__V163*/ meltfptr[162] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V875*/ meltfptr[874]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V875*/ meltfptr[874]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -24457,14 +24522,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "COMPILE2OBJ_PROCEDURE"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.COMPILE2OBJ_PROCEDURE__V164*/ meltfptr[163] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V877*/ meltfptr[876]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V877*/ meltfptr[876]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -24475,14 +24540,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_SOURCE_CHEADER"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_SOURCE_CHEADER__V165*/ meltfptr[164] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V879*/ meltfptr[878]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V879*/ meltfptr[878]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -24493,14 +24558,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_SOURCE_CODE_STRING"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_SOURCE_CODE_STRING__V166*/ meltfptr[165] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V881*/ meltfptr[880]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V881*/ meltfptr[880]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -24511,14 +24576,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_SOURCE_CIMPLEMENT"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_SOURCE_CIMPLEMENT__V167*/ meltfptr[166] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V883*/ meltfptr[882]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V883*/ meltfptr[882]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -24529,14 +24594,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_MODULE_CONTEXT"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_MODULE_CONTEXT__V168*/ meltfptr[167] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V890*/ meltfptr[889]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V890*/ meltfptr[889]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -24547,14 +24612,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "DISCR_MAP_STRINGS"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.DISCR_MAP_STRINGS__V169*/ meltfptr[168] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V892*/ meltfptr[891]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V892*/ meltfptr[891]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -24565,14 +24630,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CREATE_NORMCONTEXT"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CREATE_NORMCONTEXT__V170*/ meltfptr[169] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V894*/ meltfptr[893]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V894*/ meltfptr[893]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -24583,14 +24648,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "INITIAL_ENVIRONMENT"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.INITIAL_ENVIRONMENT__V171*/ meltfptr[170] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V896*/ meltfptr[895]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V896*/ meltfptr[895]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -24601,14 +24666,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "MACROEXPAND_TOPLEVEL_LIST"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.MACROEXPAND_TOPLEVEL_LIST__V172*/ meltfptr[171] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V898*/ meltfptr[897]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V898*/ meltfptr[897]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -24619,14 +24684,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "MACROEXPAND_1"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.MACROEXPAND_1__V173*/ meltfptr[172] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V900*/ meltfptr[899]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V900*/ meltfptr[899]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -24637,14 +24702,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "COMPILE2OBJ_INITPROC"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.COMPILE2OBJ_INITPROC__V174*/ meltfptr[173] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V902*/ meltfptr[901]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V902*/ meltfptr[901]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -24655,14 +24720,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLONE_SYMBOL"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLONE_SYMBOL__V175*/ meltfptr[174] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V933*/ meltfptr[932]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V933*/ meltfptr[932]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -24673,14 +24738,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_NORMAL_LET_BINDING"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_NORMAL_LET_BINDING__V176*/ meltfptr[175] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V935*/ meltfptr[934]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V935*/ meltfptr[934]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -24691,14 +24756,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_NREP_LOCSYMOCC"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_NREP_LOCSYMOCC__V177*/ meltfptr[176] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V937*/ meltfptr[936]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V937*/ meltfptr[936]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -24709,14 +24774,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_NREP_RETURN"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_NREP_RETURN__V178*/ meltfptr[177] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V939*/ meltfptr[938]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V939*/ meltfptr[938]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -24727,14 +24792,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_NREP_CHUNK"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_NREP_CHUNK__V179*/ meltfptr[178] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V941*/ meltfptr[940]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V941*/ meltfptr[940]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -24745,14 +24810,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_LET_BINDING"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_LET_BINDING__V180*/ meltfptr[179] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V943*/ meltfptr[942]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V943*/ meltfptr[942]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -24763,14 +24828,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CTYPE_CSTRING"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CTYPE_CSTRING__V181*/ meltfptr[180] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V945*/ meltfptr[944]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V945*/ meltfptr[944]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -24781,14 +24846,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_CTYPE_GTY"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_CTYPE_GTY__V182*/ meltfptr[181] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V947*/ meltfptr[946]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V947*/ meltfptr[946]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -24799,14 +24864,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CREATE_NORMAL_EXTENDING_CONTEXT"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CREATE_NORMAL_EXTENDING_CONTEXT__V183*/ meltfptr[182] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V962*/ meltfptr[961]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V962*/ meltfptr[961]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -24817,14 +24882,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_SEXPR"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_SEXPR__V184*/ meltfptr[183] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V964*/ meltfptr[963]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V964*/ meltfptr[963]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -24835,14 +24900,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "COMPILE2OBJ_INITEXTENDPROC"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.COMPILE2OBJ_INITEXTENDPROC__V185*/ meltfptr[184] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V966*/ meltfptr[965]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V966*/ meltfptr[965]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -24853,14 +24918,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "CLASS_LITERAL_VALUE"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.CLASS_LITERAL_VALUE__V186*/ meltfptr[185] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V968*/ meltfptr[967]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V968*/ meltfptr[967]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -24871,14 +24936,14 @@ melt_start_this_module (void *modargp_) union meltparam_un argtab[3]; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ - argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_.PREVENV___V4*/ meltfptr[3]; + argtab[0].meltbp_aptr = (melt_ptr_t *) & /*_._PREVENV___V4*/ meltfptr[3]; /*^apply.arg */ argtab[1].meltbp_cstring = "LIST_APPEND2LIST"; /*^apply.arg */ argtab[2].meltbp_cstring = "warmelt-outobj"; /*_.LIST_APPEND2LIST__V187*/ meltfptr[186] = - melt_apply ((meltclosure_ptr_t) ( /*_.VALIMPORT___V6*/ meltfptr[5]), - (melt_ptr_t) ( /*_.VALDATA___V972*/ meltfptr[971]), + melt_apply ((meltclosure_ptr_t) ( /*_._VALIMPORT___V6*/ meltfptr[5]), + (melt_ptr_t) ( /*_._VALDATA___V972*/ meltfptr[971]), (MELTBPARSTR_PTR MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un *) 0); } @@ -24889,47 +24954,57 @@ melt_start_this_module (void *modargp_) /**initial routine cdata initializer**/ memset (meltpredefinited, 0, sizeof (meltpredefinited)); - initialize_module_meltdata_warmelt_outobj (&meltfram__, meltpredefinited); + initialize_module_meltdata_WARMELTmiOUTOBJ (&meltfram__, meltpredefinited); /**initial routine body**/ - meltmod__warmelt_outobj__initialmeltchunk_0 (&meltfram__, meltpredefinited); - meltmod__warmelt_outobj__initialmeltchunk_1 (&meltfram__, meltpredefinited); - meltmod__warmelt_outobj__initialmeltchunk_2 (&meltfram__, meltpredefinited); - meltmod__warmelt_outobj__initialmeltchunk_3 (&meltfram__, meltpredefinited); - meltmod__warmelt_outobj__initialmeltchunk_4 (&meltfram__, meltpredefinited); - meltmod__warmelt_outobj__initialmeltchunk_5 (&meltfram__, meltpredefinited); - meltmod__warmelt_outobj__initialmeltchunk_6 (&meltfram__, meltpredefinited); - meltmod__warmelt_outobj__initialmeltchunk_7 (&meltfram__, meltpredefinited); - meltmod__warmelt_outobj__initialmeltchunk_8 (&meltfram__, meltpredefinited); - meltmod__warmelt_outobj__initialmeltchunk_9 (&meltfram__, meltpredefinited); - meltmod__warmelt_outobj__initialmeltchunk_10 (&meltfram__, + meltmod__WARMELTmiOUTOBJ__initialmeltchunk_0 (&meltfram__, meltpredefinited); - meltmod__warmelt_outobj__initialmeltchunk_11 (&meltfram__, + meltmod__WARMELTmiOUTOBJ__initialmeltchunk_1 (&meltfram__, meltpredefinited); - meltmod__warmelt_outobj__initialmeltchunk_12 (&meltfram__, + meltmod__WARMELTmiOUTOBJ__initialmeltchunk_2 (&meltfram__, meltpredefinited); - meltmod__warmelt_outobj__initialmeltchunk_13 (&meltfram__, + meltmod__WARMELTmiOUTOBJ__initialmeltchunk_3 (&meltfram__, meltpredefinited); - meltmod__warmelt_outobj__initialmeltchunk_14 (&meltfram__, + meltmod__WARMELTmiOUTOBJ__initialmeltchunk_4 (&meltfram__, meltpredefinited); - meltmod__warmelt_outobj__initialmeltchunk_15 (&meltfram__, + meltmod__WARMELTmiOUTOBJ__initialmeltchunk_5 (&meltfram__, meltpredefinited); - meltmod__warmelt_outobj__initialmeltchunk_16 (&meltfram__, + meltmod__WARMELTmiOUTOBJ__initialmeltchunk_6 (&meltfram__, meltpredefinited); - meltmod__warmelt_outobj__initialmeltchunk_17 (&meltfram__, + meltmod__WARMELTmiOUTOBJ__initialmeltchunk_7 (&meltfram__, meltpredefinited); - meltmod__warmelt_outobj__initialmeltchunk_18 (&meltfram__, + meltmod__WARMELTmiOUTOBJ__initialmeltchunk_8 (&meltfram__, meltpredefinited); - meltmod__warmelt_outobj__initialmeltchunk_19 (&meltfram__, + meltmod__WARMELTmiOUTOBJ__initialmeltchunk_9 (&meltfram__, meltpredefinited); - meltmod__warmelt_outobj__initialmeltchunk_20 (&meltfram__, - meltpredefinited);; + meltmod__WARMELTmiOUTOBJ__initialmeltchunk_10 (&meltfram__, + meltpredefinited); + meltmod__WARMELTmiOUTOBJ__initialmeltchunk_11 (&meltfram__, + meltpredefinited); + meltmod__WARMELTmiOUTOBJ__initialmeltchunk_12 (&meltfram__, + meltpredefinited); + meltmod__WARMELTmiOUTOBJ__initialmeltchunk_13 (&meltfram__, + meltpredefinited); + meltmod__WARMELTmiOUTOBJ__initialmeltchunk_14 (&meltfram__, + meltpredefinited); + meltmod__WARMELTmiOUTOBJ__initialmeltchunk_15 (&meltfram__, + meltpredefinited); + meltmod__WARMELTmiOUTOBJ__initialmeltchunk_16 (&meltfram__, + meltpredefinited); + meltmod__WARMELTmiOUTOBJ__initialmeltchunk_17 (&meltfram__, + meltpredefinited); + meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (&meltfram__, + meltpredefinited); + meltmod__WARMELTmiOUTOBJ__initialmeltchunk_19 (&meltfram__, + meltpredefinited); + meltmod__WARMELTmiOUTOBJ__initialmeltchunk_20 (&meltfram__, + meltpredefinited);; goto meltlabend_rout; meltlabend_rout:; melt_topframe = (struct melt_callframe_st *) meltfram__.mcfr_prev; /* popped initial frame */ { /* clear initial frame & return */ - melt_ptr_t retval = /*_.RETINIT___V1*/ meltfptr[0]; + melt_ptr_t retval = /*_._RETINIT___V1*/ meltfptr[0]; memset ((void *) &meltfram__, 0, sizeof (meltfram__)); return retval; } @@ -24941,9 +25016,9 @@ meltlabend_rout:; } /* end */ void -meltmod__warmelt_outobj__initialmeltchunk_0 (meltinitial_frame_t * - meltmeltframptr__, - char meltpredefinited[]) +meltmod__WARMELTmiOUTOBJ__initialmeltchunk_0 (meltinitial_frame_t * + meltmeltframptr__, + char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount @@ -24954,47 +25029,47 @@ meltmod__warmelt_outobj__initialmeltchunk_0 (meltinitial_frame_t * /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V188*/ meltfptr[187])) == + ( /*_._VALDATA___V188*/ meltfptr[187])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V188*/ + ( /*_._VALDATA___V188*/ meltfptr[187])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V188*/ meltfptr[187]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V188*/ meltfptr[187]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V189*/ meltfptr[188]); + /*_._VALSTR___V189*/ meltfptr[188]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V188*/ meltfptr[187]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V188*/ meltfptr[187]); - melt_dbgtrace_written_object ( /*_.VALDATA___V188*/ meltfptr[187], + melt_dbgtrace_written_object ( /*_._VALDATA___V188*/ meltfptr[187], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V190*/ meltfptr[189])) == + ( /*_._VALDATA___V190*/ meltfptr[189])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V190*/ + ( /*_._VALDATA___V190*/ meltfptr[189])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V190*/ meltfptr[189]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V190*/ meltfptr[189]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V191*/ meltfptr[190]); + /*_._VALSTR___V191*/ meltfptr[190]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V190*/ meltfptr[189]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V190*/ meltfptr[189]); - melt_dbgtrace_written_object ( /*_.VALDATA___V190*/ meltfptr[189], + melt_dbgtrace_written_object ( /*_._VALDATA___V190*/ meltfptr[189], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:37:/ initchunk"); @@ -25002,28 +25077,28 @@ meltmod__warmelt_outobj__initialmeltchunk_0 (meltinitial_frame_t * /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V192*/ meltfptr[191])) == + ( /*_._VALDATA___V192*/ meltfptr[191])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (0 >= 0 && 0 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V192*/ + ( /*_._VALDATA___V192*/ meltfptr[191])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]))->obj_vartab[0] = + ((meltobject_ptr_t) ( /*_._VALDATA___V192*/ meltfptr[191]))->obj_vartab[0] = (melt_ptr_t) ( - /*_.VALBXINT___V193*/ meltfptr[192]); + /*_._VALBXINT___V193*/ meltfptr[192]); MELT_LOCATION ("warmelt-outobj.melt:37:/ initchunk"); /*^touch */ - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V192*/ meltfptr[191]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V192*/ meltfptr[191]); MELT_LOCATION ("warmelt-outobj.melt:37:/ initchunk"); /*^touchobj */ - melt_dbgtrace_written_object ( /*_.VALDATA___V192*/ meltfptr[191], + melt_dbgtrace_written_object ( /*_._VALDATA___V192*/ meltfptr[191], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:41:/ initchunk"); @@ -25031,12 +25106,12 @@ meltmod__warmelt_outobj__initialmeltchunk_0 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V194*/ meltfptr[193])) == + ( /*_._VALROUT___V194*/ meltfptr[193])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALDATA___V192*/ meltfptr[191]); - ((meltroutine_ptr_t) /*_.VALROUT___V194*/ meltfptr[193])->tabval[0] = - (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); + NULL != /*_._VALDATA___V192*/ meltfptr[191]); + ((meltroutine_ptr_t) /*_._VALROUT___V194*/ meltfptr[193])->tabval[0] = + (melt_ptr_t) ( /*_._VALDATA___V192*/ meltfptr[191]); MELT_LOCATION ("warmelt-outobj.melt:41:/ initchunk"); /*^putroutconst */ @@ -25044,33 +25119,33 @@ meltmod__warmelt_outobj__initialmeltchunk_0 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V194*/ meltfptr[193])) + ( /*_._VALROUT___V194*/ meltfptr[193])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_7__GET_CODE_BUFFER_LIMIT#1", NULL != ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_.VALROUT___V194*/ meltfptr[193])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V194*/ meltfptr[193])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:41:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V194*/ meltfptr[193]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V194*/ meltfptr[193]); /*putclosurout#1 */ melt_assertmsg ("putclosrout#1 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V195*/ meltfptr[194])) == + ( /*_._VALCLO___V195*/ meltfptr[194])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#1 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V194*/ meltfptr[193])) == + ( /*_._VALROUT___V194*/ meltfptr[193])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V195*/ meltfptr[194])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V194*/ meltfptr[193]); + ((meltclosure_ptr_t) /*_._VALCLO___V195*/ meltfptr[194])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V194*/ meltfptr[193]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V195*/ meltfptr[194]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V195*/ meltfptr[194]); MELT_LOCATION ("warmelt-outobj.melt:46:/ initchunk"); /*^putroutconst */ @@ -25078,12 +25153,12 @@ meltmod__warmelt_outobj__initialmeltchunk_0 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V196*/ meltfptr[195])) + ( /*_._VALROUT___V196*/ meltfptr[195])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_9__PUT_CODE_BUFFER_LIMIT#0", NULL != ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7])); - ((meltroutine_ptr_t) /*_.VALROUT___V196*/ meltfptr[195])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V196*/ meltfptr[195])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7]); MELT_LOCATION ("warmelt-outobj.melt:46:/ initchunk"); @@ -25092,12 +25167,12 @@ meltmod__warmelt_outobj__initialmeltchunk_0 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V196*/ meltfptr[195])) + ( /*_._VALROUT___V196*/ meltfptr[195])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_9__PUT_CODE_BUFFER_LIMIT#1", NULL != ( /*_.DISCR_CONSTANT_INTEGER__V9*/ meltfptr[8])); - ((meltroutine_ptr_t) /*_.VALROUT___V196*/ meltfptr[195])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V196*/ meltfptr[195])->tabval[1] = (melt_ptr_t) ( /*_.DISCR_CONSTANT_INTEGER__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-outobj.melt:46:/ initchunk"); @@ -25105,12 +25180,12 @@ meltmod__warmelt_outobj__initialmeltchunk_0 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V196*/ meltfptr[195])) == + ( /*_._VALROUT___V196*/ meltfptr[195])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALDATA___V192*/ meltfptr[191]); - ((meltroutine_ptr_t) /*_.VALROUT___V196*/ meltfptr[195])->tabval[2] = - (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); + NULL != /*_._VALDATA___V192*/ meltfptr[191]); + ((meltroutine_ptr_t) /*_._VALROUT___V196*/ meltfptr[195])->tabval[2] = + (melt_ptr_t) ( /*_._VALDATA___V192*/ meltfptr[191]); MELT_LOCATION ("warmelt-outobj.melt:46:/ initchunk"); /*^putroutconst */ @@ -25118,78 +25193,78 @@ meltmod__warmelt_outobj__initialmeltchunk_0 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V196*/ meltfptr[195])) + ( /*_._VALROUT___V196*/ meltfptr[195])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_9__PUT_CODE_BUFFER_LIMIT#3", NULL != ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_.VALROUT___V196*/ meltfptr[195])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V196*/ meltfptr[195])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:46:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V196*/ meltfptr[195]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V196*/ meltfptr[195]); /*putclosurout#2 */ melt_assertmsg ("putclosrout#2 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V197*/ meltfptr[196])) == + ( /*_._VALCLO___V197*/ meltfptr[196])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#2 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V196*/ meltfptr[195])) == + ( /*_._VALROUT___V196*/ meltfptr[195])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V197*/ meltfptr[196])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V196*/ meltfptr[195]); + ((meltclosure_ptr_t) /*_._VALCLO___V197*/ meltfptr[196])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V196*/ meltfptr[195]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V197*/ meltfptr[196]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V197*/ meltfptr[196]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V198*/ meltfptr[197])) == + ( /*_._VALDATA___V198*/ meltfptr[197])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V198*/ + ( /*_._VALDATA___V198*/ meltfptr[197])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V198*/ meltfptr[197]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V198*/ meltfptr[197]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V199*/ meltfptr[198]); + /*_._VALSTR___V199*/ meltfptr[198]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V198*/ meltfptr[197]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V198*/ meltfptr[197]); - melt_dbgtrace_written_object ( /*_.VALDATA___V198*/ meltfptr[197], + melt_dbgtrace_written_object ( /*_._VALDATA___V198*/ meltfptr[197], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V200*/ meltfptr[199])) == + ( /*_._VALDATA___V200*/ meltfptr[199])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V200*/ + ( /*_._VALDATA___V200*/ meltfptr[199])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V200*/ meltfptr[199]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V200*/ meltfptr[199]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V201*/ meltfptr[200]); + /*_._VALSTR___V201*/ meltfptr[200]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V200*/ meltfptr[199]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V200*/ meltfptr[199]); - melt_dbgtrace_written_object ( /*_.VALDATA___V200*/ meltfptr[199], + melt_dbgtrace_written_object ( /*_._VALDATA___V200*/ meltfptr[199], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:68:/ initchunk"); @@ -25197,12 +25272,12 @@ meltmod__warmelt_outobj__initialmeltchunk_0 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V202*/ meltfptr[201])) == + ( /*_._VALROUT___V202*/ meltfptr[201])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V197*/ meltfptr[196]); - ((meltroutine_ptr_t) /*_.VALROUT___V202*/ meltfptr[201])->tabval[0] = - (melt_ptr_t) ( /*_.VALCLO___V197*/ meltfptr[196]); + NULL != /*_._VALCLO___V197*/ meltfptr[196]); + ((meltroutine_ptr_t) /*_._VALROUT___V202*/ meltfptr[201])->tabval[0] = + (melt_ptr_t) ( /*_._VALCLO___V197*/ meltfptr[196]); MELT_LOCATION ("warmelt-outobj.melt:68:/ initchunk"); /*^putroutconst */ @@ -25210,79 +25285,79 @@ meltmod__warmelt_outobj__initialmeltchunk_0 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V202*/ meltfptr[201])) + ( /*_._VALROUT___V202*/ meltfptr[201])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_15__CODE_BUFFER_LIMIT_OPTSET#1", NULL != ( /*_.DISCR_CONSTANT_INTEGER__V9*/ meltfptr[8])); - ((meltroutine_ptr_t) /*_.VALROUT___V202*/ meltfptr[201])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V202*/ meltfptr[201])->tabval[1] = (melt_ptr_t) ( /*_.DISCR_CONSTANT_INTEGER__V9*/ meltfptr[8]); MELT_LOCATION ("warmelt-outobj.melt:68:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V202*/ meltfptr[201]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V202*/ meltfptr[201]); /*putclosurout#3 */ melt_assertmsg ("putclosrout#3 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V203*/ meltfptr[202])) == + ( /*_._VALCLO___V203*/ meltfptr[202])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#3 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V202*/ meltfptr[201])) == + ( /*_._VALROUT___V202*/ meltfptr[201])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V203*/ meltfptr[202])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V202*/ meltfptr[201]); + ((meltclosure_ptr_t) /*_._VALCLO___V203*/ meltfptr[202])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V202*/ meltfptr[201]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V203*/ meltfptr[202]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V203*/ meltfptr[202]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V204*/ meltfptr[203])) == + ( /*_._VALDATA___V204*/ meltfptr[203])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V204*/ + ( /*_._VALDATA___V204*/ meltfptr[203])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V204*/ meltfptr[203]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V204*/ meltfptr[203]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V205*/ meltfptr[204]); + /*_._VALSTR___V205*/ meltfptr[204]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V204*/ meltfptr[203]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V204*/ meltfptr[203]); - melt_dbgtrace_written_object ( /*_.VALDATA___V204*/ meltfptr[203], + melt_dbgtrace_written_object ( /*_._VALDATA___V204*/ meltfptr[203], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V206*/ meltfptr[205])) == + ( /*_._VALDATA___V206*/ meltfptr[205])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V206*/ + ( /*_._VALDATA___V206*/ meltfptr[205])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V206*/ meltfptr[205]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V206*/ meltfptr[205]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V207*/ meltfptr[206]); + /*_._VALSTR___V207*/ meltfptr[206]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V206*/ meltfptr[205]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V206*/ meltfptr[205]); - melt_dbgtrace_written_object ( /*_.VALDATA___V206*/ meltfptr[205], + melt_dbgtrace_written_object ( /*_._VALDATA___V206*/ meltfptr[205], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:85:/ initchunk"); @@ -25291,14 +25366,14 @@ meltmod__warmelt_outobj__initialmeltchunk_0 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V209*/ meltfptr[208])) + ( /*_._VALROUT___V209*/ meltfptr[208])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_22__OUT_ENUMIX_MODVARBIND#0", NULL != ( /*_.CLASS_NORMAL_MODULE_VARIABLE_BINDING__V11*/ meltfptr[10])); - ((meltroutine_ptr_t) /*_.VALROUT___V209*/ meltfptr[208])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V209*/ meltfptr[208])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_NORMAL_MODULE_VARIABLE_BINDING__V11*/ meltfptr[10]); @@ -25308,12 +25383,12 @@ meltmod__warmelt_outobj__initialmeltchunk_0 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V209*/ meltfptr[208])) + ( /*_._VALROUT___V209*/ meltfptr[208])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_22__OUT_ENUMIX_MODVARBIND#1", NULL != ( /*_.CLASS_ANY_BINDING__V12*/ meltfptr[11])); - ((meltroutine_ptr_t) /*_.VALROUT___V209*/ meltfptr[208])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V209*/ meltfptr[208])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_ANY_BINDING__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-outobj.melt:85:/ initchunk"); @@ -25322,13 +25397,13 @@ meltmod__warmelt_outobj__initialmeltchunk_0 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V209*/ meltfptr[208])) + ( /*_._VALROUT___V209*/ meltfptr[208])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_22__OUT_ENUMIX_MODVARBIND#2", - NULL != ( /*_.VALROUT___V210*/ meltfptr[209])); - ((meltroutine_ptr_t) /*_.VALROUT___V209*/ meltfptr[208])->tabval[2] = - (melt_ptr_t) ( /*_.VALROUT___V210*/ meltfptr[209]); + NULL != ( /*_._VALROUT___V210*/ meltfptr[209])); + ((meltroutine_ptr_t) /*_._VALROUT___V209*/ meltfptr[208])->tabval[2] = + (melt_ptr_t) ( /*_._VALROUT___V210*/ meltfptr[209]); MELT_LOCATION ("warmelt-outobj.melt:85:/ initchunk"); /*^putroutconst */ @@ -25336,12 +25411,12 @@ meltmod__warmelt_outobj__initialmeltchunk_0 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V209*/ meltfptr[208])) + ( /*_._VALROUT___V209*/ meltfptr[208])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_22__OUT_ENUMIX_MODVARBIND#3", NULL != ( /*_.CLASS_CLONED_SYMBOL__V13*/ meltfptr[12])); - ((meltroutine_ptr_t) /*_.VALROUT___V209*/ meltfptr[208])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V209*/ meltfptr[208])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_CLONED_SYMBOL__V13*/ meltfptr[12]); MELT_LOCATION ("warmelt-outobj.melt:85:/ initchunk"); @@ -25350,12 +25425,12 @@ meltmod__warmelt_outobj__initialmeltchunk_0 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V209*/ meltfptr[208])) + ( /*_._VALROUT___V209*/ meltfptr[208])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_22__OUT_ENUMIX_MODVARBIND#4", NULL != ( /*_.CLASS_NAMED__V14*/ meltfptr[13])); - ((meltroutine_ptr_t) /*_.VALROUT___V209*/ meltfptr[208])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V209*/ meltfptr[208])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_NAMED__V14*/ meltfptr[13]); MELT_LOCATION ("warmelt-outobj.melt:85:/ initchunk"); @@ -25364,12 +25439,12 @@ meltmod__warmelt_outobj__initialmeltchunk_0 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V209*/ meltfptr[208])) + ( /*_._VALROUT___V209*/ meltfptr[208])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_22__OUT_ENUMIX_MODVARBIND#5", NULL != ( /*_.ADD2OUT__V15*/ meltfptr[14])); - ((meltroutine_ptr_t) /*_.VALROUT___V209*/ meltfptr[208])->tabval[5] = + ((meltroutine_ptr_t) /*_._VALROUT___V209*/ meltfptr[208])->tabval[5] = (melt_ptr_t) ( /*_.ADD2OUT__V15*/ meltfptr[14]); MELT_LOCATION ("warmelt-outobj.melt:85:/ initchunk"); @@ -25378,12 +25453,12 @@ meltmod__warmelt_outobj__initialmeltchunk_0 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V209*/ meltfptr[208])) + ( /*_._VALROUT___V209*/ meltfptr[208])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_22__OUT_ENUMIX_MODVARBIND#6", NULL != ( /*_.CLASS_SYMBOL__V16*/ meltfptr[15])); - ((meltroutine_ptr_t) /*_.VALROUT___V209*/ meltfptr[208])->tabval[6] = + ((meltroutine_ptr_t) /*_._VALROUT___V209*/ meltfptr[208])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_SYMBOL__V16*/ meltfptr[15]); MELT_LOCATION ("warmelt-outobj.melt:85:/ initchunk"); @@ -25392,170 +25467,170 @@ meltmod__warmelt_outobj__initialmeltchunk_0 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V209*/ meltfptr[208])) + ( /*_._VALROUT___V209*/ meltfptr[208])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_22__OUT_ENUMIX_MODVARBIND#7", NULL != ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7])); - ((meltroutine_ptr_t) /*_.VALROUT___V209*/ meltfptr[208])->tabval[7] = + ((meltroutine_ptr_t) /*_._VALROUT___V209*/ meltfptr[208])->tabval[7] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7]); MELT_LOCATION ("warmelt-outobj.melt:85:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V209*/ meltfptr[208]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V209*/ meltfptr[208]); /*putclosurout#4 */ melt_assertmsg ("putclosrout#4 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V211*/ meltfptr[210])) == + ( /*_._VALCLO___V211*/ meltfptr[210])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#4 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V209*/ meltfptr[208])) == + ( /*_._VALROUT___V209*/ meltfptr[208])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V211*/ meltfptr[210])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V209*/ meltfptr[208]); + ((meltclosure_ptr_t) /*_._VALCLO___V211*/ meltfptr[210])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V209*/ meltfptr[208]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V211*/ meltfptr[210]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V211*/ meltfptr[210]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V212*/ meltfptr[211])) == + ( /*_._VALDATA___V212*/ meltfptr[211])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V212*/ + ( /*_._VALDATA___V212*/ meltfptr[211])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V212*/ meltfptr[211]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V212*/ meltfptr[211]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V213*/ meltfptr[212]); + /*_._VALSTR___V213*/ meltfptr[212]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V212*/ meltfptr[211]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V212*/ meltfptr[211]); - melt_dbgtrace_written_object ( /*_.VALDATA___V212*/ meltfptr[211], + melt_dbgtrace_written_object ( /*_._VALDATA___V212*/ meltfptr[211], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V214*/ meltfptr[213])) == + ( /*_._VALDATA___V214*/ meltfptr[213])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V214*/ + ( /*_._VALDATA___V214*/ meltfptr[213])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V214*/ meltfptr[213]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V214*/ meltfptr[213]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V215*/ meltfptr[214]); + /*_._VALSTR___V215*/ meltfptr[214]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V214*/ meltfptr[213]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V214*/ meltfptr[213]); - melt_dbgtrace_written_object ( /*_.VALDATA___V214*/ meltfptr[213], + melt_dbgtrace_written_object ( /*_._VALDATA___V214*/ meltfptr[213], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V216*/ meltfptr[215])) == + ( /*_._VALDATA___V216*/ meltfptr[215])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V216*/ + ( /*_._VALDATA___V216*/ meltfptr[215])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V216*/ meltfptr[215]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V216*/ meltfptr[215]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V217*/ meltfptr[216]); + /*_._VALSTR___V217*/ meltfptr[216]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V216*/ meltfptr[215]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V216*/ meltfptr[215]); - melt_dbgtrace_written_object ( /*_.VALDATA___V216*/ meltfptr[215], + melt_dbgtrace_written_object ( /*_._VALDATA___V216*/ meltfptr[215], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V218*/ meltfptr[217])) == + ( /*_._VALDATA___V218*/ meltfptr[217])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V218*/ + ( /*_._VALDATA___V218*/ meltfptr[217])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V218*/ meltfptr[217]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V218*/ meltfptr[217]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V219*/ meltfptr[218]); + /*_._VALSTR___V219*/ meltfptr[218]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V218*/ meltfptr[217]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V218*/ meltfptr[217]); - melt_dbgtrace_written_object ( /*_.VALDATA___V218*/ meltfptr[217], + melt_dbgtrace_written_object ( /*_._VALDATA___V218*/ meltfptr[217], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V220*/ meltfptr[219])) == + ( /*_._VALDATA___V220*/ meltfptr[219])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V220*/ + ( /*_._VALDATA___V220*/ meltfptr[219])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V220*/ meltfptr[219]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V220*/ meltfptr[219]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V221*/ meltfptr[220]); + /*_._VALSTR___V221*/ meltfptr[220]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V220*/ meltfptr[219]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V220*/ meltfptr[219]); - melt_dbgtrace_written_object ( /*_.VALDATA___V220*/ meltfptr[219], + melt_dbgtrace_written_object ( /*_._VALDATA___V220*/ meltfptr[219], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V222*/ meltfptr[221])) == + ( /*_._VALDATA___V222*/ meltfptr[221])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V222*/ + ( /*_._VALDATA___V222*/ meltfptr[221])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V222*/ meltfptr[221]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V222*/ meltfptr[221]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V223*/ meltfptr[222]); + /*_._VALSTR___V223*/ meltfptr[222]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V222*/ meltfptr[221]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V222*/ meltfptr[221]); - melt_dbgtrace_written_object ( /*_.VALDATA___V222*/ meltfptr[221], + melt_dbgtrace_written_object ( /*_._VALDATA___V222*/ meltfptr[221], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:112:/ initchunk"); @@ -25564,101 +25639,101 @@ meltmod__warmelt_outobj__initialmeltchunk_0 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V224*/ meltfptr[223])) + ( /*_._VALROUT___V224*/ meltfptr[223])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_37__OUTDECLINIT_ROOT#0", NULL != ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7])); - ((meltroutine_ptr_t) /*_.VALROUT___V224*/ meltfptr[223])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V224*/ meltfptr[223])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7]); MELT_LOCATION ("warmelt-outobj.melt:112:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V224*/ meltfptr[223]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V224*/ meltfptr[223]); /*putclosurout#5 */ melt_assertmsg ("putclosrout#5 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V225*/ meltfptr[224])) == + ( /*_._VALCLO___V225*/ meltfptr[224])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#5 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V224*/ meltfptr[223])) == + ( /*_._VALROUT___V224*/ meltfptr[223])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V225*/ meltfptr[224])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V224*/ meltfptr[223]); + ((meltclosure_ptr_t) /*_._VALCLO___V225*/ meltfptr[224])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V224*/ meltfptr[223]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V225*/ meltfptr[224]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V225*/ meltfptr[224]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V226*/ meltfptr[225])) == + ( /*_._VALDATA___V226*/ meltfptr[225])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V226*/ + ( /*_._VALDATA___V226*/ meltfptr[225])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V226*/ meltfptr[225]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V226*/ meltfptr[225]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V227*/ meltfptr[226]); + /*_._VALSTR___V227*/ meltfptr[226]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V226*/ meltfptr[225]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V226*/ meltfptr[225]); - melt_dbgtrace_written_object ( /*_.VALDATA___V226*/ meltfptr[225], + melt_dbgtrace_written_object ( /*_._VALDATA___V226*/ meltfptr[225], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V228*/ meltfptr[227])) == + ( /*_._VALDATA___V228*/ meltfptr[227])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V228*/ + ( /*_._VALDATA___V228*/ meltfptr[227])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V228*/ meltfptr[227]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V228*/ meltfptr[227]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V229*/ meltfptr[228]); + /*_._VALSTR___V229*/ meltfptr[228]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V228*/ meltfptr[227]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V228*/ meltfptr[227]); - melt_dbgtrace_written_object ( /*_.VALDATA___V228*/ meltfptr[227], + melt_dbgtrace_written_object ( /*_._VALDATA___V228*/ meltfptr[227], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V230*/ meltfptr[229])) == + ( /*_._VALDATA___V230*/ meltfptr[229])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V230*/ + ( /*_._VALDATA___V230*/ meltfptr[229])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V230*/ meltfptr[229]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V230*/ meltfptr[229]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V231*/ meltfptr[230]); + /*_._VALSTR___V231*/ meltfptr[230]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V230*/ meltfptr[229]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V230*/ meltfptr[229]); - melt_dbgtrace_written_object ( /*_.VALDATA___V230*/ meltfptr[229], + melt_dbgtrace_written_object ( /*_._VALDATA___V230*/ meltfptr[229], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:119:/ initchunk"); @@ -25667,12 +25742,12 @@ meltmod__warmelt_outobj__initialmeltchunk_0 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V232*/ meltfptr[231])) + ( /*_._VALROUT___V232*/ meltfptr[231])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_45__OUTPUCOD_OBJINIELEM#0", NULL != ( /*_.CLASS_OBJINITELEM__V20*/ meltfptr[19])); - ((meltroutine_ptr_t) /*_.VALROUT___V232*/ meltfptr[231])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V232*/ meltfptr[231])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJINITELEM__V20*/ meltfptr[19]); MELT_LOCATION ("warmelt-outobj.melt:119:/ initchunk"); @@ -25681,12 +25756,12 @@ meltmod__warmelt_outobj__initialmeltchunk_0 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V232*/ meltfptr[231])) + ( /*_._VALROUT___V232*/ meltfptr[231])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_45__OUTPUCOD_OBJINIELEM#1", NULL != ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20])); - ((meltroutine_ptr_t) /*_.VALROUT___V232*/ meltfptr[231])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V232*/ meltfptr[231])->tabval[1] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]); MELT_LOCATION ("warmelt-outobj.melt:119:/ initchunk"); @@ -25694,12 +25769,12 @@ meltmod__warmelt_outobj__initialmeltchunk_0 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V232*/ meltfptr[231])) == + ( /*_._VALROUT___V232*/ meltfptr[231])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALDATA___V192*/ meltfptr[191]); - ((meltroutine_ptr_t) /*_.VALROUT___V232*/ meltfptr[231])->tabval[2] = - (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); + NULL != /*_._VALDATA___V192*/ meltfptr[191]); + ((meltroutine_ptr_t) /*_._VALROUT___V232*/ meltfptr[231])->tabval[2] = + (melt_ptr_t) ( /*_._VALDATA___V192*/ meltfptr[191]); MELT_LOCATION ("warmelt-outobj.melt:119:/ initchunk"); /*^putroutconst */ @@ -25707,12 +25782,12 @@ meltmod__warmelt_outobj__initialmeltchunk_0 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V232*/ meltfptr[231])) + ( /*_._VALROUT___V232*/ meltfptr[231])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_45__OUTPUCOD_OBJINIELEM#3", NULL != ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_.VALROUT___V232*/ meltfptr[231])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V232*/ meltfptr[231])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:119:/ initchunk"); @@ -25721,78 +25796,78 @@ meltmod__warmelt_outobj__initialmeltchunk_0 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V232*/ meltfptr[231])) + ( /*_._VALROUT___V232*/ meltfptr[231])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_45__OUTPUCOD_OBJINIELEM#4", NULL != ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7])); - ((meltroutine_ptr_t) /*_.VALROUT___V232*/ meltfptr[231])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V232*/ meltfptr[231])->tabval[4] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7]); MELT_LOCATION ("warmelt-outobj.melt:119:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V232*/ meltfptr[231]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V232*/ meltfptr[231]); /*putclosurout#6 */ melt_assertmsg ("putclosrout#6 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V233*/ meltfptr[232])) == + ( /*_._VALCLO___V233*/ meltfptr[232])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#6 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V232*/ meltfptr[231])) == + ( /*_._VALROUT___V232*/ meltfptr[231])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V233*/ meltfptr[232])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V232*/ meltfptr[231]); + ((meltclosure_ptr_t) /*_._VALCLO___V233*/ meltfptr[232])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V232*/ meltfptr[231]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V233*/ meltfptr[232]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V233*/ meltfptr[232]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V234*/ meltfptr[233])) == + ( /*_._VALDATA___V234*/ meltfptr[233])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V234*/ + ( /*_._VALDATA___V234*/ meltfptr[233])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V234*/ meltfptr[233]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V234*/ meltfptr[233]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V235*/ meltfptr[234]); + /*_._VALSTR___V235*/ meltfptr[234]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V234*/ meltfptr[233]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V234*/ meltfptr[233]); - melt_dbgtrace_written_object ( /*_.VALDATA___V234*/ meltfptr[233], + melt_dbgtrace_written_object ( /*_._VALDATA___V234*/ meltfptr[233], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V236*/ meltfptr[235])) == + ( /*_._VALDATA___V236*/ meltfptr[235])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V236*/ + ( /*_._VALDATA___V236*/ meltfptr[235])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V236*/ meltfptr[235]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V236*/ meltfptr[235]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V237*/ meltfptr[236]); + /*_._VALSTR___V237*/ meltfptr[236]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V236*/ meltfptr[235]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V236*/ meltfptr[235]); - melt_dbgtrace_written_object ( /*_.VALDATA___V236*/ meltfptr[235], + melt_dbgtrace_written_object ( /*_._VALDATA___V236*/ meltfptr[235], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:142:/ initchunk"); @@ -25801,55 +25876,55 @@ meltmod__warmelt_outobj__initialmeltchunk_0 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V238*/ meltfptr[237])) + ( /*_._VALROUT___V238*/ meltfptr[237])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_51__OUTCINITFILL_ROOT#0", NULL != ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7])); - ((meltroutine_ptr_t) /*_.VALROUT___V238*/ meltfptr[237])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V238*/ meltfptr[237])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7]); MELT_LOCATION ("warmelt-outobj.melt:142:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V238*/ meltfptr[237]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V238*/ meltfptr[237]); /*putclosurout#7 */ melt_assertmsg ("putclosrout#7 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V239*/ meltfptr[238])) == + ( /*_._VALCLO___V239*/ meltfptr[238])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#7 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V238*/ meltfptr[237])) == + ( /*_._VALROUT___V238*/ meltfptr[237])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V239*/ meltfptr[238])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V238*/ meltfptr[237]); + ((meltclosure_ptr_t) /*_._VALCLO___V239*/ meltfptr[238])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V238*/ meltfptr[237]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V239*/ meltfptr[238]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V239*/ meltfptr[238]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V240*/ meltfptr[239])) == + ( /*_._VALDATA___V240*/ meltfptr[239])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V240*/ + ( /*_._VALDATA___V240*/ meltfptr[239])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V240*/ meltfptr[239]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V240*/ meltfptr[239]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V241*/ meltfptr[240]); + /*_._VALSTR___V241*/ meltfptr[240]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V240*/ meltfptr[239]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V240*/ meltfptr[239]); - melt_dbgtrace_written_object ( /*_.VALDATA___V240*/ meltfptr[239], + melt_dbgtrace_written_object ( /*_._VALDATA___V240*/ meltfptr[239], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:150:/ initchunk"); @@ -25858,55 +25933,55 @@ meltmod__warmelt_outobj__initialmeltchunk_0 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V242*/ meltfptr[241])) + ( /*_._VALROUT___V242*/ meltfptr[241])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_55__OUTCINITPREDEF_ROOT#0", NULL != ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7])); - ((meltroutine_ptr_t) /*_.VALROUT___V242*/ meltfptr[241])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V242*/ meltfptr[241])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7]); MELT_LOCATION ("warmelt-outobj.melt:150:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V242*/ meltfptr[241]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V242*/ meltfptr[241]); /*putclosurout#8 */ melt_assertmsg ("putclosrout#8 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V243*/ meltfptr[242])) == + ( /*_._VALCLO___V243*/ meltfptr[242])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#8 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V242*/ meltfptr[241])) == + ( /*_._VALROUT___V242*/ meltfptr[241])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V243*/ meltfptr[242])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V242*/ meltfptr[241]); + ((meltclosure_ptr_t) /*_._VALCLO___V243*/ meltfptr[242])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V242*/ meltfptr[241]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V243*/ meltfptr[242]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V243*/ meltfptr[242]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V244*/ meltfptr[243])) == + ( /*_._VALDATA___V244*/ meltfptr[243])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V244*/ + ( /*_._VALDATA___V244*/ meltfptr[243])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V244*/ meltfptr[243]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V244*/ meltfptr[243]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V245*/ meltfptr[244]); + /*_._VALSTR___V245*/ meltfptr[244]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V244*/ meltfptr[243]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V244*/ meltfptr[243]); - melt_dbgtrace_written_object ( /*_.VALDATA___V244*/ meltfptr[243], + melt_dbgtrace_written_object ( /*_._VALDATA___V244*/ meltfptr[243], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:157:/ initchunk"); @@ -25915,12 +25990,12 @@ meltmod__warmelt_outobj__initialmeltchunk_0 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V246*/ meltfptr[245])) + ( /*_._VALROUT___V246*/ meltfptr[245])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_59__OUTPUT_PREDEF#0", NULL != ( /*_.CLASS_SYMBOL__V16*/ meltfptr[15])); - ((meltroutine_ptr_t) /*_.VALROUT___V246*/ meltfptr[245])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V246*/ meltfptr[245])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_SYMBOL__V16*/ meltfptr[15]); MELT_LOCATION ("warmelt-outobj.melt:157:/ initchunk"); @@ -25929,12 +26004,12 @@ meltmod__warmelt_outobj__initialmeltchunk_0 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V246*/ meltfptr[245])) + ( /*_._VALROUT___V246*/ meltfptr[245])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_59__OUTPUT_PREDEF#1", NULL != ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7])); - ((meltroutine_ptr_t) /*_.VALROUT___V246*/ meltfptr[245])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V246*/ meltfptr[245])->tabval[1] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7]); MELT_LOCATION ("warmelt-outobj.melt:157:/ initchunk"); @@ -25943,12 +26018,12 @@ meltmod__warmelt_outobj__initialmeltchunk_0 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V246*/ meltfptr[245])) + ( /*_._VALROUT___V246*/ meltfptr[245])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_59__OUTPUT_PREDEF#2", NULL != ( /*_.OBPREDEF__V24*/ meltfptr[23])); - ((meltroutine_ptr_t) /*_.VALROUT___V246*/ meltfptr[245])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V246*/ meltfptr[245])->tabval[2] = (melt_ptr_t) ( /*_.OBPREDEF__V24*/ meltfptr[23]); MELT_LOCATION ("warmelt-outobj.melt:157:/ initchunk"); @@ -25956,12 +26031,12 @@ meltmod__warmelt_outobj__initialmeltchunk_0 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V246*/ meltfptr[245])) == + ( /*_._VALROUT___V246*/ meltfptr[245])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALDATA___V192*/ meltfptr[191]); - ((meltroutine_ptr_t) /*_.VALROUT___V246*/ meltfptr[245])->tabval[3] = - (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); + NULL != /*_._VALDATA___V192*/ meltfptr[191]); + ((meltroutine_ptr_t) /*_._VALROUT___V246*/ meltfptr[245])->tabval[3] = + (melt_ptr_t) ( /*_._VALDATA___V192*/ meltfptr[191]); MELT_LOCATION ("warmelt-outobj.melt:157:/ initchunk"); /*^putroutconst */ @@ -25969,55 +26044,55 @@ meltmod__warmelt_outobj__initialmeltchunk_0 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V246*/ meltfptr[245])) + ( /*_._VALROUT___V246*/ meltfptr[245])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_59__OUTPUT_PREDEF#4", NULL != ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_.VALROUT___V246*/ meltfptr[245])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V246*/ meltfptr[245])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:157:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V246*/ meltfptr[245]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V246*/ meltfptr[245]); /*putclosurout#9 */ melt_assertmsg ("putclosrout#9 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V247*/ meltfptr[246])) == + ( /*_._VALCLO___V247*/ meltfptr[246])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#9 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V246*/ meltfptr[245])) == + ( /*_._VALROUT___V246*/ meltfptr[245])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V247*/ meltfptr[246])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V246*/ meltfptr[245]); + ((meltclosure_ptr_t) /*_._VALCLO___V247*/ meltfptr[246])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V246*/ meltfptr[245]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V247*/ meltfptr[246]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V247*/ meltfptr[246]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V248*/ meltfptr[247])) == + ( /*_._VALDATA___V248*/ meltfptr[247])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V248*/ + ( /*_._VALDATA___V248*/ meltfptr[247])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V248*/ meltfptr[247]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V248*/ meltfptr[247]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V249*/ meltfptr[248]); + /*_._VALSTR___V249*/ meltfptr[248]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V248*/ meltfptr[247]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V248*/ meltfptr[247]); - melt_dbgtrace_written_object ( /*_.VALDATA___V248*/ meltfptr[247], + melt_dbgtrace_written_object ( /*_._VALDATA___V248*/ meltfptr[247], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:183:/ initchunk"); @@ -26026,12 +26101,12 @@ meltmod__warmelt_outobj__initialmeltchunk_0 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V250*/ meltfptr[249])) + ( /*_._VALROUT___V250*/ meltfptr[249])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_63__OUTPUCOD_PREDEF#0", NULL != ( /*_.CLASS_OBJPREDEF__V25*/ meltfptr[24])); - ((meltroutine_ptr_t) /*_.VALROUT___V250*/ meltfptr[249])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V250*/ meltfptr[249])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJPREDEF__V25*/ meltfptr[24]); MELT_LOCATION ("warmelt-outobj.melt:183:/ initchunk"); @@ -26039,64 +26114,64 @@ meltmod__warmelt_outobj__initialmeltchunk_0 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V250*/ meltfptr[249])) == + ( /*_._VALROUT___V250*/ meltfptr[249])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V247*/ meltfptr[246]); - ((meltroutine_ptr_t) /*_.VALROUT___V250*/ meltfptr[249])->tabval[1] = - (melt_ptr_t) ( /*_.VALCLO___V247*/ meltfptr[246]); + NULL != /*_._VALCLO___V247*/ meltfptr[246]); + ((meltroutine_ptr_t) /*_._VALROUT___V250*/ meltfptr[249])->tabval[1] = + (melt_ptr_t) ( /*_._VALCLO___V247*/ meltfptr[246]); MELT_LOCATION ("warmelt-outobj.melt:183:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V250*/ meltfptr[249]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V250*/ meltfptr[249]); /*putclosurout#10 */ melt_assertmsg ("putclosrout#10 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V251*/ meltfptr[250])) == + ( /*_._VALCLO___V251*/ meltfptr[250])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#10 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V250*/ meltfptr[249])) == + ( /*_._VALROUT___V250*/ meltfptr[249])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V251*/ meltfptr[250])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V250*/ meltfptr[249]); + ((meltclosure_ptr_t) /*_._VALCLO___V251*/ meltfptr[250])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V250*/ meltfptr[249]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V251*/ meltfptr[250]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V251*/ meltfptr[250]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V252*/ meltfptr[251])) == + ( /*_._VALDATA___V252*/ meltfptr[251])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V252*/ + ( /*_._VALDATA___V252*/ meltfptr[251])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V252*/ meltfptr[251]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V252*/ meltfptr[251]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V253*/ meltfptr[252]); + /*_._VALSTR___V253*/ meltfptr[252]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V252*/ meltfptr[251]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V252*/ meltfptr[251]); - melt_dbgtrace_written_object ( /*_.VALDATA___V252*/ meltfptr[251], + melt_dbgtrace_written_object ( /*_._VALDATA___V252*/ meltfptr[251], "new static instance"); #undef meltfram__ -} /*end of meltmod__warmelt_outobj__initialmeltchunk_0 */ +} /*end of meltmod__WARMELTmiOUTOBJ__initialmeltchunk_0 */ void -meltmod__warmelt_outobj__initialmeltchunk_1 (meltinitial_frame_t * - meltmeltframptr__, - char meltpredefinited[]) +meltmod__WARMELTmiOUTOBJ__initialmeltchunk_1 (meltinitial_frame_t * + meltmeltframptr__, + char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount @@ -26108,55 +26183,55 @@ meltmod__warmelt_outobj__initialmeltchunk_1 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V254*/ meltfptr[253])) + ( /*_._VALROUT___V254*/ meltfptr[253])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_67__OUTPUCOD_NIL#0", NULL != ( /*_.CLASS_OBJNIL__V26*/ meltfptr[25])); - ((meltroutine_ptr_t) /*_.VALROUT___V254*/ meltfptr[253])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V254*/ meltfptr[253])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJNIL__V26*/ meltfptr[25]); MELT_LOCATION ("warmelt-outobj.melt:190:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V254*/ meltfptr[253]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V254*/ meltfptr[253]); /*putclosurout#11 */ melt_assertmsg ("putclosrout#11 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V255*/ meltfptr[254])) == + ( /*_._VALCLO___V255*/ meltfptr[254])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#11 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V254*/ meltfptr[253])) == + ( /*_._VALROUT___V254*/ meltfptr[253])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V255*/ meltfptr[254])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V254*/ meltfptr[253]); + ((meltclosure_ptr_t) /*_._VALCLO___V255*/ meltfptr[254])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V254*/ meltfptr[253]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V255*/ meltfptr[254]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V255*/ meltfptr[254]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V256*/ meltfptr[255])) == + ( /*_._VALDATA___V256*/ meltfptr[255])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V256*/ + ( /*_._VALDATA___V256*/ meltfptr[255])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V256*/ meltfptr[255]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V256*/ meltfptr[255]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V257*/ meltfptr[256]); + /*_._VALSTR___V257*/ meltfptr[256]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V256*/ meltfptr[255]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V256*/ meltfptr[255]); - melt_dbgtrace_written_object ( /*_.VALDATA___V256*/ meltfptr[255], + melt_dbgtrace_written_object ( /*_._VALDATA___V256*/ meltfptr[255], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:196:/ initchunk"); @@ -26165,13 +26240,13 @@ meltmod__warmelt_outobj__initialmeltchunk_1 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V258*/ meltfptr[257])) + ( /*_._VALROUT___V258*/ meltfptr[257])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_71__OUTPUCOD_OBJEXPANDPUREVAL#0", NULL != ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7])); - ((meltroutine_ptr_t) /*_.VALROUT___V258*/ meltfptr[257])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V258*/ meltfptr[257])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7]); MELT_LOCATION ("warmelt-outobj.melt:196:/ initchunk"); @@ -26180,13 +26255,13 @@ meltmod__warmelt_outobj__initialmeltchunk_1 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V258*/ meltfptr[257])) + ( /*_._VALROUT___V258*/ meltfptr[257])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_71__OUTPUCOD_OBJEXPANDPUREVAL#1", NULL != ( /*_.CLASS_OBJEXPANDPUREVAL__V27*/ meltfptr[26])); - ((meltroutine_ptr_t) /*_.VALROUT___V258*/ meltfptr[257])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V258*/ meltfptr[257])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_OBJEXPANDPUREVAL__V27*/ meltfptr[26]); MELT_LOCATION ("warmelt-outobj.melt:196:/ initchunk"); @@ -26195,13 +26270,13 @@ meltmod__warmelt_outobj__initialmeltchunk_1 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V258*/ meltfptr[257])) + ( /*_._VALROUT___V258*/ meltfptr[257])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_71__OUTPUCOD_OBJEXPANDPUREVAL#2", NULL != ( /*_.CLASS_OBJVALUE__V28*/ meltfptr[27])); - ((meltroutine_ptr_t) /*_.VALROUT___V258*/ meltfptr[257])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V258*/ meltfptr[257])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_OBJVALUE__V28*/ meltfptr[27]); MELT_LOCATION ("warmelt-outobj.melt:196:/ initchunk"); @@ -26210,13 +26285,13 @@ meltmod__warmelt_outobj__initialmeltchunk_1 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V258*/ meltfptr[257])) + ( /*_._VALROUT___V258*/ meltfptr[257])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_71__OUTPUCOD_OBJEXPANDPUREVAL#3", NULL != ( /*_.CLASS_CTYPE__V29*/ meltfptr[28])); - ((meltroutine_ptr_t) /*_.VALROUT___V258*/ meltfptr[257])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V258*/ meltfptr[257])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_CTYPE__V29*/ meltfptr[28]); MELT_LOCATION ("warmelt-outobj.melt:196:/ initchunk"); @@ -26225,24 +26300,24 @@ meltmod__warmelt_outobj__initialmeltchunk_1 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V258*/ meltfptr[257])) + ( /*_._VALROUT___V258*/ meltfptr[257])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_71__OUTPUCOD_OBJEXPANDPUREVAL#4", NULL != ( /*_.CTYPE_VOID__V30*/ meltfptr[29])); - ((meltroutine_ptr_t) /*_.VALROUT___V258*/ meltfptr[257])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V258*/ meltfptr[257])->tabval[4] = (melt_ptr_t) ( /*_.CTYPE_VOID__V30*/ meltfptr[29]); MELT_LOCATION ("warmelt-outobj.melt:1373:/ initchunk"); /*^touch */ - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V261*/ meltfptr[260]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V261*/ meltfptr[260]); MELT_LOCATION ("warmelt-outobj.melt:1373:/ initchunk"); /*^touchobj */ - melt_dbgtrace_written_object ( /*_.VALDATA___V261*/ meltfptr[260], + melt_dbgtrace_written_object ( /*_._VALDATA___V261*/ meltfptr[260], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:1392:/ initchunk"); @@ -26250,22 +26325,22 @@ meltmod__warmelt_outobj__initialmeltchunk_1 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V260*/ meltfptr[259])) == + ( /*_._VALROUT___V260*/ meltfptr[259])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALDATA___V261*/ meltfptr[260]); - ((meltroutine_ptr_t) /*_.VALROUT___V260*/ meltfptr[259])->tabval[0] = - (melt_ptr_t) ( /*_.VALDATA___V261*/ meltfptr[260]); + NULL != /*_._VALDATA___V261*/ meltfptr[260]); + ((meltroutine_ptr_t) /*_._VALROUT___V260*/ meltfptr[259])->tabval[0] = + (melt_ptr_t) ( /*_._VALDATA___V261*/ meltfptr[260]); MELT_LOCATION ("warmelt-outobj.melt:1374:/ initchunk"); /*^touch */ - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V262*/ meltfptr[261]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V262*/ meltfptr[261]); MELT_LOCATION ("warmelt-outobj.melt:1374:/ initchunk"); /*^touchobj */ - melt_dbgtrace_written_object ( /*_.VALDATA___V262*/ meltfptr[261], + melt_dbgtrace_written_object ( /*_._VALDATA___V262*/ meltfptr[261], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:1392:/ initchunk"); @@ -26273,24 +26348,24 @@ meltmod__warmelt_outobj__initialmeltchunk_1 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V260*/ meltfptr[259])) == + ( /*_._VALROUT___V260*/ meltfptr[259])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALDATA___V262*/ meltfptr[261]); - ((meltroutine_ptr_t) /*_.VALROUT___V260*/ meltfptr[259])->tabval[1] = - (melt_ptr_t) ( /*_.VALDATA___V262*/ meltfptr[261]); + NULL != /*_._VALDATA___V262*/ meltfptr[261]); + ((meltroutine_ptr_t) /*_._VALROUT___V260*/ meltfptr[259])->tabval[1] = + (melt_ptr_t) ( /*_._VALDATA___V262*/ meltfptr[261]); MELT_LOCATION ("warmelt-outobj.melt:1392:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V260*/ meltfptr[259])) == + ( /*_._VALROUT___V260*/ meltfptr[259])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALDATA___V192*/ meltfptr[191]); - ((meltroutine_ptr_t) /*_.VALROUT___V260*/ meltfptr[259])->tabval[2] = - (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); + NULL != /*_._VALDATA___V192*/ meltfptr[191]); + ((meltroutine_ptr_t) /*_._VALROUT___V260*/ meltfptr[259])->tabval[2] = + (melt_ptr_t) ( /*_._VALDATA___V192*/ meltfptr[191]); MELT_LOCATION ("warmelt-outobj.melt:1392:/ initchunk"); /*^putroutconst */ @@ -26298,12 +26373,12 @@ meltmod__warmelt_outobj__initialmeltchunk_1 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V260*/ meltfptr[259])) + ( /*_._VALROUT___V260*/ meltfptr[259])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_187__OUTPUT_LOCATION#3", NULL != ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_.VALROUT___V260*/ meltfptr[259])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V260*/ meltfptr[259])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:1392:/ initchunk"); @@ -26312,12 +26387,12 @@ meltmod__warmelt_outobj__initialmeltchunk_1 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V260*/ meltfptr[259])) + ( /*_._VALROUT___V260*/ meltfptr[259])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_187__OUTPUT_LOCATION#4", NULL != ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7])); - ((meltroutine_ptr_t) /*_.VALROUT___V260*/ meltfptr[259])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V260*/ meltfptr[259])->tabval[4] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7]); MELT_LOCATION ("warmelt-outobj.melt:1329:/ initchunk"); @@ -26325,12 +26400,12 @@ meltmod__warmelt_outobj__initialmeltchunk_1 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V264*/ meltfptr[263])) == + ( /*_._VALROUT___V264*/ meltfptr[263])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALDATA___V192*/ meltfptr[191]); - ((meltroutine_ptr_t) /*_.VALROUT___V264*/ meltfptr[263])->tabval[0] = - (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); + NULL != /*_._VALDATA___V192*/ meltfptr[191]); + ((meltroutine_ptr_t) /*_._VALROUT___V264*/ meltfptr[263])->tabval[0] = + (melt_ptr_t) ( /*_._VALDATA___V192*/ meltfptr[191]); MELT_LOCATION ("warmelt-outobj.melt:1329:/ initchunk"); /*^putroutconst */ @@ -26338,12 +26413,12 @@ meltmod__warmelt_outobj__initialmeltchunk_1 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V264*/ meltfptr[263])) + ( /*_._VALROUT___V264*/ meltfptr[263])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_173__OUTPUT_RAW_LOCATION#1", NULL != ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_.VALROUT___V264*/ meltfptr[263])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V264*/ meltfptr[263])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:1329:/ initchunk"); @@ -26352,77 +26427,77 @@ meltmod__warmelt_outobj__initialmeltchunk_1 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V264*/ meltfptr[263])) + ( /*_._VALROUT___V264*/ meltfptr[263])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_173__OUTPUT_RAW_LOCATION#2", NULL != ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7])); - ((meltroutine_ptr_t) /*_.VALROUT___V264*/ meltfptr[263])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V264*/ meltfptr[263])->tabval[2] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7]); MELT_LOCATION ("warmelt-outobj.melt:1329:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V264*/ meltfptr[263]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V264*/ meltfptr[263]); /*putclosurout#12 */ melt_assertmsg ("putclosrout#12 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V263*/ meltfptr[262])) == + ( /*_._VALCLO___V263*/ meltfptr[262])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#12 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V264*/ meltfptr[263])) == + ( /*_._VALROUT___V264*/ meltfptr[263])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V263*/ meltfptr[262])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V264*/ meltfptr[263]); + ((meltclosure_ptr_t) /*_._VALCLO___V263*/ meltfptr[262])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V264*/ meltfptr[263]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V263*/ meltfptr[262]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V263*/ meltfptr[262]); MELT_LOCATION ("warmelt-outobj.melt:1392:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V260*/ meltfptr[259])) == + ( /*_._VALROUT___V260*/ meltfptr[259])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V263*/ meltfptr[262]); - ((meltroutine_ptr_t) /*_.VALROUT___V260*/ meltfptr[259])->tabval[5] = - (melt_ptr_t) ( /*_.VALCLO___V263*/ meltfptr[262]); + NULL != /*_._VALCLO___V263*/ meltfptr[262]); + ((meltroutine_ptr_t) /*_._VALROUT___V260*/ meltfptr[259])->tabval[5] = + (melt_ptr_t) ( /*_._VALCLO___V263*/ meltfptr[262]); MELT_LOCATION ("warmelt-outobj.melt:1392:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V260*/ meltfptr[259]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V260*/ meltfptr[259]); /*putclosurout#13 */ melt_assertmsg ("putclosrout#13 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V259*/ meltfptr[258])) == + ( /*_._VALCLO___V259*/ meltfptr[258])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#13 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V260*/ meltfptr[259])) == + ( /*_._VALROUT___V260*/ meltfptr[259])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V259*/ meltfptr[258])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V260*/ meltfptr[259]); + ((meltclosure_ptr_t) /*_._VALCLO___V259*/ meltfptr[258])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V260*/ meltfptr[259]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V259*/ meltfptr[258]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V259*/ meltfptr[258]); MELT_LOCATION ("warmelt-outobj.melt:196:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V258*/ meltfptr[257])) == + ( /*_._VALROUT___V258*/ meltfptr[257])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V259*/ meltfptr[258]); - ((meltroutine_ptr_t) /*_.VALROUT___V258*/ meltfptr[257])->tabval[5] = - (melt_ptr_t) ( /*_.VALCLO___V259*/ meltfptr[258]); + NULL != /*_._VALCLO___V259*/ meltfptr[258]); + ((meltroutine_ptr_t) /*_._VALROUT___V258*/ meltfptr[257])->tabval[5] = + (melt_ptr_t) ( /*_._VALCLO___V259*/ meltfptr[258]); MELT_LOCATION ("warmelt-outobj.melt:196:/ initchunk"); /*^putroutconst */ @@ -26430,13 +26505,13 @@ meltmod__warmelt_outobj__initialmeltchunk_1 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V258*/ meltfptr[257])) + ( /*_._VALROUT___V258*/ meltfptr[257])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_71__OUTPUCOD_OBJEXPANDPUREVAL#6", NULL != ( /*_.ADD2OUT__V15*/ meltfptr[14])); - ((meltroutine_ptr_t) /*_.VALROUT___V258*/ meltfptr[257])->tabval[6] = + ((meltroutine_ptr_t) /*_._VALROUT___V258*/ meltfptr[257])->tabval[6] = (melt_ptr_t) ( /*_.ADD2OUT__V15*/ meltfptr[14]); MELT_LOCATION ("warmelt-outobj.melt:196:/ initchunk"); @@ -26445,13 +26520,13 @@ meltmod__warmelt_outobj__initialmeltchunk_1 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V258*/ meltfptr[257])) + ( /*_._VALROUT___V258*/ meltfptr[257])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_71__OUTPUCOD_OBJEXPANDPUREVAL#7", NULL != ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20])); - ((meltroutine_ptr_t) /*_.VALROUT___V258*/ meltfptr[257])->tabval[7] = + ((meltroutine_ptr_t) /*_._VALROUT___V258*/ meltfptr[257])->tabval[7] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]); MELT_LOCATION ("warmelt-outobj.melt:196:/ initchunk"); @@ -26459,123 +26534,123 @@ meltmod__warmelt_outobj__initialmeltchunk_1 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V258*/ meltfptr[257])) == + ( /*_._VALROUT___V258*/ meltfptr[257])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V263*/ meltfptr[262]); - ((meltroutine_ptr_t) /*_.VALROUT___V258*/ meltfptr[257])->tabval[8] = - (melt_ptr_t) ( /*_.VALCLO___V263*/ meltfptr[262]); + NULL != /*_._VALCLO___V263*/ meltfptr[262]); + ((meltroutine_ptr_t) /*_._VALROUT___V258*/ meltfptr[257])->tabval[8] = + (melt_ptr_t) ( /*_._VALCLO___V263*/ meltfptr[262]); MELT_LOCATION ("warmelt-outobj.melt:196:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V258*/ meltfptr[257]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V258*/ meltfptr[257]); /*putclosurout#14 */ melt_assertmsg ("putclosrout#14 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V265*/ meltfptr[264])) == + ( /*_._VALCLO___V265*/ meltfptr[264])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#14 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V258*/ meltfptr[257])) == + ( /*_._VALROUT___V258*/ meltfptr[257])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V265*/ meltfptr[264])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V258*/ meltfptr[257]); + ((meltclosure_ptr_t) /*_._VALCLO___V265*/ meltfptr[264])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V258*/ meltfptr[257]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V265*/ meltfptr[264]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V265*/ meltfptr[264]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V266*/ meltfptr[265])) == + ( /*_._VALDATA___V266*/ meltfptr[265])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V266*/ + ( /*_._VALDATA___V266*/ meltfptr[265])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V266*/ meltfptr[265]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V266*/ meltfptr[265]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V267*/ meltfptr[266]); + /*_._VALSTR___V267*/ meltfptr[266]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V266*/ meltfptr[265]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V266*/ meltfptr[265]); - melt_dbgtrace_written_object ( /*_.VALDATA___V266*/ meltfptr[265], + melt_dbgtrace_written_object ( /*_._VALDATA___V266*/ meltfptr[265], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V268*/ meltfptr[267])) == + ( /*_._VALDATA___V268*/ meltfptr[267])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V268*/ + ( /*_._VALDATA___V268*/ meltfptr[267])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V268*/ meltfptr[267]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V268*/ meltfptr[267]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V269*/ meltfptr[268]); + /*_._VALSTR___V269*/ meltfptr[268]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V268*/ meltfptr[267]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V268*/ meltfptr[267]); - melt_dbgtrace_written_object ( /*_.VALDATA___V268*/ meltfptr[267], + melt_dbgtrace_written_object ( /*_._VALDATA___V268*/ meltfptr[267], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V270*/ meltfptr[269])) == + ( /*_._VALDATA___V270*/ meltfptr[269])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V270*/ + ( /*_._VALDATA___V270*/ meltfptr[269])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V270*/ meltfptr[269]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V270*/ meltfptr[269]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V271*/ meltfptr[270]); + /*_._VALSTR___V271*/ meltfptr[270]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V270*/ meltfptr[269]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V270*/ meltfptr[269]); - melt_dbgtrace_written_object ( /*_.VALDATA___V270*/ meltfptr[269], + melt_dbgtrace_written_object ( /*_._VALDATA___V270*/ meltfptr[269], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V272*/ meltfptr[271])) == + ( /*_._VALDATA___V272*/ meltfptr[271])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V272*/ + ( /*_._VALDATA___V272*/ meltfptr[271])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V272*/ meltfptr[271]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V272*/ meltfptr[271]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V273*/ meltfptr[272]); + /*_._VALSTR___V273*/ meltfptr[272]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V272*/ meltfptr[271]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V272*/ meltfptr[271]); - melt_dbgtrace_written_object ( /*_.VALDATA___V272*/ meltfptr[271], + melt_dbgtrace_written_object ( /*_._VALDATA___V272*/ meltfptr[271], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:284:/ initchunk"); @@ -26584,12 +26659,12 @@ meltmod__warmelt_outobj__initialmeltchunk_1 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V274*/ meltfptr[273])) + ( /*_._VALROUT___V274*/ meltfptr[273])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_81__OUTPUCOD_OBJHOOKNTH#0", NULL != ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7])); - ((meltroutine_ptr_t) /*_.VALROUT___V274*/ meltfptr[273])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V274*/ meltfptr[273])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7]); MELT_LOCATION ("warmelt-outobj.melt:284:/ initchunk"); @@ -26598,12 +26673,12 @@ meltmod__warmelt_outobj__initialmeltchunk_1 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V274*/ meltfptr[273])) + ( /*_._VALROUT___V274*/ meltfptr[273])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_81__OUTPUCOD_OBJHOOKNTH#1", NULL != ( /*_.CLASS_OBJHOOKNTH__V31*/ meltfptr[30])); - ((meltroutine_ptr_t) /*_.VALROUT___V274*/ meltfptr[273])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V274*/ meltfptr[273])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_OBJHOOKNTH__V31*/ meltfptr[30]); MELT_LOCATION ("warmelt-outobj.melt:284:/ initchunk"); @@ -26612,12 +26687,12 @@ meltmod__warmelt_outobj__initialmeltchunk_1 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V274*/ meltfptr[273])) + ( /*_._VALROUT___V274*/ meltfptr[273])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_81__OUTPUCOD_OBJHOOKNTH#2", NULL != ( /*_.CLASS_OBJVALUE__V28*/ meltfptr[27])); - ((meltroutine_ptr_t) /*_.VALROUT___V274*/ meltfptr[273])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V274*/ meltfptr[273])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_OBJVALUE__V28*/ meltfptr[27]); MELT_LOCATION ("warmelt-outobj.melt:284:/ initchunk"); @@ -26626,12 +26701,12 @@ meltmod__warmelt_outobj__initialmeltchunk_1 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V274*/ meltfptr[273])) + ( /*_._VALROUT___V274*/ meltfptr[273])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_81__OUTPUCOD_OBJHOOKNTH#3", NULL != ( /*_.CTYPE_VALUE__V32*/ meltfptr[31])); - ((meltroutine_ptr_t) /*_.VALROUT___V274*/ meltfptr[273])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V274*/ meltfptr[273])->tabval[3] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V32*/ meltfptr[31]); MELT_LOCATION ("warmelt-outobj.melt:284:/ initchunk"); @@ -26640,12 +26715,12 @@ meltmod__warmelt_outobj__initialmeltchunk_1 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V274*/ meltfptr[273])) + ( /*_._VALROUT___V274*/ meltfptr[273])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_81__OUTPUCOD_OBJHOOKNTH#4", NULL != ( /*_.ADD2OUT__V15*/ meltfptr[14])); - ((meltroutine_ptr_t) /*_.VALROUT___V274*/ meltfptr[273])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V274*/ meltfptr[273])->tabval[4] = (melt_ptr_t) ( /*_.ADD2OUT__V15*/ meltfptr[14]); MELT_LOCATION ("warmelt-outobj.melt:284:/ initchunk"); @@ -26654,116 +26729,116 @@ meltmod__warmelt_outobj__initialmeltchunk_1 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V274*/ meltfptr[273])) + ( /*_._VALROUT___V274*/ meltfptr[273])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_81__OUTPUCOD_OBJHOOKNTH#5", NULL != ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20])); - ((meltroutine_ptr_t) /*_.VALROUT___V274*/ meltfptr[273])->tabval[5] = + ((meltroutine_ptr_t) /*_._VALROUT___V274*/ meltfptr[273])->tabval[5] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]); MELT_LOCATION ("warmelt-outobj.melt:284:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V274*/ meltfptr[273]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V274*/ meltfptr[273]); /*putclosurout#15 */ melt_assertmsg ("putclosrout#15 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V275*/ meltfptr[274])) == + ( /*_._VALCLO___V275*/ meltfptr[274])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#15 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V274*/ meltfptr[273])) == + ( /*_._VALROUT___V274*/ meltfptr[273])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V275*/ meltfptr[274])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V274*/ meltfptr[273]); + ((meltclosure_ptr_t) /*_._VALCLO___V275*/ meltfptr[274])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V274*/ meltfptr[273]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V275*/ meltfptr[274]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V275*/ meltfptr[274]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V276*/ meltfptr[275])) == + ( /*_._VALDATA___V276*/ meltfptr[275])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V276*/ + ( /*_._VALDATA___V276*/ meltfptr[275])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V276*/ meltfptr[275]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V276*/ meltfptr[275]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V277*/ meltfptr[276]); + /*_._VALSTR___V277*/ meltfptr[276]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V276*/ meltfptr[275]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V276*/ meltfptr[275]); - melt_dbgtrace_written_object ( /*_.VALDATA___V276*/ meltfptr[275], + melt_dbgtrace_written_object ( /*_._VALDATA___V276*/ meltfptr[275], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V278*/ meltfptr[277])) == + ( /*_._VALDATA___V278*/ meltfptr[277])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V278*/ + ( /*_._VALDATA___V278*/ meltfptr[277])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V278*/ meltfptr[277]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V278*/ meltfptr[277]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V279*/ meltfptr[278]); + /*_._VALSTR___V279*/ meltfptr[278]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V278*/ meltfptr[277]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V278*/ meltfptr[277]); - melt_dbgtrace_written_object ( /*_.VALDATA___V278*/ meltfptr[277], + melt_dbgtrace_written_object ( /*_._VALDATA___V278*/ meltfptr[277], "new static instance"); /*putclosurout#16 */ melt_assertmsg ("putclosrout#16 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V281*/ meltfptr[280])) == + ( /*_._VALCLO___V281*/ meltfptr[280])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#16 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V280*/ meltfptr[279])) == + ( /*_._VALROUT___V280*/ meltfptr[279])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V281*/ meltfptr[280])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V280*/ meltfptr[279]); + ((meltclosure_ptr_t) /*_._VALCLO___V281*/ meltfptr[280])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V280*/ meltfptr[279]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V281*/ meltfptr[280]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V281*/ meltfptr[280]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V282*/ meltfptr[281])) == + ( /*_._VALDATA___V282*/ meltfptr[281])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V282*/ + ( /*_._VALDATA___V282*/ meltfptr[281])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V282*/ meltfptr[281]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V282*/ meltfptr[281]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V283*/ meltfptr[282]); + /*_._VALSTR___V283*/ meltfptr[282]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V282*/ meltfptr[281]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V282*/ meltfptr[281]); - melt_dbgtrace_written_object ( /*_.VALDATA___V282*/ meltfptr[281], + melt_dbgtrace_written_object ( /*_._VALDATA___V282*/ meltfptr[281], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:315:/ initchunk"); @@ -26772,13 +26847,13 @@ meltmod__warmelt_outobj__initialmeltchunk_1 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V284*/ meltfptr[283])) + ( /*_._VALROUT___V284*/ meltfptr[283])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_91__OUTCINITFILL_OBJINITOBJECT#0", NULL != ( /*_.CLASS_OBJINITOBJECT__V33*/ meltfptr[32])); - ((meltroutine_ptr_t) /*_.VALROUT___V284*/ meltfptr[283])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V284*/ meltfptr[283])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJINITOBJECT__V33*/ meltfptr[32]); MELT_LOCATION ("warmelt-outobj.melt:315:/ initchunk"); @@ -26787,13 +26862,13 @@ meltmod__warmelt_outobj__initialmeltchunk_1 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V284*/ meltfptr[283])) + ( /*_._VALROUT___V284*/ meltfptr[283])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_91__OUTCINITFILL_OBJINITOBJECT#1", NULL != ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7])); - ((meltroutine_ptr_t) /*_.VALROUT___V284*/ meltfptr[283])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V284*/ meltfptr[283])->tabval[1] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7]); MELT_LOCATION ("warmelt-outobj.melt:315:/ initchunk"); @@ -26802,13 +26877,13 @@ meltmod__warmelt_outobj__initialmeltchunk_1 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V284*/ meltfptr[283])) + ( /*_._VALROUT___V284*/ meltfptr[283])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_91__OUTCINITFILL_OBJINITOBJECT#2", NULL != ( /*_.CLASS_NREP_DATAINSTANCE__V34*/ meltfptr[33])); - ((meltroutine_ptr_t) /*_.VALROUT___V284*/ meltfptr[283])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V284*/ meltfptr[283])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NREP_DATAINSTANCE__V34*/ meltfptr[33]); MELT_LOCATION ("warmelt-outobj.melt:315:/ initchunk"); @@ -26817,13 +26892,13 @@ meltmod__warmelt_outobj__initialmeltchunk_1 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V284*/ meltfptr[283])) + ( /*_._VALROUT___V284*/ meltfptr[283])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_91__OUTCINITFILL_OBJINITOBJECT#3", NULL != ( /*_.CLASS_CLASS__V35*/ meltfptr[34])); - ((meltroutine_ptr_t) /*_.VALROUT___V284*/ meltfptr[283])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V284*/ meltfptr[283])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_CLASS__V35*/ meltfptr[34]); MELT_LOCATION ("warmelt-outobj.melt:315:/ initchunk"); @@ -26831,24 +26906,24 @@ meltmod__warmelt_outobj__initialmeltchunk_1 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V284*/ meltfptr[283])) == + ( /*_._VALROUT___V284*/ meltfptr[283])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V259*/ meltfptr[258]); - ((meltroutine_ptr_t) /*_.VALROUT___V284*/ meltfptr[283])->tabval[4] = - (melt_ptr_t) ( /*_.VALCLO___V259*/ meltfptr[258]); + NULL != /*_._VALCLO___V259*/ meltfptr[258]); + ((meltroutine_ptr_t) /*_._VALROUT___V284*/ meltfptr[283])->tabval[4] = + (melt_ptr_t) ( /*_._VALCLO___V259*/ meltfptr[258]); MELT_LOCATION ("warmelt-outobj.melt:315:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V284*/ meltfptr[283])) == + ( /*_._VALROUT___V284*/ meltfptr[283])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V247*/ meltfptr[246]); - ((meltroutine_ptr_t) /*_.VALROUT___V284*/ meltfptr[283])->tabval[5] = - (melt_ptr_t) ( /*_.VALCLO___V247*/ meltfptr[246]); + NULL != /*_._VALCLO___V247*/ meltfptr[246]); + ((meltroutine_ptr_t) /*_._VALROUT___V284*/ meltfptr[283])->tabval[5] = + (melt_ptr_t) ( /*_._VALCLO___V247*/ meltfptr[246]); MELT_LOCATION ("warmelt-outobj.melt:315:/ initchunk"); /*^putroutconst */ @@ -26856,13 +26931,13 @@ meltmod__warmelt_outobj__initialmeltchunk_1 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V284*/ meltfptr[283])) + ( /*_._VALROUT___V284*/ meltfptr[283])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_91__OUTCINITFILL_OBJINITOBJECT#6", NULL != ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20])); - ((meltroutine_ptr_t) /*_.VALROUT___V284*/ meltfptr[283])->tabval[6] = + ((meltroutine_ptr_t) /*_._VALROUT___V284*/ meltfptr[283])->tabval[6] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]); MELT_LOCATION ("warmelt-outobj.melt:315:/ initchunk"); @@ -26871,13 +26946,13 @@ meltmod__warmelt_outobj__initialmeltchunk_1 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V284*/ meltfptr[283])) + ( /*_._VALROUT___V284*/ meltfptr[283])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_91__OUTCINITFILL_OBJINITOBJECT#7", NULL != ( /*_.CLASS_OBJINITUNIQUEOBJECT__V36*/ meltfptr[35])); - ((meltroutine_ptr_t) /*_.VALROUT___V284*/ meltfptr[283])->tabval[7] = + ((meltroutine_ptr_t) /*_._VALROUT___V284*/ meltfptr[283])->tabval[7] = (melt_ptr_t) ( /*_.CLASS_OBJINITUNIQUEOBJECT__V36*/ meltfptr[35]); MELT_LOCATION ("warmelt-outobj.melt:315:/ initchunk"); @@ -26886,13 +26961,13 @@ meltmod__warmelt_outobj__initialmeltchunk_1 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V284*/ meltfptr[283])) + ( /*_._VALROUT___V284*/ meltfptr[283])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_91__OUTCINITFILL_OBJINITOBJECT#8", NULL != ( /*_.CLASS_SYMBOL__V16*/ meltfptr[15])); - ((meltroutine_ptr_t) /*_.VALROUT___V284*/ meltfptr[283])->tabval[8] = + ((meltroutine_ptr_t) /*_._VALROUT___V284*/ meltfptr[283])->tabval[8] = (melt_ptr_t) ( /*_.CLASS_SYMBOL__V16*/ meltfptr[15]); MELT_LOCATION ("warmelt-outobj.melt:315:/ initchunk"); @@ -26900,12 +26975,12 @@ meltmod__warmelt_outobj__initialmeltchunk_1 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V284*/ meltfptr[283])) == + ( /*_._VALROUT___V284*/ meltfptr[283])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALDATA___V192*/ meltfptr[191]); - ((meltroutine_ptr_t) /*_.VALROUT___V284*/ meltfptr[283])->tabval[9] = - (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); + NULL != /*_._VALDATA___V192*/ meltfptr[191]); + ((meltroutine_ptr_t) /*_._VALROUT___V284*/ meltfptr[283])->tabval[9] = + (melt_ptr_t) ( /*_._VALDATA___V192*/ meltfptr[191]); MELT_LOCATION ("warmelt-outobj.melt:315:/ initchunk"); /*^putroutconst */ @@ -26913,102 +26988,102 @@ meltmod__warmelt_outobj__initialmeltchunk_1 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V284*/ meltfptr[283])) + ( /*_._VALROUT___V284*/ meltfptr[283])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_91__OUTCINITFILL_OBJINITOBJECT#10", NULL != ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_.VALROUT___V284*/ meltfptr[283])->tabval[10] = + ((meltroutine_ptr_t) /*_._VALROUT___V284*/ meltfptr[283])->tabval[10] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:315:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V284*/ meltfptr[283]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V284*/ meltfptr[283]); /*putclosurout#17 */ melt_assertmsg ("putclosrout#17 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V285*/ meltfptr[284])) == + ( /*_._VALCLO___V285*/ meltfptr[284])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#17 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V284*/ meltfptr[283])) == + ( /*_._VALROUT___V284*/ meltfptr[283])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V285*/ meltfptr[284])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V284*/ meltfptr[283]); + ((meltclosure_ptr_t) /*_._VALCLO___V285*/ meltfptr[284])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V284*/ meltfptr[283]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V285*/ meltfptr[284]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V285*/ meltfptr[284]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V286*/ meltfptr[285])) == + ( /*_._VALDATA___V286*/ meltfptr[285])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V286*/ + ( /*_._VALDATA___V286*/ meltfptr[285])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V286*/ meltfptr[285]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V286*/ meltfptr[285]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V287*/ meltfptr[286]); + /*_._VALSTR___V287*/ meltfptr[286]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V286*/ meltfptr[285]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V286*/ meltfptr[285]); - melt_dbgtrace_written_object ( /*_.VALDATA___V286*/ meltfptr[285], + melt_dbgtrace_written_object ( /*_._VALDATA___V286*/ meltfptr[285], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V288*/ meltfptr[287])) == + ( /*_._VALDATA___V288*/ meltfptr[287])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V288*/ + ( /*_._VALDATA___V288*/ meltfptr[287])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V288*/ meltfptr[287]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V288*/ meltfptr[287]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V289*/ meltfptr[288]); + /*_._VALSTR___V289*/ meltfptr[288]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V288*/ meltfptr[287]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V288*/ meltfptr[287]); - melt_dbgtrace_written_object ( /*_.VALDATA___V288*/ meltfptr[287], + melt_dbgtrace_written_object ( /*_._VALDATA___V288*/ meltfptr[287], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V290*/ meltfptr[289])) == + ( /*_._VALDATA___V290*/ meltfptr[289])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V290*/ + ( /*_._VALDATA___V290*/ meltfptr[289])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V290*/ meltfptr[289]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V290*/ meltfptr[289]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V291*/ meltfptr[290]); + /*_._VALSTR___V291*/ meltfptr[290]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V290*/ meltfptr[289]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V290*/ meltfptr[289]); - melt_dbgtrace_written_object ( /*_.VALDATA___V290*/ meltfptr[289], + melt_dbgtrace_written_object ( /*_._VALDATA___V290*/ meltfptr[289], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:468:/ initchunk"); @@ -27017,13 +27092,13 @@ meltmod__warmelt_outobj__initialmeltchunk_1 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V292*/ meltfptr[291])) + ( /*_._VALROUT___V292*/ meltfptr[291])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_99__OUTCINITPREDEF_OBJINITOBJECT#0", NULL != ( /*_.CLASS_OBJINITOBJECT__V33*/ meltfptr[32])); - ((meltroutine_ptr_t) /*_.VALROUT___V292*/ meltfptr[291])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V292*/ meltfptr[291])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJINITOBJECT__V33*/ meltfptr[32]); MELT_LOCATION ("warmelt-outobj.melt:468:/ initchunk"); @@ -27032,13 +27107,13 @@ meltmod__warmelt_outobj__initialmeltchunk_1 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V292*/ meltfptr[291])) + ( /*_._VALROUT___V292*/ meltfptr[291])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_99__OUTCINITPREDEF_OBJINITOBJECT#1", NULL != ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7])); - ((meltroutine_ptr_t) /*_.VALROUT___V292*/ meltfptr[291])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V292*/ meltfptr[291])->tabval[1] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7]); MELT_LOCATION ("warmelt-outobj.melt:468:/ initchunk"); @@ -27047,13 +27122,13 @@ meltmod__warmelt_outobj__initialmeltchunk_1 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V292*/ meltfptr[291])) + ( /*_._VALROUT___V292*/ meltfptr[291])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_99__OUTCINITPREDEF_OBJINITOBJECT#2", NULL != ( /*_.CLASS_NREP_DATAINSTANCE__V34*/ meltfptr[33])); - ((meltroutine_ptr_t) /*_.VALROUT___V292*/ meltfptr[291])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V292*/ meltfptr[291])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NREP_DATAINSTANCE__V34*/ meltfptr[33]); MELT_LOCATION ("warmelt-outobj.melt:468:/ initchunk"); @@ -27062,13 +27137,13 @@ meltmod__warmelt_outobj__initialmeltchunk_1 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V292*/ meltfptr[291])) + ( /*_._VALROUT___V292*/ meltfptr[291])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_99__OUTCINITPREDEF_OBJINITOBJECT#3", NULL != ( /*_.CLASS_NREP_NIL__V37*/ meltfptr[36])); - ((meltroutine_ptr_t) /*_.VALROUT___V292*/ meltfptr[291])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V292*/ meltfptr[291])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_NREP_NIL__V37*/ meltfptr[36]); MELT_LOCATION ("warmelt-outobj.melt:468:/ initchunk"); @@ -27076,24 +27151,24 @@ meltmod__warmelt_outobj__initialmeltchunk_1 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V292*/ meltfptr[291])) == + ( /*_._VALROUT___V292*/ meltfptr[291])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V259*/ meltfptr[258]); - ((meltroutine_ptr_t) /*_.VALROUT___V292*/ meltfptr[291])->tabval[4] = - (melt_ptr_t) ( /*_.VALCLO___V259*/ meltfptr[258]); + NULL != /*_._VALCLO___V259*/ meltfptr[258]); + ((meltroutine_ptr_t) /*_._VALROUT___V292*/ meltfptr[291])->tabval[4] = + (melt_ptr_t) ( /*_._VALCLO___V259*/ meltfptr[258]); MELT_LOCATION ("warmelt-outobj.melt:468:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V292*/ meltfptr[291])) == + ( /*_._VALROUT___V292*/ meltfptr[291])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALDATA___V192*/ meltfptr[191]); - ((meltroutine_ptr_t) /*_.VALROUT___V292*/ meltfptr[291])->tabval[5] = - (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); + NULL != /*_._VALDATA___V192*/ meltfptr[191]); + ((meltroutine_ptr_t) /*_._VALROUT___V292*/ meltfptr[291])->tabval[5] = + (melt_ptr_t) ( /*_._VALDATA___V192*/ meltfptr[191]); MELT_LOCATION ("warmelt-outobj.melt:468:/ initchunk"); /*^putroutconst */ @@ -27101,13 +27176,13 @@ meltmod__warmelt_outobj__initialmeltchunk_1 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V292*/ meltfptr[291])) + ( /*_._VALROUT___V292*/ meltfptr[291])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_99__OUTCINITPREDEF_OBJINITOBJECT#6", NULL != ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_.VALROUT___V292*/ meltfptr[291])->tabval[6] = + ((meltroutine_ptr_t) /*_._VALROUT___V292*/ meltfptr[291])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:468:/ initchunk"); @@ -27116,56 +27191,56 @@ meltmod__warmelt_outobj__initialmeltchunk_1 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V292*/ meltfptr[291])) + ( /*_._VALROUT___V292*/ meltfptr[291])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_99__OUTCINITPREDEF_OBJINITOBJECT#7", NULL != ( /*_.CLASS_SYMBOL__V16*/ meltfptr[15])); - ((meltroutine_ptr_t) /*_.VALROUT___V292*/ meltfptr[291])->tabval[7] = + ((meltroutine_ptr_t) /*_._VALROUT___V292*/ meltfptr[291])->tabval[7] = (melt_ptr_t) ( /*_.CLASS_SYMBOL__V16*/ meltfptr[15]); MELT_LOCATION ("warmelt-outobj.melt:468:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V292*/ meltfptr[291]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V292*/ meltfptr[291]); /*putclosurout#18 */ melt_assertmsg ("putclosrout#18 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V293*/ meltfptr[292])) == + ( /*_._VALCLO___V293*/ meltfptr[292])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#18 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V292*/ meltfptr[291])) == + ( /*_._VALROUT___V292*/ meltfptr[291])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V293*/ meltfptr[292])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V292*/ meltfptr[291]); + ((meltclosure_ptr_t) /*_._VALCLO___V293*/ meltfptr[292])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V292*/ meltfptr[291]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V293*/ meltfptr[292]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V293*/ meltfptr[292]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V294*/ meltfptr[293])) == + ( /*_._VALDATA___V294*/ meltfptr[293])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V294*/ + ( /*_._VALDATA___V294*/ meltfptr[293])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V294*/ meltfptr[293]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V294*/ meltfptr[293]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V295*/ meltfptr[294]); + /*_._VALSTR___V295*/ meltfptr[294]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V294*/ meltfptr[293]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V294*/ meltfptr[293]); - melt_dbgtrace_written_object ( /*_.VALDATA___V294*/ meltfptr[293], + melt_dbgtrace_written_object ( /*_._VALDATA___V294*/ meltfptr[293], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:558:/ initchunk"); @@ -27174,13 +27249,13 @@ meltmod__warmelt_outobj__initialmeltchunk_1 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V296*/ meltfptr[295])) + ( /*_._VALROUT___V296*/ meltfptr[295])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_103__OUTCINITPREDEF_OBJINITHOOK#0", NULL != ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7])); - ((meltroutine_ptr_t) /*_.VALROUT___V296*/ meltfptr[295])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V296*/ meltfptr[295])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7]); MELT_LOCATION ("warmelt-outobj.melt:558:/ initchunk"); @@ -27189,13 +27264,13 @@ meltmod__warmelt_outobj__initialmeltchunk_1 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V296*/ meltfptr[295])) + ( /*_._VALROUT___V296*/ meltfptr[295])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_103__OUTCINITPREDEF_OBJINITHOOK#1", NULL != ( /*_.CLASS_OBJINITHOOK__V38*/ meltfptr[37])); - ((meltroutine_ptr_t) /*_.VALROUT___V296*/ meltfptr[295])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V296*/ meltfptr[295])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_OBJINITHOOK__V38*/ meltfptr[37]); MELT_LOCATION ("warmelt-outobj.melt:558:/ initchunk"); @@ -27204,13 +27279,13 @@ meltmod__warmelt_outobj__initialmeltchunk_1 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V296*/ meltfptr[295])) + ( /*_._VALROUT___V296*/ meltfptr[295])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_103__OUTCINITPREDEF_OBJINITHOOK#2", NULL != ( /*_.CLASS_OBJINITELEM__V20*/ meltfptr[19])); - ((meltroutine_ptr_t) /*_.VALROUT___V296*/ meltfptr[295])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V296*/ meltfptr[295])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_OBJINITELEM__V20*/ meltfptr[19]); MELT_LOCATION ("warmelt-outobj.melt:558:/ initchunk"); @@ -27219,13 +27294,13 @@ meltmod__warmelt_outobj__initialmeltchunk_1 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V296*/ meltfptr[295])) + ( /*_._VALROUT___V296*/ meltfptr[295])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_103__OUTCINITPREDEF_OBJINITHOOK#3", NULL != ( /*_.CLASS_NREP__V39*/ meltfptr[38])); - ((meltroutine_ptr_t) /*_.VALROUT___V296*/ meltfptr[295])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V296*/ meltfptr[295])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_NREP__V39*/ meltfptr[38]); MELT_LOCATION ("warmelt-outobj.melt:558:/ initchunk"); @@ -27233,12 +27308,12 @@ meltmod__warmelt_outobj__initialmeltchunk_1 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V296*/ meltfptr[295])) == + ( /*_._VALROUT___V296*/ meltfptr[295])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V259*/ meltfptr[258]); - ((meltroutine_ptr_t) /*_.VALROUT___V296*/ meltfptr[295])->tabval[4] = - (melt_ptr_t) ( /*_.VALCLO___V259*/ meltfptr[258]); + NULL != /*_._VALCLO___V259*/ meltfptr[258]); + ((meltroutine_ptr_t) /*_._VALROUT___V296*/ meltfptr[295])->tabval[4] = + (melt_ptr_t) ( /*_._VALCLO___V259*/ meltfptr[258]); MELT_LOCATION ("warmelt-outobj.melt:558:/ initchunk"); /*^putroutconst */ @@ -27246,13 +27321,13 @@ meltmod__warmelt_outobj__initialmeltchunk_1 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V296*/ meltfptr[295])) + ( /*_._VALROUT___V296*/ meltfptr[295])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_103__OUTCINITPREDEF_OBJINITHOOK#5", NULL != ( /*_.ADD2OUT__V15*/ meltfptr[14])); - ((meltroutine_ptr_t) /*_.VALROUT___V296*/ meltfptr[295])->tabval[5] = + ((meltroutine_ptr_t) /*_._VALROUT___V296*/ meltfptr[295])->tabval[5] = (melt_ptr_t) ( /*_.ADD2OUT__V15*/ meltfptr[14]); MELT_LOCATION ("warmelt-outobj.melt:558:/ initchunk"); @@ -27261,13 +27336,13 @@ meltmod__warmelt_outobj__initialmeltchunk_1 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V296*/ meltfptr[295])) + ( /*_._VALROUT___V296*/ meltfptr[295])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_103__OUTCINITPREDEF_OBJINITHOOK#6", NULL != ( /*_.CLASS_SYMBOL__V16*/ meltfptr[15])); - ((meltroutine_ptr_t) /*_.VALROUT___V296*/ meltfptr[295])->tabval[6] = + ((meltroutine_ptr_t) /*_._VALROUT___V296*/ meltfptr[295])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_SYMBOL__V16*/ meltfptr[15]); MELT_LOCATION ("warmelt-outobj.melt:558:/ initchunk"); @@ -27276,130 +27351,130 @@ meltmod__warmelt_outobj__initialmeltchunk_1 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V296*/ meltfptr[295])) + ( /*_._VALROUT___V296*/ meltfptr[295])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_103__OUTCINITPREDEF_OBJINITHOOK#7", NULL != ( /*_.CLASS_NAMED__V14*/ meltfptr[13])); - ((meltroutine_ptr_t) /*_.VALROUT___V296*/ meltfptr[295])->tabval[7] = + ((meltroutine_ptr_t) /*_._VALROUT___V296*/ meltfptr[295])->tabval[7] = (melt_ptr_t) ( /*_.CLASS_NAMED__V14*/ meltfptr[13]); MELT_LOCATION ("warmelt-outobj.melt:558:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V296*/ meltfptr[295]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V296*/ meltfptr[295]); /*putclosurout#19 */ melt_assertmsg ("putclosrout#19 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V297*/ meltfptr[296])) == + ( /*_._VALCLO___V297*/ meltfptr[296])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#19 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V296*/ meltfptr[295])) == + ( /*_._VALROUT___V296*/ meltfptr[295])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V297*/ meltfptr[296])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V296*/ meltfptr[295]); + ((meltclosure_ptr_t) /*_._VALCLO___V297*/ meltfptr[296])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V296*/ meltfptr[295]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V297*/ meltfptr[296]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V297*/ meltfptr[296]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V298*/ meltfptr[297])) == + ( /*_._VALDATA___V298*/ meltfptr[297])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V298*/ + ( /*_._VALDATA___V298*/ meltfptr[297])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V298*/ meltfptr[297]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V298*/ meltfptr[297]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V299*/ meltfptr[298]); + /*_._VALSTR___V299*/ meltfptr[298]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V298*/ meltfptr[297]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V298*/ meltfptr[297]); - melt_dbgtrace_written_object ( /*_.VALDATA___V298*/ meltfptr[297], + melt_dbgtrace_written_object ( /*_._VALDATA___V298*/ meltfptr[297], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V300*/ meltfptr[299])) == + ( /*_._VALDATA___V300*/ meltfptr[299])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V300*/ + ( /*_._VALDATA___V300*/ meltfptr[299])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V300*/ meltfptr[299]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V300*/ meltfptr[299]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V301*/ meltfptr[300]); + /*_._VALSTR___V301*/ meltfptr[300]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V300*/ meltfptr[299]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V300*/ meltfptr[299]); - melt_dbgtrace_written_object ( /*_.VALDATA___V300*/ meltfptr[299], + melt_dbgtrace_written_object ( /*_._VALDATA___V300*/ meltfptr[299], "new static instance"); /*putclosurout#20 */ melt_assertmsg ("putclosrout#20 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V303*/ meltfptr[302])) == + ( /*_._VALCLO___V303*/ meltfptr[302])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#20 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V302*/ meltfptr[301])) == + ( /*_._VALROUT___V302*/ meltfptr[301])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V303*/ meltfptr[302])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V302*/ meltfptr[301]); + ((meltclosure_ptr_t) /*_._VALCLO___V303*/ meltfptr[302])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V302*/ meltfptr[301]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V303*/ meltfptr[302]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V303*/ meltfptr[302]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V304*/ meltfptr[303])) == + ( /*_._VALDATA___V304*/ meltfptr[303])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V304*/ + ( /*_._VALDATA___V304*/ meltfptr[303])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V304*/ meltfptr[303]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V304*/ meltfptr[303]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V305*/ meltfptr[304]); + /*_._VALSTR___V305*/ meltfptr[304]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V304*/ meltfptr[303]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V304*/ meltfptr[303]); #undef meltfram__ -} /*end of meltmod__warmelt_outobj__initialmeltchunk_1 */ +} /*end of meltmod__WARMELTmiOUTOBJ__initialmeltchunk_1 */ void -meltmod__warmelt_outobj__initialmeltchunk_2 (meltinitial_frame_t * - meltmeltframptr__, - char meltpredefinited[]) +meltmod__WARMELTmiOUTOBJ__initialmeltchunk_2 (meltinitial_frame_t * + meltmeltframptr__, + char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L (void) meltpredefinited; - melt_dbgtrace_written_object ( /*_.VALDATA___V304*/ meltfptr[303], + melt_dbgtrace_written_object ( /*_._VALDATA___V304*/ meltfptr[303], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:626:/ initchunk"); @@ -27408,13 +27483,13 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V306*/ meltfptr[305])) + ( /*_._VALROUT___V306*/ meltfptr[305])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_113__OUTCINITFILL_OBJINITMULTIPLE#0", NULL != ( /*_.CLASS_OBJINITMULTIPLE__V40*/ meltfptr[39])); - ((meltroutine_ptr_t) /*_.VALROUT___V306*/ meltfptr[305])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V306*/ meltfptr[305])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJINITMULTIPLE__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-outobj.melt:626:/ initchunk"); @@ -27423,13 +27498,13 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V306*/ meltfptr[305])) + ( /*_._VALROUT___V306*/ meltfptr[305])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_113__OUTCINITFILL_OBJINITMULTIPLE#1", NULL != ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7])); - ((meltroutine_ptr_t) /*_.VALROUT___V306*/ meltfptr[305])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V306*/ meltfptr[305])->tabval[1] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7]); MELT_LOCATION ("warmelt-outobj.melt:626:/ initchunk"); @@ -27438,13 +27513,13 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V306*/ meltfptr[305])) + ( /*_._VALROUT___V306*/ meltfptr[305])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_113__OUTCINITFILL_OBJINITMULTIPLE#2", NULL != ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20])); - ((meltroutine_ptr_t) /*_.VALROUT___V306*/ meltfptr[305])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V306*/ meltfptr[305])->tabval[2] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]); MELT_LOCATION ("warmelt-outobj.melt:626:/ initchunk"); @@ -27452,12 +27527,12 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V306*/ meltfptr[305])) == + ( /*_._VALROUT___V306*/ meltfptr[305])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALDATA___V192*/ meltfptr[191]); - ((meltroutine_ptr_t) /*_.VALROUT___V306*/ meltfptr[305])->tabval[3] = - (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); + NULL != /*_._VALDATA___V192*/ meltfptr[191]); + ((meltroutine_ptr_t) /*_._VALROUT___V306*/ meltfptr[305])->tabval[3] = + (melt_ptr_t) ( /*_._VALDATA___V192*/ meltfptr[191]); MELT_LOCATION ("warmelt-outobj.melt:626:/ initchunk"); /*^putroutconst */ @@ -27465,71 +27540,71 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V306*/ meltfptr[305])) + ( /*_._VALROUT___V306*/ meltfptr[305])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_113__OUTCINITFILL_OBJINITMULTIPLE#4", NULL != ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_.VALROUT___V306*/ meltfptr[305])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V306*/ meltfptr[305])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:626:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V306*/ meltfptr[305]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V306*/ meltfptr[305]); /*putclosurout#21 */ melt_assertmsg ("putclosrout#21 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V307*/ meltfptr[306])) == + ( /*_._VALCLO___V307*/ meltfptr[306])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#21 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V306*/ meltfptr[305])) == + ( /*_._VALROUT___V306*/ meltfptr[305])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V307*/ meltfptr[306])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V306*/ meltfptr[305]); + ((meltclosure_ptr_t) /*_._VALCLO___V307*/ meltfptr[306])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V306*/ meltfptr[305]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V307*/ meltfptr[306]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V307*/ meltfptr[306]); /*putclosurout#22 */ melt_assertmsg ("putclosrout#22 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V309*/ meltfptr[308])) == + ( /*_._VALCLO___V309*/ meltfptr[308])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#22 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V308*/ meltfptr[307])) == + ( /*_._VALROUT___V308*/ meltfptr[307])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V309*/ meltfptr[308])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V308*/ meltfptr[307]); + ((meltclosure_ptr_t) /*_._VALCLO___V309*/ meltfptr[308])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V308*/ meltfptr[307]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V309*/ meltfptr[308]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V309*/ meltfptr[308]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V310*/ meltfptr[309])) == + ( /*_._VALDATA___V310*/ meltfptr[309])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V310*/ + ( /*_._VALDATA___V310*/ meltfptr[309])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V310*/ meltfptr[309]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V310*/ meltfptr[309]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V311*/ meltfptr[310]); + /*_._VALSTR___V311*/ meltfptr[310]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V310*/ meltfptr[309]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V310*/ meltfptr[309]); - melt_dbgtrace_written_object ( /*_.VALDATA___V310*/ meltfptr[309], + melt_dbgtrace_written_object ( /*_._VALDATA___V310*/ meltfptr[309], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:680:/ initchunk"); @@ -27538,13 +27613,13 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V312*/ meltfptr[311])) + ( /*_._VALROUT___V312*/ meltfptr[311])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_119__OUTCINITFILL_OBJINITCLOSURE#0", NULL != ( /*_.CLASS_OBJINITCLOSURE__V41*/ meltfptr[40])); - ((meltroutine_ptr_t) /*_.VALROUT___V312*/ meltfptr[311])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V312*/ meltfptr[311])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJINITCLOSURE__V41*/ meltfptr[40]); MELT_LOCATION ("warmelt-outobj.melt:680:/ initchunk"); @@ -27553,13 +27628,13 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V312*/ meltfptr[311])) + ( /*_._VALROUT___V312*/ meltfptr[311])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_119__OUTCINITFILL_OBJINITCLOSURE#1", NULL != ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7])); - ((meltroutine_ptr_t) /*_.VALROUT___V312*/ meltfptr[311])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V312*/ meltfptr[311])->tabval[1] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7]); MELT_LOCATION ("warmelt-outobj.melt:680:/ initchunk"); @@ -27568,13 +27643,13 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V312*/ meltfptr[311])) + ( /*_._VALROUT___V312*/ meltfptr[311])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_119__OUTCINITFILL_OBJINITCLOSURE#2", NULL != ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20])); - ((meltroutine_ptr_t) /*_.VALROUT___V312*/ meltfptr[311])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V312*/ meltfptr[311])->tabval[2] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]); MELT_LOCATION ("warmelt-outobj.melt:680:/ initchunk"); @@ -27582,12 +27657,12 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V312*/ meltfptr[311])) == + ( /*_._VALROUT___V312*/ meltfptr[311])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALDATA___V192*/ meltfptr[191]); - ((meltroutine_ptr_t) /*_.VALROUT___V312*/ meltfptr[311])->tabval[3] = - (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); + NULL != /*_._VALDATA___V192*/ meltfptr[191]); + ((meltroutine_ptr_t) /*_._VALROUT___V312*/ meltfptr[311])->tabval[3] = + (melt_ptr_t) ( /*_._VALDATA___V192*/ meltfptr[191]); MELT_LOCATION ("warmelt-outobj.melt:680:/ initchunk"); /*^putroutconst */ @@ -27595,71 +27670,71 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V312*/ meltfptr[311])) + ( /*_._VALROUT___V312*/ meltfptr[311])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_119__OUTCINITFILL_OBJINITCLOSURE#4", NULL != ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_.VALROUT___V312*/ meltfptr[311])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V312*/ meltfptr[311])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:680:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V312*/ meltfptr[311]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V312*/ meltfptr[311]); /*putclosurout#23 */ melt_assertmsg ("putclosrout#23 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V313*/ meltfptr[312])) == + ( /*_._VALCLO___V313*/ meltfptr[312])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#23 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V312*/ meltfptr[311])) == + ( /*_._VALROUT___V312*/ meltfptr[311])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V313*/ meltfptr[312])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V312*/ meltfptr[311]); + ((meltclosure_ptr_t) /*_._VALCLO___V313*/ meltfptr[312])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V312*/ meltfptr[311]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V313*/ meltfptr[312]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V313*/ meltfptr[312]); /*putclosurout#24 */ melt_assertmsg ("putclosrout#24 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V315*/ meltfptr[314])) == + ( /*_._VALCLO___V315*/ meltfptr[314])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#24 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V314*/ meltfptr[313])) == + ( /*_._VALROUT___V314*/ meltfptr[313])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V315*/ meltfptr[314])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V314*/ meltfptr[313]); + ((meltclosure_ptr_t) /*_._VALCLO___V315*/ meltfptr[314])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V314*/ meltfptr[313]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V315*/ meltfptr[314]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V315*/ meltfptr[314]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V316*/ meltfptr[315])) == + ( /*_._VALDATA___V316*/ meltfptr[315])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V316*/ + ( /*_._VALDATA___V316*/ meltfptr[315])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V316*/ meltfptr[315]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V316*/ meltfptr[315]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V317*/ meltfptr[316]); + /*_._VALSTR___V317*/ meltfptr[316]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V316*/ meltfptr[315]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V316*/ meltfptr[315]); - melt_dbgtrace_written_object ( /*_.VALDATA___V316*/ meltfptr[315], + melt_dbgtrace_written_object ( /*_._VALDATA___V316*/ meltfptr[315], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:751:/ initchunk"); @@ -27668,13 +27743,13 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V318*/ meltfptr[317])) + ( /*_._VALROUT___V318*/ meltfptr[317])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_125__OUTCINITFILL_OBJINITROUTINE#0", NULL != ( /*_.CLASS_OBJINITROUTINE__V42*/ meltfptr[41])); - ((meltroutine_ptr_t) /*_.VALROUT___V318*/ meltfptr[317])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V318*/ meltfptr[317])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJINITROUTINE__V42*/ meltfptr[41]); MELT_LOCATION ("warmelt-outobj.melt:751:/ initchunk"); @@ -27683,13 +27758,13 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V318*/ meltfptr[317])) + ( /*_._VALROUT___V318*/ meltfptr[317])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_125__OUTCINITFILL_OBJINITROUTINE#1", NULL != ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7])); - ((meltroutine_ptr_t) /*_.VALROUT___V318*/ meltfptr[317])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V318*/ meltfptr[317])->tabval[1] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7]); MELT_LOCATION ("warmelt-outobj.melt:751:/ initchunk"); @@ -27698,13 +27773,13 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V318*/ meltfptr[317])) + ( /*_._VALROUT___V318*/ meltfptr[317])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_125__OUTCINITFILL_OBJINITROUTINE#2", NULL != ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20])); - ((meltroutine_ptr_t) /*_.VALROUT___V318*/ meltfptr[317])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V318*/ meltfptr[317])->tabval[2] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]); MELT_LOCATION ("warmelt-outobj.melt:751:/ initchunk"); @@ -27713,13 +27788,13 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V318*/ meltfptr[317])) + ( /*_._VALROUT___V318*/ meltfptr[317])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_125__OUTCINITFILL_OBJINITROUTINE#3", NULL != ( /*_.CLASS_NREP_DATAROUTINE__V43*/ meltfptr[42])); - ((meltroutine_ptr_t) /*_.VALROUT___V318*/ meltfptr[317])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V318*/ meltfptr[317])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_NREP_DATAROUTINE__V43*/ meltfptr[42]); MELT_LOCATION ("warmelt-outobj.melt:751:/ initchunk"); @@ -27728,13 +27803,13 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V318*/ meltfptr[317])) + ( /*_._VALROUT___V318*/ meltfptr[317])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_125__OUTCINITFILL_OBJINITROUTINE#4", NULL != ( /*_.CLASS_NAMED__V14*/ meltfptr[13])); - ((meltroutine_ptr_t) /*_.VALROUT___V318*/ meltfptr[317])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V318*/ meltfptr[317])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_NAMED__V14*/ meltfptr[13]); MELT_LOCATION ("warmelt-outobj.melt:751:/ initchunk"); @@ -27743,13 +27818,13 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V318*/ meltfptr[317])) + ( /*_._VALROUT___V318*/ meltfptr[317])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_125__OUTCINITFILL_OBJINITROUTINE#5", NULL != ( /*_.CLASS_NREP_ROUTPROC__V44*/ meltfptr[43])); - ((meltroutine_ptr_t) /*_.VALROUT___V318*/ meltfptr[317])->tabval[5] = + ((meltroutine_ptr_t) /*_._VALROUT___V318*/ meltfptr[317])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_NREP_ROUTPROC__V44*/ meltfptr[43]); MELT_LOCATION ("warmelt-outobj.melt:751:/ initchunk"); @@ -27757,12 +27832,12 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V318*/ meltfptr[317])) == + ( /*_._VALROUT___V318*/ meltfptr[317])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALDATA___V192*/ meltfptr[191]); - ((meltroutine_ptr_t) /*_.VALROUT___V318*/ meltfptr[317])->tabval[6] = - (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); + NULL != /*_._VALDATA___V192*/ meltfptr[191]); + ((meltroutine_ptr_t) /*_._VALROUT___V318*/ meltfptr[317])->tabval[6] = + (melt_ptr_t) ( /*_._VALDATA___V192*/ meltfptr[191]); MELT_LOCATION ("warmelt-outobj.melt:751:/ initchunk"); /*^putroutconst */ @@ -27770,79 +27845,79 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V318*/ meltfptr[317])) + ( /*_._VALROUT___V318*/ meltfptr[317])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_125__OUTCINITFILL_OBJINITROUTINE#7", NULL != ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_.VALROUT___V318*/ meltfptr[317])->tabval[7] = + ((meltroutine_ptr_t) /*_._VALROUT___V318*/ meltfptr[317])->tabval[7] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:751:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V318*/ meltfptr[317]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V318*/ meltfptr[317]); /*putclosurout#25 */ melt_assertmsg ("putclosrout#25 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V319*/ meltfptr[318])) == + ( /*_._VALCLO___V319*/ meltfptr[318])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#25 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V318*/ meltfptr[317])) == + ( /*_._VALROUT___V318*/ meltfptr[317])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V319*/ meltfptr[318])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V318*/ meltfptr[317]); + ((meltclosure_ptr_t) /*_._VALCLO___V319*/ meltfptr[318])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V318*/ meltfptr[317]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V319*/ meltfptr[318]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V319*/ meltfptr[318]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V320*/ meltfptr[319])) == + ( /*_._VALDATA___V320*/ meltfptr[319])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V320*/ + ( /*_._VALDATA___V320*/ meltfptr[319])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V320*/ meltfptr[319]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V320*/ meltfptr[319]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V321*/ meltfptr[320]); + /*_._VALSTR___V321*/ meltfptr[320]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V320*/ meltfptr[319]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V320*/ meltfptr[319]); - melt_dbgtrace_written_object ( /*_.VALDATA___V320*/ meltfptr[319], + melt_dbgtrace_written_object ( /*_._VALDATA___V320*/ meltfptr[319], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V322*/ meltfptr[321])) == + ( /*_._VALDATA___V322*/ meltfptr[321])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V322*/ + ( /*_._VALDATA___V322*/ meltfptr[321])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V322*/ meltfptr[321]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V322*/ meltfptr[321]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V323*/ meltfptr[322]); + /*_._VALSTR___V323*/ meltfptr[322]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V322*/ meltfptr[321]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V322*/ meltfptr[321]); - melt_dbgtrace_written_object ( /*_.VALDATA___V322*/ meltfptr[321], + melt_dbgtrace_written_object ( /*_._VALDATA___V322*/ meltfptr[321], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:851:/ initchunk"); @@ -27851,13 +27926,13 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V324*/ meltfptr[323])) + ( /*_._VALROUT___V324*/ meltfptr[323])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_131__OUTDECLINIT_OBJINITHOOK#0", NULL != ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7])); - ((meltroutine_ptr_t) /*_.VALROUT___V324*/ meltfptr[323])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V324*/ meltfptr[323])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7]); MELT_LOCATION ("warmelt-outobj.melt:851:/ initchunk"); @@ -27866,13 +27941,13 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V324*/ meltfptr[323])) + ( /*_._VALROUT___V324*/ meltfptr[323])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_131__OUTDECLINIT_OBJINITHOOK#1", NULL != ( /*_.CLASS_OBJINITHOOK__V38*/ meltfptr[37])); - ((meltroutine_ptr_t) /*_.VALROUT___V324*/ meltfptr[323])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V324*/ meltfptr[323])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_OBJINITHOOK__V38*/ meltfptr[37]); MELT_LOCATION ("warmelt-outobj.melt:851:/ initchunk"); @@ -27881,34 +27956,34 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V324*/ meltfptr[323])) + ( /*_._VALROUT___V324*/ meltfptr[323])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_131__OUTDECLINIT_OBJINITHOOK#2", NULL != ( /*_.CLASS_OBJINITELEM__V20*/ meltfptr[19])); - ((meltroutine_ptr_t) /*_.VALROUT___V324*/ meltfptr[323])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V324*/ meltfptr[323])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_OBJINITELEM__V20*/ meltfptr[19]); MELT_LOCATION ("warmelt-outobj.melt:851:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V324*/ meltfptr[323]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V324*/ meltfptr[323]); /*putclosurout#26 */ melt_assertmsg ("putclosrout#26 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V325*/ meltfptr[324])) == + ( /*_._VALCLO___V325*/ meltfptr[324])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#26 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V324*/ meltfptr[323])) == + ( /*_._VALROUT___V324*/ meltfptr[323])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V325*/ meltfptr[324])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V324*/ meltfptr[323]); + ((meltclosure_ptr_t) /*_._VALCLO___V325*/ meltfptr[324])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V324*/ meltfptr[323]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V325*/ meltfptr[324]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V325*/ meltfptr[324]); MELT_LOCATION ("warmelt-outobj.melt:864:/ initchunk"); /*^putroutconst */ @@ -27916,13 +27991,13 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V326*/ meltfptr[325])) + ( /*_._VALROUT___V326*/ meltfptr[325])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_133__OUTCINITFILL_OBJINITHOOK#0", NULL != ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7])); - ((meltroutine_ptr_t) /*_.VALROUT___V326*/ meltfptr[325])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V326*/ meltfptr[325])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7]); MELT_LOCATION ("warmelt-outobj.melt:864:/ initchunk"); @@ -27931,13 +28006,13 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V326*/ meltfptr[325])) + ( /*_._VALROUT___V326*/ meltfptr[325])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_133__OUTCINITFILL_OBJINITHOOK#1", NULL != ( /*_.CLASS_OBJINITHOOK__V38*/ meltfptr[37])); - ((meltroutine_ptr_t) /*_.VALROUT___V326*/ meltfptr[325])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V326*/ meltfptr[325])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_OBJINITHOOK__V38*/ meltfptr[37]); MELT_LOCATION ("warmelt-outobj.melt:864:/ initchunk"); @@ -27946,13 +28021,13 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V326*/ meltfptr[325])) + ( /*_._VALROUT___V326*/ meltfptr[325])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_133__OUTCINITFILL_OBJINITHOOK#2", NULL != ( /*_.CLASS_OBJINITELEM__V20*/ meltfptr[19])); - ((meltroutine_ptr_t) /*_.VALROUT___V326*/ meltfptr[325])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V326*/ meltfptr[325])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_OBJINITELEM__V20*/ meltfptr[19]); MELT_LOCATION ("warmelt-outobj.melt:864:/ initchunk"); @@ -27961,13 +28036,13 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V326*/ meltfptr[325])) + ( /*_._VALROUT___V326*/ meltfptr[325])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_133__OUTCINITFILL_OBJINITHOOK#3", NULL != ( /*_.CLASS_NREP_HOOKPROC__V45*/ meltfptr[44])); - ((meltroutine_ptr_t) /*_.VALROUT___V326*/ meltfptr[325])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V326*/ meltfptr[325])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_NREP_HOOKPROC__V45*/ meltfptr[44]); MELT_LOCATION ("warmelt-outobj.melt:864:/ initchunk"); @@ -27976,13 +28051,13 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V326*/ meltfptr[325])) + ( /*_._VALROUT___V326*/ meltfptr[325])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_133__OUTCINITFILL_OBJINITHOOK#4", NULL != ( /*_.ADD2OUT__V15*/ meltfptr[14])); - ((meltroutine_ptr_t) /*_.VALROUT___V326*/ meltfptr[325])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V326*/ meltfptr[325])->tabval[4] = (melt_ptr_t) ( /*_.ADD2OUT__V15*/ meltfptr[14]); MELT_LOCATION ("warmelt-outobj.melt:864:/ initchunk"); @@ -27991,94 +28066,94 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V326*/ meltfptr[325])) + ( /*_._VALROUT___V326*/ meltfptr[325])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_133__OUTCINITFILL_OBJINITHOOK#5", NULL != ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20])); - ((meltroutine_ptr_t) /*_.VALROUT___V326*/ meltfptr[325])->tabval[5] = + ((meltroutine_ptr_t) /*_._VALROUT___V326*/ meltfptr[325])->tabval[5] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]); MELT_LOCATION ("warmelt-outobj.melt:864:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V326*/ meltfptr[325]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V326*/ meltfptr[325]); /*putclosurout#27 */ melt_assertmsg ("putclosrout#27 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V327*/ meltfptr[326])) == + ( /*_._VALCLO___V327*/ meltfptr[326])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#27 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V326*/ meltfptr[325])) == + ( /*_._VALROUT___V326*/ meltfptr[325])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V327*/ meltfptr[326])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V326*/ meltfptr[325]); + ((meltclosure_ptr_t) /*_._VALCLO___V327*/ meltfptr[326])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V326*/ meltfptr[325]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V327*/ meltfptr[326]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V327*/ meltfptr[326]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V328*/ meltfptr[327])) == + ( /*_._VALDATA___V328*/ meltfptr[327])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V328*/ + ( /*_._VALDATA___V328*/ meltfptr[327])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V328*/ meltfptr[327]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V328*/ meltfptr[327]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V329*/ meltfptr[328]); + /*_._VALSTR___V329*/ meltfptr[328]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V328*/ meltfptr[327]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V328*/ meltfptr[327]); - melt_dbgtrace_written_object ( /*_.VALDATA___V328*/ meltfptr[327], + melt_dbgtrace_written_object ( /*_._VALDATA___V328*/ meltfptr[327], "new static instance"); /*putclosurout#28 */ melt_assertmsg ("putclosrout#28 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V331*/ meltfptr[330])) == + ( /*_._VALCLO___V331*/ meltfptr[330])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#28 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V330*/ meltfptr[329])) == + ( /*_._VALROUT___V330*/ meltfptr[329])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V331*/ meltfptr[330])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V330*/ meltfptr[329]); + ((meltclosure_ptr_t) /*_._VALCLO___V331*/ meltfptr[330])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V330*/ meltfptr[329]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V331*/ meltfptr[330]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V331*/ meltfptr[330]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V332*/ meltfptr[331])) == + ( /*_._VALDATA___V332*/ meltfptr[331])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V332*/ + ( /*_._VALDATA___V332*/ meltfptr[331])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V332*/ meltfptr[331]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V332*/ meltfptr[331]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V333*/ meltfptr[332]); + /*_._VALSTR___V333*/ meltfptr[332]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V332*/ meltfptr[331]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V332*/ meltfptr[331]); - melt_dbgtrace_written_object ( /*_.VALDATA___V332*/ meltfptr[331], + melt_dbgtrace_written_object ( /*_._VALDATA___V332*/ meltfptr[331], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:937:/ initchunk"); @@ -28087,13 +28162,13 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V334*/ meltfptr[333])) + ( /*_._VALROUT___V334*/ meltfptr[333])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_141__OUTCINITFILL_OBJINITSTRING#0", NULL != ( /*_.CLASS_OBJINITSTRING__V46*/ meltfptr[45])); - ((meltroutine_ptr_t) /*_.VALROUT___V334*/ meltfptr[333])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V334*/ meltfptr[333])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJINITSTRING__V46*/ meltfptr[45]); MELT_LOCATION ("warmelt-outobj.melt:937:/ initchunk"); @@ -28102,13 +28177,13 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V334*/ meltfptr[333])) + ( /*_._VALROUT___V334*/ meltfptr[333])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_141__OUTCINITFILL_OBJINITSTRING#1", NULL != ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7])); - ((meltroutine_ptr_t) /*_.VALROUT___V334*/ meltfptr[333])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V334*/ meltfptr[333])->tabval[1] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7]); MELT_LOCATION ("warmelt-outobj.melt:937:/ initchunk"); @@ -28117,13 +28192,13 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V334*/ meltfptr[333])) + ( /*_._VALROUT___V334*/ meltfptr[333])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_141__OUTCINITFILL_OBJINITSTRING#2", NULL != ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20])); - ((meltroutine_ptr_t) /*_.VALROUT___V334*/ meltfptr[333])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V334*/ meltfptr[333])->tabval[2] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]); MELT_LOCATION ("warmelt-outobj.melt:937:/ initchunk"); @@ -28131,12 +28206,12 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V334*/ meltfptr[333])) == + ( /*_._VALROUT___V334*/ meltfptr[333])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALDATA___V192*/ meltfptr[191]); - ((meltroutine_ptr_t) /*_.VALROUT___V334*/ meltfptr[333])->tabval[3] = - (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); + NULL != /*_._VALDATA___V192*/ meltfptr[191]); + ((meltroutine_ptr_t) /*_._VALROUT___V334*/ meltfptr[333])->tabval[3] = + (melt_ptr_t) ( /*_._VALDATA___V192*/ meltfptr[191]); MELT_LOCATION ("warmelt-outobj.melt:937:/ initchunk"); /*^putroutconst */ @@ -28144,13 +28219,13 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V334*/ meltfptr[333])) + ( /*_._VALROUT___V334*/ meltfptr[333])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_141__OUTCINITFILL_OBJINITSTRING#4", NULL != ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_.VALROUT___V334*/ meltfptr[333])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V334*/ meltfptr[333])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:937:/ initchunk"); @@ -28159,71 +28234,71 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V334*/ meltfptr[333])) + ( /*_._VALROUT___V334*/ meltfptr[333])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_141__OUTCINITFILL_OBJINITSTRING#5", NULL != ( /*_.ADD2OUT__V15*/ meltfptr[14])); - ((meltroutine_ptr_t) /*_.VALROUT___V334*/ meltfptr[333])->tabval[5] = + ((meltroutine_ptr_t) /*_._VALROUT___V334*/ meltfptr[333])->tabval[5] = (melt_ptr_t) ( /*_.ADD2OUT__V15*/ meltfptr[14]); MELT_LOCATION ("warmelt-outobj.melt:937:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V334*/ meltfptr[333]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V334*/ meltfptr[333]); /*putclosurout#29 */ melt_assertmsg ("putclosrout#29 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V335*/ meltfptr[334])) == + ( /*_._VALCLO___V335*/ meltfptr[334])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#29 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V334*/ meltfptr[333])) == + ( /*_._VALROUT___V334*/ meltfptr[333])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V335*/ meltfptr[334])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V334*/ meltfptr[333]); + ((meltclosure_ptr_t) /*_._VALCLO___V335*/ meltfptr[334])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V334*/ meltfptr[333]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V335*/ meltfptr[334]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V335*/ meltfptr[334]); /*putclosurout#30 */ melt_assertmsg ("putclosrout#30 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V337*/ meltfptr[336])) == + ( /*_._VALCLO___V337*/ meltfptr[336])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#30 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V336*/ meltfptr[335])) == + ( /*_._VALROUT___V336*/ meltfptr[335])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V337*/ meltfptr[336])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V336*/ meltfptr[335]); + ((meltclosure_ptr_t) /*_._VALCLO___V337*/ meltfptr[336])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V336*/ meltfptr[335]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V337*/ meltfptr[336]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V337*/ meltfptr[336]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V338*/ meltfptr[337])) == + ( /*_._VALDATA___V338*/ meltfptr[337])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V338*/ + ( /*_._VALDATA___V338*/ meltfptr[337])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V338*/ meltfptr[337]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V338*/ meltfptr[337]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V339*/ meltfptr[338]); + /*_._VALSTR___V339*/ meltfptr[338]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V338*/ meltfptr[337]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V338*/ meltfptr[337]); - melt_dbgtrace_written_object ( /*_.VALDATA___V338*/ meltfptr[337], + melt_dbgtrace_written_object ( /*_._VALDATA___V338*/ meltfptr[337], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:1144:/ initchunk"); @@ -28232,13 +28307,13 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V340*/ meltfptr[339])) + ( /*_._VALROUT___V340*/ meltfptr[339])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_147__OUTCINITFILL_OBJINITBOXEDINTEGER#0", NULL != ( /*_.CLASS_OBJINITBOXINTEGER__V47*/ meltfptr[46])); - ((meltroutine_ptr_t) /*_.VALROUT___V340*/ meltfptr[339])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V340*/ meltfptr[339])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJINITBOXINTEGER__V47*/ meltfptr[46]); MELT_LOCATION ("warmelt-outobj.melt:1144:/ initchunk"); @@ -28247,13 +28322,13 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V340*/ meltfptr[339])) + ( /*_._VALROUT___V340*/ meltfptr[339])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_147__OUTCINITFILL_OBJINITBOXEDINTEGER#1", NULL != ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7])); - ((meltroutine_ptr_t) /*_.VALROUT___V340*/ meltfptr[339])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V340*/ meltfptr[339])->tabval[1] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7]); MELT_LOCATION ("warmelt-outobj.melt:1144:/ initchunk"); @@ -28262,13 +28337,13 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V340*/ meltfptr[339])) + ( /*_._VALROUT___V340*/ meltfptr[339])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_147__OUTCINITFILL_OBJINITBOXEDINTEGER#2", NULL != ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20])); - ((meltroutine_ptr_t) /*_.VALROUT___V340*/ meltfptr[339])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V340*/ meltfptr[339])->tabval[2] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]); MELT_LOCATION ("warmelt-outobj.melt:1144:/ initchunk"); @@ -28276,12 +28351,12 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V340*/ meltfptr[339])) == + ( /*_._VALROUT___V340*/ meltfptr[339])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALDATA___V192*/ meltfptr[191]); - ((meltroutine_ptr_t) /*_.VALROUT___V340*/ meltfptr[339])->tabval[3] = - (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); + NULL != /*_._VALDATA___V192*/ meltfptr[191]); + ((meltroutine_ptr_t) /*_._VALROUT___V340*/ meltfptr[339])->tabval[3] = + (melt_ptr_t) ( /*_._VALDATA___V192*/ meltfptr[191]); MELT_LOCATION ("warmelt-outobj.melt:1144:/ initchunk"); /*^putroutconst */ @@ -28289,71 +28364,71 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V340*/ meltfptr[339])) + ( /*_._VALROUT___V340*/ meltfptr[339])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_147__OUTCINITFILL_OBJINITBOXEDINTEGER#4", NULL != ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_.VALROUT___V340*/ meltfptr[339])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V340*/ meltfptr[339])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:1144:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V340*/ meltfptr[339]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V340*/ meltfptr[339]); /*putclosurout#31 */ melt_assertmsg ("putclosrout#31 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V341*/ meltfptr[340])) == + ( /*_._VALCLO___V341*/ meltfptr[340])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#31 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V340*/ meltfptr[339])) == + ( /*_._VALROUT___V340*/ meltfptr[339])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V341*/ meltfptr[340])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V340*/ meltfptr[339]); + ((meltclosure_ptr_t) /*_._VALCLO___V341*/ meltfptr[340])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V340*/ meltfptr[339]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V341*/ meltfptr[340]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V341*/ meltfptr[340]); /*putclosurout#32 */ melt_assertmsg ("putclosrout#32 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V343*/ meltfptr[342])) == + ( /*_._VALCLO___V343*/ meltfptr[342])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#32 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V342*/ meltfptr[341])) == + ( /*_._VALROUT___V342*/ meltfptr[341])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V343*/ meltfptr[342])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V342*/ meltfptr[341]); + ((meltclosure_ptr_t) /*_._VALCLO___V343*/ meltfptr[342])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V342*/ meltfptr[341]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V343*/ meltfptr[342]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V343*/ meltfptr[342]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V344*/ meltfptr[343])) == + ( /*_._VALDATA___V344*/ meltfptr[343])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V344*/ + ( /*_._VALDATA___V344*/ meltfptr[343])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V344*/ meltfptr[343]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V344*/ meltfptr[343]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V345*/ meltfptr[344]); + /*_._VALSTR___V345*/ meltfptr[344]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V344*/ meltfptr[343]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V344*/ meltfptr[343]); - melt_dbgtrace_written_object ( /*_.VALDATA___V344*/ meltfptr[343], + melt_dbgtrace_written_object ( /*_._VALDATA___V344*/ meltfptr[343], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:1203:/ initchunk"); @@ -28362,13 +28437,13 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V346*/ meltfptr[345])) + ( /*_._VALROUT___V346*/ meltfptr[345])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_153__OUTCINITFILL_OBJINITPAIR#0", NULL != ( /*_.CLASS_OBJINITPAIR__V48*/ meltfptr[47])); - ((meltroutine_ptr_t) /*_.VALROUT___V346*/ meltfptr[345])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V346*/ meltfptr[345])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJINITPAIR__V48*/ meltfptr[47]); MELT_LOCATION ("warmelt-outobj.melt:1203:/ initchunk"); @@ -28377,13 +28452,13 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V346*/ meltfptr[345])) + ( /*_._VALROUT___V346*/ meltfptr[345])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_153__OUTCINITFILL_OBJINITPAIR#1", NULL != ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7])); - ((meltroutine_ptr_t) /*_.VALROUT___V346*/ meltfptr[345])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V346*/ meltfptr[345])->tabval[1] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7]); MELT_LOCATION ("warmelt-outobj.melt:1203:/ initchunk"); @@ -28392,13 +28467,13 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V346*/ meltfptr[345])) + ( /*_._VALROUT___V346*/ meltfptr[345])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_153__OUTCINITFILL_OBJINITPAIR#2", NULL != ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20])); - ((meltroutine_ptr_t) /*_.VALROUT___V346*/ meltfptr[345])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V346*/ meltfptr[345])->tabval[2] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]); MELT_LOCATION ("warmelt-outobj.melt:1203:/ initchunk"); @@ -28406,12 +28481,12 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V346*/ meltfptr[345])) == + ( /*_._VALROUT___V346*/ meltfptr[345])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALDATA___V192*/ meltfptr[191]); - ((meltroutine_ptr_t) /*_.VALROUT___V346*/ meltfptr[345])->tabval[3] = - (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); + NULL != /*_._VALDATA___V192*/ meltfptr[191]); + ((meltroutine_ptr_t) /*_._VALROUT___V346*/ meltfptr[345])->tabval[3] = + (melt_ptr_t) ( /*_._VALDATA___V192*/ meltfptr[191]); MELT_LOCATION ("warmelt-outobj.melt:1203:/ initchunk"); /*^putroutconst */ @@ -28419,71 +28494,71 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V346*/ meltfptr[345])) + ( /*_._VALROUT___V346*/ meltfptr[345])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_153__OUTCINITFILL_OBJINITPAIR#4", NULL != ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_.VALROUT___V346*/ meltfptr[345])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V346*/ meltfptr[345])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:1203:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V346*/ meltfptr[345]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V346*/ meltfptr[345]); /*putclosurout#33 */ melt_assertmsg ("putclosrout#33 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V347*/ meltfptr[346])) == + ( /*_._VALCLO___V347*/ meltfptr[346])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#33 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V346*/ meltfptr[345])) == + ( /*_._VALROUT___V346*/ meltfptr[345])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V347*/ meltfptr[346])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V346*/ meltfptr[345]); + ((meltclosure_ptr_t) /*_._VALCLO___V347*/ meltfptr[346])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V346*/ meltfptr[345]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V347*/ meltfptr[346]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V347*/ meltfptr[346]); /*putclosurout#34 */ melt_assertmsg ("putclosrout#34 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V349*/ meltfptr[348])) == + ( /*_._VALCLO___V349*/ meltfptr[348])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#34 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V348*/ meltfptr[347])) == + ( /*_._VALROUT___V348*/ meltfptr[347])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V349*/ meltfptr[348])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V348*/ meltfptr[347]); + ((meltclosure_ptr_t) /*_._VALCLO___V349*/ meltfptr[348])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V348*/ meltfptr[347]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V349*/ meltfptr[348]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V349*/ meltfptr[348]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V350*/ meltfptr[349])) == + ( /*_._VALDATA___V350*/ meltfptr[349])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V350*/ + ( /*_._VALDATA___V350*/ meltfptr[349])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V350*/ meltfptr[349]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V350*/ meltfptr[349]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V351*/ meltfptr[350]); + /*_._VALSTR___V351*/ meltfptr[350]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V350*/ meltfptr[349]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V350*/ meltfptr[349]); - melt_dbgtrace_written_object ( /*_.VALDATA___V350*/ meltfptr[349], + melt_dbgtrace_written_object ( /*_._VALDATA___V350*/ meltfptr[349], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:1252:/ initchunk"); @@ -28492,13 +28567,13 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V352*/ meltfptr[351])) + ( /*_._VALROUT___V352*/ meltfptr[351])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_159__OUTCINITFILL_OBJINITLIST#0", NULL != ( /*_.CLASS_OBJINITLIST__V49*/ meltfptr[48])); - ((meltroutine_ptr_t) /*_.VALROUT___V352*/ meltfptr[351])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V352*/ meltfptr[351])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJINITLIST__V49*/ meltfptr[48]); MELT_LOCATION ("warmelt-outobj.melt:1252:/ initchunk"); @@ -28507,13 +28582,13 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V352*/ meltfptr[351])) + ( /*_._VALROUT___V352*/ meltfptr[351])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_159__OUTCINITFILL_OBJINITLIST#1", NULL != ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7])); - ((meltroutine_ptr_t) /*_.VALROUT___V352*/ meltfptr[351])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V352*/ meltfptr[351])->tabval[1] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7]); MELT_LOCATION ("warmelt-outobj.melt:1252:/ initchunk"); @@ -28522,13 +28597,13 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V352*/ meltfptr[351])) + ( /*_._VALROUT___V352*/ meltfptr[351])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_159__OUTCINITFILL_OBJINITLIST#2", NULL != ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20])); - ((meltroutine_ptr_t) /*_.VALROUT___V352*/ meltfptr[351])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V352*/ meltfptr[351])->tabval[2] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]); MELT_LOCATION ("warmelt-outobj.melt:1252:/ initchunk"); @@ -28536,12 +28611,12 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V352*/ meltfptr[351])) == + ( /*_._VALROUT___V352*/ meltfptr[351])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALDATA___V192*/ meltfptr[191]); - ((meltroutine_ptr_t) /*_.VALROUT___V352*/ meltfptr[351])->tabval[3] = - (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); + NULL != /*_._VALDATA___V192*/ meltfptr[191]); + ((meltroutine_ptr_t) /*_._VALROUT___V352*/ meltfptr[351])->tabval[3] = + (melt_ptr_t) ( /*_._VALDATA___V192*/ meltfptr[191]); MELT_LOCATION ("warmelt-outobj.melt:1252:/ initchunk"); /*^putroutconst */ @@ -28549,34 +28624,34 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V352*/ meltfptr[351])) + ( /*_._VALROUT___V352*/ meltfptr[351])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_159__OUTCINITFILL_OBJINITLIST#4", NULL != ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_.VALROUT___V352*/ meltfptr[351])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V352*/ meltfptr[351])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:1252:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V352*/ meltfptr[351]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V352*/ meltfptr[351]); /*putclosurout#35 */ melt_assertmsg ("putclosrout#35 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V353*/ meltfptr[352])) == + ( /*_._VALCLO___V353*/ meltfptr[352])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#35 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V352*/ meltfptr[351])) == + ( /*_._VALROUT___V352*/ meltfptr[351])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V353*/ meltfptr[352])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V352*/ meltfptr[351]); + ((meltclosure_ptr_t) /*_._VALCLO___V353*/ meltfptr[352])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V352*/ meltfptr[351]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V353*/ meltfptr[352]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V353*/ meltfptr[352]); MELT_LOCATION ("warmelt-outobj.melt:1294:/ initchunk"); /*^putroutconst */ @@ -28584,55 +28659,55 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V354*/ meltfptr[353])) + ( /*_._VALROUT___V354*/ meltfptr[353])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_161__OUTPUCOD_ANYDISCR#0", NULL != ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7])); - ((meltroutine_ptr_t) /*_.VALROUT___V354*/ meltfptr[353])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V354*/ meltfptr[353])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7]); MELT_LOCATION ("warmelt-outobj.melt:1294:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V354*/ meltfptr[353]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V354*/ meltfptr[353]); /*putclosurout#36 */ melt_assertmsg ("putclosrout#36 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V355*/ meltfptr[354])) == + ( /*_._VALCLO___V355*/ meltfptr[354])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#36 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V354*/ meltfptr[353])) == + ( /*_._VALROUT___V354*/ meltfptr[353])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V355*/ meltfptr[354])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V354*/ meltfptr[353]); + ((meltclosure_ptr_t) /*_._VALCLO___V355*/ meltfptr[354])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V354*/ meltfptr[353]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V355*/ meltfptr[354]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V355*/ meltfptr[354]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V356*/ meltfptr[355])) == + ( /*_._VALDATA___V356*/ meltfptr[355])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V356*/ + ( /*_._VALDATA___V356*/ meltfptr[355])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V356*/ meltfptr[355]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V356*/ meltfptr[355]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V357*/ meltfptr[356]); + /*_._VALSTR___V357*/ meltfptr[356]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V356*/ meltfptr[355]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V356*/ meltfptr[355]); - melt_dbgtrace_written_object ( /*_.VALDATA___V356*/ meltfptr[355], + melt_dbgtrace_written_object ( /*_._VALDATA___V356*/ meltfptr[355], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:1307:/ initchunk"); @@ -28641,68 +28716,68 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V358*/ meltfptr[357])) + ( /*_._VALROUT___V358*/ meltfptr[357])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_165__OUTPUCOD_NULL#0", NULL != ( /*_.ADD2OUT__V15*/ meltfptr[14])); - ((meltroutine_ptr_t) /*_.VALROUT___V358*/ meltfptr[357])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V358*/ meltfptr[357])->tabval[0] = (melt_ptr_t) ( /*_.ADD2OUT__V15*/ meltfptr[14]); MELT_LOCATION ("warmelt-outobj.melt:1307:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V358*/ meltfptr[357]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V358*/ meltfptr[357]); /*putclosurout#37 */ melt_assertmsg ("putclosrout#37 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V359*/ meltfptr[358])) == + ( /*_._VALCLO___V359*/ meltfptr[358])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#37 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V358*/ meltfptr[357])) == + ( /*_._VALROUT___V358*/ meltfptr[357])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V359*/ meltfptr[358])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V358*/ meltfptr[357]); + ((meltclosure_ptr_t) /*_._VALCLO___V359*/ meltfptr[358])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V358*/ meltfptr[357]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V359*/ meltfptr[358]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V359*/ meltfptr[358]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V360*/ meltfptr[359])) == + ( /*_._VALDATA___V360*/ meltfptr[359])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V360*/ + ( /*_._VALDATA___V360*/ meltfptr[359])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V360*/ meltfptr[359]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V360*/ meltfptr[359]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V361*/ meltfptr[360]); + /*_._VALSTR___V361*/ meltfptr[360]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V360*/ meltfptr[359]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V360*/ meltfptr[359]); #undef meltfram__ -} /*end of meltmod__warmelt_outobj__initialmeltchunk_2 */ +} /*end of meltmod__WARMELTmiOUTOBJ__initialmeltchunk_2 */ void -meltmod__warmelt_outobj__initialmeltchunk_3 (meltinitial_frame_t * - meltmeltframptr__, - char meltpredefinited[]) +meltmod__WARMELTmiOUTOBJ__initialmeltchunk_3 (meltinitial_frame_t * + meltmeltframptr__, + char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L (void) meltpredefinited; - melt_dbgtrace_written_object ( /*_.VALDATA___V360*/ meltfptr[359], + melt_dbgtrace_written_object ( /*_._VALDATA___V360*/ meltfptr[359], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:1316:/ initchunk"); @@ -28711,13 +28786,13 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V362*/ meltfptr[361])) + ( /*_._VALROUT___V362*/ meltfptr[361])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_169__OUTPUCOD_CATCHALL_ROOT#0", NULL != ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7])); - ((meltroutine_ptr_t) /*_.VALROUT___V362*/ meltfptr[361])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V362*/ meltfptr[361])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7]); MELT_LOCATION ("warmelt-outobj.melt:1316:/ initchunk"); @@ -28726,102 +28801,102 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V362*/ meltfptr[361])) + ( /*_._VALROUT___V362*/ meltfptr[361])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_169__OUTPUCOD_CATCHALL_ROOT#1", NULL != ( /*_.DISPLAY_DEBUG_MESSAGE__V52*/ meltfptr[51])); - ((meltroutine_ptr_t) /*_.VALROUT___V362*/ meltfptr[361])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V362*/ meltfptr[361])->tabval[1] = (melt_ptr_t) ( /*_.DISPLAY_DEBUG_MESSAGE__V52*/ meltfptr[51]); MELT_LOCATION ("warmelt-outobj.melt:1316:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V362*/ meltfptr[361]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V362*/ meltfptr[361]); /*putclosurout#38 */ melt_assertmsg ("putclosrout#38 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V363*/ meltfptr[362])) == + ( /*_._VALCLO___V363*/ meltfptr[362])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#38 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V362*/ meltfptr[361])) == + ( /*_._VALROUT___V362*/ meltfptr[361])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V363*/ meltfptr[362])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V362*/ meltfptr[361]); + ((meltclosure_ptr_t) /*_._VALCLO___V363*/ meltfptr[362])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V362*/ meltfptr[361]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V363*/ meltfptr[362]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V363*/ meltfptr[362]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V364*/ meltfptr[363])) == + ( /*_._VALDATA___V364*/ meltfptr[363])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V364*/ + ( /*_._VALDATA___V364*/ meltfptr[363])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V364*/ meltfptr[363]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V364*/ meltfptr[363]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V365*/ meltfptr[364]); + /*_._VALSTR___V365*/ meltfptr[364]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V364*/ meltfptr[363]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V364*/ meltfptr[363]); - melt_dbgtrace_written_object ( /*_.VALDATA___V364*/ meltfptr[363], + melt_dbgtrace_written_object ( /*_._VALDATA___V364*/ meltfptr[363], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V366*/ meltfptr[365])) == + ( /*_._VALDATA___V366*/ meltfptr[365])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V366*/ + ( /*_._VALDATA___V366*/ meltfptr[365])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V366*/ meltfptr[365]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V366*/ meltfptr[365]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V367*/ meltfptr[366]); + /*_._VALSTR___V367*/ meltfptr[366]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V366*/ meltfptr[365]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V366*/ meltfptr[365]); - melt_dbgtrace_written_object ( /*_.VALDATA___V366*/ meltfptr[365], + melt_dbgtrace_written_object ( /*_._VALDATA___V366*/ meltfptr[365], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V368*/ meltfptr[367])) == + ( /*_._VALDATA___V368*/ meltfptr[367])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V368*/ + ( /*_._VALDATA___V368*/ meltfptr[367])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V368*/ meltfptr[367]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V368*/ meltfptr[367]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V369*/ meltfptr[368]); + /*_._VALSTR___V369*/ meltfptr[368]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V368*/ meltfptr[367]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V368*/ meltfptr[367]); - melt_dbgtrace_written_object ( /*_.VALDATA___V368*/ meltfptr[367], + melt_dbgtrace_written_object ( /*_._VALDATA___V368*/ meltfptr[367], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:1377:/ initchunk"); @@ -28830,13 +28905,13 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V370*/ meltfptr[369])) + ( /*_._VALROUT___V370*/ meltfptr[369])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_181__LINE_AND_FILE_OF_LOCATION#0", NULL != ( /*_.DISCR_INTEGER__V53*/ meltfptr[52])); - ((meltroutine_ptr_t) /*_.VALROUT___V370*/ meltfptr[369])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V370*/ meltfptr[369])->tabval[0] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V53*/ meltfptr[52]); MELT_LOCATION ("warmelt-outobj.melt:1377:/ initchunk"); @@ -28845,79 +28920,79 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V370*/ meltfptr[369])) + ( /*_._VALROUT___V370*/ meltfptr[369])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_181__LINE_AND_FILE_OF_LOCATION#1", NULL != ( /*_.DISCR_STRING__V54*/ meltfptr[53])); - ((meltroutine_ptr_t) /*_.VALROUT___V370*/ meltfptr[369])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V370*/ meltfptr[369])->tabval[1] = (melt_ptr_t) ( /*_.DISCR_STRING__V54*/ meltfptr[53]); MELT_LOCATION ("warmelt-outobj.melt:1377:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V370*/ meltfptr[369]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V370*/ meltfptr[369]); /*putclosurout#39 */ melt_assertmsg ("putclosrout#39 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V371*/ meltfptr[370])) == + ( /*_._VALCLO___V371*/ meltfptr[370])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#39 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V370*/ meltfptr[369])) == + ( /*_._VALROUT___V370*/ meltfptr[369])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V371*/ meltfptr[370])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V370*/ meltfptr[369]); + ((meltclosure_ptr_t) /*_._VALCLO___V371*/ meltfptr[370])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V370*/ meltfptr[369]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V371*/ meltfptr[370]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V371*/ meltfptr[370]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V372*/ meltfptr[371])) == + ( /*_._VALDATA___V372*/ meltfptr[371])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V372*/ + ( /*_._VALDATA___V372*/ meltfptr[371])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V372*/ meltfptr[371]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V372*/ meltfptr[371]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V373*/ meltfptr[372]); + /*_._VALSTR___V373*/ meltfptr[372]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V372*/ meltfptr[371]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V372*/ meltfptr[371]); - melt_dbgtrace_written_object ( /*_.VALDATA___V372*/ meltfptr[371], + melt_dbgtrace_written_object ( /*_._VALDATA___V372*/ meltfptr[371], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V374*/ meltfptr[373])) == + ( /*_._VALDATA___V374*/ meltfptr[373])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V374*/ + ( /*_._VALDATA___V374*/ meltfptr[373])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V374*/ meltfptr[373]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V374*/ meltfptr[373]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V375*/ meltfptr[374]); + /*_._VALSTR___V375*/ meltfptr[374]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V374*/ meltfptr[373]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V374*/ meltfptr[373]); - melt_dbgtrace_written_object ( /*_.VALDATA___V374*/ meltfptr[373], + melt_dbgtrace_written_object ( /*_._VALDATA___V374*/ meltfptr[373], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:1468:/ initchunk"); @@ -28926,13 +29001,13 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V376*/ meltfptr[375])) + ( /*_._VALROUT___V376*/ meltfptr[375])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_189__OUTPUT_CURFRAME_DECLSTRUCT#0", NULL != ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7])); - ((meltroutine_ptr_t) /*_.VALROUT___V376*/ meltfptr[375])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V376*/ meltfptr[375])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7]); MELT_LOCATION ("warmelt-outobj.melt:1468:/ initchunk"); @@ -28941,13 +29016,13 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V376*/ meltfptr[375])) + ( /*_._VALROUT___V376*/ meltfptr[375])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_189__OUTPUT_CURFRAME_DECLSTRUCT#1", NULL != ( /*_.CLASS_INITIAL_EXTENSION_ROUTINEOBJ__V55*/ meltfptr[54])); - ((meltroutine_ptr_t) /*_.VALROUT___V376*/ meltfptr[375])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V376*/ meltfptr[375])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_INITIAL_EXTENSION_ROUTINEOBJ__V55*/ meltfptr[54]); @@ -28957,13 +29032,13 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V376*/ meltfptr[375])) + ( /*_._VALROUT___V376*/ meltfptr[375])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_189__OUTPUT_CURFRAME_DECLSTRUCT#2", NULL != ( /*_.CLASS_INITIALROUTINEOBJ__V56*/ meltfptr[55])); - ((meltroutine_ptr_t) /*_.VALROUT___V376*/ meltfptr[375])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V376*/ meltfptr[375])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_INITIALROUTINEOBJ__V56*/ meltfptr[55]); MELT_LOCATION ("warmelt-outobj.melt:1468:/ initchunk"); @@ -28972,13 +29047,13 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V376*/ meltfptr[375])) + ( /*_._VALROUT___V376*/ meltfptr[375])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_189__OUTPUT_CURFRAME_DECLSTRUCT#3", NULL != ( /*_.CLASS_NAMED__V14*/ meltfptr[13])); - ((meltroutine_ptr_t) /*_.VALROUT___V376*/ meltfptr[375])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V376*/ meltfptr[375])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_NAMED__V14*/ meltfptr[13]); MELT_LOCATION ("warmelt-outobj.melt:1468:/ initchunk"); @@ -28987,13 +29062,13 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V376*/ meltfptr[375])) + ( /*_._VALROUT___V376*/ meltfptr[375])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_189__OUTPUT_CURFRAME_DECLSTRUCT#4", NULL != ( /*_.LIST_EVERY__V57*/ meltfptr[56])); - ((meltroutine_ptr_t) /*_.VALROUT___V376*/ meltfptr[375])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V376*/ meltfptr[375])->tabval[4] = (melt_ptr_t) ( /*_.LIST_EVERY__V57*/ meltfptr[56]); MELT_LOCATION ("warmelt-outobj.melt:1468:/ initchunk"); @@ -29002,13 +29077,13 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V376*/ meltfptr[375])) + ( /*_._VALROUT___V376*/ meltfptr[375])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_189__OUTPUT_CURFRAME_DECLSTRUCT#5", NULL != ( /*_.CLASS_OBJLOCV__V58*/ meltfptr[57])); - ((meltroutine_ptr_t) /*_.VALROUT___V376*/ meltfptr[375])->tabval[5] = + ((meltroutine_ptr_t) /*_._VALROUT___V376*/ meltfptr[375])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_OBJLOCV__V58*/ meltfptr[57]); MELT_LOCATION ("warmelt-outobj.melt:1468:/ initchunk"); @@ -29017,13 +29092,13 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V376*/ meltfptr[375])) + ( /*_._VALROUT___V376*/ meltfptr[375])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_189__OUTPUT_CURFRAME_DECLSTRUCT#6", NULL != ( /*_.CLASS_CTYPE__V29*/ meltfptr[28])); - ((meltroutine_ptr_t) /*_.VALROUT___V376*/ meltfptr[375])->tabval[6] = + ((meltroutine_ptr_t) /*_._VALROUT___V376*/ meltfptr[375])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_CTYPE__V29*/ meltfptr[28]); MELT_LOCATION ("warmelt-outobj.melt:1468:/ initchunk"); @@ -29031,12 +29106,12 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V376*/ meltfptr[375])) == + ( /*_._VALROUT___V376*/ meltfptr[375])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALDATA___V192*/ meltfptr[191]); - ((meltroutine_ptr_t) /*_.VALROUT___V376*/ meltfptr[375])->tabval[7] = - (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); + NULL != /*_._VALDATA___V192*/ meltfptr[191]); + ((meltroutine_ptr_t) /*_._VALROUT___V376*/ meltfptr[375])->tabval[7] = + (melt_ptr_t) ( /*_._VALDATA___V192*/ meltfptr[191]); MELT_LOCATION ("warmelt-outobj.melt:1468:/ initchunk"); /*^putroutconst */ @@ -29044,13 +29119,13 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V376*/ meltfptr[375])) + ( /*_._VALROUT___V376*/ meltfptr[375])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_189__OUTPUT_CURFRAME_DECLSTRUCT#8", NULL != ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_.VALROUT___V376*/ meltfptr[375])->tabval[8] = + ((meltroutine_ptr_t) /*_._VALROUT___V376*/ meltfptr[375])->tabval[8] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:1468:/ initchunk"); @@ -29059,13 +29134,13 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V376*/ meltfptr[375])) + ( /*_._VALROUT___V376*/ meltfptr[375])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_189__OUTPUT_CURFRAME_DECLSTRUCT#9", NULL != ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7])); - ((meltroutine_ptr_t) /*_.VALROUT___V376*/ meltfptr[375])->tabval[9] = + ((meltroutine_ptr_t) /*_._VALROUT___V376*/ meltfptr[375])->tabval[9] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7]); MELT_LOCATION ("warmelt-outobj.melt:1559:/ initchunk"); @@ -29074,12 +29149,12 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V377*/ meltfptr[376])) + ( /*_._VALROUT___V377*/ meltfptr[376])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_197__LAMBDA_#0", NULL != ( /*_.CLASS_OBJLOCV__V58*/ meltfptr[57])); - ((meltroutine_ptr_t) /*_.VALROUT___V377*/ meltfptr[376])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V377*/ meltfptr[376])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJLOCV__V58*/ meltfptr[57]); MELT_LOCATION ("warmelt-outobj.melt:1559:/ initchunk"); @@ -29088,12 +29163,12 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V377*/ meltfptr[376])) + ( /*_._VALROUT___V377*/ meltfptr[376])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_197__LAMBDA_#1", NULL != ( /*_.CLASS_CTYPE__V29*/ meltfptr[28])); - ((meltroutine_ptr_t) /*_.VALROUT___V377*/ meltfptr[376])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V377*/ meltfptr[376])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_CTYPE__V29*/ meltfptr[28]); MELT_LOCATION ("warmelt-outobj.melt:1559:/ initchunk"); @@ -29101,12 +29176,12 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V377*/ meltfptr[376])) == + ( /*_._VALROUT___V377*/ meltfptr[376])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALDATA___V192*/ meltfptr[191]); - ((meltroutine_ptr_t) /*_.VALROUT___V377*/ meltfptr[376])->tabval[2] = - (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); + NULL != /*_._VALDATA___V192*/ meltfptr[191]); + ((meltroutine_ptr_t) /*_._VALROUT___V377*/ meltfptr[376])->tabval[2] = + (melt_ptr_t) ( /*_._VALDATA___V192*/ meltfptr[191]); MELT_LOCATION ("warmelt-outobj.melt:1559:/ initchunk"); /*^putroutconst */ @@ -29114,12 +29189,12 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V377*/ meltfptr[376])) + ( /*_._VALROUT___V377*/ meltfptr[376])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_197__LAMBDA_#3", NULL != ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_.VALROUT___V377*/ meltfptr[376])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V377*/ meltfptr[376])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:1559:/ initchunk"); @@ -29128,18 +29203,18 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V377*/ meltfptr[376])) + ( /*_._VALROUT___V377*/ meltfptr[376])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_197__LAMBDA_#4", NULL != ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7])); - ((meltroutine_ptr_t) /*_.VALROUT___V377*/ meltfptr[376])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V377*/ meltfptr[376])->tabval[4] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7]); MELT_LOCATION ("warmelt-outobj.melt:1559:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V377*/ meltfptr[376]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V377*/ meltfptr[376]); MELT_LOCATION ("warmelt-outobj.melt:1468:/ initchunk"); /*^putroutconst */ @@ -29147,125 +29222,125 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V376*/ meltfptr[375])) + ( /*_._VALROUT___V376*/ meltfptr[375])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_189__OUTPUT_CURFRAME_DECLSTRUCT#10", - NULL != ( /*_.VALROUT___V377*/ meltfptr[376])); - ((meltroutine_ptr_t) /*_.VALROUT___V376*/ meltfptr[375])->tabval[10] = - (melt_ptr_t) ( /*_.VALROUT___V377*/ meltfptr[376]); + NULL != ( /*_._VALROUT___V377*/ meltfptr[376])); + ((meltroutine_ptr_t) /*_._VALROUT___V376*/ meltfptr[375])->tabval[10] = + (melt_ptr_t) ( /*_._VALROUT___V377*/ meltfptr[376]); MELT_LOCATION ("warmelt-outobj.melt:1468:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V376*/ meltfptr[375]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V376*/ meltfptr[375]); /*putclosurout#40 */ melt_assertmsg ("putclosrout#40 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V378*/ meltfptr[377])) == + ( /*_._VALCLO___V378*/ meltfptr[377])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#40 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V376*/ meltfptr[375])) == + ( /*_._VALROUT___V376*/ meltfptr[375])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V378*/ meltfptr[377])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V376*/ meltfptr[375]); + ((meltclosure_ptr_t) /*_._VALCLO___V378*/ meltfptr[377])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V376*/ meltfptr[375]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V378*/ meltfptr[377]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V378*/ meltfptr[377]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V379*/ meltfptr[378])) == + ( /*_._VALDATA___V379*/ meltfptr[378])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V379*/ + ( /*_._VALDATA___V379*/ meltfptr[378])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V379*/ meltfptr[378]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V379*/ meltfptr[378]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V380*/ meltfptr[379]); + /*_._VALSTR___V380*/ meltfptr[379]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V379*/ meltfptr[378]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V379*/ meltfptr[378]); - melt_dbgtrace_written_object ( /*_.VALDATA___V379*/ meltfptr[378], + melt_dbgtrace_written_object ( /*_._VALDATA___V379*/ meltfptr[378], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V381*/ meltfptr[380])) == + ( /*_._VALDATA___V381*/ meltfptr[380])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V381*/ + ( /*_._VALDATA___V381*/ meltfptr[380])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V381*/ meltfptr[380]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V381*/ meltfptr[380]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V382*/ meltfptr[381]); + /*_._VALSTR___V382*/ meltfptr[381]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V381*/ meltfptr[380]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V381*/ meltfptr[380]); - melt_dbgtrace_written_object ( /*_.VALDATA___V381*/ meltfptr[380], + melt_dbgtrace_written_object ( /*_._VALDATA___V381*/ meltfptr[380], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V383*/ meltfptr[382])) == + ( /*_._VALDATA___V383*/ meltfptr[382])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V383*/ + ( /*_._VALDATA___V383*/ meltfptr[382])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V383*/ meltfptr[382]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V383*/ meltfptr[382]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V384*/ meltfptr[383]); + /*_._VALSTR___V384*/ meltfptr[383]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V383*/ meltfptr[382]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V383*/ meltfptr[382]); - melt_dbgtrace_written_object ( /*_.VALDATA___V383*/ meltfptr[382], + melt_dbgtrace_written_object ( /*_._VALDATA___V383*/ meltfptr[382], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V385*/ meltfptr[384])) == + ( /*_._VALDATA___V385*/ meltfptr[384])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V385*/ + ( /*_._VALDATA___V385*/ meltfptr[384])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V385*/ meltfptr[384]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V385*/ meltfptr[384]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V386*/ meltfptr[385]); + /*_._VALSTR___V386*/ meltfptr[385]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V385*/ meltfptr[384]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V385*/ meltfptr[384]); - melt_dbgtrace_written_object ( /*_.VALDATA___V385*/ meltfptr[384], + melt_dbgtrace_written_object ( /*_._VALDATA___V385*/ meltfptr[384], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:1589:/ initchunk"); @@ -29274,12 +29349,12 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V387*/ meltfptr[386])) + ( /*_._VALROUT___V387*/ meltfptr[386])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_200__OUTPUCOD_MARKER#0", NULL != ( /*_.CLASS_ROUTINEOBJ__V59*/ meltfptr[58])); - ((meltroutine_ptr_t) /*_.VALROUT___V387*/ meltfptr[386])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V387*/ meltfptr[386])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_ROUTINEOBJ__V59*/ meltfptr[58]); MELT_LOCATION ("warmelt-outobj.melt:1589:/ initchunk"); @@ -29288,12 +29363,12 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V387*/ meltfptr[386])) + ( /*_._VALROUT___V387*/ meltfptr[386])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_200__OUTPUCOD_MARKER#1", NULL != ( /*_.CLASS_PROCROUTINEOBJ__V60*/ meltfptr[59])); - ((meltroutine_ptr_t) /*_.VALROUT___V387*/ meltfptr[386])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V387*/ meltfptr[386])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_PROCROUTINEOBJ__V60*/ meltfptr[59]); MELT_LOCATION ("warmelt-outobj.melt:1589:/ initchunk"); @@ -29302,12 +29377,12 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V387*/ meltfptr[386])) + ( /*_._VALROUT___V387*/ meltfptr[386])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_200__OUTPUCOD_MARKER#2", NULL != ( /*_.CTYPE_VALUE__V32*/ meltfptr[31])); - ((meltroutine_ptr_t) /*_.VALROUT___V387*/ meltfptr[386])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V387*/ meltfptr[386])->tabval[2] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V32*/ meltfptr[31]); MELT_LOCATION ("warmelt-outobj.melt:1589:/ initchunk"); @@ -29316,12 +29391,12 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V387*/ meltfptr[386])) + ( /*_._VALROUT___V387*/ meltfptr[386])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_200__OUTPUCOD_MARKER#3", NULL != ( /*_.CLASS_CTYPE__V29*/ meltfptr[28])); - ((meltroutine_ptr_t) /*_.VALROUT___V387*/ meltfptr[386])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V387*/ meltfptr[386])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_CTYPE__V29*/ meltfptr[28]); MELT_LOCATION ("warmelt-outobj.melt:1589:/ initchunk"); @@ -29330,12 +29405,12 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V387*/ meltfptr[386])) + ( /*_._VALROUT___V387*/ meltfptr[386])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_200__OUTPUCOD_MARKER#4", NULL != ( /*_.LIST_EVERY__V57*/ meltfptr[56])); - ((meltroutine_ptr_t) /*_.VALROUT___V387*/ meltfptr[386])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V387*/ meltfptr[386])->tabval[4] = (melt_ptr_t) ( /*_.LIST_EVERY__V57*/ meltfptr[56]); MELT_LOCATION ("warmelt-outobj.melt:1589:/ initchunk"); @@ -29344,12 +29419,12 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V387*/ meltfptr[386])) + ( /*_._VALROUT___V387*/ meltfptr[386])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_200__OUTPUCOD_MARKER#5", NULL != ( /*_.CLASS_OBJLOCV__V58*/ meltfptr[57])); - ((meltroutine_ptr_t) /*_.VALROUT___V387*/ meltfptr[386])->tabval[5] = + ((meltroutine_ptr_t) /*_._VALROUT___V387*/ meltfptr[386])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_OBJLOCV__V58*/ meltfptr[57]); MELT_LOCATION ("warmelt-outobj.melt:1589:/ initchunk"); @@ -29358,12 +29433,12 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V387*/ meltfptr[386])) + ( /*_._VALROUT___V387*/ meltfptr[386])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_200__OUTPUCOD_MARKER#6", NULL != ( /*_.CLASS_OBJVALUE__V28*/ meltfptr[27])); - ((meltroutine_ptr_t) /*_.VALROUT___V387*/ meltfptr[386])->tabval[6] = + ((meltroutine_ptr_t) /*_._VALROUT___V387*/ meltfptr[386])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_OBJVALUE__V28*/ meltfptr[27]); MELT_LOCATION ("warmelt-outobj.melt:1589:/ initchunk"); @@ -29372,12 +29447,12 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V387*/ meltfptr[386])) + ( /*_._VALROUT___V387*/ meltfptr[386])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_200__OUTPUCOD_MARKER#7", NULL != ( /*_.CLASS_CTYPE__V29*/ meltfptr[28])); - ((meltroutine_ptr_t) /*_.VALROUT___V387*/ meltfptr[386])->tabval[7] = + ((meltroutine_ptr_t) /*_._VALROUT___V387*/ meltfptr[386])->tabval[7] = (melt_ptr_t) ( /*_.CLASS_CTYPE__V29*/ meltfptr[28]); MELT_LOCATION ("warmelt-outobj.melt:1589:/ initchunk"); @@ -29386,12 +29461,12 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V387*/ meltfptr[386])) + ( /*_._VALROUT___V387*/ meltfptr[386])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_200__OUTPUCOD_MARKER#8", NULL != ( /*_.CLASS_NAMED__V14*/ meltfptr[13])); - ((meltroutine_ptr_t) /*_.VALROUT___V387*/ meltfptr[386])->tabval[8] = + ((meltroutine_ptr_t) /*_._VALROUT___V387*/ meltfptr[386])->tabval[8] = (melt_ptr_t) ( /*_.CLASS_NAMED__V14*/ meltfptr[13]); MELT_LOCATION ("warmelt-outobj.melt:1589:/ initchunk"); @@ -29399,12 +29474,12 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V387*/ meltfptr[386])) == + ( /*_._VALROUT___V387*/ meltfptr[386])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALDATA___V192*/ meltfptr[191]); - ((meltroutine_ptr_t) /*_.VALROUT___V387*/ meltfptr[386])->tabval[9] = - (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); + NULL != /*_._VALDATA___V192*/ meltfptr[191]); + ((meltroutine_ptr_t) /*_._VALROUT___V387*/ meltfptr[386])->tabval[9] = + (melt_ptr_t) ( /*_._VALDATA___V192*/ meltfptr[191]); MELT_LOCATION ("warmelt-outobj.melt:1589:/ initchunk"); /*^putroutconst */ @@ -29412,12 +29487,12 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V387*/ meltfptr[386])) + ( /*_._VALROUT___V387*/ meltfptr[386])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_200__OUTPUCOD_MARKER#10", NULL != ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_.VALROUT___V387*/ meltfptr[386])->tabval[10] = + ((meltroutine_ptr_t) /*_._VALROUT___V387*/ meltfptr[386])->tabval[10] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:1611:/ initchunk"); @@ -29426,12 +29501,12 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V388*/ meltfptr[387])) + ( /*_._VALROUT___V388*/ meltfptr[387])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_206__LAMBDA_#0", NULL != ( /*_.CLASS_OBJLOCV__V58*/ meltfptr[57])); - ((meltroutine_ptr_t) /*_.VALROUT___V388*/ meltfptr[387])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V388*/ meltfptr[387])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJLOCV__V58*/ meltfptr[57]); MELT_LOCATION ("warmelt-outobj.melt:1611:/ initchunk"); @@ -29440,12 +29515,12 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V388*/ meltfptr[387])) + ( /*_._VALROUT___V388*/ meltfptr[387])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_206__LAMBDA_#1", NULL != ( /*_.CLASS_OBJVALUE__V28*/ meltfptr[27])); - ((meltroutine_ptr_t) /*_.VALROUT___V388*/ meltfptr[387])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V388*/ meltfptr[387])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_OBJVALUE__V28*/ meltfptr[27]); MELT_LOCATION ("warmelt-outobj.melt:1611:/ initchunk"); @@ -29454,12 +29529,12 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V388*/ meltfptr[387])) + ( /*_._VALROUT___V388*/ meltfptr[387])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_206__LAMBDA_#2", NULL != ( /*_.CLASS_CTYPE__V29*/ meltfptr[28])); - ((meltroutine_ptr_t) /*_.VALROUT___V388*/ meltfptr[387])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V388*/ meltfptr[387])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_CTYPE__V29*/ meltfptr[28]); MELT_LOCATION ("warmelt-outobj.melt:1611:/ initchunk"); @@ -29468,12 +29543,12 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V388*/ meltfptr[387])) + ( /*_._VALROUT___V388*/ meltfptr[387])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_206__LAMBDA_#3", NULL != ( /*_.CLASS_NAMED__V14*/ meltfptr[13])); - ((meltroutine_ptr_t) /*_.VALROUT___V388*/ meltfptr[387])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V388*/ meltfptr[387])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_NAMED__V14*/ meltfptr[13]); MELT_LOCATION ("warmelt-outobj.melt:1611:/ initchunk"); @@ -29481,12 +29556,12 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V388*/ meltfptr[387])) == + ( /*_._VALROUT___V388*/ meltfptr[387])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALDATA___V192*/ meltfptr[191]); - ((meltroutine_ptr_t) /*_.VALROUT___V388*/ meltfptr[387])->tabval[4] = - (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); + NULL != /*_._VALDATA___V192*/ meltfptr[191]); + ((meltroutine_ptr_t) /*_._VALROUT___V388*/ meltfptr[387])->tabval[4] = + (melt_ptr_t) ( /*_._VALDATA___V192*/ meltfptr[191]); MELT_LOCATION ("warmelt-outobj.melt:1611:/ initchunk"); /*^putroutconst */ @@ -29494,18 +29569,18 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V388*/ meltfptr[387])) + ( /*_._VALROUT___V388*/ meltfptr[387])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_206__LAMBDA_#5", NULL != ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_.VALROUT___V388*/ meltfptr[387])->tabval[5] = + ((meltroutine_ptr_t) /*_._VALROUT___V388*/ meltfptr[387])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:1611:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V388*/ meltfptr[387]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V388*/ meltfptr[387]); MELT_LOCATION ("warmelt-outobj.melt:1589:/ initchunk"); /*^putroutconst */ @@ -29513,78 +29588,78 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V387*/ meltfptr[386])) + ( /*_._VALROUT___V387*/ meltfptr[386])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_200__OUTPUCOD_MARKER#11", - NULL != ( /*_.VALROUT___V388*/ meltfptr[387])); - ((meltroutine_ptr_t) /*_.VALROUT___V387*/ meltfptr[386])->tabval[11] = - (melt_ptr_t) ( /*_.VALROUT___V388*/ meltfptr[387]); + NULL != ( /*_._VALROUT___V388*/ meltfptr[387])); + ((meltroutine_ptr_t) /*_._VALROUT___V387*/ meltfptr[386])->tabval[11] = + (melt_ptr_t) ( /*_._VALROUT___V388*/ meltfptr[387]); MELT_LOCATION ("warmelt-outobj.melt:1589:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V387*/ meltfptr[386]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V387*/ meltfptr[386]); /*putclosurout#41 */ melt_assertmsg ("putclosrout#41 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V389*/ meltfptr[388])) == + ( /*_._VALCLO___V389*/ meltfptr[388])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#41 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V387*/ meltfptr[386])) == + ( /*_._VALROUT___V387*/ meltfptr[386])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V389*/ meltfptr[388])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V387*/ meltfptr[386]); + ((meltclosure_ptr_t) /*_._VALCLO___V389*/ meltfptr[388])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V387*/ meltfptr[386]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V389*/ meltfptr[388]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V389*/ meltfptr[388]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V390*/ meltfptr[389])) == + ( /*_._VALDATA___V390*/ meltfptr[389])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V390*/ + ( /*_._VALDATA___V390*/ meltfptr[389])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V390*/ meltfptr[389]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V390*/ meltfptr[389]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V391*/ meltfptr[390]); + /*_._VALSTR___V391*/ meltfptr[390]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V390*/ meltfptr[389]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V390*/ meltfptr[389]); - melt_dbgtrace_written_object ( /*_.VALDATA___V390*/ meltfptr[389], + melt_dbgtrace_written_object ( /*_._VALDATA___V390*/ meltfptr[389], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V392*/ meltfptr[391])) == + ( /*_._VALDATA___V392*/ meltfptr[391])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V392*/ + ( /*_._VALDATA___V392*/ meltfptr[391])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V392*/ meltfptr[391]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V392*/ meltfptr[391]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V393*/ meltfptr[392]); + /*_._VALSTR___V393*/ meltfptr[392]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V392*/ meltfptr[391]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V392*/ meltfptr[391]); - melt_dbgtrace_written_object ( /*_.VALDATA___V392*/ meltfptr[391], + melt_dbgtrace_written_object ( /*_._VALDATA___V392*/ meltfptr[391], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:1649:/ initchunk"); @@ -29593,13 +29668,13 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V394*/ meltfptr[393])) + ( /*_._VALROUT___V394*/ meltfptr[393])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_207__OUTPUT_CURFRAME_DECLSTRUCT_INIT#0", NULL != ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7])); - ((meltroutine_ptr_t) /*_.VALROUT___V394*/ meltfptr[393])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V394*/ meltfptr[393])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7]); MELT_LOCATION ("warmelt-outobj.melt:1649:/ initchunk"); @@ -29608,13 +29683,13 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V394*/ meltfptr[393])) + ( /*_._VALROUT___V394*/ meltfptr[393])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_207__OUTPUT_CURFRAME_DECLSTRUCT_INIT#1", NULL != ( /*_.CLASS_ROUTINEOBJ__V59*/ meltfptr[58])); - ((meltroutine_ptr_t) /*_.VALROUT___V394*/ meltfptr[393])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V394*/ meltfptr[393])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_ROUTINEOBJ__V59*/ meltfptr[58]); MELT_LOCATION ("warmelt-outobj.melt:1649:/ initchunk"); @@ -29623,13 +29698,13 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V394*/ meltfptr[393])) + ( /*_._VALROUT___V394*/ meltfptr[393])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_207__OUTPUT_CURFRAME_DECLSTRUCT_INIT#2", NULL != ( /*_.CLASS_INITIAL_EXTENSION_ROUTINEOBJ__V55*/ meltfptr[54])); - ((meltroutine_ptr_t) /*_.VALROUT___V394*/ meltfptr[393])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V394*/ meltfptr[393])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_INITIAL_EXTENSION_ROUTINEOBJ__V55*/ meltfptr[54]); @@ -29639,13 +29714,13 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V394*/ meltfptr[393])) + ( /*_._VALROUT___V394*/ meltfptr[393])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_207__OUTPUT_CURFRAME_DECLSTRUCT_INIT#3", NULL != ( /*_.CLASS_HOOKROUTINEOBJ__V61*/ meltfptr[60])); - ((meltroutine_ptr_t) /*_.VALROUT___V394*/ meltfptr[393])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V394*/ meltfptr[393])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_HOOKROUTINEOBJ__V61*/ meltfptr[60]); MELT_LOCATION ("warmelt-outobj.melt:1649:/ initchunk"); @@ -29654,13 +29729,13 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V394*/ meltfptr[393])) + ( /*_._VALROUT___V394*/ meltfptr[393])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_207__OUTPUT_CURFRAME_DECLSTRUCT_INIT#4", NULL != ( /*_.CLASS_INITIALROUTINEOBJ__V56*/ meltfptr[55])); - ((meltroutine_ptr_t) /*_.VALROUT___V394*/ meltfptr[393])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V394*/ meltfptr[393])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_INITIALROUTINEOBJ__V56*/ meltfptr[55]); MELT_LOCATION ("warmelt-outobj.melt:1649:/ initchunk"); @@ -29669,13 +29744,13 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V394*/ meltfptr[393])) + ( /*_._VALROUT___V394*/ meltfptr[393])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_207__OUTPUT_CURFRAME_DECLSTRUCT_INIT#5", NULL != ( /*_.CLASS_NAMED__V14*/ meltfptr[13])); - ((meltroutine_ptr_t) /*_.VALROUT___V394*/ meltfptr[393])->tabval[5] = + ((meltroutine_ptr_t) /*_._VALROUT___V394*/ meltfptr[393])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_NAMED__V14*/ meltfptr[13]); MELT_LOCATION ("warmelt-outobj.melt:1649:/ initchunk"); @@ -29684,13 +29759,13 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V394*/ meltfptr[393])) + ( /*_._VALROUT___V394*/ meltfptr[393])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_207__OUTPUT_CURFRAME_DECLSTRUCT_INIT#6", NULL != ( /*_.ADD2OUT__V15*/ meltfptr[14])); - ((meltroutine_ptr_t) /*_.VALROUT___V394*/ meltfptr[393])->tabval[6] = + ((meltroutine_ptr_t) /*_._VALROUT___V394*/ meltfptr[393])->tabval[6] = (melt_ptr_t) ( /*_.ADD2OUT__V15*/ meltfptr[14]); MELT_LOCATION ("warmelt-outobj.melt:1649:/ initchunk"); @@ -29699,13 +29774,13 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V394*/ meltfptr[393])) + ( /*_._VALROUT___V394*/ meltfptr[393])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_207__OUTPUT_CURFRAME_DECLSTRUCT_INIT#7", NULL != ( /*_.CLASS_NREP_HOOKPROC__V45*/ meltfptr[44])); - ((meltroutine_ptr_t) /*_.VALROUT___V394*/ meltfptr[393])->tabval[7] = + ((meltroutine_ptr_t) /*_._VALROUT___V394*/ meltfptr[393])->tabval[7] = (melt_ptr_t) ( /*_.CLASS_NREP_HOOKPROC__V45*/ meltfptr[44]); MELT_LOCATION ("warmelt-outobj.melt:1649:/ initchunk"); @@ -29713,24 +29788,24 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V394*/ meltfptr[393])) == + ( /*_._VALROUT___V394*/ meltfptr[393])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V389*/ meltfptr[388]); - ((meltroutine_ptr_t) /*_.VALROUT___V394*/ meltfptr[393])->tabval[8] = - (melt_ptr_t) ( /*_.VALCLO___V389*/ meltfptr[388]); + NULL != /*_._VALCLO___V389*/ meltfptr[388]); + ((meltroutine_ptr_t) /*_._VALROUT___V394*/ meltfptr[393])->tabval[8] = + (melt_ptr_t) ( /*_._VALCLO___V389*/ meltfptr[388]); MELT_LOCATION ("warmelt-outobj.melt:1649:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V394*/ meltfptr[393])) == + ( /*_._VALROUT___V394*/ meltfptr[393])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALDATA___V192*/ meltfptr[191]); - ((meltroutine_ptr_t) /*_.VALROUT___V394*/ meltfptr[393])->tabval[9] = - (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); + NULL != /*_._VALDATA___V192*/ meltfptr[191]); + ((meltroutine_ptr_t) /*_._VALROUT___V394*/ meltfptr[393])->tabval[9] = + (melt_ptr_t) ( /*_._VALDATA___V192*/ meltfptr[191]); MELT_LOCATION ("warmelt-outobj.melt:1649:/ initchunk"); /*^putroutconst */ @@ -29738,56 +29813,56 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V394*/ meltfptr[393])) + ( /*_._VALROUT___V394*/ meltfptr[393])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_207__OUTPUT_CURFRAME_DECLSTRUCT_INIT#10", NULL != ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_.VALROUT___V394*/ meltfptr[393])->tabval[10] = + ((meltroutine_ptr_t) /*_._VALROUT___V394*/ meltfptr[393])->tabval[10] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:1649:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V394*/ meltfptr[393]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V394*/ meltfptr[393]); /*putclosurout#42 */ melt_assertmsg ("putclosrout#42 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V395*/ meltfptr[394])) == + ( /*_._VALCLO___V395*/ meltfptr[394])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#42 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V394*/ meltfptr[393])) == + ( /*_._VALROUT___V394*/ meltfptr[393])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V395*/ meltfptr[394])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V394*/ meltfptr[393]); + ((meltclosure_ptr_t) /*_._VALCLO___V395*/ meltfptr[394])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V394*/ meltfptr[393]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V395*/ meltfptr[394]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V395*/ meltfptr[394]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V396*/ meltfptr[395])) == + ( /*_._VALDATA___V396*/ meltfptr[395])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V396*/ + ( /*_._VALDATA___V396*/ meltfptr[395])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V396*/ meltfptr[395]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V396*/ meltfptr[395]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V397*/ meltfptr[396]); + /*_._VALSTR___V397*/ meltfptr[396]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V396*/ meltfptr[395]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V396*/ meltfptr[395]); - melt_dbgtrace_written_object ( /*_.VALDATA___V396*/ meltfptr[395], + melt_dbgtrace_written_object ( /*_._VALDATA___V396*/ meltfptr[395], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:1777:/ initchunk"); @@ -29796,12 +29871,12 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V398*/ meltfptr[397])) + ( /*_._VALROUT___V398*/ meltfptr[397])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_211__OUTPUCOD_PROCROUTINE#0", NULL != ( /*_.CLASS_PROCROUTINEOBJ__V60*/ meltfptr[59])); - ((meltroutine_ptr_t) /*_.VALROUT___V398*/ meltfptr[397])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V398*/ meltfptr[397])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_PROCROUTINEOBJ__V60*/ meltfptr[59]); MELT_LOCATION ("warmelt-outobj.melt:1777:/ initchunk"); @@ -29810,25 +29885,25 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V398*/ meltfptr[397])) + ( /*_._VALROUT___V398*/ meltfptr[397])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_211__OUTPUCOD_PROCROUTINE#1", - NULL != ( /*_.VALSTR___V399*/ meltfptr[398])); - ((meltroutine_ptr_t) /*_.VALROUT___V398*/ meltfptr[397])->tabval[1] = - (melt_ptr_t) ( /*_.VALSTR___V399*/ meltfptr[398]); + NULL != ( /*_._VALSTR___V399*/ meltfptr[398])); + ((meltroutine_ptr_t) /*_._VALROUT___V398*/ meltfptr[397])->tabval[1] = + (melt_ptr_t) ( /*_._VALSTR___V399*/ meltfptr[398]); MELT_LOCATION ("warmelt-outobj.melt:1777:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V398*/ meltfptr[397])) == + ( /*_._VALROUT___V398*/ meltfptr[397])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V263*/ meltfptr[262]); - ((meltroutine_ptr_t) /*_.VALROUT___V398*/ meltfptr[397])->tabval[2] = - (melt_ptr_t) ( /*_.VALCLO___V263*/ meltfptr[262]); + NULL != /*_._VALCLO___V263*/ meltfptr[262]); + ((meltroutine_ptr_t) /*_._VALROUT___V398*/ meltfptr[397])->tabval[2] = + (melt_ptr_t) ( /*_._VALCLO___V263*/ meltfptr[262]); MELT_LOCATION ("warmelt-outobj.melt:1777:/ initchunk"); /*^putroutconst */ @@ -29836,12 +29911,12 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V398*/ meltfptr[397])) + ( /*_._VALROUT___V398*/ meltfptr[397])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_211__OUTPUCOD_PROCROUTINE#3", NULL != ( /*_.VARIADIC_INDEX_IDSTR__V62*/ meltfptr[61])); - ((meltroutine_ptr_t) /*_.VALROUT___V398*/ meltfptr[397])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V398*/ meltfptr[397])->tabval[3] = (melt_ptr_t) ( /*_.VARIADIC_INDEX_IDSTR__V62*/ meltfptr[61]); MELT_LOCATION ("warmelt-outobj.melt:1777:/ initchunk"); @@ -29850,12 +29925,12 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V398*/ meltfptr[397])) + ( /*_._VALROUT___V398*/ meltfptr[397])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_211__OUTPUCOD_PROCROUTINE#4", NULL != ( /*_.VARIADIC_LENGTH_IDSTR__V63*/ meltfptr[62])); - ((meltroutine_ptr_t) /*_.VALROUT___V398*/ meltfptr[397])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V398*/ meltfptr[397])->tabval[4] = (melt_ptr_t) ( /*_.VARIADIC_LENGTH_IDSTR__V63*/ meltfptr[62]); MELT_LOCATION ("warmelt-outobj.melt:1777:/ initchunk"); @@ -29864,12 +29939,12 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V398*/ meltfptr[397])) + ( /*_._VALROUT___V398*/ meltfptr[397])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_211__OUTPUCOD_PROCROUTINE#5", NULL != ( /*_.ADD2OUT__V15*/ meltfptr[14])); - ((meltroutine_ptr_t) /*_.VALROUT___V398*/ meltfptr[397])->tabval[5] = + ((meltroutine_ptr_t) /*_._VALROUT___V398*/ meltfptr[397])->tabval[5] = (melt_ptr_t) ( /*_.ADD2OUT__V15*/ meltfptr[14]); MELT_LOCATION ("warmelt-outobj.melt:1777:/ initchunk"); @@ -29877,24 +29952,24 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V398*/ meltfptr[397])) == + ( /*_._VALROUT___V398*/ meltfptr[397])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V395*/ meltfptr[394]); - ((meltroutine_ptr_t) /*_.VALROUT___V398*/ meltfptr[397])->tabval[6] = - (melt_ptr_t) ( /*_.VALCLO___V395*/ meltfptr[394]); + NULL != /*_._VALCLO___V395*/ meltfptr[394]); + ((meltroutine_ptr_t) /*_._VALROUT___V398*/ meltfptr[397])->tabval[6] = + (melt_ptr_t) ( /*_._VALCLO___V395*/ meltfptr[394]); MELT_LOCATION ("warmelt-outobj.melt:1777:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V398*/ meltfptr[397])) == + ( /*_._VALROUT___V398*/ meltfptr[397])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V378*/ meltfptr[377]); - ((meltroutine_ptr_t) /*_.VALROUT___V398*/ meltfptr[397])->tabval[7] = - (melt_ptr_t) ( /*_.VALCLO___V378*/ meltfptr[377]); + NULL != /*_._VALCLO___V378*/ meltfptr[377]); + ((meltroutine_ptr_t) /*_._VALROUT___V398*/ meltfptr[397])->tabval[7] = + (melt_ptr_t) ( /*_._VALCLO___V378*/ meltfptr[377]); MELT_LOCATION ("warmelt-outobj.melt:1777:/ initchunk"); /*^putroutconst */ @@ -29902,12 +29977,12 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V398*/ meltfptr[397])) + ( /*_._VALROUT___V398*/ meltfptr[397])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_211__OUTPUCOD_PROCROUTINE#8", NULL != ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20])); - ((meltroutine_ptr_t) /*_.VALROUT___V398*/ meltfptr[397])->tabval[8] = + ((meltroutine_ptr_t) /*_._VALROUT___V398*/ meltfptr[397])->tabval[8] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]); MELT_LOCATION ("warmelt-outobj.melt:1777:/ initchunk"); @@ -29915,12 +29990,12 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V398*/ meltfptr[397])) == + ( /*_._VALROUT___V398*/ meltfptr[397])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALDATA___V192*/ meltfptr[191]); - ((meltroutine_ptr_t) /*_.VALROUT___V398*/ meltfptr[397])->tabval[9] = - (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); + NULL != /*_._VALDATA___V192*/ meltfptr[191]); + ((meltroutine_ptr_t) /*_._VALROUT___V398*/ meltfptr[397])->tabval[9] = + (melt_ptr_t) ( /*_._VALDATA___V192*/ meltfptr[191]); MELT_LOCATION ("warmelt-outobj.melt:1777:/ initchunk"); /*^putroutconst */ @@ -29928,13 +30003,13 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V398*/ meltfptr[397])) + ( /*_._VALROUT___V398*/ meltfptr[397])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_211__OUTPUCOD_PROCROUTINE#10", NULL != ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_.VALROUT___V398*/ meltfptr[397])->tabval[10] = + ((meltroutine_ptr_t) /*_._VALROUT___V398*/ meltfptr[397])->tabval[10] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:1777:/ initchunk"); @@ -29943,13 +30018,13 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V398*/ meltfptr[397])) + ( /*_._VALROUT___V398*/ meltfptr[397])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_211__OUTPUCOD_PROCROUTINE#11", NULL != ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7])); - ((meltroutine_ptr_t) /*_.VALROUT___V398*/ meltfptr[397])->tabval[11] = + ((meltroutine_ptr_t) /*_._VALROUT___V398*/ meltfptr[397])->tabval[11] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7]); MELT_LOCATION ("warmelt-outobj.melt:1777:/ initchunk"); @@ -29958,13 +30033,13 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V398*/ meltfptr[397])) + ( /*_._VALROUT___V398*/ meltfptr[397])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_211__OUTPUCOD_PROCROUTINE#12", NULL != ( /*_.LIST_EVERY__V57*/ meltfptr[56])); - ((meltroutine_ptr_t) /*_.VALROUT___V398*/ meltfptr[397])->tabval[12] = + ((meltroutine_ptr_t) /*_._VALROUT___V398*/ meltfptr[397])->tabval[12] = (melt_ptr_t) ( /*_.LIST_EVERY__V57*/ meltfptr[56]); MELT_LOCATION ("warmelt-outobj.melt:1777:/ initchunk"); @@ -29973,13 +30048,13 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V398*/ meltfptr[397])) + ( /*_._VALROUT___V398*/ meltfptr[397])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_211__OUTPUCOD_PROCROUTINE#13", NULL != ( /*_.CLASS_OBJPUREVALUE__V64*/ meltfptr[63])); - ((meltroutine_ptr_t) /*_.VALROUT___V398*/ meltfptr[397])->tabval[13] = + ((meltroutine_ptr_t) /*_._VALROUT___V398*/ meltfptr[397])->tabval[13] = (melt_ptr_t) ( /*_.CLASS_OBJPUREVALUE__V64*/ meltfptr[63]); MELT_LOCATION ("warmelt-outobj.melt:1777:/ initchunk"); @@ -29988,13 +30063,13 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V398*/ meltfptr[397])) + ( /*_._VALROUT___V398*/ meltfptr[397])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_211__OUTPUCOD_PROCROUTINE#14", NULL != ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20])); - ((meltroutine_ptr_t) /*_.VALROUT___V398*/ meltfptr[397])->tabval[14] = + ((meltroutine_ptr_t) /*_._VALROUT___V398*/ meltfptr[397])->tabval[14] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]); MELT_LOCATION ("warmelt-outobj.melt:1777:/ initchunk"); @@ -30002,12 +30077,12 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V398*/ meltfptr[397])) == + ( /*_._VALROUT___V398*/ meltfptr[397])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALDATA___V192*/ meltfptr[191]); - ((meltroutine_ptr_t) /*_.VALROUT___V398*/ meltfptr[397])->tabval[15] = - (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); + NULL != /*_._VALDATA___V192*/ meltfptr[191]); + ((meltroutine_ptr_t) /*_._VALROUT___V398*/ meltfptr[397])->tabval[15] = + (melt_ptr_t) ( /*_._VALDATA___V192*/ meltfptr[191]); MELT_LOCATION ("warmelt-outobj.melt:1777:/ initchunk"); /*^putroutconst */ @@ -30015,13 +30090,13 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V398*/ meltfptr[397])) + ( /*_._VALROUT___V398*/ meltfptr[397])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_211__OUTPUCOD_PROCROUTINE#16", NULL != ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_.VALROUT___V398*/ meltfptr[397])->tabval[16] = + ((meltroutine_ptr_t) /*_._VALROUT___V398*/ meltfptr[397])->tabval[16] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:1893:/ initchunk"); @@ -30030,12 +30105,12 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V400*/ meltfptr[399])) + ( /*_._VALROUT___V400*/ meltfptr[399])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_218__LAMBDA_#0", NULL != ( /*_.CLASS_OBJPUREVALUE__V64*/ meltfptr[63])); - ((meltroutine_ptr_t) /*_.VALROUT___V400*/ meltfptr[399])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V400*/ meltfptr[399])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJPUREVALUE__V64*/ meltfptr[63]); MELT_LOCATION ("warmelt-outobj.melt:1893:/ initchunk"); @@ -30044,12 +30119,12 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V400*/ meltfptr[399])) + ( /*_._VALROUT___V400*/ meltfptr[399])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_218__LAMBDA_#1", NULL != ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20])); - ((meltroutine_ptr_t) /*_.VALROUT___V400*/ meltfptr[399])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V400*/ meltfptr[399])->tabval[1] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]); MELT_LOCATION ("warmelt-outobj.melt:1893:/ initchunk"); @@ -30057,12 +30132,12 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V400*/ meltfptr[399])) == + ( /*_._VALROUT___V400*/ meltfptr[399])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALDATA___V192*/ meltfptr[191]); - ((meltroutine_ptr_t) /*_.VALROUT___V400*/ meltfptr[399])->tabval[2] = - (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); + NULL != /*_._VALDATA___V192*/ meltfptr[191]); + ((meltroutine_ptr_t) /*_._VALROUT___V400*/ meltfptr[399])->tabval[2] = + (melt_ptr_t) ( /*_._VALDATA___V192*/ meltfptr[191]); MELT_LOCATION ("warmelt-outobj.melt:1893:/ initchunk"); /*^putroutconst */ @@ -30070,18 +30145,18 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V400*/ meltfptr[399])) + ( /*_._VALROUT___V400*/ meltfptr[399])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_218__LAMBDA_#3", NULL != ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_.VALROUT___V400*/ meltfptr[399])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V400*/ meltfptr[399])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:1893:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V400*/ meltfptr[399]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V400*/ meltfptr[399]); MELT_LOCATION ("warmelt-outobj.melt:1777:/ initchunk"); /*^putroutconst */ @@ -30089,115 +30164,115 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V398*/ meltfptr[397])) + ( /*_._VALROUT___V398*/ meltfptr[397])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_211__OUTPUCOD_PROCROUTINE#17", - NULL != ( /*_.VALROUT___V400*/ meltfptr[399])); - ((meltroutine_ptr_t) /*_.VALROUT___V398*/ meltfptr[397])->tabval[17] = - (melt_ptr_t) ( /*_.VALROUT___V400*/ meltfptr[399]); + NULL != ( /*_._VALROUT___V400*/ meltfptr[399])); + ((meltroutine_ptr_t) /*_._VALROUT___V398*/ meltfptr[397])->tabval[17] = + (melt_ptr_t) ( /*_._VALROUT___V400*/ meltfptr[399]); MELT_LOCATION ("warmelt-outobj.melt:1777:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V398*/ meltfptr[397]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V398*/ meltfptr[397]); /*putclosurout#43 */ melt_assertmsg ("putclosrout#43 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V401*/ meltfptr[400])) == + ( /*_._VALCLO___V401*/ meltfptr[400])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#43 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V398*/ meltfptr[397])) == + ( /*_._VALROUT___V398*/ meltfptr[397])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V401*/ meltfptr[400])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V398*/ meltfptr[397]); + ((meltclosure_ptr_t) /*_._VALCLO___V401*/ meltfptr[400])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V398*/ meltfptr[397]); #undef meltfram__ -} /*end of meltmod__warmelt_outobj__initialmeltchunk_3 */ +} /*end of meltmod__WARMELTmiOUTOBJ__initialmeltchunk_3 */ void -meltmod__warmelt_outobj__initialmeltchunk_4 (meltinitial_frame_t * - meltmeltframptr__, - char meltpredefinited[]) +meltmod__WARMELTmiOUTOBJ__initialmeltchunk_4 (meltinitial_frame_t * + meltmeltframptr__, + char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L (void) meltpredefinited; -/*touch:DATACLOSURE_*/ - meltgc_touch ( /*_.VALCLO___V401*/ meltfptr[400]); +/*touch:_DATACLOSURE_*/ + meltgc_touch ( /*_._VALCLO___V401*/ meltfptr[400]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V402*/ meltfptr[401])) == + ( /*_._VALDATA___V402*/ meltfptr[401])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V402*/ + ( /*_._VALDATA___V402*/ meltfptr[401])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V402*/ meltfptr[401]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V402*/ meltfptr[401]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V403*/ meltfptr[402]); + /*_._VALSTR___V403*/ meltfptr[402]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V402*/ meltfptr[401]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V402*/ meltfptr[401]); - melt_dbgtrace_written_object ( /*_.VALDATA___V402*/ meltfptr[401], + melt_dbgtrace_written_object ( /*_._VALDATA___V402*/ meltfptr[401], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V404*/ meltfptr[403])) == + ( /*_._VALDATA___V404*/ meltfptr[403])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V404*/ + ( /*_._VALDATA___V404*/ meltfptr[403])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V404*/ meltfptr[403]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V404*/ meltfptr[403]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V405*/ meltfptr[404]); + /*_._VALSTR___V405*/ meltfptr[404]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V404*/ meltfptr[403]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V404*/ meltfptr[403]); - melt_dbgtrace_written_object ( /*_.VALDATA___V404*/ meltfptr[403], + melt_dbgtrace_written_object ( /*_._VALDATA___V404*/ meltfptr[403], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V406*/ meltfptr[405])) == + ( /*_._VALDATA___V406*/ meltfptr[405])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V406*/ + ( /*_._VALDATA___V406*/ meltfptr[405])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V406*/ meltfptr[405]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V406*/ meltfptr[405]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V407*/ meltfptr[406]); + /*_._VALSTR___V407*/ meltfptr[406]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V406*/ meltfptr[405]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V406*/ meltfptr[405]); - melt_dbgtrace_written_object ( /*_.VALDATA___V406*/ meltfptr[405], + melt_dbgtrace_written_object ( /*_._VALDATA___V406*/ meltfptr[405], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:1963:/ initchunk"); @@ -30206,13 +30281,13 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V408*/ meltfptr[407])) + ( /*_._VALROUT___V408*/ meltfptr[407])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_221__OUTPUT_CURFRAME_CDAT_STRUCT#0", NULL != ( /*_.OUTPUT_C_DECLINIT__V19*/ meltfptr[18])); - ((meltroutine_ptr_t) /*_.VALROUT___V408*/ meltfptr[407])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V408*/ meltfptr[407])->tabval[0] = (melt_ptr_t) ( /*_.OUTPUT_C_DECLINIT__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-outobj.melt:1963:/ initchunk"); @@ -30220,12 +30295,12 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V408*/ meltfptr[407])) == + ( /*_._VALROUT___V408*/ meltfptr[407])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALDATA___V192*/ meltfptr[191]); - ((meltroutine_ptr_t) /*_.VALROUT___V408*/ meltfptr[407])->tabval[1] = - (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); + NULL != /*_._VALDATA___V192*/ meltfptr[191]); + ((meltroutine_ptr_t) /*_._VALROUT___V408*/ meltfptr[407])->tabval[1] = + (melt_ptr_t) ( /*_._VALDATA___V192*/ meltfptr[191]); MELT_LOCATION ("warmelt-outobj.melt:1963:/ initchunk"); /*^putroutconst */ @@ -30233,13 +30308,13 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V408*/ meltfptr[407])) + ( /*_._VALROUT___V408*/ meltfptr[407])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_221__OUTPUT_CURFRAME_CDAT_STRUCT#2", NULL != ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_.VALROUT___V408*/ meltfptr[407])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V408*/ meltfptr[407])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:1963:/ initchunk"); @@ -30248,34 +30323,34 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V408*/ meltfptr[407])) + ( /*_._VALROUT___V408*/ meltfptr[407])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_221__OUTPUT_CURFRAME_CDAT_STRUCT#3", NULL != ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7])); - ((meltroutine_ptr_t) /*_.VALROUT___V408*/ meltfptr[407])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V408*/ meltfptr[407])->tabval[3] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7]); MELT_LOCATION ("warmelt-outobj.melt:1963:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V408*/ meltfptr[407]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V408*/ meltfptr[407]); /*putclosurout#44 */ melt_assertmsg ("putclosrout#44 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V409*/ meltfptr[408])) == + ( /*_._VALCLO___V409*/ meltfptr[408])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#44 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V408*/ meltfptr[407])) == + ( /*_._VALROUT___V408*/ meltfptr[407])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V409*/ meltfptr[408])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V408*/ meltfptr[407]); + ((meltclosure_ptr_t) /*_._VALCLO___V409*/ meltfptr[408])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V408*/ meltfptr[407]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V409*/ meltfptr[408]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V409*/ meltfptr[408]); MELT_LOCATION ("warmelt-outobj.melt:1988:/ initchunk"); /*^putroutconst */ @@ -30283,13 +30358,13 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V410*/ meltfptr[409])) + ( /*_._VALROUT___V410*/ meltfptr[409])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_223__OUTPUT_CURFRAME_CDAT_FILL#0", NULL != ( /*_.OUTPUT_C_INITIAL_PREDEF__V23*/ meltfptr[22])); - ((meltroutine_ptr_t) /*_.VALROUT___V410*/ meltfptr[409])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V410*/ meltfptr[409])->tabval[0] = (melt_ptr_t) ( /*_.OUTPUT_C_INITIAL_PREDEF__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-outobj.melt:1988:/ initchunk"); @@ -30298,14 +30373,14 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V410*/ meltfptr[409])) + ( /*_._VALROUT___V410*/ meltfptr[409])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_223__OUTPUT_CURFRAME_CDAT_FILL#1", - NULL != ( /*_.VALSTR___V411*/ meltfptr[410])); - ((meltroutine_ptr_t) /*_.VALROUT___V410*/ meltfptr[409])->tabval[1] = - (melt_ptr_t) ( /*_.VALSTR___V411*/ meltfptr[410]); + NULL != ( /*_._VALSTR___V411*/ meltfptr[410])); + ((meltroutine_ptr_t) /*_._VALROUT___V410*/ meltfptr[409])->tabval[1] = + (melt_ptr_t) ( /*_._VALSTR___V411*/ meltfptr[410]); MELT_LOCATION ("warmelt-outobj.melt:1988:/ initchunk"); /*^putroutconst */ @@ -30313,13 +30388,13 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V410*/ meltfptr[409])) + ( /*_._VALROUT___V410*/ meltfptr[409])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_223__OUTPUT_CURFRAME_CDAT_FILL#2", NULL != ( /*_.OUTPUT_C_INITIAL_FILL__V22*/ meltfptr[21])); - ((meltroutine_ptr_t) /*_.VALROUT___V410*/ meltfptr[409])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V410*/ meltfptr[409])->tabval[2] = (melt_ptr_t) ( /*_.OUTPUT_C_INITIAL_FILL__V22*/ meltfptr[21]); MELT_LOCATION ("warmelt-outobj.melt:1988:/ initchunk"); @@ -30328,26 +30403,26 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V410*/ meltfptr[409])) + ( /*_._VALROUT___V410*/ meltfptr[409])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_223__OUTPUT_CURFRAME_CDAT_FILL#3", - NULL != ( /*_.VALSTR___V412*/ meltfptr[411])); - ((meltroutine_ptr_t) /*_.VALROUT___V410*/ meltfptr[409])->tabval[3] = - (melt_ptr_t) ( /*_.VALSTR___V412*/ meltfptr[411]); + NULL != ( /*_._VALSTR___V412*/ meltfptr[411])); + ((meltroutine_ptr_t) /*_._VALROUT___V410*/ meltfptr[409])->tabval[3] = + (melt_ptr_t) ( /*_._VALSTR___V412*/ meltfptr[411]); MELT_LOCATION ("warmelt-outobj.melt:1988:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V410*/ meltfptr[409])) == + ( /*_._VALROUT___V410*/ meltfptr[409])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALDATA___V192*/ meltfptr[191]); - ((meltroutine_ptr_t) /*_.VALROUT___V410*/ meltfptr[409])->tabval[4] = - (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); + NULL != /*_._VALDATA___V192*/ meltfptr[191]); + ((meltroutine_ptr_t) /*_._VALROUT___V410*/ meltfptr[409])->tabval[4] = + (melt_ptr_t) ( /*_._VALDATA___V192*/ meltfptr[191]); MELT_LOCATION ("warmelt-outobj.melt:1988:/ initchunk"); /*^putroutconst */ @@ -30355,13 +30430,13 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V410*/ meltfptr[409])) + ( /*_._VALROUT___V410*/ meltfptr[409])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_223__OUTPUT_CURFRAME_CDAT_FILL#5", NULL != ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_.VALROUT___V410*/ meltfptr[409])->tabval[5] = + ((meltroutine_ptr_t) /*_._VALROUT___V410*/ meltfptr[409])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:1988:/ initchunk"); @@ -30370,34 +30445,34 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V410*/ meltfptr[409])) + ( /*_._VALROUT___V410*/ meltfptr[409])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_223__OUTPUT_CURFRAME_CDAT_FILL#6", NULL != ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7])); - ((meltroutine_ptr_t) /*_.VALROUT___V410*/ meltfptr[409])->tabval[6] = + ((meltroutine_ptr_t) /*_._VALROUT___V410*/ meltfptr[409])->tabval[6] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7]); MELT_LOCATION ("warmelt-outobj.melt:1988:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V410*/ meltfptr[409]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V410*/ meltfptr[409]); /*putclosurout#45 */ melt_assertmsg ("putclosrout#45 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V413*/ meltfptr[412])) == + ( /*_._VALCLO___V413*/ meltfptr[412])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#45 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V410*/ meltfptr[409])) == + ( /*_._VALROUT___V410*/ meltfptr[409])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V413*/ meltfptr[412])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V410*/ meltfptr[409]); + ((meltclosure_ptr_t) /*_._VALCLO___V413*/ meltfptr[412])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V410*/ meltfptr[409]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V413*/ meltfptr[412]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V413*/ meltfptr[412]); MELT_LOCATION ("warmelt-outobj.melt:2035:/ initchunk"); /*^putroutconst */ @@ -30405,13 +30480,13 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V414*/ meltfptr[413])) + ( /*_._VALROUT___V414*/ meltfptr[413])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_227__OUTPUCOD_INITIALMODULEROUTINE#0", NULL != ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7])); - ((meltroutine_ptr_t) /*_.VALROUT___V414*/ meltfptr[413])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V414*/ meltfptr[413])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7]); MELT_LOCATION ("warmelt-outobj.melt:2035:/ initchunk"); @@ -30420,13 +30495,13 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V414*/ meltfptr[413])) + ( /*_._VALROUT___V414*/ meltfptr[413])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_227__OUTPUCOD_INITIALMODULEROUTINE#1", NULL != ( /*_.CLASS_INITIAL_MODULE_ROUTINEOBJ__V65*/ meltfptr[64])); - ((meltroutine_ptr_t) /*_.VALROUT___V414*/ meltfptr[413])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V414*/ meltfptr[413])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_INITIAL_MODULE_ROUTINEOBJ__V65*/ meltfptr[64]); MELT_LOCATION ("warmelt-outobj.melt:2035:/ initchunk"); @@ -30435,13 +30510,13 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V414*/ meltfptr[413])) + ( /*_._VALROUT___V414*/ meltfptr[413])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_227__OUTPUCOD_INITIALMODULEROUTINE#2", NULL != ( /*_.CLASS_ROUTINEOBJ__V59*/ meltfptr[58])); - ((meltroutine_ptr_t) /*_.VALROUT___V414*/ meltfptr[413])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V414*/ meltfptr[413])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_ROUTINEOBJ__V59*/ meltfptr[58]); MELT_LOCATION ("warmelt-outobj.melt:2035:/ initchunk"); @@ -30450,13 +30525,13 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V414*/ meltfptr[413])) + ( /*_._VALROUT___V414*/ meltfptr[413])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_227__OUTPUCOD_INITIALMODULEROUTINE#3", NULL != ( /*_.ADD2OUT__V15*/ meltfptr[14])); - ((meltroutine_ptr_t) /*_.VALROUT___V414*/ meltfptr[413])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V414*/ meltfptr[413])->tabval[3] = (melt_ptr_t) ( /*_.ADD2OUT__V15*/ meltfptr[14]); MELT_LOCATION ("warmelt-outobj.melt:2035:/ initchunk"); @@ -30464,48 +30539,48 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V414*/ meltfptr[413])) == + ( /*_._VALROUT___V414*/ meltfptr[413])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V378*/ meltfptr[377]); - ((meltroutine_ptr_t) /*_.VALROUT___V414*/ meltfptr[413])->tabval[4] = - (melt_ptr_t) ( /*_.VALCLO___V378*/ meltfptr[377]); + NULL != /*_._VALCLO___V378*/ meltfptr[377]); + ((meltroutine_ptr_t) /*_._VALROUT___V414*/ meltfptr[413])->tabval[4] = + (melt_ptr_t) ( /*_._VALCLO___V378*/ meltfptr[377]); MELT_LOCATION ("warmelt-outobj.melt:2035:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V414*/ meltfptr[413])) == + ( /*_._VALROUT___V414*/ meltfptr[413])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V409*/ meltfptr[408]); - ((meltroutine_ptr_t) /*_.VALROUT___V414*/ meltfptr[413])->tabval[5] = - (melt_ptr_t) ( /*_.VALCLO___V409*/ meltfptr[408]); + NULL != /*_._VALCLO___V409*/ meltfptr[408]); + ((meltroutine_ptr_t) /*_._VALROUT___V414*/ meltfptr[413])->tabval[5] = + (melt_ptr_t) ( /*_._VALCLO___V409*/ meltfptr[408]); MELT_LOCATION ("warmelt-outobj.melt:2035:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V414*/ meltfptr[413])) == + ( /*_._VALROUT___V414*/ meltfptr[413])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V413*/ meltfptr[412]); - ((meltroutine_ptr_t) /*_.VALROUT___V414*/ meltfptr[413])->tabval[6] = - (melt_ptr_t) ( /*_.VALCLO___V413*/ meltfptr[412]); + NULL != /*_._VALCLO___V413*/ meltfptr[412]); + ((meltroutine_ptr_t) /*_._VALROUT___V414*/ meltfptr[413])->tabval[6] = + (melt_ptr_t) ( /*_._VALCLO___V413*/ meltfptr[412]); MELT_LOCATION ("warmelt-outobj.melt:2035:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V414*/ meltfptr[413])) == + ( /*_._VALROUT___V414*/ meltfptr[413])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V395*/ meltfptr[394]); - ((meltroutine_ptr_t) /*_.VALROUT___V414*/ meltfptr[413])->tabval[7] = - (melt_ptr_t) ( /*_.VALCLO___V395*/ meltfptr[394]); + NULL != /*_._VALCLO___V395*/ meltfptr[394]); + ((meltroutine_ptr_t) /*_._VALROUT___V414*/ meltfptr[413])->tabval[7] = + (melt_ptr_t) ( /*_._VALCLO___V395*/ meltfptr[394]); MELT_LOCATION ("warmelt-outobj.melt:2035:/ initchunk"); /*^putroutconst */ @@ -30513,14 +30588,14 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V414*/ meltfptr[413])) + ( /*_._VALROUT___V414*/ meltfptr[413])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_227__OUTPUCOD_INITIALMODULEROUTINE#8", - NULL != ( /*_.VALROUT___V415*/ meltfptr[414])); - ((meltroutine_ptr_t) /*_.VALROUT___V414*/ meltfptr[413])->tabval[8] = - (melt_ptr_t) ( /*_.VALROUT___V415*/ meltfptr[414]); + NULL != ( /*_._VALROUT___V415*/ meltfptr[414])); + ((meltroutine_ptr_t) /*_._VALROUT___V414*/ meltfptr[413])->tabval[8] = + (melt_ptr_t) ( /*_._VALROUT___V415*/ meltfptr[414]); MELT_LOCATION ("warmelt-outobj.melt:2035:/ initchunk"); /*^putroutconst */ @@ -30528,13 +30603,13 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V414*/ meltfptr[413])) + ( /*_._VALROUT___V414*/ meltfptr[413])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_227__OUTPUCOD_INITIALMODULEROUTINE#9", NULL != ( /*_.CLASS_OBJPUREVALUE__V64*/ meltfptr[63])); - ((meltroutine_ptr_t) /*_.VALROUT___V414*/ meltfptr[413])->tabval[9] = + ((meltroutine_ptr_t) /*_._VALROUT___V414*/ meltfptr[413])->tabval[9] = (melt_ptr_t) ( /*_.CLASS_OBJPUREVALUE__V64*/ meltfptr[63]); MELT_LOCATION ("warmelt-outobj.melt:2035:/ initchunk"); @@ -30543,13 +30618,13 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V414*/ meltfptr[413])) + ( /*_._VALROUT___V414*/ meltfptr[413])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_227__OUTPUCOD_INITIALMODULEROUTINE#10", NULL != ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20])); - ((meltroutine_ptr_t) /*_.VALROUT___V414*/ meltfptr[413])->tabval[10] = + ((meltroutine_ptr_t) /*_._VALROUT___V414*/ meltfptr[413])->tabval[10] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]); MELT_LOCATION ("warmelt-outobj.melt:2035:/ initchunk"); @@ -30558,13 +30633,13 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V414*/ meltfptr[413])) + ( /*_._VALROUT___V414*/ meltfptr[413])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_227__OUTPUCOD_INITIALMODULEROUTINE#11", NULL != ( /*_.DISCR_LIST__V66*/ meltfptr[65])); - ((meltroutine_ptr_t) /*_.VALROUT___V414*/ meltfptr[413])->tabval[11] = + ((meltroutine_ptr_t) /*_._VALROUT___V414*/ meltfptr[413])->tabval[11] = (melt_ptr_t) ( /*_.DISCR_LIST__V66*/ meltfptr[65]); MELT_LOCATION ("warmelt-outobj.melt:2035:/ initchunk"); @@ -30573,13 +30648,13 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V414*/ meltfptr[413])) + ( /*_._VALROUT___V414*/ meltfptr[413])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_227__OUTPUCOD_INITIALMODULEROUTINE#12", NULL != ( /*_.LIST_TO_MULTIPLE__V67*/ meltfptr[66])); - ((meltroutine_ptr_t) /*_.VALROUT___V414*/ meltfptr[413])->tabval[12] = + ((meltroutine_ptr_t) /*_._VALROUT___V414*/ meltfptr[413])->tabval[12] = (melt_ptr_t) ( /*_.LIST_TO_MULTIPLE__V67*/ meltfptr[66]); MELT_LOCATION ("warmelt-outobj.melt:2035:/ initchunk"); @@ -30588,13 +30663,13 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V414*/ meltfptr[413])) + ( /*_._VALROUT___V414*/ meltfptr[413])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_227__OUTPUCOD_INITIALMODULEROUTINE#13", NULL != ( /*_.DISCR_MULTIPLE__V68*/ meltfptr[67])); - ((meltroutine_ptr_t) /*_.VALROUT___V414*/ meltfptr[413])->tabval[13] = + ((meltroutine_ptr_t) /*_._VALROUT___V414*/ meltfptr[413])->tabval[13] = (melt_ptr_t) ( /*_.DISCR_MULTIPLE__V68*/ meltfptr[67]); MELT_LOCATION ("warmelt-outobj.melt:2035:/ initchunk"); @@ -30603,13 +30678,13 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V414*/ meltfptr[413])) + ( /*_._VALROUT___V414*/ meltfptr[413])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_227__OUTPUCOD_INITIALMODULEROUTINE#14", NULL != ( /*_.DISCR_STRBUF__V69*/ meltfptr[68])); - ((meltroutine_ptr_t) /*_.VALROUT___V414*/ meltfptr[413])->tabval[14] = + ((meltroutine_ptr_t) /*_._VALROUT___V414*/ meltfptr[413])->tabval[14] = (melt_ptr_t) ( /*_.DISCR_STRBUF__V69*/ meltfptr[68]); MELT_LOCATION ("warmelt-outobj.melt:2035:/ initchunk"); @@ -30617,24 +30692,24 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V414*/ meltfptr[413])) == + ( /*_._VALROUT___V414*/ meltfptr[413])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALDATA___V261*/ meltfptr[260]); - ((meltroutine_ptr_t) /*_.VALROUT___V414*/ meltfptr[413])->tabval[15] = - (melt_ptr_t) ( /*_.VALDATA___V261*/ meltfptr[260]); + NULL != /*_._VALDATA___V261*/ meltfptr[260]); + ((meltroutine_ptr_t) /*_._VALROUT___V414*/ meltfptr[413])->tabval[15] = + (melt_ptr_t) ( /*_._VALDATA___V261*/ meltfptr[260]); MELT_LOCATION ("warmelt-outobj.melt:2035:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V414*/ meltfptr[413])) == + ( /*_._VALROUT___V414*/ meltfptr[413])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALDATA___V262*/ meltfptr[261]); - ((meltroutine_ptr_t) /*_.VALROUT___V414*/ meltfptr[413])->tabval[16] = - (melt_ptr_t) ( /*_.VALDATA___V262*/ meltfptr[261]); + NULL != /*_._VALDATA___V262*/ meltfptr[261]); + ((meltroutine_ptr_t) /*_._VALROUT___V414*/ meltfptr[413])->tabval[16] = + (melt_ptr_t) ( /*_._VALDATA___V262*/ meltfptr[261]); MELT_LOCATION ("warmelt-outobj.melt:2035:/ initchunk"); /*^putroutconst */ @@ -30642,13 +30717,13 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V414*/ meltfptr[413])) + ( /*_._VALROUT___V414*/ meltfptr[413])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_227__OUTPUCOD_INITIALMODULEROUTINE#17", NULL != ( /*_.CLASS_OBJINSTR__V70*/ meltfptr[69])); - ((meltroutine_ptr_t) /*_.VALROUT___V414*/ meltfptr[413])->tabval[17] = + ((meltroutine_ptr_t) /*_._VALROUT___V414*/ meltfptr[413])->tabval[17] = (melt_ptr_t) ( /*_.CLASS_OBJINSTR__V70*/ meltfptr[69]); MELT_LOCATION ("warmelt-outobj.melt:2035:/ initchunk"); @@ -30656,24 +30731,24 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V414*/ meltfptr[413])) == + ( /*_._VALROUT___V414*/ meltfptr[413])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V259*/ meltfptr[258]); - ((meltroutine_ptr_t) /*_.VALROUT___V414*/ meltfptr[413])->tabval[18] = - (melt_ptr_t) ( /*_.VALCLO___V259*/ meltfptr[258]); + NULL != /*_._VALCLO___V259*/ meltfptr[258]); + ((meltroutine_ptr_t) /*_._VALROUT___V414*/ meltfptr[413])->tabval[18] = + (melt_ptr_t) ( /*_._VALCLO___V259*/ meltfptr[258]); MELT_LOCATION ("warmelt-outobj.melt:2035:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V414*/ meltfptr[413])) == + ( /*_._VALROUT___V414*/ meltfptr[413])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALDATA___V192*/ meltfptr[191]); - ((meltroutine_ptr_t) /*_.VALROUT___V414*/ meltfptr[413])->tabval[19] = - (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); + NULL != /*_._VALDATA___V192*/ meltfptr[191]); + ((meltroutine_ptr_t) /*_._VALROUT___V414*/ meltfptr[413])->tabval[19] = + (melt_ptr_t) ( /*_._VALDATA___V192*/ meltfptr[191]); MELT_LOCATION ("warmelt-outobj.melt:2035:/ initchunk"); /*^putroutconst */ @@ -30681,13 +30756,13 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V414*/ meltfptr[413])) + ( /*_._VALROUT___V414*/ meltfptr[413])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_227__OUTPUCOD_INITIALMODULEROUTINE#20", NULL != ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_.VALROUT___V414*/ meltfptr[413])->tabval[20] = + ((meltroutine_ptr_t) /*_._VALROUT___V414*/ meltfptr[413])->tabval[20] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:2035:/ initchunk"); @@ -30695,169 +30770,169 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V414*/ meltfptr[413])) == + ( /*_._VALROUT___V414*/ meltfptr[413])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V389*/ meltfptr[388]); - ((meltroutine_ptr_t) /*_.VALROUT___V414*/ meltfptr[413])->tabval[21] = - (melt_ptr_t) ( /*_.VALCLO___V389*/ meltfptr[388]); + NULL != /*_._VALCLO___V389*/ meltfptr[388]); + ((meltroutine_ptr_t) /*_._VALROUT___V414*/ meltfptr[413])->tabval[21] = + (melt_ptr_t) ( /*_._VALCLO___V389*/ meltfptr[388]); MELT_LOCATION ("warmelt-outobj.melt:2035:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V414*/ meltfptr[413]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V414*/ meltfptr[413]); /*putclosurout#46 */ melt_assertmsg ("putclosrout#46 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V416*/ meltfptr[415])) == + ( /*_._VALCLO___V416*/ meltfptr[415])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#46 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V414*/ meltfptr[413])) == + ( /*_._VALROUT___V414*/ meltfptr[413])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V416*/ meltfptr[415])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V414*/ meltfptr[413]); + ((meltclosure_ptr_t) /*_._VALCLO___V416*/ meltfptr[415])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V414*/ meltfptr[413]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V416*/ meltfptr[415]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V416*/ meltfptr[415]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V417*/ meltfptr[416])) == + ( /*_._VALDATA___V417*/ meltfptr[416])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V417*/ + ( /*_._VALDATA___V417*/ meltfptr[416])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V417*/ meltfptr[416]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V417*/ meltfptr[416]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V418*/ meltfptr[417]); + /*_._VALSTR___V418*/ meltfptr[417]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V417*/ meltfptr[416]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V417*/ meltfptr[416]); - melt_dbgtrace_written_object ( /*_.VALDATA___V417*/ meltfptr[416], + melt_dbgtrace_written_object ( /*_._VALDATA___V417*/ meltfptr[416], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V419*/ meltfptr[418])) == + ( /*_._VALDATA___V419*/ meltfptr[418])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V419*/ + ( /*_._VALDATA___V419*/ meltfptr[418])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V419*/ meltfptr[418]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V419*/ meltfptr[418]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V420*/ meltfptr[419]); + /*_._VALSTR___V420*/ meltfptr[419]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V419*/ meltfptr[418]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V419*/ meltfptr[418]); - melt_dbgtrace_written_object ( /*_.VALDATA___V419*/ meltfptr[418], + melt_dbgtrace_written_object ( /*_._VALDATA___V419*/ meltfptr[418], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V421*/ meltfptr[420])) == + ( /*_._VALDATA___V421*/ meltfptr[420])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V421*/ + ( /*_._VALDATA___V421*/ meltfptr[420])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V421*/ meltfptr[420]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V421*/ meltfptr[420]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V422*/ meltfptr[421]); + /*_._VALSTR___V422*/ meltfptr[421]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V421*/ meltfptr[420]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V421*/ meltfptr[420]); - melt_dbgtrace_written_object ( /*_.VALDATA___V421*/ meltfptr[420], + melt_dbgtrace_written_object ( /*_._VALDATA___V421*/ meltfptr[420], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V423*/ meltfptr[422])) == + ( /*_._VALDATA___V423*/ meltfptr[422])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V423*/ + ( /*_._VALDATA___V423*/ meltfptr[422])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V423*/ meltfptr[422]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V423*/ meltfptr[422]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V424*/ meltfptr[423]); + /*_._VALSTR___V424*/ meltfptr[423]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V423*/ meltfptr[422]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V423*/ meltfptr[422]); - melt_dbgtrace_written_object ( /*_.VALDATA___V423*/ meltfptr[422], + melt_dbgtrace_written_object ( /*_._VALDATA___V423*/ meltfptr[422], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V425*/ meltfptr[424])) == + ( /*_._VALDATA___V425*/ meltfptr[424])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V425*/ + ( /*_._VALDATA___V425*/ meltfptr[424])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V425*/ meltfptr[424]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V425*/ meltfptr[424]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V426*/ meltfptr[425]); + /*_._VALSTR___V426*/ meltfptr[425]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V425*/ meltfptr[424]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V425*/ meltfptr[424]); - melt_dbgtrace_written_object ( /*_.VALDATA___V425*/ meltfptr[424], + melt_dbgtrace_written_object ( /*_._VALDATA___V425*/ meltfptr[424], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V427*/ meltfptr[426])) == + ( /*_._VALDATA___V427*/ meltfptr[426])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V427*/ + ( /*_._VALDATA___V427*/ meltfptr[426])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V427*/ meltfptr[426]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V427*/ meltfptr[426]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V428*/ meltfptr[427]); + /*_._VALSTR___V428*/ meltfptr[427]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V427*/ meltfptr[426]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V427*/ meltfptr[426]); - melt_dbgtrace_written_object ( /*_.VALDATA___V427*/ meltfptr[426], + melt_dbgtrace_written_object ( /*_._VALDATA___V427*/ meltfptr[426], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:2405:/ initchunk"); @@ -30866,13 +30941,13 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V429*/ meltfptr[428])) + ( /*_._VALROUT___V429*/ meltfptr[428])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_242__OUTPUT_CENTRALDECL_HOOKROUTINE#0", NULL != ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7])); - ((meltroutine_ptr_t) /*_.VALROUT___V429*/ meltfptr[428])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V429*/ meltfptr[428])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7]); MELT_LOCATION ("warmelt-outobj.melt:2405:/ initchunk"); @@ -30881,13 +30956,13 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V429*/ meltfptr[428])) + ( /*_._VALROUT___V429*/ meltfptr[428])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_242__OUTPUT_CENTRALDECL_HOOKROUTINE#1", NULL != ( /*_.CLASS_HOOKROUTINEOBJ__V61*/ meltfptr[60])); - ((meltroutine_ptr_t) /*_.VALROUT___V429*/ meltfptr[428])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V429*/ meltfptr[428])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_HOOKROUTINEOBJ__V61*/ meltfptr[60]); MELT_LOCATION ("warmelt-outobj.melt:2405:/ initchunk"); @@ -30896,13 +30971,13 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V429*/ meltfptr[428])) + ( /*_._VALROUT___V429*/ meltfptr[428])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_242__OUTPUT_CENTRALDECL_HOOKROUTINE#2", NULL != ( /*_.CLASS_NAMED__V14*/ meltfptr[13])); - ((meltroutine_ptr_t) /*_.VALROUT___V429*/ meltfptr[428])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V429*/ meltfptr[428])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NAMED__V14*/ meltfptr[13]); MELT_LOCATION ("warmelt-outobj.melt:2405:/ initchunk"); @@ -30911,13 +30986,13 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V429*/ meltfptr[428])) + ( /*_._VALROUT___V429*/ meltfptr[428])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_242__OUTPUT_CENTRALDECL_HOOKROUTINE#3", NULL != ( /*_.CLASS_ROUTINEOBJ__V59*/ meltfptr[58])); - ((meltroutine_ptr_t) /*_.VALROUT___V429*/ meltfptr[428])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V429*/ meltfptr[428])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_ROUTINEOBJ__V59*/ meltfptr[58]); MELT_LOCATION ("warmelt-outobj.melt:2405:/ initchunk"); @@ -30926,13 +31001,13 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V429*/ meltfptr[428])) + ( /*_._VALROUT___V429*/ meltfptr[428])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_242__OUTPUT_CENTRALDECL_HOOKROUTINE#4", NULL != ( /*_.CLASS_NREP_HOOKPROC__V45*/ meltfptr[44])); - ((meltroutine_ptr_t) /*_.VALROUT___V429*/ meltfptr[428])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V429*/ meltfptr[428])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_NREP_HOOKPROC__V45*/ meltfptr[44]); MELT_LOCATION ("warmelt-outobj.melt:2405:/ initchunk"); @@ -30941,13 +31016,13 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V429*/ meltfptr[428])) + ( /*_._VALROUT___V429*/ meltfptr[428])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_242__OUTPUT_CENTRALDECL_HOOKROUTINE#5", NULL != ( /*_.CLASS_CTYPE__V29*/ meltfptr[28])); - ((meltroutine_ptr_t) /*_.VALROUT___V429*/ meltfptr[428])->tabval[5] = + ((meltroutine_ptr_t) /*_._VALROUT___V429*/ meltfptr[428])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_CTYPE__V29*/ meltfptr[28]); MELT_LOCATION ("warmelt-outobj.melt:2405:/ initchunk"); @@ -30956,13 +31031,13 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V429*/ meltfptr[428])) + ( /*_._VALROUT___V429*/ meltfptr[428])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_242__OUTPUT_CENTRALDECL_HOOKROUTINE#6", NULL != ( /*_.CLASS_OBJCFORMAL__V71*/ meltfptr[70])); - ((meltroutine_ptr_t) /*_.VALROUT___V429*/ meltfptr[428])->tabval[6] = + ((meltroutine_ptr_t) /*_._VALROUT___V429*/ meltfptr[428])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_OBJCFORMAL__V71*/ meltfptr[70]); MELT_LOCATION ("warmelt-outobj.melt:2405:/ initchunk"); @@ -30971,13 +31046,13 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V429*/ meltfptr[428])) + ( /*_._VALROUT___V429*/ meltfptr[428])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_242__OUTPUT_CENTRALDECL_HOOKROUTINE#7", NULL != ( /*_.ADD2OUT__V15*/ meltfptr[14])); - ((meltroutine_ptr_t) /*_.VALROUT___V429*/ meltfptr[428])->tabval[7] = + ((meltroutine_ptr_t) /*_._VALROUT___V429*/ meltfptr[428])->tabval[7] = (melt_ptr_t) ( /*_.ADD2OUT__V15*/ meltfptr[14]); MELT_LOCATION ("warmelt-outobj.melt:2405:/ initchunk"); @@ -30986,56 +31061,56 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V429*/ meltfptr[428])) + ( /*_._VALROUT___V429*/ meltfptr[428])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_242__OUTPUT_CENTRALDECL_HOOKROUTINE#8", NULL != ( /*_.CLASS_OBJVALUE__V28*/ meltfptr[27])); - ((meltroutine_ptr_t) /*_.VALROUT___V429*/ meltfptr[428])->tabval[8] = + ((meltroutine_ptr_t) /*_._VALROUT___V429*/ meltfptr[428])->tabval[8] = (melt_ptr_t) ( /*_.CLASS_OBJVALUE__V28*/ meltfptr[27]); MELT_LOCATION ("warmelt-outobj.melt:2405:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V429*/ meltfptr[428]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V429*/ meltfptr[428]); /*putclosurout#47 */ melt_assertmsg ("putclosrout#47 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V430*/ meltfptr[429])) == + ( /*_._VALCLO___V430*/ meltfptr[429])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#47 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V429*/ meltfptr[428])) == + ( /*_._VALROUT___V429*/ meltfptr[428])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V430*/ meltfptr[429])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V429*/ meltfptr[428]); + ((meltclosure_ptr_t) /*_._VALCLO___V430*/ meltfptr[429])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V429*/ meltfptr[428]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V430*/ meltfptr[429]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V430*/ meltfptr[429]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V431*/ meltfptr[430])) == + ( /*_._VALDATA___V431*/ meltfptr[430])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V431*/ + ( /*_._VALDATA___V431*/ meltfptr[430])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V431*/ meltfptr[430]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V431*/ meltfptr[430]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V432*/ meltfptr[431]); + /*_._VALSTR___V432*/ meltfptr[431]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V431*/ meltfptr[430]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V431*/ meltfptr[430]); - melt_dbgtrace_written_object ( /*_.VALDATA___V431*/ meltfptr[430], + melt_dbgtrace_written_object ( /*_._VALDATA___V431*/ meltfptr[430], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:2463:/ initchunk"); @@ -31044,12 +31119,12 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V433*/ meltfptr[432])) + ( /*_._VALROUT___V433*/ meltfptr[432])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_246__OUTPUCOD_HOOKROUTINE#0", NULL != ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7])); - ((meltroutine_ptr_t) /*_.VALROUT___V433*/ meltfptr[432])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V433*/ meltfptr[432])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7]); MELT_LOCATION ("warmelt-outobj.melt:2463:/ initchunk"); @@ -31058,12 +31133,12 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V433*/ meltfptr[432])) + ( /*_._VALROUT___V433*/ meltfptr[432])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_246__OUTPUCOD_HOOKROUTINE#1", NULL != ( /*_.CLASS_HOOKROUTINEOBJ__V61*/ meltfptr[60])); - ((meltroutine_ptr_t) /*_.VALROUT___V433*/ meltfptr[432])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V433*/ meltfptr[432])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_HOOKROUTINEOBJ__V61*/ meltfptr[60]); MELT_LOCATION ("warmelt-outobj.melt:2463:/ initchunk"); @@ -31072,12 +31147,12 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V433*/ meltfptr[432])) + ( /*_._VALROUT___V433*/ meltfptr[432])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_246__OUTPUCOD_HOOKROUTINE#2", NULL != ( /*_.CLASS_NAMED__V14*/ meltfptr[13])); - ((meltroutine_ptr_t) /*_.VALROUT___V433*/ meltfptr[432])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V433*/ meltfptr[432])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NAMED__V14*/ meltfptr[13]); MELT_LOCATION ("warmelt-outobj.melt:2463:/ initchunk"); @@ -31086,12 +31161,12 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V433*/ meltfptr[432])) + ( /*_._VALROUT___V433*/ meltfptr[432])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_246__OUTPUCOD_HOOKROUTINE#3", NULL != ( /*_.CLASS_ROUTINEOBJ__V59*/ meltfptr[58])); - ((meltroutine_ptr_t) /*_.VALROUT___V433*/ meltfptr[432])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V433*/ meltfptr[432])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_ROUTINEOBJ__V59*/ meltfptr[58]); MELT_LOCATION ("warmelt-outobj.melt:2463:/ initchunk"); @@ -31100,12 +31175,12 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V433*/ meltfptr[432])) + ( /*_._VALROUT___V433*/ meltfptr[432])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_246__OUTPUCOD_HOOKROUTINE#4", NULL != ( /*_.CLASS_NREP_HOOKPROC__V45*/ meltfptr[44])); - ((meltroutine_ptr_t) /*_.VALROUT___V433*/ meltfptr[432])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V433*/ meltfptr[432])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_NREP_HOOKPROC__V45*/ meltfptr[44]); MELT_LOCATION ("warmelt-outobj.melt:2463:/ initchunk"); @@ -31114,12 +31189,12 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V433*/ meltfptr[432])) + ( /*_._VALROUT___V433*/ meltfptr[432])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_246__OUTPUCOD_HOOKROUTINE#5", NULL != ( /*_.CLASS_OBJVALUE__V28*/ meltfptr[27])); - ((meltroutine_ptr_t) /*_.VALROUT___V433*/ meltfptr[432])->tabval[5] = + ((meltroutine_ptr_t) /*_._VALROUT___V433*/ meltfptr[432])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_OBJVALUE__V28*/ meltfptr[27]); MELT_LOCATION ("warmelt-outobj.melt:2463:/ initchunk"); @@ -31128,12 +31203,12 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V433*/ meltfptr[432])) + ( /*_._VALROUT___V433*/ meltfptr[432])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_246__OUTPUCOD_HOOKROUTINE#6", NULL != ( /*_.CLASS_CTYPE__V29*/ meltfptr[28])); - ((meltroutine_ptr_t) /*_.VALROUT___V433*/ meltfptr[432])->tabval[6] = + ((meltroutine_ptr_t) /*_._VALROUT___V433*/ meltfptr[432])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_CTYPE__V29*/ meltfptr[28]); MELT_LOCATION ("warmelt-outobj.melt:2463:/ initchunk"); @@ -31142,12 +31217,12 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V433*/ meltfptr[432])) + ( /*_._VALROUT___V433*/ meltfptr[432])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_246__OUTPUCOD_HOOKROUTINE#7", NULL != ( /*_.CLASS_OBJCFORMAL__V71*/ meltfptr[70])); - ((meltroutine_ptr_t) /*_.VALROUT___V433*/ meltfptr[432])->tabval[7] = + ((meltroutine_ptr_t) /*_._VALROUT___V433*/ meltfptr[432])->tabval[7] = (melt_ptr_t) ( /*_.CLASS_OBJCFORMAL__V71*/ meltfptr[70]); MELT_LOCATION ("warmelt-outobj.melt:2463:/ initchunk"); @@ -31155,12 +31230,12 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V433*/ meltfptr[432])) == + ( /*_._VALROUT___V433*/ meltfptr[432])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V430*/ meltfptr[429]); - ((meltroutine_ptr_t) /*_.VALROUT___V433*/ meltfptr[432])->tabval[8] = - (melt_ptr_t) ( /*_.VALCLO___V430*/ meltfptr[429]); + NULL != /*_._VALCLO___V430*/ meltfptr[429]); + ((meltroutine_ptr_t) /*_._VALROUT___V433*/ meltfptr[432])->tabval[8] = + (melt_ptr_t) ( /*_._VALCLO___V430*/ meltfptr[429]); MELT_LOCATION ("warmelt-outobj.melt:2463:/ initchunk"); /*^putroutconst */ @@ -31168,12 +31243,12 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V433*/ meltfptr[432])) + ( /*_._VALROUT___V433*/ meltfptr[432])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_246__OUTPUCOD_HOOKROUTINE#9", NULL != ( /*_.ADD2OUT__V15*/ meltfptr[14])); - ((meltroutine_ptr_t) /*_.VALROUT___V433*/ meltfptr[432])->tabval[9] = + ((meltroutine_ptr_t) /*_._VALROUT___V433*/ meltfptr[432])->tabval[9] = (melt_ptr_t) ( /*_.ADD2OUT__V15*/ meltfptr[14]); MELT_LOCATION ("warmelt-outobj.melt:2463:/ initchunk"); @@ -31181,12 +31256,12 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V433*/ meltfptr[432])) == + ( /*_._VALROUT___V433*/ meltfptr[432])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V378*/ meltfptr[377]); - ((meltroutine_ptr_t) /*_.VALROUT___V433*/ meltfptr[432])->tabval[10] = - (melt_ptr_t) ( /*_.VALCLO___V378*/ meltfptr[377]); + NULL != /*_._VALCLO___V378*/ meltfptr[377]); + ((meltroutine_ptr_t) /*_._VALROUT___V433*/ meltfptr[432])->tabval[10] = + (melt_ptr_t) ( /*_._VALCLO___V378*/ meltfptr[377]); MELT_LOCATION ("warmelt-outobj.melt:2463:/ initchunk"); /*^putroutconst */ @@ -31194,13 +31269,13 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V433*/ meltfptr[432])) + ( /*_._VALROUT___V433*/ meltfptr[432])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_246__OUTPUCOD_HOOKROUTINE#11", NULL != ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20])); - ((meltroutine_ptr_t) /*_.VALROUT___V433*/ meltfptr[432])->tabval[11] = + ((meltroutine_ptr_t) /*_._VALROUT___V433*/ meltfptr[432])->tabval[11] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]); MELT_LOCATION ("warmelt-outobj.melt:2463:/ initchunk"); @@ -31209,13 +31284,13 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V433*/ meltfptr[432])) + ( /*_._VALROUT___V433*/ meltfptr[432])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_246__OUTPUCOD_HOOKROUTINE#12", NULL != ( /*_.CLASS_OBJPUREVALUE__V64*/ meltfptr[63])); - ((meltroutine_ptr_t) /*_.VALROUT___V433*/ meltfptr[432])->tabval[12] = + ((meltroutine_ptr_t) /*_._VALROUT___V433*/ meltfptr[432])->tabval[12] = (melt_ptr_t) ( /*_.CLASS_OBJPUREVALUE__V64*/ meltfptr[63]); MELT_LOCATION ("warmelt-outobj.melt:2463:/ initchunk"); @@ -31223,12 +31298,12 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V433*/ meltfptr[432])) == + ( /*_._VALROUT___V433*/ meltfptr[432])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALDATA___V192*/ meltfptr[191]); - ((meltroutine_ptr_t) /*_.VALROUT___V433*/ meltfptr[432])->tabval[13] = - (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); + NULL != /*_._VALDATA___V192*/ meltfptr[191]); + ((meltroutine_ptr_t) /*_._VALROUT___V433*/ meltfptr[432])->tabval[13] = + (melt_ptr_t) ( /*_._VALDATA___V192*/ meltfptr[191]); MELT_LOCATION ("warmelt-outobj.melt:2463:/ initchunk"); /*^putroutconst */ @@ -31236,13 +31311,13 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V433*/ meltfptr[432])) + ( /*_._VALROUT___V433*/ meltfptr[432])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_246__OUTPUCOD_HOOKROUTINE#14", NULL != ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_.VALROUT___V433*/ meltfptr[432])->tabval[14] = + ((meltroutine_ptr_t) /*_._VALROUT___V433*/ meltfptr[432])->tabval[14] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:2463:/ initchunk"); @@ -31250,32 +31325,32 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V433*/ meltfptr[432])) == + ( /*_._VALROUT___V433*/ meltfptr[432])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V389*/ meltfptr[388]); - ((meltroutine_ptr_t) /*_.VALROUT___V433*/ meltfptr[432])->tabval[15] = - (melt_ptr_t) ( /*_.VALCLO___V389*/ meltfptr[388]); + NULL != /*_._VALCLO___V389*/ meltfptr[388]); + ((meltroutine_ptr_t) /*_._VALROUT___V433*/ meltfptr[432])->tabval[15] = + (melt_ptr_t) ( /*_._VALCLO___V389*/ meltfptr[388]); MELT_LOCATION ("warmelt-outobj.melt:2463:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V433*/ meltfptr[432]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V433*/ meltfptr[432]); /*putclosurout#48 */ melt_assertmsg ("putclosrout#48 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V434*/ meltfptr[433])) == + ( /*_._VALCLO___V434*/ meltfptr[433])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#48 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V433*/ meltfptr[432])) == + ( /*_._VALROUT___V433*/ meltfptr[432])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V434*/ meltfptr[433])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V433*/ meltfptr[432]); + ((meltclosure_ptr_t) /*_._VALCLO___V434*/ meltfptr[433])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V433*/ meltfptr[432]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V434*/ meltfptr[433]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V434*/ meltfptr[433]); MELT_LOCATION ("warmelt-outobj.melt:2649:/ initchunk"); /*^putroutconst */ @@ -31283,13 +31358,13 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V435*/ meltfptr[434])) + ( /*_._VALROUT___V435*/ meltfptr[434])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_248__OUTPUCOD_INITIALEXTENSIONROUTINE#0", NULL != ( /*_.CLASS_INITIAL_EXTENSION_ROUTINEOBJ__V55*/ meltfptr[54])); - ((meltroutine_ptr_t) /*_.VALROUT___V435*/ meltfptr[434])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V435*/ meltfptr[434])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_INITIAL_EXTENSION_ROUTINEOBJ__V55*/ meltfptr[54]); @@ -31299,13 +31374,13 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V435*/ meltfptr[434])) + ( /*_._VALROUT___V435*/ meltfptr[434])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_248__OUTPUCOD_INITIALEXTENSIONROUTINE#1", NULL != ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7])); - ((meltroutine_ptr_t) /*_.VALROUT___V435*/ meltfptr[434])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V435*/ meltfptr[434])->tabval[1] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7]); MELT_LOCATION ("warmelt-outobj.melt:2649:/ initchunk"); @@ -31314,13 +31389,13 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V435*/ meltfptr[434])) + ( /*_._VALROUT___V435*/ meltfptr[434])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_248__OUTPUCOD_INITIALEXTENSIONROUTINE#2", NULL != ( /*_.CLASS_NAMED__V14*/ meltfptr[13])); - ((meltroutine_ptr_t) /*_.VALROUT___V435*/ meltfptr[434])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V435*/ meltfptr[434])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NAMED__V14*/ meltfptr[13]); MELT_LOCATION ("warmelt-outobj.melt:2649:/ initchunk"); @@ -31329,13 +31404,13 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V435*/ meltfptr[434])) + ( /*_._VALROUT___V435*/ meltfptr[434])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_248__OUTPUCOD_INITIALEXTENSIONROUTINE#3", NULL != ( /*_.CLASS_INITIALROUTINEOBJ__V56*/ meltfptr[55])); - ((meltroutine_ptr_t) /*_.VALROUT___V435*/ meltfptr[434])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V435*/ meltfptr[434])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_INITIALROUTINEOBJ__V56*/ meltfptr[55]); MELT_LOCATION ("warmelt-outobj.melt:2649:/ initchunk"); @@ -31344,13 +31419,13 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V435*/ meltfptr[434])) + ( /*_._VALROUT___V435*/ meltfptr[434])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_248__OUTPUCOD_INITIALEXTENSIONROUTINE#4", NULL != ( /*_.CLASS_ROUTINEOBJ__V59*/ meltfptr[58])); - ((meltroutine_ptr_t) /*_.VALROUT___V435*/ meltfptr[434])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V435*/ meltfptr[434])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_ROUTINEOBJ__V59*/ meltfptr[58]); MELT_LOCATION ("warmelt-outobj.melt:2649:/ initchunk"); @@ -31359,13 +31434,13 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V435*/ meltfptr[434])) + ( /*_._VALROUT___V435*/ meltfptr[434])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_248__OUTPUCOD_INITIALEXTENSIONROUTINE#5", NULL != ( /*_.ADD2OUT__V15*/ meltfptr[14])); - ((meltroutine_ptr_t) /*_.VALROUT___V435*/ meltfptr[434])->tabval[5] = + ((meltroutine_ptr_t) /*_._VALROUT___V435*/ meltfptr[434])->tabval[5] = (melt_ptr_t) ( /*_.ADD2OUT__V15*/ meltfptr[14]); MELT_LOCATION ("warmelt-outobj.melt:2649:/ initchunk"); @@ -31373,24 +31448,24 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V435*/ meltfptr[434])) == + ( /*_._VALROUT___V435*/ meltfptr[434])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V378*/ meltfptr[377]); - ((meltroutine_ptr_t) /*_.VALROUT___V435*/ meltfptr[434])->tabval[6] = - (melt_ptr_t) ( /*_.VALCLO___V378*/ meltfptr[377]); + NULL != /*_._VALCLO___V378*/ meltfptr[377]); + ((meltroutine_ptr_t) /*_._VALROUT___V435*/ meltfptr[434])->tabval[6] = + (melt_ptr_t) ( /*_._VALCLO___V378*/ meltfptr[377]); MELT_LOCATION ("warmelt-outobj.melt:2649:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V435*/ meltfptr[434])) == + ( /*_._VALROUT___V435*/ meltfptr[434])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V395*/ meltfptr[394]); - ((meltroutine_ptr_t) /*_.VALROUT___V435*/ meltfptr[434])->tabval[7] = - (melt_ptr_t) ( /*_.VALCLO___V395*/ meltfptr[394]); + NULL != /*_._VALCLO___V395*/ meltfptr[394]); + ((meltroutine_ptr_t) /*_._VALROUT___V435*/ meltfptr[434])->tabval[7] = + (melt_ptr_t) ( /*_._VALCLO___V395*/ meltfptr[394]); MELT_LOCATION ("warmelt-outobj.melt:2649:/ initchunk"); /*^putroutconst */ @@ -31398,13 +31473,13 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V435*/ meltfptr[434])) + ( /*_._VALROUT___V435*/ meltfptr[434])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_248__OUTPUCOD_INITIALEXTENSIONROUTINE#8", NULL != ( /*_.ADD2OUT__V15*/ meltfptr[14])); - ((meltroutine_ptr_t) /*_.VALROUT___V435*/ meltfptr[434])->tabval[8] = + ((meltroutine_ptr_t) /*_._VALROUT___V435*/ meltfptr[434])->tabval[8] = (melt_ptr_t) ( /*_.ADD2OUT__V15*/ meltfptr[14]); MELT_LOCATION ("warmelt-outobj.melt:2726:/ initchunk"); @@ -31413,18 +31488,18 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V436*/ meltfptr[435])) + ( /*_._VALROUT___V436*/ meltfptr[435])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_250__LAMBDA_#0", NULL != ( /*_.ADD2OUT__V15*/ meltfptr[14])); - ((meltroutine_ptr_t) /*_.VALROUT___V436*/ meltfptr[435])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V436*/ meltfptr[435])->tabval[0] = (melt_ptr_t) ( /*_.ADD2OUT__V15*/ meltfptr[14]); MELT_LOCATION ("warmelt-outobj.melt:2726:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V436*/ meltfptr[435]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V436*/ meltfptr[435]); MELT_LOCATION ("warmelt-outobj.melt:2649:/ initchunk"); /*^putroutconst */ @@ -31432,26 +31507,26 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V435*/ meltfptr[434])) + ( /*_._VALROUT___V435*/ meltfptr[434])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_248__OUTPUCOD_INITIALEXTENSIONROUTINE#9", - NULL != ( /*_.VALROUT___V436*/ meltfptr[435])); - ((meltroutine_ptr_t) /*_.VALROUT___V435*/ meltfptr[434])->tabval[9] = - (melt_ptr_t) ( /*_.VALROUT___V436*/ meltfptr[435]); + NULL != ( /*_._VALROUT___V436*/ meltfptr[435])); + ((meltroutine_ptr_t) /*_._VALROUT___V435*/ meltfptr[434])->tabval[9] = + (melt_ptr_t) ( /*_._VALROUT___V436*/ meltfptr[435]); MELT_LOCATION ("warmelt-outobj.melt:2649:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V435*/ meltfptr[434])) == + ( /*_._VALROUT___V435*/ meltfptr[434])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V409*/ meltfptr[408]); - ((meltroutine_ptr_t) /*_.VALROUT___V435*/ meltfptr[434])->tabval[10] = - (melt_ptr_t) ( /*_.VALCLO___V409*/ meltfptr[408]); + NULL != /*_._VALCLO___V409*/ meltfptr[408]); + ((meltroutine_ptr_t) /*_._VALROUT___V435*/ meltfptr[434])->tabval[10] = + (melt_ptr_t) ( /*_._VALCLO___V409*/ meltfptr[408]); MELT_LOCATION ("warmelt-outobj.melt:2649:/ initchunk"); /*^putroutconst */ @@ -31459,13 +31534,13 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V435*/ meltfptr[434])) + ( /*_._VALROUT___V435*/ meltfptr[434])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_248__OUTPUCOD_INITIALEXTENSIONROUTINE#11", NULL != ( /*_.CLASS_OBJPUREVALUE__V64*/ meltfptr[63])); - ((meltroutine_ptr_t) /*_.VALROUT___V435*/ meltfptr[434])->tabval[11] = + ((meltroutine_ptr_t) /*_._VALROUT___V435*/ meltfptr[434])->tabval[11] = (melt_ptr_t) ( /*_.CLASS_OBJPUREVALUE__V64*/ meltfptr[63]); MELT_LOCATION ("warmelt-outobj.melt:2649:/ initchunk"); @@ -31474,13 +31549,13 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V435*/ meltfptr[434])) + ( /*_._VALROUT___V435*/ meltfptr[434])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_248__OUTPUCOD_INITIALEXTENSIONROUTINE#12", NULL != ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20])); - ((meltroutine_ptr_t) /*_.VALROUT___V435*/ meltfptr[434])->tabval[12] = + ((meltroutine_ptr_t) /*_._VALROUT___V435*/ meltfptr[434])->tabval[12] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]); MELT_LOCATION ("warmelt-outobj.melt:2649:/ initchunk"); @@ -31488,12 +31563,12 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V435*/ meltfptr[434])) == + ( /*_._VALROUT___V435*/ meltfptr[434])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V413*/ meltfptr[412]); - ((meltroutine_ptr_t) /*_.VALROUT___V435*/ meltfptr[434])->tabval[13] = - (melt_ptr_t) ( /*_.VALCLO___V413*/ meltfptr[412]); + NULL != /*_._VALCLO___V413*/ meltfptr[412]); + ((meltroutine_ptr_t) /*_._VALROUT___V435*/ meltfptr[434])->tabval[13] = + (melt_ptr_t) ( /*_._VALCLO___V413*/ meltfptr[412]); MELT_LOCATION ("warmelt-outobj.melt:2649:/ initchunk"); /*^putroutconst */ @@ -31501,13 +31576,13 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V435*/ meltfptr[434])) + ( /*_._VALROUT___V435*/ meltfptr[434])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_248__OUTPUCOD_INITIALEXTENSIONROUTINE#14", NULL != ( /*_.LIST_TO_MULTIPLE__V67*/ meltfptr[66])); - ((meltroutine_ptr_t) /*_.VALROUT___V435*/ meltfptr[434])->tabval[14] = + ((meltroutine_ptr_t) /*_._VALROUT___V435*/ meltfptr[434])->tabval[14] = (melt_ptr_t) ( /*_.LIST_TO_MULTIPLE__V67*/ meltfptr[66]); MELT_LOCATION ("warmelt-outobj.melt:2649:/ initchunk"); @@ -31516,13 +31591,13 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V435*/ meltfptr[434])) + ( /*_._VALROUT___V435*/ meltfptr[434])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_248__OUTPUCOD_INITIALEXTENSIONROUTINE#15", NULL != ( /*_.DISCR_MULTIPLE__V68*/ meltfptr[67])); - ((meltroutine_ptr_t) /*_.VALROUT___V435*/ meltfptr[434])->tabval[15] = + ((meltroutine_ptr_t) /*_._VALROUT___V435*/ meltfptr[434])->tabval[15] = (melt_ptr_t) ( /*_.DISCR_MULTIPLE__V68*/ meltfptr[67]); MELT_LOCATION ("warmelt-outobj.melt:2649:/ initchunk"); @@ -31531,13 +31606,13 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V435*/ meltfptr[434])) + ( /*_._VALROUT___V435*/ meltfptr[434])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_248__OUTPUCOD_INITIALEXTENSIONROUTINE#16", NULL != ( /*_.CLASS_OBJINSTR__V70*/ meltfptr[69])); - ((meltroutine_ptr_t) /*_.VALROUT___V435*/ meltfptr[434])->tabval[16] = + ((meltroutine_ptr_t) /*_._VALROUT___V435*/ meltfptr[434])->tabval[16] = (melt_ptr_t) ( /*_.CLASS_OBJINSTR__V70*/ meltfptr[69]); MELT_LOCATION ("warmelt-outobj.melt:2649:/ initchunk"); @@ -31545,53 +31620,53 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V435*/ meltfptr[434])) == + ( /*_._VALROUT___V435*/ meltfptr[434])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V259*/ meltfptr[258]); - ((meltroutine_ptr_t) /*_.VALROUT___V435*/ meltfptr[434])->tabval[17] = - (melt_ptr_t) ( /*_.VALCLO___V259*/ meltfptr[258]); + NULL != /*_._VALCLO___V259*/ meltfptr[258]); + ((meltroutine_ptr_t) /*_._VALROUT___V435*/ meltfptr[434])->tabval[17] = + (melt_ptr_t) ( /*_._VALCLO___V259*/ meltfptr[258]); MELT_LOCATION ("warmelt-outobj.melt:2649:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V435*/ meltfptr[434])) == + ( /*_._VALROUT___V435*/ meltfptr[434])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V389*/ meltfptr[388]); - ((meltroutine_ptr_t) /*_.VALROUT___V435*/ meltfptr[434])->tabval[18] = - (melt_ptr_t) ( /*_.VALCLO___V389*/ meltfptr[388]); + NULL != /*_._VALCLO___V389*/ meltfptr[388]); + ((meltroutine_ptr_t) /*_._VALROUT___V435*/ meltfptr[434])->tabval[18] = + (melt_ptr_t) ( /*_._VALCLO___V389*/ meltfptr[388]); MELT_LOCATION ("warmelt-outobj.melt:2649:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V435*/ meltfptr[434]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V435*/ meltfptr[434]); /*putclosurout#49 */ melt_assertmsg ("putclosrout#49 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V437*/ meltfptr[436])) == + ( /*_._VALCLO___V437*/ meltfptr[436])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#49 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V435*/ meltfptr[434])) == + ( /*_._VALROUT___V435*/ meltfptr[434])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V437*/ meltfptr[436])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V435*/ meltfptr[434]); + ((meltclosure_ptr_t) /*_._VALCLO___V437*/ meltfptr[436])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V435*/ meltfptr[434]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V437*/ meltfptr[436]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V437*/ meltfptr[436]); #undef meltfram__ -} /*end of meltmod__warmelt_outobj__initialmeltchunk_4 */ +} /*end of meltmod__WARMELTmiOUTOBJ__initialmeltchunk_4 */ void -meltmod__warmelt_outobj__initialmeltchunk_5 (meltinitial_frame_t * - meltmeltframptr__, - char meltpredefinited[]) +meltmod__WARMELTmiOUTOBJ__initialmeltchunk_5 (meltinitial_frame_t * + meltmeltframptr__, + char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount @@ -31603,12 +31678,12 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V438*/ meltfptr[437])) + ( /*_._VALROUT___V438*/ meltfptr[437])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_251__OUTPUCOD_GETARG#0", NULL != ( /*_.CLASS_OBJGETARG__V72*/ meltfptr[71])); - ((meltroutine_ptr_t) /*_.VALROUT___V438*/ meltfptr[437])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V438*/ meltfptr[437])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJGETARG__V72*/ meltfptr[71]); MELT_LOCATION ("warmelt-outobj.melt:2847:/ initchunk"); @@ -31617,12 +31692,12 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V438*/ meltfptr[437])) + ( /*_._VALROUT___V438*/ meltfptr[437])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_251__OUTPUCOD_GETARG#1", NULL != ( /*_.CLASS_FORMAL_BINDING__V73*/ meltfptr[72])); - ((meltroutine_ptr_t) /*_.VALROUT___V438*/ meltfptr[437])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V438*/ meltfptr[437])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_FORMAL_BINDING__V73*/ meltfptr[72]); MELT_LOCATION ("warmelt-outobj.melt:2847:/ initchunk"); @@ -31630,12 +31705,12 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V438*/ meltfptr[437])) == + ( /*_._VALROUT___V438*/ meltfptr[437])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V259*/ meltfptr[258]); - ((meltroutine_ptr_t) /*_.VALROUT___V438*/ meltfptr[437])->tabval[2] = - (melt_ptr_t) ( /*_.VALCLO___V259*/ meltfptr[258]); + NULL != /*_._VALCLO___V259*/ meltfptr[258]); + ((meltroutine_ptr_t) /*_._VALROUT___V438*/ meltfptr[437])->tabval[2] = + (melt_ptr_t) ( /*_._VALCLO___V259*/ meltfptr[258]); MELT_LOCATION ("warmelt-outobj.melt:2847:/ initchunk"); /*^putroutconst */ @@ -31643,12 +31718,12 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V438*/ meltfptr[437])) + ( /*_._VALROUT___V438*/ meltfptr[437])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_251__OUTPUCOD_GETARG#3", NULL != ( /*_.CLASS_OBJLOCV__V58*/ meltfptr[57])); - ((meltroutine_ptr_t) /*_.VALROUT___V438*/ meltfptr[437])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V438*/ meltfptr[437])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_OBJLOCV__V58*/ meltfptr[57]); MELT_LOCATION ("warmelt-outobj.melt:2847:/ initchunk"); @@ -31657,12 +31732,12 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V438*/ meltfptr[437])) + ( /*_._VALROUT___V438*/ meltfptr[437])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_251__OUTPUCOD_GETARG#4", NULL != ( /*_.CLASS_CTYPE__V29*/ meltfptr[28])); - ((meltroutine_ptr_t) /*_.VALROUT___V438*/ meltfptr[437])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V438*/ meltfptr[437])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_CTYPE__V29*/ meltfptr[28]); MELT_LOCATION ("warmelt-outobj.melt:2847:/ initchunk"); @@ -31671,12 +31746,12 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V438*/ meltfptr[437])) + ( /*_._VALROUT___V438*/ meltfptr[437])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_251__OUTPUCOD_GETARG#5", NULL != ( /*_.CTYPE_VALUE__V32*/ meltfptr[31])); - ((meltroutine_ptr_t) /*_.VALROUT___V438*/ meltfptr[437])->tabval[5] = + ((meltroutine_ptr_t) /*_._VALROUT___V438*/ meltfptr[437])->tabval[5] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V32*/ meltfptr[31]); MELT_LOCATION ("warmelt-outobj.melt:2847:/ initchunk"); @@ -31685,12 +31760,12 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V438*/ meltfptr[437])) + ( /*_._VALROUT___V438*/ meltfptr[437])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_251__OUTPUCOD_GETARG#6", NULL != ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20])); - ((meltroutine_ptr_t) /*_.VALROUT___V438*/ meltfptr[437])->tabval[6] = + ((meltroutine_ptr_t) /*_._VALROUT___V438*/ meltfptr[437])->tabval[6] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]); MELT_LOCATION ("warmelt-outobj.melt:2847:/ initchunk"); @@ -31698,12 +31773,12 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V438*/ meltfptr[437])) == + ( /*_._VALROUT___V438*/ meltfptr[437])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALDATA___V192*/ meltfptr[191]); - ((meltroutine_ptr_t) /*_.VALROUT___V438*/ meltfptr[437])->tabval[7] = - (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); + NULL != /*_._VALDATA___V192*/ meltfptr[191]); + ((meltroutine_ptr_t) /*_._VALROUT___V438*/ meltfptr[437])->tabval[7] = + (melt_ptr_t) ( /*_._VALDATA___V192*/ meltfptr[191]); MELT_LOCATION ("warmelt-outobj.melt:2847:/ initchunk"); /*^putroutconst */ @@ -31711,78 +31786,78 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V438*/ meltfptr[437])) + ( /*_._VALROUT___V438*/ meltfptr[437])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_251__OUTPUCOD_GETARG#8", NULL != ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_.VALROUT___V438*/ meltfptr[437])->tabval[8] = + ((meltroutine_ptr_t) /*_._VALROUT___V438*/ meltfptr[437])->tabval[8] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:2847:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V438*/ meltfptr[437]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V438*/ meltfptr[437]); /*putclosurout#50 */ melt_assertmsg ("putclosrout#50 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V439*/ meltfptr[438])) == + ( /*_._VALCLO___V439*/ meltfptr[438])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#50 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V438*/ meltfptr[437])) == + ( /*_._VALROUT___V438*/ meltfptr[437])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V439*/ meltfptr[438])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V438*/ meltfptr[437]); + ((meltclosure_ptr_t) /*_._VALCLO___V439*/ meltfptr[438])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V438*/ meltfptr[437]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V439*/ meltfptr[438]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V439*/ meltfptr[438]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V440*/ meltfptr[439])) == + ( /*_._VALDATA___V440*/ meltfptr[439])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V440*/ + ( /*_._VALDATA___V440*/ meltfptr[439])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V440*/ meltfptr[439]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V440*/ meltfptr[439]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V441*/ meltfptr[440]); + /*_._VALSTR___V441*/ meltfptr[440]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V440*/ meltfptr[439]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V440*/ meltfptr[439]); - melt_dbgtrace_written_object ( /*_.VALDATA___V440*/ meltfptr[439], + melt_dbgtrace_written_object ( /*_._VALDATA___V440*/ meltfptr[439], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V442*/ meltfptr[441])) == + ( /*_._VALDATA___V442*/ meltfptr[441])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V442*/ + ( /*_._VALDATA___V442*/ meltfptr[441])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V442*/ meltfptr[441]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V442*/ meltfptr[441]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V443*/ meltfptr[442]); + /*_._VALSTR___V443*/ meltfptr[442]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V442*/ meltfptr[441]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V442*/ meltfptr[441]); - melt_dbgtrace_written_object ( /*_.VALDATA___V442*/ meltfptr[441], + melt_dbgtrace_written_object ( /*_._VALDATA___V442*/ meltfptr[441], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:2912:/ initchunk"); @@ -31791,12 +31866,12 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V444*/ meltfptr[443])) + ( /*_._VALROUT___V444*/ meltfptr[443])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_257__OUTPUCOD_GETARGREST#0", NULL != ( /*_.CLASS_OBJGETARGREST__V74*/ meltfptr[73])); - ((meltroutine_ptr_t) /*_.VALROUT___V444*/ meltfptr[443])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V444*/ meltfptr[443])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJGETARGREST__V74*/ meltfptr[73]); MELT_LOCATION ("warmelt-outobj.melt:2912:/ initchunk"); @@ -31805,12 +31880,12 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V444*/ meltfptr[443])) + ( /*_._VALROUT___V444*/ meltfptr[443])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_257__OUTPUCOD_GETARGREST#1", NULL != ( /*_.VARIADIC_INDEX_IDSTR__V62*/ meltfptr[61])); - ((meltroutine_ptr_t) /*_.VALROUT___V444*/ meltfptr[443])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V444*/ meltfptr[443])->tabval[1] = (melt_ptr_t) ( /*_.VARIADIC_INDEX_IDSTR__V62*/ meltfptr[61]); MELT_LOCATION ("warmelt-outobj.melt:2912:/ initchunk"); @@ -31819,12 +31894,12 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V444*/ meltfptr[443])) + ( /*_._VALROUT___V444*/ meltfptr[443])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_257__OUTPUCOD_GETARGREST#2", NULL != ( /*_.VARIADIC_LENGTH_IDSTR__V63*/ meltfptr[62])); - ((meltroutine_ptr_t) /*_.VALROUT___V444*/ meltfptr[443])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V444*/ meltfptr[443])->tabval[2] = (melt_ptr_t) ( /*_.VARIADIC_LENGTH_IDSTR__V63*/ meltfptr[62]); MELT_LOCATION ("warmelt-outobj.melt:2912:/ initchunk"); @@ -31833,12 +31908,12 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V444*/ meltfptr[443])) + ( /*_._VALROUT___V444*/ meltfptr[443])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_257__OUTPUCOD_GETARGREST#3", NULL != ( /*_.CLASS_FORMAL_BINDING__V73*/ meltfptr[72])); - ((meltroutine_ptr_t) /*_.VALROUT___V444*/ meltfptr[443])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V444*/ meltfptr[443])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_FORMAL_BINDING__V73*/ meltfptr[72]); MELT_LOCATION ("warmelt-outobj.melt:2912:/ initchunk"); @@ -31846,12 +31921,12 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V444*/ meltfptr[443])) == + ( /*_._VALROUT___V444*/ meltfptr[443])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V259*/ meltfptr[258]); - ((meltroutine_ptr_t) /*_.VALROUT___V444*/ meltfptr[443])->tabval[4] = - (melt_ptr_t) ( /*_.VALCLO___V259*/ meltfptr[258]); + NULL != /*_._VALCLO___V259*/ meltfptr[258]); + ((meltroutine_ptr_t) /*_._VALROUT___V444*/ meltfptr[443])->tabval[4] = + (melt_ptr_t) ( /*_._VALCLO___V259*/ meltfptr[258]); MELT_LOCATION ("warmelt-outobj.melt:2912:/ initchunk"); /*^putroutconst */ @@ -31859,12 +31934,12 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V444*/ meltfptr[443])) + ( /*_._VALROUT___V444*/ meltfptr[443])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_257__OUTPUCOD_GETARGREST#5", NULL != ( /*_.CLASS_OBJLOCV__V58*/ meltfptr[57])); - ((meltroutine_ptr_t) /*_.VALROUT___V444*/ meltfptr[443])->tabval[5] = + ((meltroutine_ptr_t) /*_._VALROUT___V444*/ meltfptr[443])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_OBJLOCV__V58*/ meltfptr[57]); MELT_LOCATION ("warmelt-outobj.melt:2912:/ initchunk"); @@ -31873,12 +31948,12 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V444*/ meltfptr[443])) + ( /*_._VALROUT___V444*/ meltfptr[443])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_257__OUTPUCOD_GETARGREST#6", NULL != ( /*_.CLASS_CTYPE__V29*/ meltfptr[28])); - ((meltroutine_ptr_t) /*_.VALROUT___V444*/ meltfptr[443])->tabval[6] = + ((meltroutine_ptr_t) /*_._VALROUT___V444*/ meltfptr[443])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_CTYPE__V29*/ meltfptr[28]); MELT_LOCATION ("warmelt-outobj.melt:2912:/ initchunk"); @@ -31887,12 +31962,12 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V444*/ meltfptr[443])) + ( /*_._VALROUT___V444*/ meltfptr[443])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_257__OUTPUCOD_GETARGREST#7", NULL != ( /*_.CTYPE_VALUE__V32*/ meltfptr[31])); - ((meltroutine_ptr_t) /*_.VALROUT___V444*/ meltfptr[443])->tabval[7] = + ((meltroutine_ptr_t) /*_._VALROUT___V444*/ meltfptr[443])->tabval[7] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V32*/ meltfptr[31]); MELT_LOCATION ("warmelt-outobj.melt:2912:/ initchunk"); @@ -31901,12 +31976,12 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V444*/ meltfptr[443])) + ( /*_._VALROUT___V444*/ meltfptr[443])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_257__OUTPUCOD_GETARGREST#8", NULL != ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20])); - ((meltroutine_ptr_t) /*_.VALROUT___V444*/ meltfptr[443])->tabval[8] = + ((meltroutine_ptr_t) /*_._VALROUT___V444*/ meltfptr[443])->tabval[8] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]); MELT_LOCATION ("warmelt-outobj.melt:2912:/ initchunk"); @@ -31914,12 +31989,12 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V444*/ meltfptr[443])) == + ( /*_._VALROUT___V444*/ meltfptr[443])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALDATA___V192*/ meltfptr[191]); - ((meltroutine_ptr_t) /*_.VALROUT___V444*/ meltfptr[443])->tabval[9] = - (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); + NULL != /*_._VALDATA___V192*/ meltfptr[191]); + ((meltroutine_ptr_t) /*_._VALROUT___V444*/ meltfptr[443])->tabval[9] = + (melt_ptr_t) ( /*_._VALDATA___V192*/ meltfptr[191]); MELT_LOCATION ("warmelt-outobj.melt:2912:/ initchunk"); /*^putroutconst */ @@ -31927,55 +32002,55 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V444*/ meltfptr[443])) + ( /*_._VALROUT___V444*/ meltfptr[443])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_257__OUTPUCOD_GETARGREST#10", NULL != ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_.VALROUT___V444*/ meltfptr[443])->tabval[10] = + ((meltroutine_ptr_t) /*_._VALROUT___V444*/ meltfptr[443])->tabval[10] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:2912:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V444*/ meltfptr[443]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V444*/ meltfptr[443]); /*putclosurout#51 */ melt_assertmsg ("putclosrout#51 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V445*/ meltfptr[444])) == + ( /*_._VALCLO___V445*/ meltfptr[444])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#51 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V444*/ meltfptr[443])) == + ( /*_._VALROUT___V444*/ meltfptr[443])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V445*/ meltfptr[444])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V444*/ meltfptr[443]); + ((meltclosure_ptr_t) /*_._VALCLO___V445*/ meltfptr[444])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V444*/ meltfptr[443]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V445*/ meltfptr[444]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V445*/ meltfptr[444]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V446*/ meltfptr[445])) == + ( /*_._VALDATA___V446*/ meltfptr[445])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V446*/ + ( /*_._VALDATA___V446*/ meltfptr[445])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V446*/ meltfptr[445]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V446*/ meltfptr[445]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V447*/ meltfptr[446]); + /*_._VALSTR___V447*/ meltfptr[446]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V446*/ meltfptr[445]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V446*/ meltfptr[445]); - melt_dbgtrace_written_object ( /*_.VALDATA___V446*/ meltfptr[445], + melt_dbgtrace_written_object ( /*_._VALDATA___V446*/ meltfptr[445], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:2995:/ initchunk"); @@ -31984,12 +32059,12 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V448*/ meltfptr[447])) + ( /*_._VALROUT___V448*/ meltfptr[447])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_261__OUTPUCOD_OBJCFORMAL#0", NULL != ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7])); - ((meltroutine_ptr_t) /*_.VALROUT___V448*/ meltfptr[447])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V448*/ meltfptr[447])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7]); MELT_LOCATION ("warmelt-outobj.melt:2995:/ initchunk"); @@ -31998,33 +32073,33 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V448*/ meltfptr[447])) + ( /*_._VALROUT___V448*/ meltfptr[447])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_261__OUTPUCOD_OBJCFORMAL#1", NULL != ( /*_.CLASS_OBJCFORMAL__V71*/ meltfptr[70])); - ((meltroutine_ptr_t) /*_.VALROUT___V448*/ meltfptr[447])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V448*/ meltfptr[447])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_OBJCFORMAL__V71*/ meltfptr[70]); MELT_LOCATION ("warmelt-outobj.melt:2995:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V448*/ meltfptr[447]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V448*/ meltfptr[447]); /*putclosurout#52 */ melt_assertmsg ("putclosrout#52 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V449*/ meltfptr[448])) == + ( /*_._VALCLO___V449*/ meltfptr[448])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#52 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V448*/ meltfptr[447])) == + ( /*_._VALROUT___V448*/ meltfptr[447])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V449*/ meltfptr[448])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V448*/ meltfptr[447]); + ((meltclosure_ptr_t) /*_._VALCLO___V449*/ meltfptr[448])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V448*/ meltfptr[447]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V449*/ meltfptr[448]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V449*/ meltfptr[448]); MELT_LOCATION ("warmelt-outobj.melt:3009:/ initchunk"); /*^putroutconst */ @@ -32032,13 +32107,13 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V450*/ meltfptr[449])) + ( /*_._VALROUT___V450*/ meltfptr[449])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_263__OUTPUCOD_OBJFETCHMODVAR#0", NULL != ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7])); - ((meltroutine_ptr_t) /*_.VALROUT___V450*/ meltfptr[449])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V450*/ meltfptr[449])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7]); MELT_LOCATION ("warmelt-outobj.melt:3009:/ initchunk"); @@ -32047,13 +32122,13 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V450*/ meltfptr[449])) + ( /*_._VALROUT___V450*/ meltfptr[449])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_263__OUTPUCOD_OBJFETCHMODVAR#1", NULL != ( /*_.CLASS_OBJFETCHMODVAR__V75*/ meltfptr[74])); - ((meltroutine_ptr_t) /*_.VALROUT___V450*/ meltfptr[449])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V450*/ meltfptr[449])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_OBJFETCHMODVAR__V75*/ meltfptr[74]); MELT_LOCATION ("warmelt-outobj.melt:3009:/ initchunk"); @@ -32062,14 +32137,14 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V450*/ meltfptr[449])) + ( /*_._VALROUT___V450*/ meltfptr[449])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_263__OUTPUCOD_OBJFETCHMODVAR#2", NULL != ( /*_.CLASS_NORMAL_MODULE_VARIABLE_BINDING__V11*/ meltfptr[10])); - ((meltroutine_ptr_t) /*_.VALROUT___V450*/ meltfptr[449])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V450*/ meltfptr[449])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NORMAL_MODULE_VARIABLE_BINDING__V11*/ meltfptr[10]); @@ -32079,13 +32154,13 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V450*/ meltfptr[449])) + ( /*_._VALROUT___V450*/ meltfptr[449])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_263__OUTPUCOD_OBJFETCHMODVAR#3", NULL != ( /*_.ADD2OUT__V15*/ meltfptr[14])); - ((meltroutine_ptr_t) /*_.VALROUT___V450*/ meltfptr[449])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V450*/ meltfptr[449])->tabval[3] = (melt_ptr_t) ( /*_.ADD2OUT__V15*/ meltfptr[14]); MELT_LOCATION ("warmelt-outobj.melt:3009:/ initchunk"); @@ -32093,54 +32168,54 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V450*/ meltfptr[449])) == + ( /*_._VALROUT___V450*/ meltfptr[449])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V211*/ meltfptr[210]); - ((meltroutine_ptr_t) /*_.VALROUT___V450*/ meltfptr[449])->tabval[4] = - (melt_ptr_t) ( /*_.VALCLO___V211*/ meltfptr[210]); + NULL != /*_._VALCLO___V211*/ meltfptr[210]); + ((meltroutine_ptr_t) /*_._VALROUT___V450*/ meltfptr[449])->tabval[4] = + (melt_ptr_t) ( /*_._VALCLO___V211*/ meltfptr[210]); MELT_LOCATION ("warmelt-outobj.melt:3009:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V450*/ meltfptr[449]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V450*/ meltfptr[449]); /*putclosurout#53 */ melt_assertmsg ("putclosrout#53 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V451*/ meltfptr[450])) == + ( /*_._VALCLO___V451*/ meltfptr[450])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#53 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V450*/ meltfptr[449])) == + ( /*_._VALROUT___V450*/ meltfptr[449])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V451*/ meltfptr[450])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V450*/ meltfptr[449]); + ((meltclosure_ptr_t) /*_._VALCLO___V451*/ meltfptr[450])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V450*/ meltfptr[449]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V451*/ meltfptr[450]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V451*/ meltfptr[450]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V452*/ meltfptr[451])) == + ( /*_._VALDATA___V452*/ meltfptr[451])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V452*/ + ( /*_._VALDATA___V452*/ meltfptr[451])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V452*/ meltfptr[451]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V452*/ meltfptr[451]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V453*/ meltfptr[452]); + /*_._VALSTR___V453*/ meltfptr[452]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V452*/ meltfptr[451]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V452*/ meltfptr[451]); - melt_dbgtrace_written_object ( /*_.VALDATA___V452*/ meltfptr[451], + melt_dbgtrace_written_object ( /*_._VALDATA___V452*/ meltfptr[451], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:3023:/ initchunk"); @@ -32149,13 +32224,13 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V454*/ meltfptr[453])) + ( /*_._VALROUT___V454*/ meltfptr[453])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_267__OUTPUCOD_OBJPUTMODVAR#0", NULL != ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7])); - ((meltroutine_ptr_t) /*_.VALROUT___V454*/ meltfptr[453])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V454*/ meltfptr[453])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7]); MELT_LOCATION ("warmelt-outobj.melt:3023:/ initchunk"); @@ -32164,13 +32239,13 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V454*/ meltfptr[453])) + ( /*_._VALROUT___V454*/ meltfptr[453])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_267__OUTPUCOD_OBJPUTMODVAR#1", NULL != ( /*_.CLASS_OBJPUTMODVAR__V76*/ meltfptr[75])); - ((meltroutine_ptr_t) /*_.VALROUT___V454*/ meltfptr[453])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V454*/ meltfptr[453])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_OBJPUTMODVAR__V76*/ meltfptr[75]); MELT_LOCATION ("warmelt-outobj.melt:3023:/ initchunk"); @@ -32179,13 +32254,13 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V454*/ meltfptr[453])) + ( /*_._VALROUT___V454*/ meltfptr[453])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_267__OUTPUCOD_OBJPUTMODVAR#2", NULL != ( /*_.CLASS_OBJINSTR__V70*/ meltfptr[69])); - ((meltroutine_ptr_t) /*_.VALROUT___V454*/ meltfptr[453])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V454*/ meltfptr[453])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_OBJINSTR__V70*/ meltfptr[69]); MELT_LOCATION ("warmelt-outobj.melt:3023:/ initchunk"); @@ -32194,14 +32269,14 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V454*/ meltfptr[453])) + ( /*_._VALROUT___V454*/ meltfptr[453])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_267__OUTPUCOD_OBJPUTMODVAR#3", NULL != ( /*_.CLASS_NORMAL_MODULE_VARIABLE_BINDING__V11*/ meltfptr[10])); - ((meltroutine_ptr_t) /*_.VALROUT___V454*/ meltfptr[453])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V454*/ meltfptr[453])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_NORMAL_MODULE_VARIABLE_BINDING__V11*/ meltfptr[10]); @@ -32210,12 +32285,12 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V454*/ meltfptr[453])) == + ( /*_._VALROUT___V454*/ meltfptr[453])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V259*/ meltfptr[258]); - ((meltroutine_ptr_t) /*_.VALROUT___V454*/ meltfptr[453])->tabval[4] = - (melt_ptr_t) ( /*_.VALCLO___V259*/ meltfptr[258]); + NULL != /*_._VALCLO___V259*/ meltfptr[258]); + ((meltroutine_ptr_t) /*_._VALROUT___V454*/ meltfptr[453])->tabval[4] = + (melt_ptr_t) ( /*_._VALCLO___V259*/ meltfptr[258]); MELT_LOCATION ("warmelt-outobj.melt:3023:/ initchunk"); /*^putroutconst */ @@ -32223,13 +32298,13 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V454*/ meltfptr[453])) + ( /*_._VALROUT___V454*/ meltfptr[453])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_267__OUTPUCOD_OBJPUTMODVAR#5", NULL != ( /*_.ADD2OUT__V15*/ meltfptr[14])); - ((meltroutine_ptr_t) /*_.VALROUT___V454*/ meltfptr[453])->tabval[5] = + ((meltroutine_ptr_t) /*_._VALROUT___V454*/ meltfptr[453])->tabval[5] = (melt_ptr_t) ( /*_.ADD2OUT__V15*/ meltfptr[14]); MELT_LOCATION ("warmelt-outobj.melt:3023:/ initchunk"); @@ -32237,12 +32312,12 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V454*/ meltfptr[453])) == + ( /*_._VALROUT___V454*/ meltfptr[453])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V211*/ meltfptr[210]); - ((meltroutine_ptr_t) /*_.VALROUT___V454*/ meltfptr[453])->tabval[6] = - (melt_ptr_t) ( /*_.VALCLO___V211*/ meltfptr[210]); + NULL != /*_._VALCLO___V211*/ meltfptr[210]); + ((meltroutine_ptr_t) /*_._VALROUT___V454*/ meltfptr[453])->tabval[6] = + (melt_ptr_t) ( /*_._VALCLO___V211*/ meltfptr[210]); MELT_LOCATION ("warmelt-outobj.melt:3023:/ initchunk"); /*^putroutconst */ @@ -32250,56 +32325,56 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V454*/ meltfptr[453])) + ( /*_._VALROUT___V454*/ meltfptr[453])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_267__OUTPUCOD_OBJPUTMODVAR#7", NULL != ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20])); - ((meltroutine_ptr_t) /*_.VALROUT___V454*/ meltfptr[453])->tabval[7] = + ((meltroutine_ptr_t) /*_._VALROUT___V454*/ meltfptr[453])->tabval[7] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]); MELT_LOCATION ("warmelt-outobj.melt:3023:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V454*/ meltfptr[453]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V454*/ meltfptr[453]); /*putclosurout#54 */ melt_assertmsg ("putclosrout#54 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V455*/ meltfptr[454])) == + ( /*_._VALCLO___V455*/ meltfptr[454])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#54 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V454*/ meltfptr[453])) == + ( /*_._VALROUT___V454*/ meltfptr[453])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V455*/ meltfptr[454])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V454*/ meltfptr[453]); + ((meltclosure_ptr_t) /*_._VALCLO___V455*/ meltfptr[454])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V454*/ meltfptr[453]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V455*/ meltfptr[454]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V455*/ meltfptr[454]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V456*/ meltfptr[455])) == + ( /*_._VALDATA___V456*/ meltfptr[455])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V456*/ + ( /*_._VALDATA___V456*/ meltfptr[455])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V456*/ meltfptr[455]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V456*/ meltfptr[455]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V457*/ meltfptr[456]); + /*_._VALSTR___V457*/ meltfptr[456]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V456*/ meltfptr[455]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V456*/ meltfptr[455]); - melt_dbgtrace_written_object ( /*_.VALDATA___V456*/ meltfptr[455], + melt_dbgtrace_written_object ( /*_._VALDATA___V456*/ meltfptr[455], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:3044:/ initchunk"); @@ -32308,13 +32383,13 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V458*/ meltfptr[457])) + ( /*_._VALROUT___V458*/ meltfptr[457])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_271__OUTPUCOD_OBJPUTOUTARG#0", NULL != ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7])); - ((meltroutine_ptr_t) /*_.VALROUT___V458*/ meltfptr[457])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V458*/ meltfptr[457])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7]); MELT_LOCATION ("warmelt-outobj.melt:3044:/ initchunk"); @@ -32323,13 +32398,13 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V458*/ meltfptr[457])) + ( /*_._VALROUT___V458*/ meltfptr[457])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_271__OUTPUCOD_OBJPUTOUTARG#1", NULL != ( /*_.CLASS_OBJPUTOUTARG__V77*/ meltfptr[76])); - ((meltroutine_ptr_t) /*_.VALROUT___V458*/ meltfptr[457])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V458*/ meltfptr[457])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_OBJPUTOUTARG__V77*/ meltfptr[76]); MELT_LOCATION ("warmelt-outobj.melt:3044:/ initchunk"); @@ -32338,13 +32413,13 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V458*/ meltfptr[457])) + ( /*_._VALROUT___V458*/ meltfptr[457])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_271__OUTPUCOD_OBJPUTOUTARG#2", NULL != ( /*_.CLASS_OBJINSTR__V70*/ meltfptr[69])); - ((meltroutine_ptr_t) /*_.VALROUT___V458*/ meltfptr[457])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V458*/ meltfptr[457])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_OBJINSTR__V70*/ meltfptr[69]); MELT_LOCATION ("warmelt-outobj.melt:3044:/ initchunk"); @@ -32353,13 +32428,13 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V458*/ meltfptr[457])) + ( /*_._VALROUT___V458*/ meltfptr[457])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_271__OUTPUCOD_OBJPUTOUTARG#3", NULL != ( /*_.CLASS_OBJCFORMAL__V71*/ meltfptr[70])); - ((meltroutine_ptr_t) /*_.VALROUT___V458*/ meltfptr[457])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V458*/ meltfptr[457])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_OBJCFORMAL__V71*/ meltfptr[70]); MELT_LOCATION ("warmelt-outobj.melt:3044:/ initchunk"); @@ -32368,13 +32443,13 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V458*/ meltfptr[457])) + ( /*_._VALROUT___V458*/ meltfptr[457])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_271__OUTPUCOD_OBJPUTOUTARG#4", NULL != ( /*_.CLASS_OBJLOCV__V58*/ meltfptr[57])); - ((meltroutine_ptr_t) /*_.VALROUT___V458*/ meltfptr[457])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V458*/ meltfptr[457])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_OBJLOCV__V58*/ meltfptr[57]); MELT_LOCATION ("warmelt-outobj.melt:3044:/ initchunk"); @@ -32382,12 +32457,12 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V458*/ meltfptr[457])) == + ( /*_._VALROUT___V458*/ meltfptr[457])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V259*/ meltfptr[258]); - ((meltroutine_ptr_t) /*_.VALROUT___V458*/ meltfptr[457])->tabval[5] = - (melt_ptr_t) ( /*_.VALCLO___V259*/ meltfptr[258]); + NULL != /*_._VALCLO___V259*/ meltfptr[258]); + ((meltroutine_ptr_t) /*_._VALROUT___V458*/ meltfptr[457])->tabval[5] = + (melt_ptr_t) ( /*_._VALCLO___V259*/ meltfptr[258]); MELT_LOCATION ("warmelt-outobj.melt:3044:/ initchunk"); /*^putroutconst */ @@ -32395,13 +32470,13 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V458*/ meltfptr[457])) + ( /*_._VALROUT___V458*/ meltfptr[457])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_271__OUTPUCOD_OBJPUTOUTARG#6", NULL != ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20])); - ((meltroutine_ptr_t) /*_.VALROUT___V458*/ meltfptr[457])->tabval[6] = + ((meltroutine_ptr_t) /*_._VALROUT___V458*/ meltfptr[457])->tabval[6] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]); MELT_LOCATION ("warmelt-outobj.melt:3044:/ initchunk"); @@ -32410,56 +32485,56 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V458*/ meltfptr[457])) + ( /*_._VALROUT___V458*/ meltfptr[457])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_271__OUTPUCOD_OBJPUTOUTARG#7", NULL != ( /*_.ADD2OUT__V15*/ meltfptr[14])); - ((meltroutine_ptr_t) /*_.VALROUT___V458*/ meltfptr[457])->tabval[7] = + ((meltroutine_ptr_t) /*_._VALROUT___V458*/ meltfptr[457])->tabval[7] = (melt_ptr_t) ( /*_.ADD2OUT__V15*/ meltfptr[14]); MELT_LOCATION ("warmelt-outobj.melt:3044:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V458*/ meltfptr[457]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V458*/ meltfptr[457]); /*putclosurout#55 */ melt_assertmsg ("putclosrout#55 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V459*/ meltfptr[458])) == + ( /*_._VALCLO___V459*/ meltfptr[458])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#55 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V458*/ meltfptr[457])) == + ( /*_._VALROUT___V458*/ meltfptr[457])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V459*/ meltfptr[458])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V458*/ meltfptr[457]); + ((meltclosure_ptr_t) /*_._VALCLO___V459*/ meltfptr[458])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V458*/ meltfptr[457]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V459*/ meltfptr[458]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V459*/ meltfptr[458]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V460*/ meltfptr[459])) == + ( /*_._VALDATA___V460*/ meltfptr[459])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V460*/ + ( /*_._VALDATA___V460*/ meltfptr[459])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V460*/ meltfptr[459]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V460*/ meltfptr[459]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V461*/ meltfptr[460]); + /*_._VALSTR___V461*/ meltfptr[460]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V460*/ meltfptr[459]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V460*/ meltfptr[459]); - melt_dbgtrace_written_object ( /*_.VALDATA___V460*/ meltfptr[459], + melt_dbgtrace_written_object ( /*_._VALDATA___V460*/ meltfptr[459], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:3070:/ initchunk"); @@ -32468,12 +32543,12 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V462*/ meltfptr[461])) + ( /*_._VALROUT___V462*/ meltfptr[461])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_275__OUTPUCOD_OBJLOCV#0", NULL != ( /*_.CLASS_OBJLOCV__V58*/ meltfptr[57])); - ((meltroutine_ptr_t) /*_.VALROUT___V462*/ meltfptr[461])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V462*/ meltfptr[461])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJLOCV__V58*/ meltfptr[57]); MELT_LOCATION ("warmelt-outobj.melt:3070:/ initchunk"); @@ -32482,12 +32557,12 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V462*/ meltfptr[461])) + ( /*_._VALROUT___V462*/ meltfptr[461])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_275__OUTPUCOD_OBJLOCV#1", NULL != ( /*_.CTYPE_VALUE__V32*/ meltfptr[31])); - ((meltroutine_ptr_t) /*_.VALROUT___V462*/ meltfptr[461])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V462*/ meltfptr[461])->tabval[1] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V32*/ meltfptr[31]); MELT_LOCATION ("warmelt-outobj.melt:3070:/ initchunk"); @@ -32496,12 +32571,12 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V462*/ meltfptr[461])) + ( /*_._VALROUT___V462*/ meltfptr[461])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_275__OUTPUCOD_OBJLOCV#2", NULL != ( /*_.CTYPE_LONG__V78*/ meltfptr[77])); - ((meltroutine_ptr_t) /*_.VALROUT___V462*/ meltfptr[461])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V462*/ meltfptr[461])->tabval[2] = (melt_ptr_t) ( /*_.CTYPE_LONG__V78*/ meltfptr[77]); MELT_LOCATION ("warmelt-outobj.melt:3070:/ initchunk"); @@ -32509,12 +32584,12 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V462*/ meltfptr[461])) == + ( /*_._VALROUT___V462*/ meltfptr[461])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALDATA___V192*/ meltfptr[191]); - ((meltroutine_ptr_t) /*_.VALROUT___V462*/ meltfptr[461])->tabval[3] = - (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); + NULL != /*_._VALDATA___V192*/ meltfptr[191]); + ((meltroutine_ptr_t) /*_._VALROUT___V462*/ meltfptr[461])->tabval[3] = + (melt_ptr_t) ( /*_._VALDATA___V192*/ meltfptr[191]); MELT_LOCATION ("warmelt-outobj.melt:3070:/ initchunk"); /*^putroutconst */ @@ -32522,55 +32597,55 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V462*/ meltfptr[461])) + ( /*_._VALROUT___V462*/ meltfptr[461])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_275__OUTPUCOD_OBJLOCV#4", NULL != ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_.VALROUT___V462*/ meltfptr[461])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V462*/ meltfptr[461])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:3070:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V462*/ meltfptr[461]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V462*/ meltfptr[461]); /*putclosurout#56 */ melt_assertmsg ("putclosrout#56 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V463*/ meltfptr[462])) == + ( /*_._VALCLO___V463*/ meltfptr[462])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#56 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V462*/ meltfptr[461])) == + ( /*_._VALROUT___V462*/ meltfptr[461])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V463*/ meltfptr[462])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V462*/ meltfptr[461]); + ((meltclosure_ptr_t) /*_._VALCLO___V463*/ meltfptr[462])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V462*/ meltfptr[461]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V463*/ meltfptr[462]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V463*/ meltfptr[462]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V464*/ meltfptr[463])) == + ( /*_._VALDATA___V464*/ meltfptr[463])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V464*/ + ( /*_._VALDATA___V464*/ meltfptr[463])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V464*/ meltfptr[463]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V464*/ meltfptr[463]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V465*/ meltfptr[464]); + /*_._VALSTR___V465*/ meltfptr[464]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V464*/ meltfptr[463]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V464*/ meltfptr[463]); - melt_dbgtrace_written_object ( /*_.VALDATA___V464*/ meltfptr[463], + melt_dbgtrace_written_object ( /*_._VALDATA___V464*/ meltfptr[463], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:3101:/ initchunk"); @@ -32579,12 +32654,12 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V466*/ meltfptr[465])) + ( /*_._VALROUT___V466*/ meltfptr[465])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_279__OUTPUCOD_OBJCLOCCV#0", NULL != ( /*_.CLASS_OBJCLOCCV__V79*/ meltfptr[78])); - ((meltroutine_ptr_t) /*_.VALROUT___V466*/ meltfptr[465])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V466*/ meltfptr[465])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJCLOCCV__V79*/ meltfptr[78]); MELT_LOCATION ("warmelt-outobj.melt:3101:/ initchunk"); @@ -32593,12 +32668,12 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V466*/ meltfptr[465])) + ( /*_._VALROUT___V466*/ meltfptr[465])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_279__OUTPUCOD_OBJCLOCCV#1", NULL != ( /*_.CTYPE_VALUE__V32*/ meltfptr[31])); - ((meltroutine_ptr_t) /*_.VALROUT___V466*/ meltfptr[465])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V466*/ meltfptr[465])->tabval[1] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V32*/ meltfptr[31]); MELT_LOCATION ("warmelt-outobj.melt:3101:/ initchunk"); @@ -32606,12 +32681,12 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V466*/ meltfptr[465])) == + ( /*_._VALROUT___V466*/ meltfptr[465])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALDATA___V192*/ meltfptr[191]); - ((meltroutine_ptr_t) /*_.VALROUT___V466*/ meltfptr[465])->tabval[2] = - (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); + NULL != /*_._VALDATA___V192*/ meltfptr[191]); + ((meltroutine_ptr_t) /*_._VALROUT___V466*/ meltfptr[465])->tabval[2] = + (melt_ptr_t) ( /*_._VALDATA___V192*/ meltfptr[191]); MELT_LOCATION ("warmelt-outobj.melt:3101:/ initchunk"); /*^putroutconst */ @@ -32619,55 +32694,55 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V466*/ meltfptr[465])) + ( /*_._VALROUT___V466*/ meltfptr[465])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_279__OUTPUCOD_OBJCLOCCV#3", NULL != ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_.VALROUT___V466*/ meltfptr[465])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V466*/ meltfptr[465])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:3101:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V466*/ meltfptr[465]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V466*/ meltfptr[465]); /*putclosurout#57 */ melt_assertmsg ("putclosrout#57 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V467*/ meltfptr[466])) == + ( /*_._VALCLO___V467*/ meltfptr[466])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#57 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V466*/ meltfptr[465])) == + ( /*_._VALROUT___V466*/ meltfptr[465])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V467*/ meltfptr[466])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V466*/ meltfptr[465]); + ((meltclosure_ptr_t) /*_._VALCLO___V467*/ meltfptr[466])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V466*/ meltfptr[465]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V467*/ meltfptr[466]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V467*/ meltfptr[466]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V468*/ meltfptr[467])) == + ( /*_._VALDATA___V468*/ meltfptr[467])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V468*/ + ( /*_._VALDATA___V468*/ meltfptr[467])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V468*/ meltfptr[467]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V468*/ meltfptr[467]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V469*/ meltfptr[468]); + /*_._VALSTR___V469*/ meltfptr[468]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V468*/ meltfptr[467]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V468*/ meltfptr[467]); - melt_dbgtrace_written_object ( /*_.VALDATA___V468*/ meltfptr[467], + melt_dbgtrace_written_object ( /*_._VALDATA___V468*/ meltfptr[467], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:3119:/ initchunk"); @@ -32676,12 +32751,12 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V470*/ meltfptr[469])) + ( /*_._VALROUT___V470*/ meltfptr[469])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_283__OUTPUCOD_OBJCLOHOOKV#0", NULL != ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7])); - ((meltroutine_ptr_t) /*_.VALROUT___V470*/ meltfptr[469])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V470*/ meltfptr[469])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7]); MELT_LOCATION ("warmelt-outobj.melt:3119:/ initchunk"); @@ -32690,12 +32765,12 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V470*/ meltfptr[469])) + ( /*_._VALROUT___V470*/ meltfptr[469])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_283__OUTPUCOD_OBJCLOHOOKV#1", NULL != ( /*_.CLASS_OBJCLOHOOKV__V80*/ meltfptr[79])); - ((meltroutine_ptr_t) /*_.VALROUT___V470*/ meltfptr[469])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V470*/ meltfptr[469])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_OBJCLOHOOKV__V80*/ meltfptr[79]); MELT_LOCATION ("warmelt-outobj.melt:3119:/ initchunk"); @@ -32704,12 +32779,12 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V470*/ meltfptr[469])) + ( /*_._VALROUT___V470*/ meltfptr[469])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_283__OUTPUCOD_OBJCLOHOOKV#2", NULL != ( /*_.CTYPE_VALUE__V32*/ meltfptr[31])); - ((meltroutine_ptr_t) /*_.VALROUT___V470*/ meltfptr[469])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V470*/ meltfptr[469])->tabval[2] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V32*/ meltfptr[31]); MELT_LOCATION ("warmelt-outobj.melt:3119:/ initchunk"); @@ -32717,12 +32792,12 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V470*/ meltfptr[469])) == + ( /*_._VALROUT___V470*/ meltfptr[469])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALDATA___V192*/ meltfptr[191]); - ((meltroutine_ptr_t) /*_.VALROUT___V470*/ meltfptr[469])->tabval[3] = - (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); + NULL != /*_._VALDATA___V192*/ meltfptr[191]); + ((meltroutine_ptr_t) /*_._VALROUT___V470*/ meltfptr[469])->tabval[3] = + (melt_ptr_t) ( /*_._VALDATA___V192*/ meltfptr[191]); MELT_LOCATION ("warmelt-outobj.melt:3119:/ initchunk"); /*^putroutconst */ @@ -32730,55 +32805,55 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V470*/ meltfptr[469])) + ( /*_._VALROUT___V470*/ meltfptr[469])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_283__OUTPUCOD_OBJCLOHOOKV#4", NULL != ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_.VALROUT___V470*/ meltfptr[469])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V470*/ meltfptr[469])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:3119:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V470*/ meltfptr[469]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V470*/ meltfptr[469]); /*putclosurout#58 */ melt_assertmsg ("putclosrout#58 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V471*/ meltfptr[470])) == + ( /*_._VALCLO___V471*/ meltfptr[470])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#58 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V470*/ meltfptr[469])) == + ( /*_._VALROUT___V470*/ meltfptr[469])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V471*/ meltfptr[470])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V470*/ meltfptr[469]); + ((meltclosure_ptr_t) /*_._VALCLO___V471*/ meltfptr[470])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V470*/ meltfptr[469]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V471*/ meltfptr[470]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V471*/ meltfptr[470]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V472*/ meltfptr[471])) == + ( /*_._VALDATA___V472*/ meltfptr[471])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V472*/ + ( /*_._VALDATA___V472*/ meltfptr[471])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V472*/ meltfptr[471]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V472*/ meltfptr[471]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V473*/ meltfptr[472]); + /*_._VALSTR___V473*/ meltfptr[472]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V472*/ meltfptr[471]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V472*/ meltfptr[471]); - melt_dbgtrace_written_object ( /*_.VALDATA___V472*/ meltfptr[471], + melt_dbgtrace_written_object ( /*_._VALDATA___V472*/ meltfptr[471], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:3139:/ initchunk"); @@ -32787,12 +32862,12 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V474*/ meltfptr[473])) + ( /*_._VALROUT___V474*/ meltfptr[473])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_287__OUTPUCOD_OBJCONSTV#0", NULL != ( /*_.CLASS_OBJCONSTV__V81*/ meltfptr[80])); - ((meltroutine_ptr_t) /*_.VALROUT___V474*/ meltfptr[473])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V474*/ meltfptr[473])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJCONSTV__V81*/ meltfptr[80]); MELT_LOCATION ("warmelt-outobj.melt:3139:/ initchunk"); @@ -32801,12 +32876,12 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V474*/ meltfptr[473])) + ( /*_._VALROUT___V474*/ meltfptr[473])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_287__OUTPUCOD_OBJCONSTV#1", NULL != ( /*_.CTYPE_VALUE__V32*/ meltfptr[31])); - ((meltroutine_ptr_t) /*_.VALROUT___V474*/ meltfptr[473])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V474*/ meltfptr[473])->tabval[1] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V32*/ meltfptr[31]); MELT_LOCATION ("warmelt-outobj.melt:3139:/ initchunk"); @@ -32814,12 +32889,12 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V474*/ meltfptr[473])) == + ( /*_._VALROUT___V474*/ meltfptr[473])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALDATA___V192*/ meltfptr[191]); - ((meltroutine_ptr_t) /*_.VALROUT___V474*/ meltfptr[473])->tabval[2] = - (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); + NULL != /*_._VALDATA___V192*/ meltfptr[191]); + ((meltroutine_ptr_t) /*_._VALROUT___V474*/ meltfptr[473])->tabval[2] = + (melt_ptr_t) ( /*_._VALDATA___V192*/ meltfptr[191]); MELT_LOCATION ("warmelt-outobj.melt:3139:/ initchunk"); /*^putroutconst */ @@ -32827,55 +32902,55 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V474*/ meltfptr[473])) + ( /*_._VALROUT___V474*/ meltfptr[473])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_287__OUTPUCOD_OBJCONSTV#3", NULL != ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_.VALROUT___V474*/ meltfptr[473])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V474*/ meltfptr[473])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:3139:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V474*/ meltfptr[473]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V474*/ meltfptr[473]); /*putclosurout#59 */ melt_assertmsg ("putclosrout#59 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V475*/ meltfptr[474])) == + ( /*_._VALCLO___V475*/ meltfptr[474])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#59 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V474*/ meltfptr[473])) == + ( /*_._VALROUT___V474*/ meltfptr[473])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V475*/ meltfptr[474])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V474*/ meltfptr[473]); + ((meltclosure_ptr_t) /*_._VALCLO___V475*/ meltfptr[474])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V474*/ meltfptr[473]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V475*/ meltfptr[474]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V475*/ meltfptr[474]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V476*/ meltfptr[475])) == + ( /*_._VALDATA___V476*/ meltfptr[475])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V476*/ + ( /*_._VALDATA___V476*/ meltfptr[475])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V476*/ meltfptr[475]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V476*/ meltfptr[475]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V477*/ meltfptr[476]); + /*_._VALSTR___V477*/ meltfptr[476]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V476*/ meltfptr[475]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V476*/ meltfptr[475]); - melt_dbgtrace_written_object ( /*_.VALDATA___V476*/ meltfptr[475], + melt_dbgtrace_written_object ( /*_._VALDATA___V476*/ meltfptr[475], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:3158:/ initchunk"); @@ -32884,13 +32959,13 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V478*/ meltfptr[477])) + ( /*_._VALROUT___V478*/ meltfptr[477])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_291__OUTPUT_CODE_INSTRUCTIONS_LIST#0", NULL != ( /*_.CLASS_OBJPLAINBLOCK__V82*/ meltfptr[81])); - ((meltroutine_ptr_t) /*_.VALROUT___V478*/ meltfptr[477])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V478*/ meltfptr[477])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJPLAINBLOCK__V82*/ meltfptr[81]); MELT_LOCATION ("warmelt-outobj.melt:3158:/ initchunk"); @@ -32898,39 +32973,39 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V478*/ meltfptr[477])) == + ( /*_._VALROUT___V478*/ meltfptr[477])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V259*/ meltfptr[258]); - ((meltroutine_ptr_t) /*_.VALROUT___V478*/ meltfptr[477])->tabval[1] = - (melt_ptr_t) ( /*_.VALCLO___V259*/ meltfptr[258]); + NULL != /*_._VALCLO___V259*/ meltfptr[258]); + ((meltroutine_ptr_t) /*_._VALROUT___V478*/ meltfptr[477])->tabval[1] = + (melt_ptr_t) ( /*_._VALCLO___V259*/ meltfptr[258]); /*putclosurout#60 */ melt_assertmsg ("putclosrout#60 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V479*/ meltfptr[478])) == + ( /*_._VALCLO___V479*/ meltfptr[478])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#60 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V478*/ meltfptr[477])) == + ( /*_._VALROUT___V478*/ meltfptr[477])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V479*/ meltfptr[478])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V478*/ meltfptr[477]); + ((meltclosure_ptr_t) /*_._VALCLO___V479*/ meltfptr[478])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V478*/ meltfptr[477]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V479*/ meltfptr[478]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V479*/ meltfptr[478]); MELT_LOCATION ("warmelt-outobj.melt:3158:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V478*/ meltfptr[477])) == + ( /*_._VALROUT___V478*/ meltfptr[477])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V479*/ meltfptr[478]); - ((meltroutine_ptr_t) /*_.VALROUT___V478*/ meltfptr[477])->tabval[2] = - (melt_ptr_t) ( /*_.VALCLO___V479*/ meltfptr[478]); + NULL != /*_._VALCLO___V479*/ meltfptr[478]); + ((meltroutine_ptr_t) /*_._VALROUT___V478*/ meltfptr[477])->tabval[2] = + (melt_ptr_t) ( /*_._VALCLO___V479*/ meltfptr[478]); MELT_LOCATION ("warmelt-outobj.melt:3158:/ initchunk"); /*^putroutconst */ @@ -32938,13 +33013,13 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V478*/ meltfptr[477])) + ( /*_._VALROUT___V478*/ meltfptr[477])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_291__OUTPUT_CODE_INSTRUCTIONS_LIST#3", NULL != ( /*_.CLASS_OBJPUREVALUE__V64*/ meltfptr[63])); - ((meltroutine_ptr_t) /*_.VALROUT___V478*/ meltfptr[477])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V478*/ meltfptr[477])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_OBJPUREVALUE__V64*/ meltfptr[63]); MELT_LOCATION ("warmelt-outobj.melt:3158:/ initchunk"); @@ -32953,23 +33028,23 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V478*/ meltfptr[477])) + ( /*_._VALROUT___V478*/ meltfptr[477])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_291__OUTPUT_CODE_INSTRUCTIONS_LIST#4", NULL != ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20])); - ((meltroutine_ptr_t) /*_.VALROUT___V478*/ meltfptr[477])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V478*/ meltfptr[477])->tabval[4] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]); #undef meltfram__ -} /*end of meltmod__warmelt_outobj__initialmeltchunk_5 */ +} /*end of meltmod__WARMELTmiOUTOBJ__initialmeltchunk_5 */ void -meltmod__warmelt_outobj__initialmeltchunk_6 (meltinitial_frame_t * - meltmeltframptr__, - char meltpredefinited[]) +meltmod__WARMELTmiOUTOBJ__initialmeltchunk_6 (meltinitial_frame_t * + meltmeltframptr__, + char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount @@ -32980,12 +33055,12 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V478*/ meltfptr[477])) == + ( /*_._VALROUT___V478*/ meltfptr[477])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALDATA___V192*/ meltfptr[191]); - ((meltroutine_ptr_t) /*_.VALROUT___V478*/ meltfptr[477])->tabval[5] = - (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); + NULL != /*_._VALDATA___V192*/ meltfptr[191]); + ((meltroutine_ptr_t) /*_._VALROUT___V478*/ meltfptr[477])->tabval[5] = + (melt_ptr_t) ( /*_._VALDATA___V192*/ meltfptr[191]); MELT_LOCATION ("warmelt-outobj.melt:3158:/ initchunk"); /*^putroutconst */ @@ -32993,41 +33068,41 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V478*/ meltfptr[477])) + ( /*_._VALROUT___V478*/ meltfptr[477])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_291__OUTPUT_CODE_INSTRUCTIONS_LIST#6", NULL != ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_.VALROUT___V478*/ meltfptr[477])->tabval[6] = + ((meltroutine_ptr_t) /*_._VALROUT___V478*/ meltfptr[477])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:3158:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V478*/ meltfptr[477]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V478*/ meltfptr[477]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V480*/ meltfptr[479])) == + ( /*_._VALDATA___V480*/ meltfptr[479])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V480*/ + ( /*_._VALDATA___V480*/ meltfptr[479])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V480*/ meltfptr[479]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V480*/ meltfptr[479]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V481*/ meltfptr[480]); + /*_._VALSTR___V481*/ meltfptr[480]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V480*/ meltfptr[479]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V480*/ meltfptr[479]); - melt_dbgtrace_written_object ( /*_.VALDATA___V480*/ meltfptr[479], + melt_dbgtrace_written_object ( /*_._VALDATA___V480*/ meltfptr[479], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:3192:/ initchunk"); @@ -33036,13 +33111,13 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V482*/ meltfptr[481])) + ( /*_._VALROUT___V482*/ meltfptr[481])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_295__OUTPUCOD_OBJCHECKSIGNAL#0", NULL != ( /*_.CLASS_OBJCHECKSIGNAL__V83*/ meltfptr[82])); - ((meltroutine_ptr_t) /*_.VALROUT___V482*/ meltfptr[481])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V482*/ meltfptr[481])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJCHECKSIGNAL__V83*/ meltfptr[82]); MELT_LOCATION ("warmelt-outobj.melt:3192:/ initchunk"); @@ -33050,12 +33125,12 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V482*/ meltfptr[481])) == + ( /*_._VALROUT___V482*/ meltfptr[481])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V263*/ meltfptr[262]); - ((meltroutine_ptr_t) /*_.VALROUT___V482*/ meltfptr[481])->tabval[1] = - (melt_ptr_t) ( /*_.VALCLO___V263*/ meltfptr[262]); + NULL != /*_._VALCLO___V263*/ meltfptr[262]); + ((meltroutine_ptr_t) /*_._VALROUT___V482*/ meltfptr[481])->tabval[1] = + (melt_ptr_t) ( /*_._VALCLO___V263*/ meltfptr[262]); MELT_LOCATION ("warmelt-outobj.melt:3192:/ initchunk"); /*^putroutconst */ @@ -33063,56 +33138,56 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V482*/ meltfptr[481])) + ( /*_._VALROUT___V482*/ meltfptr[481])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_295__OUTPUCOD_OBJCHECKSIGNAL#2", NULL != ( /*_.ADD2OUT__V15*/ meltfptr[14])); - ((meltroutine_ptr_t) /*_.VALROUT___V482*/ meltfptr[481])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V482*/ meltfptr[481])->tabval[2] = (melt_ptr_t) ( /*_.ADD2OUT__V15*/ meltfptr[14]); MELT_LOCATION ("warmelt-outobj.melt:3192:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V482*/ meltfptr[481]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V482*/ meltfptr[481]); /*putclosurout#61 */ melt_assertmsg ("putclosrout#61 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V483*/ meltfptr[482])) == + ( /*_._VALCLO___V483*/ meltfptr[482])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#61 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V482*/ meltfptr[481])) == + ( /*_._VALROUT___V482*/ meltfptr[481])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V483*/ meltfptr[482])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V482*/ meltfptr[481]); + ((meltclosure_ptr_t) /*_._VALCLO___V483*/ meltfptr[482])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V482*/ meltfptr[481]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V483*/ meltfptr[482]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V483*/ meltfptr[482]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V484*/ meltfptr[483])) == + ( /*_._VALDATA___V484*/ meltfptr[483])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V484*/ + ( /*_._VALDATA___V484*/ meltfptr[483])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V484*/ meltfptr[483]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V484*/ meltfptr[483]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V485*/ meltfptr[484]); + /*_._VALSTR___V485*/ meltfptr[484]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V484*/ meltfptr[483]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V484*/ meltfptr[483]); - melt_dbgtrace_written_object ( /*_.VALDATA___V484*/ meltfptr[483], + melt_dbgtrace_written_object ( /*_._VALDATA___V484*/ meltfptr[483], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:3205:/ initchunk"); @@ -33121,12 +33196,12 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V486*/ meltfptr[485])) + ( /*_._VALROUT___V486*/ meltfptr[485])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_299__OUTPUCOD_OBJANYBLOCK#0", NULL != ( /*_.CLASS_OBJANYBLOCK__V84*/ meltfptr[83])); - ((meltroutine_ptr_t) /*_.VALROUT___V486*/ meltfptr[485])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V486*/ meltfptr[485])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJANYBLOCK__V84*/ meltfptr[83]); MELT_LOCATION ("warmelt-outobj.melt:3205:/ initchunk"); @@ -33134,12 +33209,12 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V486*/ meltfptr[485])) == + ( /*_._VALROUT___V486*/ meltfptr[485])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V259*/ meltfptr[258]); - ((meltroutine_ptr_t) /*_.VALROUT___V486*/ meltfptr[485])->tabval[1] = - (melt_ptr_t) ( /*_.VALCLO___V259*/ meltfptr[258]); + NULL != /*_._VALCLO___V259*/ meltfptr[258]); + ((meltroutine_ptr_t) /*_._VALROUT___V486*/ meltfptr[485])->tabval[1] = + (melt_ptr_t) ( /*_._VALCLO___V259*/ meltfptr[258]); MELT_LOCATION ("warmelt-outobj.melt:3205:/ initchunk"); /*^putroutconst */ @@ -33147,12 +33222,12 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V486*/ meltfptr[485])) + ( /*_._VALROUT___V486*/ meltfptr[485])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_299__OUTPUCOD_OBJANYBLOCK#2", NULL != ( /*_.DISCR_INTEGER__V53*/ meltfptr[52])); - ((meltroutine_ptr_t) /*_.VALROUT___V486*/ meltfptr[485])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V486*/ meltfptr[485])->tabval[2] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V53*/ meltfptr[52]); MELT_LOCATION ("warmelt-outobj.melt:3205:/ initchunk"); @@ -33160,24 +33235,24 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V486*/ meltfptr[485])) == + ( /*_._VALROUT___V486*/ meltfptr[485])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V479*/ meltfptr[478]); - ((meltroutine_ptr_t) /*_.VALROUT___V486*/ meltfptr[485])->tabval[3] = - (melt_ptr_t) ( /*_.VALCLO___V479*/ meltfptr[478]); + NULL != /*_._VALCLO___V479*/ meltfptr[478]); + ((meltroutine_ptr_t) /*_._VALROUT___V486*/ meltfptr[485])->tabval[3] = + (melt_ptr_t) ( /*_._VALCLO___V479*/ meltfptr[478]); MELT_LOCATION ("warmelt-outobj.melt:3205:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V486*/ meltfptr[485])) == + ( /*_._VALROUT___V486*/ meltfptr[485])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALDATA___V192*/ meltfptr[191]); - ((meltroutine_ptr_t) /*_.VALROUT___V486*/ meltfptr[485])->tabval[4] = - (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); + NULL != /*_._VALDATA___V192*/ meltfptr[191]); + ((meltroutine_ptr_t) /*_._VALROUT___V486*/ meltfptr[485])->tabval[4] = + (melt_ptr_t) ( /*_._VALDATA___V192*/ meltfptr[191]); MELT_LOCATION ("warmelt-outobj.melt:3205:/ initchunk"); /*^putroutconst */ @@ -33185,55 +33260,55 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V486*/ meltfptr[485])) + ( /*_._VALROUT___V486*/ meltfptr[485])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_299__OUTPUCOD_OBJANYBLOCK#5", NULL != ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_.VALROUT___V486*/ meltfptr[485])->tabval[5] = + ((meltroutine_ptr_t) /*_._VALROUT___V486*/ meltfptr[485])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:3205:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V486*/ meltfptr[485]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V486*/ meltfptr[485]); /*putclosurout#62 */ melt_assertmsg ("putclosrout#62 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V487*/ meltfptr[486])) == + ( /*_._VALCLO___V487*/ meltfptr[486])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#62 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V486*/ meltfptr[485])) == + ( /*_._VALROUT___V486*/ meltfptr[485])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V487*/ meltfptr[486])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V486*/ meltfptr[485]); + ((meltclosure_ptr_t) /*_._VALCLO___V487*/ meltfptr[486])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V486*/ meltfptr[485]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V487*/ meltfptr[486]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V487*/ meltfptr[486]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V488*/ meltfptr[487])) == + ( /*_._VALDATA___V488*/ meltfptr[487])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V488*/ + ( /*_._VALDATA___V488*/ meltfptr[487])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V488*/ meltfptr[487]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V488*/ meltfptr[487]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V489*/ meltfptr[488]); + /*_._VALSTR___V489*/ meltfptr[488]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V488*/ meltfptr[487]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V488*/ meltfptr[487]); - melt_dbgtrace_written_object ( /*_.VALDATA___V488*/ meltfptr[487], + melt_dbgtrace_written_object ( /*_._VALDATA___V488*/ meltfptr[487], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:3230:/ initchunk"); @@ -33242,12 +33317,12 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V490*/ meltfptr[489])) + ( /*_._VALROUT___V490*/ meltfptr[489])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_303__OUTPUCOD_OBJFLAG#0", NULL != ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7])); - ((meltroutine_ptr_t) /*_.VALROUT___V490*/ meltfptr[489])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V490*/ meltfptr[489])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7]); MELT_LOCATION ("warmelt-outobj.melt:3230:/ initchunk"); @@ -33256,12 +33331,12 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V490*/ meltfptr[489])) + ( /*_._VALROUT___V490*/ meltfptr[489])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_303__OUTPUCOD_OBJFLAG#1", NULL != ( /*_.CLASS_OBJFLAG__V85*/ meltfptr[84])); - ((meltroutine_ptr_t) /*_.VALROUT___V490*/ meltfptr[489])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V490*/ meltfptr[489])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_OBJFLAG__V85*/ meltfptr[84]); MELT_LOCATION ("warmelt-outobj.melt:3230:/ initchunk"); @@ -33270,55 +33345,55 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V490*/ meltfptr[489])) + ( /*_._VALROUT___V490*/ meltfptr[489])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_303__OUTPUCOD_OBJFLAG#2", NULL != ( /*_.ADD2OUT__V15*/ meltfptr[14])); - ((meltroutine_ptr_t) /*_.VALROUT___V490*/ meltfptr[489])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V490*/ meltfptr[489])->tabval[2] = (melt_ptr_t) ( /*_.ADD2OUT__V15*/ meltfptr[14]); MELT_LOCATION ("warmelt-outobj.melt:3230:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V490*/ meltfptr[489]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V490*/ meltfptr[489]); /*putclosurout#63 */ melt_assertmsg ("putclosrout#63 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V491*/ meltfptr[490])) == + ( /*_._VALCLO___V491*/ meltfptr[490])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#63 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V490*/ meltfptr[489])) == + ( /*_._VALROUT___V490*/ meltfptr[489])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V491*/ meltfptr[490])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V490*/ meltfptr[489]); + ((meltclosure_ptr_t) /*_._VALCLO___V491*/ meltfptr[490])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V490*/ meltfptr[489]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V491*/ meltfptr[490]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V491*/ meltfptr[490]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V492*/ meltfptr[491])) == + ( /*_._VALDATA___V492*/ meltfptr[491])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V492*/ + ( /*_._VALDATA___V492*/ meltfptr[491])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V492*/ meltfptr[491]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V492*/ meltfptr[491]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V493*/ meltfptr[492]); + /*_._VALSTR___V493*/ meltfptr[492]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V492*/ meltfptr[491]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V492*/ meltfptr[491]); - melt_dbgtrace_written_object ( /*_.VALDATA___V492*/ meltfptr[491], + melt_dbgtrace_written_object ( /*_._VALDATA___V492*/ meltfptr[491], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:3241:/ initchunk"); @@ -33327,13 +33402,13 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V494*/ meltfptr[493])) + ( /*_._VALROUT___V494*/ meltfptr[493])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_307__OUTPUCOD_OBJMATCHFLAGBLOCK#0", NULL != ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7])); - ((meltroutine_ptr_t) /*_.VALROUT___V494*/ meltfptr[493])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V494*/ meltfptr[493])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7]); MELT_LOCATION ("warmelt-outobj.melt:3241:/ initchunk"); @@ -33342,13 +33417,13 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V494*/ meltfptr[493])) + ( /*_._VALROUT___V494*/ meltfptr[493])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_307__OUTPUCOD_OBJMATCHFLAGBLOCK#1", NULL != ( /*_.CLASS_OBJMATCHFLAGBLOCK__V86*/ meltfptr[85])); - ((meltroutine_ptr_t) /*_.VALROUT___V494*/ meltfptr[493])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V494*/ meltfptr[493])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_OBJMATCHFLAGBLOCK__V86*/ meltfptr[85]); MELT_LOCATION ("warmelt-outobj.melt:3241:/ initchunk"); @@ -33357,13 +33432,13 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V494*/ meltfptr[493])) + ( /*_._VALROUT___V494*/ meltfptr[493])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_307__OUTPUCOD_OBJMATCHFLAGBLOCK#2", NULL != ( /*_.CLASS_OBJINSTR__V70*/ meltfptr[69])); - ((meltroutine_ptr_t) /*_.VALROUT___V494*/ meltfptr[493])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V494*/ meltfptr[493])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_OBJINSTR__V70*/ meltfptr[69]); MELT_LOCATION ("warmelt-outobj.melt:3241:/ initchunk"); @@ -33372,13 +33447,13 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V494*/ meltfptr[493])) + ( /*_._VALROUT___V494*/ meltfptr[493])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_307__OUTPUCOD_OBJMATCHFLAGBLOCK#3", NULL != ( /*_.CLASS_OBJANYBLOCK__V84*/ meltfptr[83])); - ((meltroutine_ptr_t) /*_.VALROUT___V494*/ meltfptr[493])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V494*/ meltfptr[493])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_OBJANYBLOCK__V84*/ meltfptr[83]); MELT_LOCATION ("warmelt-outobj.melt:3241:/ initchunk"); @@ -33386,12 +33461,12 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V494*/ meltfptr[493])) == + ( /*_._VALROUT___V494*/ meltfptr[493])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V259*/ meltfptr[258]); - ((meltroutine_ptr_t) /*_.VALROUT___V494*/ meltfptr[493])->tabval[4] = - (melt_ptr_t) ( /*_.VALCLO___V259*/ meltfptr[258]); + NULL != /*_._VALCLO___V259*/ meltfptr[258]); + ((meltroutine_ptr_t) /*_._VALROUT___V494*/ meltfptr[493])->tabval[4] = + (melt_ptr_t) ( /*_._VALCLO___V259*/ meltfptr[258]); MELT_LOCATION ("warmelt-outobj.melt:3241:/ initchunk"); /*^putroutconst */ @@ -33399,13 +33474,13 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V494*/ meltfptr[493])) + ( /*_._VALROUT___V494*/ meltfptr[493])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_307__OUTPUCOD_OBJMATCHFLAGBLOCK#5", NULL != ( /*_.CLASS_OBJFLAG__V85*/ meltfptr[84])); - ((meltroutine_ptr_t) /*_.VALROUT___V494*/ meltfptr[493])->tabval[5] = + ((meltroutine_ptr_t) /*_._VALROUT___V494*/ meltfptr[493])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_OBJFLAG__V85*/ meltfptr[84]); MELT_LOCATION ("warmelt-outobj.melt:3241:/ initchunk"); @@ -33414,13 +33489,13 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V494*/ meltfptr[493])) + ( /*_._VALROUT___V494*/ meltfptr[493])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_307__OUTPUCOD_OBJMATCHFLAGBLOCK#6", NULL != ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20])); - ((meltroutine_ptr_t) /*_.VALROUT___V494*/ meltfptr[493])->tabval[6] = + ((meltroutine_ptr_t) /*_._VALROUT___V494*/ meltfptr[493])->tabval[6] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]); MELT_LOCATION ("warmelt-outobj.melt:3241:/ initchunk"); @@ -33428,54 +33503,54 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V494*/ meltfptr[493])) == + ( /*_._VALROUT___V494*/ meltfptr[493])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V479*/ meltfptr[478]); - ((meltroutine_ptr_t) /*_.VALROUT___V494*/ meltfptr[493])->tabval[7] = - (melt_ptr_t) ( /*_.VALCLO___V479*/ meltfptr[478]); + NULL != /*_._VALCLO___V479*/ meltfptr[478]); + ((meltroutine_ptr_t) /*_._VALROUT___V494*/ meltfptr[493])->tabval[7] = + (melt_ptr_t) ( /*_._VALCLO___V479*/ meltfptr[478]); MELT_LOCATION ("warmelt-outobj.melt:3241:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V494*/ meltfptr[493]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V494*/ meltfptr[493]); /*putclosurout#64 */ melt_assertmsg ("putclosrout#64 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V495*/ meltfptr[494])) == + ( /*_._VALCLO___V495*/ meltfptr[494])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#64 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V494*/ meltfptr[493])) == + ( /*_._VALROUT___V494*/ meltfptr[493])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V495*/ meltfptr[494])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V494*/ meltfptr[493]); + ((meltclosure_ptr_t) /*_._VALCLO___V495*/ meltfptr[494])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V494*/ meltfptr[493]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V495*/ meltfptr[494]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V495*/ meltfptr[494]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V496*/ meltfptr[495])) == + ( /*_._VALDATA___V496*/ meltfptr[495])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V496*/ + ( /*_._VALDATA___V496*/ meltfptr[495])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V496*/ meltfptr[495]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V496*/ meltfptr[495]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V497*/ meltfptr[496]); + /*_._VALSTR___V497*/ meltfptr[496]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V496*/ meltfptr[495]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V496*/ meltfptr[495]); - melt_dbgtrace_written_object ( /*_.VALDATA___V496*/ meltfptr[495], + melt_dbgtrace_written_object ( /*_._VALDATA___V496*/ meltfptr[495], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:3293:/ initchunk"); @@ -33484,13 +33559,13 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V498*/ meltfptr[497])) + ( /*_._VALROUT___V498*/ meltfptr[497])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_311__OUTPUCOD_OBJMULTIALLOCBLOCK#0", NULL != ( /*_.CLASS_OBJMULTIALLOCBLOCK__V87*/ meltfptr[86])); - ((meltroutine_ptr_t) /*_.VALROUT___V498*/ meltfptr[497])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V498*/ meltfptr[497])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJMULTIALLOCBLOCK__V87*/ meltfptr[86]); MELT_LOCATION ("warmelt-outobj.melt:3293:/ initchunk"); @@ -33499,13 +33574,13 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V498*/ meltfptr[497])) + ( /*_._VALROUT___V498*/ meltfptr[497])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_311__OUTPUCOD_OBJMULTIALLOCBLOCK#1", NULL != ( /*_.DISCR_INTEGER__V53*/ meltfptr[52])); - ((meltroutine_ptr_t) /*_.VALROUT___V498*/ meltfptr[497])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V498*/ meltfptr[497])->tabval[1] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V53*/ meltfptr[52]); MELT_LOCATION ("warmelt-outobj.melt:3293:/ initchunk"); @@ -33514,13 +33589,13 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V498*/ meltfptr[497])) + ( /*_._VALROUT___V498*/ meltfptr[497])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_311__OUTPUCOD_OBJMULTIALLOCBLOCK#2", NULL != ( /*_.DISCR_STRBUF__V69*/ meltfptr[68])); - ((meltroutine_ptr_t) /*_.VALROUT___V498*/ meltfptr[497])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V498*/ meltfptr[497])->tabval[2] = (melt_ptr_t) ( /*_.DISCR_STRBUF__V69*/ meltfptr[68]); MELT_LOCATION ("warmelt-outobj.melt:3293:/ initchunk"); @@ -33529,13 +33604,13 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V498*/ meltfptr[497])) + ( /*_._VALROUT___V498*/ meltfptr[497])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_311__OUTPUCOD_OBJMULTIALLOCBLOCK#3", NULL != ( /*_.DISCR_VERBATIM_STRING__V88*/ meltfptr[87])); - ((meltroutine_ptr_t) /*_.VALROUT___V498*/ meltfptr[497])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V498*/ meltfptr[497])->tabval[3] = (melt_ptr_t) ( /*_.DISCR_VERBATIM_STRING__V88*/ meltfptr[87]); MELT_LOCATION ("warmelt-outobj.melt:3293:/ initchunk"); @@ -33543,12 +33618,12 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V498*/ meltfptr[497])) == + ( /*_._VALROUT___V498*/ meltfptr[497])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V259*/ meltfptr[258]); - ((meltroutine_ptr_t) /*_.VALROUT___V498*/ meltfptr[497])->tabval[4] = - (melt_ptr_t) ( /*_.VALCLO___V259*/ meltfptr[258]); + NULL != /*_._VALCLO___V259*/ meltfptr[258]); + ((meltroutine_ptr_t) /*_._VALROUT___V498*/ meltfptr[497])->tabval[4] = + (melt_ptr_t) ( /*_._VALCLO___V259*/ meltfptr[258]); MELT_LOCATION ("warmelt-outobj.melt:3293:/ initchunk"); /*^putroutconst */ @@ -33556,13 +33631,13 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V498*/ meltfptr[497])) + ( /*_._VALROUT___V498*/ meltfptr[497])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_311__OUTPUCOD_OBJMULTIALLOCBLOCK#5", NULL != ( /*_.CLASS_OBJINITELEM__V20*/ meltfptr[19])); - ((meltroutine_ptr_t) /*_.VALROUT___V498*/ meltfptr[497])->tabval[5] = + ((meltroutine_ptr_t) /*_._VALROUT___V498*/ meltfptr[497])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_OBJINITELEM__V20*/ meltfptr[19]); MELT_LOCATION ("warmelt-outobj.melt:3293:/ initchunk"); @@ -33571,13 +33646,13 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V498*/ meltfptr[497])) + ( /*_._VALROUT___V498*/ meltfptr[497])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_311__OUTPUCOD_OBJMULTIALLOCBLOCK#6", NULL != ( /*_.OUTPUT_C_DECLINIT__V19*/ meltfptr[18])); - ((meltroutine_ptr_t) /*_.VALROUT___V498*/ meltfptr[497])->tabval[6] = + ((meltroutine_ptr_t) /*_._VALROUT___V498*/ meltfptr[497])->tabval[6] = (melt_ptr_t) ( /*_.OUTPUT_C_DECLINIT__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-outobj.melt:3293:/ initchunk"); @@ -33585,12 +33660,12 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V498*/ meltfptr[497])) == + ( /*_._VALROUT___V498*/ meltfptr[497])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALDATA___V192*/ meltfptr[191]); - ((meltroutine_ptr_t) /*_.VALROUT___V498*/ meltfptr[497])->tabval[7] = - (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); + NULL != /*_._VALDATA___V192*/ meltfptr[191]); + ((meltroutine_ptr_t) /*_._VALROUT___V498*/ meltfptr[497])->tabval[7] = + (melt_ptr_t) ( /*_._VALDATA___V192*/ meltfptr[191]); MELT_LOCATION ("warmelt-outobj.melt:3293:/ initchunk"); /*^putroutconst */ @@ -33598,13 +33673,13 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V498*/ meltfptr[497])) + ( /*_._VALROUT___V498*/ meltfptr[497])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_311__OUTPUCOD_OBJMULTIALLOCBLOCK#8", NULL != ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_.VALROUT___V498*/ meltfptr[497])->tabval[8] = + ((meltroutine_ptr_t) /*_._VALROUT___V498*/ meltfptr[497])->tabval[8] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:3293:/ initchunk"); @@ -33613,13 +33688,13 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V498*/ meltfptr[497])) + ( /*_._VALROUT___V498*/ meltfptr[497])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_311__OUTPUCOD_OBJMULTIALLOCBLOCK#9", NULL != ( /*_.OUTPUT_C_INITIAL_FILL__V22*/ meltfptr[21])); - ((meltroutine_ptr_t) /*_.VALROUT___V498*/ meltfptr[497])->tabval[9] = + ((meltroutine_ptr_t) /*_._VALROUT___V498*/ meltfptr[497])->tabval[9] = (melt_ptr_t) ( /*_.OUTPUT_C_INITIAL_FILL__V22*/ meltfptr[21]); MELT_LOCATION ("warmelt-outobj.melt:3293:/ initchunk"); @@ -33627,77 +33702,77 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V498*/ meltfptr[497])) == + ( /*_._VALROUT___V498*/ meltfptr[497])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V479*/ meltfptr[478]); - ((meltroutine_ptr_t) /*_.VALROUT___V498*/ meltfptr[497])->tabval[10] = - (melt_ptr_t) ( /*_.VALCLO___V479*/ meltfptr[478]); + NULL != /*_._VALCLO___V479*/ meltfptr[478]); + ((meltroutine_ptr_t) /*_._VALROUT___V498*/ meltfptr[497])->tabval[10] = + (melt_ptr_t) ( /*_._VALCLO___V479*/ meltfptr[478]); MELT_LOCATION ("warmelt-outobj.melt:3293:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V498*/ meltfptr[497]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V498*/ meltfptr[497]); /*putclosurout#65 */ melt_assertmsg ("putclosrout#65 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V499*/ meltfptr[498])) == + ( /*_._VALCLO___V499*/ meltfptr[498])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#65 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V498*/ meltfptr[497])) == + ( /*_._VALROUT___V498*/ meltfptr[497])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V499*/ meltfptr[498])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V498*/ meltfptr[497]); + ((meltclosure_ptr_t) /*_._VALCLO___V499*/ meltfptr[498])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V498*/ meltfptr[497]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V499*/ meltfptr[498]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V499*/ meltfptr[498]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V500*/ meltfptr[499])) == + ( /*_._VALDATA___V500*/ meltfptr[499])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V500*/ + ( /*_._VALDATA___V500*/ meltfptr[499])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V500*/ meltfptr[499]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V500*/ meltfptr[499]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V501*/ meltfptr[500]); + /*_._VALSTR___V501*/ meltfptr[500]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V500*/ meltfptr[499]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V500*/ meltfptr[499]); - melt_dbgtrace_written_object ( /*_.VALDATA___V500*/ meltfptr[499], + melt_dbgtrace_written_object ( /*_._VALDATA___V500*/ meltfptr[499], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V502*/ meltfptr[501])) == + ( /*_._VALDATA___V502*/ meltfptr[501])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V502*/ + ( /*_._VALDATA___V502*/ meltfptr[501])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V502*/ meltfptr[501]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V502*/ meltfptr[501]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V503*/ meltfptr[502]); + /*_._VALSTR___V503*/ meltfptr[502]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V502*/ meltfptr[501]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V502*/ meltfptr[501]); - melt_dbgtrace_written_object ( /*_.VALDATA___V502*/ meltfptr[501], + melt_dbgtrace_written_object ( /*_._VALDATA___V502*/ meltfptr[501], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:3365:/ initchunk"); @@ -33706,13 +33781,13 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V504*/ meltfptr[503])) + ( /*_._VALROUT___V504*/ meltfptr[503])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_317__OUTPUCOD_OBJCITERBLOCK#0", NULL != ( /*_.CLASS_OBJCITERBLOCK__V89*/ meltfptr[88])); - ((meltroutine_ptr_t) /*_.VALROUT___V504*/ meltfptr[503])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V504*/ meltfptr[503])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJCITERBLOCK__V89*/ meltfptr[88]); MELT_LOCATION ("warmelt-outobj.melt:3365:/ initchunk"); @@ -33721,13 +33796,13 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V504*/ meltfptr[503])) + ( /*_._VALROUT___V504*/ meltfptr[503])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_317__OUTPUCOD_OBJCITERBLOCK#1", NULL != ( /*_.DISCR_INTEGER__V53*/ meltfptr[52])); - ((meltroutine_ptr_t) /*_.VALROUT___V504*/ meltfptr[503])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V504*/ meltfptr[503])->tabval[1] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V53*/ meltfptr[52]); MELT_LOCATION ("warmelt-outobj.melt:3365:/ initchunk"); @@ -33736,13 +33811,13 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V504*/ meltfptr[503])) + ( /*_._VALROUT___V504*/ meltfptr[503])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_317__OUTPUCOD_OBJCITERBLOCK#2", NULL != ( /*_.CLASS_CITERATOR__V90*/ meltfptr[89])); - ((meltroutine_ptr_t) /*_.VALROUT___V504*/ meltfptr[503])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V504*/ meltfptr[503])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_CITERATOR__V90*/ meltfptr[89]); MELT_LOCATION ("warmelt-outobj.melt:3365:/ initchunk"); @@ -33750,12 +33825,12 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V504*/ meltfptr[503])) == + ( /*_._VALROUT___V504*/ meltfptr[503])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V259*/ meltfptr[258]); - ((meltroutine_ptr_t) /*_.VALROUT___V504*/ meltfptr[503])->tabval[3] = - (melt_ptr_t) ( /*_.VALCLO___V259*/ meltfptr[258]); + NULL != /*_._VALCLO___V259*/ meltfptr[258]); + ((meltroutine_ptr_t) /*_._VALROUT___V504*/ meltfptr[503])->tabval[3] = + (melt_ptr_t) ( /*_._VALCLO___V259*/ meltfptr[258]); MELT_LOCATION ("warmelt-outobj.melt:3365:/ initchunk"); /*^putroutconst */ @@ -33763,13 +33838,13 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V504*/ meltfptr[503])) + ( /*_._VALROUT___V504*/ meltfptr[503])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_317__OUTPUCOD_OBJCITERBLOCK#4", NULL != ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20])); - ((meltroutine_ptr_t) /*_.VALROUT___V504*/ meltfptr[503])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V504*/ meltfptr[503])->tabval[4] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]); MELT_LOCATION ("warmelt-outobj.melt:3365:/ initchunk"); @@ -33777,12 +33852,12 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V504*/ meltfptr[503])) == + ( /*_._VALROUT___V504*/ meltfptr[503])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALDATA___V192*/ meltfptr[191]); - ((meltroutine_ptr_t) /*_.VALROUT___V504*/ meltfptr[503])->tabval[5] = - (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); + NULL != /*_._VALDATA___V192*/ meltfptr[191]); + ((meltroutine_ptr_t) /*_._VALROUT___V504*/ meltfptr[503])->tabval[5] = + (melt_ptr_t) ( /*_._VALDATA___V192*/ meltfptr[191]); MELT_LOCATION ("warmelt-outobj.melt:3365:/ initchunk"); /*^putroutconst */ @@ -33790,13 +33865,13 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V504*/ meltfptr[503])) + ( /*_._VALROUT___V504*/ meltfptr[503])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_317__OUTPUCOD_OBJCITERBLOCK#6", NULL != ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_.VALROUT___V504*/ meltfptr[503])->tabval[6] = + ((meltroutine_ptr_t) /*_._VALROUT___V504*/ meltfptr[503])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:3365:/ initchunk"); @@ -33804,77 +33879,77 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V504*/ meltfptr[503])) == + ( /*_._VALROUT___V504*/ meltfptr[503])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V479*/ meltfptr[478]); - ((meltroutine_ptr_t) /*_.VALROUT___V504*/ meltfptr[503])->tabval[7] = - (melt_ptr_t) ( /*_.VALCLO___V479*/ meltfptr[478]); + NULL != /*_._VALCLO___V479*/ meltfptr[478]); + ((meltroutine_ptr_t) /*_._VALROUT___V504*/ meltfptr[503])->tabval[7] = + (melt_ptr_t) ( /*_._VALCLO___V479*/ meltfptr[478]); MELT_LOCATION ("warmelt-outobj.melt:3365:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V504*/ meltfptr[503]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V504*/ meltfptr[503]); /*putclosurout#66 */ melt_assertmsg ("putclosrout#66 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V505*/ meltfptr[504])) == + ( /*_._VALCLO___V505*/ meltfptr[504])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#66 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V504*/ meltfptr[503])) == + ( /*_._VALROUT___V504*/ meltfptr[503])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V505*/ meltfptr[504])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V504*/ meltfptr[503]); + ((meltclosure_ptr_t) /*_._VALCLO___V505*/ meltfptr[504])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V504*/ meltfptr[503]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V505*/ meltfptr[504]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V505*/ meltfptr[504]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V506*/ meltfptr[505])) == + ( /*_._VALDATA___V506*/ meltfptr[505])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V506*/ + ( /*_._VALDATA___V506*/ meltfptr[505])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V506*/ meltfptr[505]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V506*/ meltfptr[505]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V507*/ meltfptr[506]); + /*_._VALSTR___V507*/ meltfptr[506]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V506*/ meltfptr[505]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V506*/ meltfptr[505]); - melt_dbgtrace_written_object ( /*_.VALDATA___V506*/ meltfptr[505], + melt_dbgtrace_written_object ( /*_._VALDATA___V506*/ meltfptr[505], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V508*/ meltfptr[507])) == + ( /*_._VALDATA___V508*/ meltfptr[507])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V508*/ + ( /*_._VALDATA___V508*/ meltfptr[507])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V508*/ meltfptr[507]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V508*/ meltfptr[507]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V509*/ meltfptr[508]); + /*_._VALSTR___V509*/ meltfptr[508]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V508*/ meltfptr[507]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V508*/ meltfptr[507]); - melt_dbgtrace_written_object ( /*_.VALDATA___V508*/ meltfptr[507], + melt_dbgtrace_written_object ( /*_._VALDATA___V508*/ meltfptr[507], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:3420:/ initchunk"); @@ -33883,13 +33958,13 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V510*/ meltfptr[509])) + ( /*_._VALROUT___V510*/ meltfptr[509])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_323__OUTPUCOD_OBJCOMMENTINSTR#0", NULL != ( /*_.CLASS_OBJCOMMENTINSTR__V91*/ meltfptr[90])); - ((meltroutine_ptr_t) /*_.VALROUT___V510*/ meltfptr[509])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V510*/ meltfptr[509])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJCOMMENTINSTR__V91*/ meltfptr[90]); MELT_LOCATION ("warmelt-outobj.melt:3420:/ initchunk"); @@ -33898,13 +33973,13 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V510*/ meltfptr[509])) + ( /*_._VALROUT___V510*/ meltfptr[509])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_323__OUTPUCOD_OBJCOMMENTINSTR#1", NULL != ( /*_.DISCR_STRBUF__V69*/ meltfptr[68])); - ((meltroutine_ptr_t) /*_.VALROUT___V510*/ meltfptr[509])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V510*/ meltfptr[509])->tabval[1] = (melt_ptr_t) ( /*_.DISCR_STRBUF__V69*/ meltfptr[68]); MELT_LOCATION ("warmelt-outobj.melt:3420:/ initchunk"); @@ -33913,13 +33988,13 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V510*/ meltfptr[509])) + ( /*_._VALROUT___V510*/ meltfptr[509])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_323__OUTPUCOD_OBJCOMMENTINSTR#2", NULL != ( /*_.DISCR_STRING__V54*/ meltfptr[53])); - ((meltroutine_ptr_t) /*_.VALROUT___V510*/ meltfptr[509])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V510*/ meltfptr[509])->tabval[2] = (melt_ptr_t) ( /*_.DISCR_STRING__V54*/ meltfptr[53]); MELT_LOCATION ("warmelt-outobj.melt:3420:/ initchunk"); @@ -33927,24 +34002,24 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V510*/ meltfptr[509])) == + ( /*_._VALROUT___V510*/ meltfptr[509])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V259*/ meltfptr[258]); - ((meltroutine_ptr_t) /*_.VALROUT___V510*/ meltfptr[509])->tabval[3] = - (melt_ptr_t) ( /*_.VALCLO___V259*/ meltfptr[258]); + NULL != /*_._VALCLO___V259*/ meltfptr[258]); + ((meltroutine_ptr_t) /*_._VALROUT___V510*/ meltfptr[509])->tabval[3] = + (melt_ptr_t) ( /*_._VALCLO___V259*/ meltfptr[258]); MELT_LOCATION ("warmelt-outobj.melt:3420:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V510*/ meltfptr[509])) == + ( /*_._VALROUT___V510*/ meltfptr[509])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALDATA___V192*/ meltfptr[191]); - ((meltroutine_ptr_t) /*_.VALROUT___V510*/ meltfptr[509])->tabval[4] = - (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); + NULL != /*_._VALDATA___V192*/ meltfptr[191]); + ((meltroutine_ptr_t) /*_._VALROUT___V510*/ meltfptr[509])->tabval[4] = + (melt_ptr_t) ( /*_._VALDATA___V192*/ meltfptr[191]); MELT_LOCATION ("warmelt-outobj.melt:3420:/ initchunk"); /*^putroutconst */ @@ -33952,56 +34027,56 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V510*/ meltfptr[509])) + ( /*_._VALROUT___V510*/ meltfptr[509])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_323__OUTPUCOD_OBJCOMMENTINSTR#5", NULL != ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_.VALROUT___V510*/ meltfptr[509])->tabval[5] = + ((meltroutine_ptr_t) /*_._VALROUT___V510*/ meltfptr[509])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:3420:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V510*/ meltfptr[509]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V510*/ meltfptr[509]); /*putclosurout#67 */ melt_assertmsg ("putclosrout#67 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V511*/ meltfptr[510])) == + ( /*_._VALCLO___V511*/ meltfptr[510])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#67 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V510*/ meltfptr[509])) == + ( /*_._VALROUT___V510*/ meltfptr[509])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V511*/ meltfptr[510])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V510*/ meltfptr[509]); + ((meltclosure_ptr_t) /*_._VALCLO___V511*/ meltfptr[510])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V510*/ meltfptr[509]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V511*/ meltfptr[510]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V511*/ meltfptr[510]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V512*/ meltfptr[511])) == + ( /*_._VALDATA___V512*/ meltfptr[511])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V512*/ + ( /*_._VALDATA___V512*/ meltfptr[511])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V512*/ meltfptr[511]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V512*/ meltfptr[511]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V513*/ meltfptr[512]); + /*_._VALSTR___V513*/ meltfptr[512]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V512*/ meltfptr[511]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V512*/ meltfptr[511]); - melt_dbgtrace_written_object ( /*_.VALDATA___V512*/ meltfptr[511], + melt_dbgtrace_written_object ( /*_._VALDATA___V512*/ meltfptr[511], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:3441:/ initchunk"); @@ -34010,13 +34085,13 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V514*/ meltfptr[513])) + ( /*_._VALROUT___V514*/ meltfptr[513])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_327__OUTPUCOD_OBJCOMMENTEDBLOCK#0", NULL != ( /*_.CLASS_OBJCOMMENTEDBLOCK__V92*/ meltfptr[91])); - ((meltroutine_ptr_t) /*_.VALROUT___V514*/ meltfptr[513])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V514*/ meltfptr[513])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJCOMMENTEDBLOCK__V92*/ meltfptr[91]); MELT_LOCATION ("warmelt-outobj.melt:3441:/ initchunk"); @@ -34024,12 +34099,12 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V514*/ meltfptr[513])) == + ( /*_._VALROUT___V514*/ meltfptr[513])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V259*/ meltfptr[258]); - ((meltroutine_ptr_t) /*_.VALROUT___V514*/ meltfptr[513])->tabval[1] = - (melt_ptr_t) ( /*_.VALCLO___V259*/ meltfptr[258]); + NULL != /*_._VALCLO___V259*/ meltfptr[258]); + ((meltroutine_ptr_t) /*_._VALROUT___V514*/ meltfptr[513])->tabval[1] = + (melt_ptr_t) ( /*_._VALCLO___V259*/ meltfptr[258]); MELT_LOCATION ("warmelt-outobj.melt:3441:/ initchunk"); /*^putroutconst */ @@ -34037,13 +34112,13 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V514*/ meltfptr[513])) + ( /*_._VALROUT___V514*/ meltfptr[513])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_327__OUTPUCOD_OBJCOMMENTEDBLOCK#2", NULL != ( /*_.DISCR_INTEGER__V53*/ meltfptr[52])); - ((meltroutine_ptr_t) /*_.VALROUT___V514*/ meltfptr[513])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V514*/ meltfptr[513])->tabval[2] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V53*/ meltfptr[52]); MELT_LOCATION ("warmelt-outobj.melt:3441:/ initchunk"); @@ -34052,13 +34127,13 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V514*/ meltfptr[513])) + ( /*_._VALROUT___V514*/ meltfptr[513])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_327__OUTPUCOD_OBJCOMMENTEDBLOCK#3", NULL != ( /*_.DISCR_STRBUF__V69*/ meltfptr[68])); - ((meltroutine_ptr_t) /*_.VALROUT___V514*/ meltfptr[513])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V514*/ meltfptr[513])->tabval[3] = (melt_ptr_t) ( /*_.DISCR_STRBUF__V69*/ meltfptr[68]); MELT_LOCATION ("warmelt-outobj.melt:3441:/ initchunk"); @@ -34067,13 +34142,13 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V514*/ meltfptr[513])) + ( /*_._VALROUT___V514*/ meltfptr[513])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_327__OUTPUCOD_OBJCOMMENTEDBLOCK#4", NULL != ( /*_.DISCR_STRING__V54*/ meltfptr[53])); - ((meltroutine_ptr_t) /*_.VALROUT___V514*/ meltfptr[513])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V514*/ meltfptr[513])->tabval[4] = (melt_ptr_t) ( /*_.DISCR_STRING__V54*/ meltfptr[53]); MELT_LOCATION ("warmelt-outobj.melt:3441:/ initchunk"); @@ -34081,24 +34156,24 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V514*/ meltfptr[513])) == + ( /*_._VALROUT___V514*/ meltfptr[513])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V479*/ meltfptr[478]); - ((meltroutine_ptr_t) /*_.VALROUT___V514*/ meltfptr[513])->tabval[5] = - (melt_ptr_t) ( /*_.VALCLO___V479*/ meltfptr[478]); + NULL != /*_._VALCLO___V479*/ meltfptr[478]); + ((meltroutine_ptr_t) /*_._VALROUT___V514*/ meltfptr[513])->tabval[5] = + (melt_ptr_t) ( /*_._VALCLO___V479*/ meltfptr[478]); MELT_LOCATION ("warmelt-outobj.melt:3441:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V514*/ meltfptr[513])) == + ( /*_._VALROUT___V514*/ meltfptr[513])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALDATA___V192*/ meltfptr[191]); - ((meltroutine_ptr_t) /*_.VALROUT___V514*/ meltfptr[513])->tabval[6] = - (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); + NULL != /*_._VALDATA___V192*/ meltfptr[191]); + ((meltroutine_ptr_t) /*_._VALROUT___V514*/ meltfptr[513])->tabval[6] = + (melt_ptr_t) ( /*_._VALDATA___V192*/ meltfptr[191]); MELT_LOCATION ("warmelt-outobj.melt:3441:/ initchunk"); /*^putroutconst */ @@ -34106,79 +34181,79 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V514*/ meltfptr[513])) + ( /*_._VALROUT___V514*/ meltfptr[513])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_327__OUTPUCOD_OBJCOMMENTEDBLOCK#7", NULL != ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_.VALROUT___V514*/ meltfptr[513])->tabval[7] = + ((meltroutine_ptr_t) /*_._VALROUT___V514*/ meltfptr[513])->tabval[7] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:3441:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V514*/ meltfptr[513]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V514*/ meltfptr[513]); /*putclosurout#68 */ melt_assertmsg ("putclosrout#68 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V515*/ meltfptr[514])) == + ( /*_._VALCLO___V515*/ meltfptr[514])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#68 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V514*/ meltfptr[513])) == + ( /*_._VALROUT___V514*/ meltfptr[513])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V515*/ meltfptr[514])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V514*/ meltfptr[513]); + ((meltclosure_ptr_t) /*_._VALCLO___V515*/ meltfptr[514])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V514*/ meltfptr[513]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V515*/ meltfptr[514]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V515*/ meltfptr[514]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V516*/ meltfptr[515])) == + ( /*_._VALDATA___V516*/ meltfptr[515])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V516*/ + ( /*_._VALDATA___V516*/ meltfptr[515])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V516*/ meltfptr[515]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V516*/ meltfptr[515]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V517*/ meltfptr[516]); + /*_._VALSTR___V517*/ meltfptr[516]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V516*/ meltfptr[515]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V516*/ meltfptr[515]); - melt_dbgtrace_written_object ( /*_.VALDATA___V516*/ meltfptr[515], + melt_dbgtrace_written_object ( /*_._VALDATA___V516*/ meltfptr[515], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V518*/ meltfptr[517])) == + ( /*_._VALDATA___V518*/ meltfptr[517])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V518*/ + ( /*_._VALDATA___V518*/ meltfptr[517])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V518*/ meltfptr[517]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V518*/ meltfptr[517]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V519*/ meltfptr[518]); + /*_._VALSTR___V519*/ meltfptr[518]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V518*/ meltfptr[517]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V518*/ meltfptr[517]); - melt_dbgtrace_written_object ( /*_.VALDATA___V518*/ meltfptr[517], + melt_dbgtrace_written_object ( /*_._VALDATA___V518*/ meltfptr[517], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:3479:/ initchunk"); @@ -34186,28 +34261,28 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (meltinitial_frame_t * /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V520*/ meltfptr[519])) == + ( /*_._VALDATA___V520*/ meltfptr[519])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (0 >= 0 && 0 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V520*/ + ( /*_._VALDATA___V520*/ meltfptr[519])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V520*/ meltfptr[519]))->obj_vartab[0] = + ((meltobject_ptr_t) ( /*_._VALDATA___V520*/ meltfptr[519]))->obj_vartab[0] = (melt_ptr_t) ( - /*_.VALBXINT___V521*/ meltfptr[520]); + /*_._VALBXINT___V521*/ meltfptr[520]); MELT_LOCATION ("warmelt-outobj.melt:3479:/ initchunk"); /*^touch */ - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V520*/ meltfptr[519]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V520*/ meltfptr[519]); MELT_LOCATION ("warmelt-outobj.melt:3479:/ initchunk"); /*^touchobj */ - melt_dbgtrace_written_object ( /*_.VALDATA___V520*/ meltfptr[519], + melt_dbgtrace_written_object ( /*_._VALDATA___V520*/ meltfptr[519], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:3480:/ initchunk"); @@ -34216,13 +34291,13 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V522*/ meltfptr[521])) + ( /*_._VALROUT___V522*/ meltfptr[521])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_335__OUTPUCOD_OBJLABELINSTR#0", NULL != ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7])); - ((meltroutine_ptr_t) /*_.VALROUT___V522*/ meltfptr[521])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V522*/ meltfptr[521])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7]); MELT_LOCATION ("warmelt-outobj.melt:3480:/ initchunk"); @@ -34231,13 +34306,13 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V522*/ meltfptr[521])) + ( /*_._VALROUT___V522*/ meltfptr[521])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_335__OUTPUCOD_OBJLABELINSTR#1", NULL != ( /*_.CLASS_OBJLABELINSTR__V93*/ meltfptr[92])); - ((meltroutine_ptr_t) /*_.VALROUT___V522*/ meltfptr[521])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V522*/ meltfptr[521])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_OBJLABELINSTR__V93*/ meltfptr[92]); MELT_LOCATION ("warmelt-outobj.melt:3480:/ initchunk"); @@ -34245,12 +34320,12 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V522*/ meltfptr[521])) == + ( /*_._VALROUT___V522*/ meltfptr[521])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALDATA___V520*/ meltfptr[519]); - ((meltroutine_ptr_t) /*_.VALROUT___V522*/ meltfptr[521])->tabval[2] = - (melt_ptr_t) ( /*_.VALDATA___V520*/ meltfptr[519]); + NULL != /*_._VALDATA___V520*/ meltfptr[519]); + ((meltroutine_ptr_t) /*_._VALROUT___V522*/ meltfptr[521])->tabval[2] = + (melt_ptr_t) ( /*_._VALDATA___V520*/ meltfptr[519]); MELT_LOCATION ("warmelt-outobj.melt:3480:/ initchunk"); /*^putroutconst */ @@ -34258,13 +34333,13 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V522*/ meltfptr[521])) + ( /*_._VALROUT___V522*/ meltfptr[521])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_335__OUTPUCOD_OBJLABELINSTR#3", NULL != ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_.VALROUT___V522*/ meltfptr[521])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V522*/ meltfptr[521])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:3480:/ initchunk"); @@ -34273,13 +34348,13 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V522*/ meltfptr[521])) + ( /*_._VALROUT___V522*/ meltfptr[521])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_335__OUTPUCOD_OBJLABELINSTR#4", NULL != ( /*_.SET_CONTENT__V94*/ meltfptr[93])); - ((meltroutine_ptr_t) /*_.VALROUT___V522*/ meltfptr[521])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V522*/ meltfptr[521])->tabval[4] = (melt_ptr_t) ( /*_.SET_CONTENT__V94*/ meltfptr[93]); MELT_LOCATION ("warmelt-outobj.melt:3480:/ initchunk"); @@ -34288,13 +34363,13 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V522*/ meltfptr[521])) + ( /*_._VALROUT___V522*/ meltfptr[521])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_335__OUTPUCOD_OBJLABELINSTR#5", NULL != ( /*_.STRING4OUT__V95*/ meltfptr[94])); - ((meltroutine_ptr_t) /*_.VALROUT___V522*/ meltfptr[521])->tabval[5] = + ((meltroutine_ptr_t) /*_._VALROUT___V522*/ meltfptr[521])->tabval[5] = (melt_ptr_t) ( /*_.STRING4OUT__V95*/ meltfptr[94]); MELT_LOCATION ("warmelt-outobj.melt:3480:/ initchunk"); @@ -34303,13 +34378,13 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V522*/ meltfptr[521])) + ( /*_._VALROUT___V522*/ meltfptr[521])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_335__OUTPUCOD_OBJLABELINSTR#6", NULL != ( /*_.DISCR_VERBATIM_STRING__V88*/ meltfptr[87])); - ((meltroutine_ptr_t) /*_.VALROUT___V522*/ meltfptr[521])->tabval[6] = + ((meltroutine_ptr_t) /*_._VALROUT___V522*/ meltfptr[521])->tabval[6] = (melt_ptr_t) ( /*_.DISCR_VERBATIM_STRING__V88*/ meltfptr[87]); MELT_LOCATION ("warmelt-outobj.melt:3480:/ initchunk"); @@ -34317,33 +34392,33 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V522*/ meltfptr[521])) == + ( /*_._VALROUT___V522*/ meltfptr[521])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALDATA___V192*/ meltfptr[191]); - ((meltroutine_ptr_t) /*_.VALROUT___V522*/ meltfptr[521])->tabval[7] = - (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); + NULL != /*_._VALDATA___V192*/ meltfptr[191]); + ((meltroutine_ptr_t) /*_._VALROUT___V522*/ meltfptr[521])->tabval[7] = + (melt_ptr_t) ( /*_._VALDATA___V192*/ meltfptr[191]); MELT_LOCATION ("warmelt-outobj.melt:3480:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V522*/ meltfptr[521])) == + ( /*_._VALROUT___V522*/ meltfptr[521])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V259*/ meltfptr[258]); - ((meltroutine_ptr_t) /*_.VALROUT___V522*/ meltfptr[521])->tabval[8] = - (melt_ptr_t) ( /*_.VALCLO___V259*/ meltfptr[258]); + NULL != /*_._VALCLO___V259*/ meltfptr[258]); + ((meltroutine_ptr_t) /*_._VALROUT___V522*/ meltfptr[521])->tabval[8] = + (melt_ptr_t) ( /*_._VALCLO___V259*/ meltfptr[258]); #undef meltfram__ -} /*end of meltmod__warmelt_outobj__initialmeltchunk_6 */ +} /*end of meltmod__WARMELTmiOUTOBJ__initialmeltchunk_6 */ void -meltmod__warmelt_outobj__initialmeltchunk_7 (meltinitial_frame_t * - meltmeltframptr__, - char meltpredefinited[]) +meltmod__WARMELTmiOUTOBJ__initialmeltchunk_7 (meltinitial_frame_t * + meltmeltframptr__, + char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount @@ -34355,102 +34430,102 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V522*/ meltfptr[521])) + ( /*_._VALROUT___V522*/ meltfptr[521])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_335__OUTPUCOD_OBJLABELINSTR#9", NULL != ( /*_.ADD2OUT__V15*/ meltfptr[14])); - ((meltroutine_ptr_t) /*_.VALROUT___V522*/ meltfptr[521])->tabval[9] = + ((meltroutine_ptr_t) /*_._VALROUT___V522*/ meltfptr[521])->tabval[9] = (melt_ptr_t) ( /*_.ADD2OUT__V15*/ meltfptr[14]); MELT_LOCATION ("warmelt-outobj.melt:3480:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V522*/ meltfptr[521]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V522*/ meltfptr[521]); /*putclosurout#69 */ melt_assertmsg ("putclosrout#69 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V523*/ meltfptr[522])) == + ( /*_._VALCLO___V523*/ meltfptr[522])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#69 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V522*/ meltfptr[521])) == + ( /*_._VALROUT___V522*/ meltfptr[521])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V523*/ meltfptr[522])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V522*/ meltfptr[521]); + ((meltclosure_ptr_t) /*_._VALCLO___V523*/ meltfptr[522])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V522*/ meltfptr[521]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V523*/ meltfptr[522]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V523*/ meltfptr[522]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V524*/ meltfptr[523])) == + ( /*_._VALDATA___V524*/ meltfptr[523])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V524*/ + ( /*_._VALDATA___V524*/ meltfptr[523])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V524*/ meltfptr[523]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V524*/ meltfptr[523]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V525*/ meltfptr[524]); + /*_._VALSTR___V525*/ meltfptr[524]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V524*/ meltfptr[523]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V524*/ meltfptr[523]); - melt_dbgtrace_written_object ( /*_.VALDATA___V524*/ meltfptr[523], + melt_dbgtrace_written_object ( /*_._VALDATA___V524*/ meltfptr[523], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V526*/ meltfptr[525])) == + ( /*_._VALDATA___V526*/ meltfptr[525])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V526*/ + ( /*_._VALDATA___V526*/ meltfptr[525])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V526*/ meltfptr[525]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V526*/ meltfptr[525]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V527*/ meltfptr[526]); + /*_._VALSTR___V527*/ meltfptr[526]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V526*/ meltfptr[525]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V526*/ meltfptr[525]); - melt_dbgtrace_written_object ( /*_.VALDATA___V526*/ meltfptr[525], + melt_dbgtrace_written_object ( /*_._VALDATA___V526*/ meltfptr[525], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V528*/ meltfptr[527])) == + ( /*_._VALDATA___V528*/ meltfptr[527])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V528*/ + ( /*_._VALDATA___V528*/ meltfptr[527])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V528*/ meltfptr[527]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V528*/ meltfptr[527]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V529*/ meltfptr[528]); + /*_._VALSTR___V529*/ meltfptr[528]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V528*/ meltfptr[527]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V528*/ meltfptr[527]); - melt_dbgtrace_written_object ( /*_.VALDATA___V528*/ meltfptr[527], + melt_dbgtrace_written_object ( /*_._VALDATA___V528*/ meltfptr[527], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:3515:/ initchunk"); @@ -34459,13 +34534,13 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V530*/ meltfptr[529])) + ( /*_._VALROUT___V530*/ meltfptr[529])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_343__OUTPUCOD_OBJGOTOINSTR#0", NULL != ( /*_.CLASS_OBJGOTOINSTR__V96*/ meltfptr[95])); - ((meltroutine_ptr_t) /*_.VALROUT___V530*/ meltfptr[529])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V530*/ meltfptr[529])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJGOTOINSTR__V96*/ meltfptr[95]); MELT_LOCATION ("warmelt-outobj.melt:3515:/ initchunk"); @@ -34473,24 +34548,24 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V530*/ meltfptr[529])) == + ( /*_._VALROUT___V530*/ meltfptr[529])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V259*/ meltfptr[258]); - ((meltroutine_ptr_t) /*_.VALROUT___V530*/ meltfptr[529])->tabval[1] = - (melt_ptr_t) ( /*_.VALCLO___V259*/ meltfptr[258]); + NULL != /*_._VALCLO___V259*/ meltfptr[258]); + ((meltroutine_ptr_t) /*_._VALROUT___V530*/ meltfptr[529])->tabval[1] = + (melt_ptr_t) ( /*_._VALCLO___V259*/ meltfptr[258]); MELT_LOCATION ("warmelt-outobj.melt:3515:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V530*/ meltfptr[529])) == + ( /*_._VALROUT___V530*/ meltfptr[529])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALDATA___V192*/ meltfptr[191]); - ((meltroutine_ptr_t) /*_.VALROUT___V530*/ meltfptr[529])->tabval[2] = - (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); + NULL != /*_._VALDATA___V192*/ meltfptr[191]); + ((meltroutine_ptr_t) /*_._VALROUT___V530*/ meltfptr[529])->tabval[2] = + (melt_ptr_t) ( /*_._VALDATA___V192*/ meltfptr[191]); MELT_LOCATION ("warmelt-outobj.melt:3515:/ initchunk"); /*^putroutconst */ @@ -34498,56 +34573,56 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V530*/ meltfptr[529])) + ( /*_._VALROUT___V530*/ meltfptr[529])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_343__OUTPUCOD_OBJGOTOINSTR#3", NULL != ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_.VALROUT___V530*/ meltfptr[529])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V530*/ meltfptr[529])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:3515:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V530*/ meltfptr[529]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V530*/ meltfptr[529]); /*putclosurout#70 */ melt_assertmsg ("putclosrout#70 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V531*/ meltfptr[530])) == + ( /*_._VALCLO___V531*/ meltfptr[530])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#70 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V530*/ meltfptr[529])) == + ( /*_._VALROUT___V530*/ meltfptr[529])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V531*/ meltfptr[530])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V530*/ meltfptr[529]); + ((meltclosure_ptr_t) /*_._VALCLO___V531*/ meltfptr[530])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V530*/ meltfptr[529]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V531*/ meltfptr[530]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V531*/ meltfptr[530]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V532*/ meltfptr[531])) == + ( /*_._VALDATA___V532*/ meltfptr[531])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V532*/ + ( /*_._VALDATA___V532*/ meltfptr[531])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V532*/ meltfptr[531]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V532*/ meltfptr[531]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V533*/ meltfptr[532]); + /*_._VALSTR___V533*/ meltfptr[532]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V532*/ meltfptr[531]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V532*/ meltfptr[531]); - melt_dbgtrace_written_object ( /*_.VALDATA___V532*/ meltfptr[531], + melt_dbgtrace_written_object ( /*_._VALDATA___V532*/ meltfptr[531], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:3532:/ initchunk"); @@ -34556,12 +34631,12 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V534*/ meltfptr[533])) + ( /*_._VALROUT___V534*/ meltfptr[533])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_347__ADD2SBUF_CLONSYM#0", NULL != ( /*_.CLASS_CLONED_SYMBOL__V13*/ meltfptr[12])); - ((meltroutine_ptr_t) /*_.VALROUT___V534*/ meltfptr[533])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V534*/ meltfptr[533])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_CLONED_SYMBOL__V13*/ meltfptr[12]); MELT_LOCATION ("warmelt-outobj.melt:3532:/ initchunk"); @@ -34569,12 +34644,12 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V534*/ meltfptr[533])) == + ( /*_._VALROUT___V534*/ meltfptr[533])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALDATA___V192*/ meltfptr[191]); - ((meltroutine_ptr_t) /*_.VALROUT___V534*/ meltfptr[533])->tabval[1] = - (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); + NULL != /*_._VALDATA___V192*/ meltfptr[191]); + ((meltroutine_ptr_t) /*_._VALROUT___V534*/ meltfptr[533])->tabval[1] = + (melt_ptr_t) ( /*_._VALDATA___V192*/ meltfptr[191]); MELT_LOCATION ("warmelt-outobj.melt:3532:/ initchunk"); /*^putroutconst */ @@ -34582,33 +34657,33 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V534*/ meltfptr[533])) + ( /*_._VALROUT___V534*/ meltfptr[533])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_347__ADD2SBUF_CLONSYM#2", NULL != ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_.VALROUT___V534*/ meltfptr[533])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V534*/ meltfptr[533])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:3532:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V534*/ meltfptr[533]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V534*/ meltfptr[533]); /*putclosurout#71 */ melt_assertmsg ("putclosrout#71 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V535*/ meltfptr[534])) == + ( /*_._VALCLO___V535*/ meltfptr[534])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#71 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V534*/ meltfptr[533])) == + ( /*_._VALROUT___V534*/ meltfptr[533])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V535*/ meltfptr[534])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V534*/ meltfptr[533]); + ((meltclosure_ptr_t) /*_._VALCLO___V535*/ meltfptr[534])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V534*/ meltfptr[533]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V535*/ meltfptr[534]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V535*/ meltfptr[534]); MELT_LOCATION ("warmelt-outobj.melt:3545:/ initchunk"); /*^putroutconst */ @@ -34616,12 +34691,12 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V536*/ meltfptr[535])) + ( /*_._VALROUT___V536*/ meltfptr[535])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_349__OUTPUCOD_OBJLOOP#0", NULL != ( /*_.CLASS_OBJLOOP__V97*/ meltfptr[96])); - ((meltroutine_ptr_t) /*_.VALROUT___V536*/ meltfptr[535])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V536*/ meltfptr[535])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJLOOP__V97*/ meltfptr[96]); MELT_LOCATION ("warmelt-outobj.melt:3545:/ initchunk"); @@ -34630,12 +34705,12 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V536*/ meltfptr[535])) + ( /*_._VALROUT___V536*/ meltfptr[535])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_349__OUTPUCOD_OBJLOOP#1", NULL != ( /*_.DISCR_INTEGER__V53*/ meltfptr[52])); - ((meltroutine_ptr_t) /*_.VALROUT___V536*/ meltfptr[535])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V536*/ meltfptr[535])->tabval[1] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V53*/ meltfptr[52]); MELT_LOCATION ("warmelt-outobj.melt:3545:/ initchunk"); @@ -34644,12 +34719,12 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V536*/ meltfptr[535])) + ( /*_._VALROUT___V536*/ meltfptr[535])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_349__OUTPUCOD_OBJLOOP#2", NULL != ( /*_.CLASS_CLONED_SYMBOL__V13*/ meltfptr[12])); - ((meltroutine_ptr_t) /*_.VALROUT___V536*/ meltfptr[535])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V536*/ meltfptr[535])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_CLONED_SYMBOL__V13*/ meltfptr[12]); MELT_LOCATION ("warmelt-outobj.melt:3545:/ initchunk"); @@ -34657,24 +34732,24 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V536*/ meltfptr[535])) == + ( /*_._VALROUT___V536*/ meltfptr[535])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V259*/ meltfptr[258]); - ((meltroutine_ptr_t) /*_.VALROUT___V536*/ meltfptr[535])->tabval[3] = - (melt_ptr_t) ( /*_.VALCLO___V259*/ meltfptr[258]); + NULL != /*_._VALCLO___V259*/ meltfptr[258]); + ((meltroutine_ptr_t) /*_._VALROUT___V536*/ meltfptr[535])->tabval[3] = + (melt_ptr_t) ( /*_._VALCLO___V259*/ meltfptr[258]); MELT_LOCATION ("warmelt-outobj.melt:3545:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V536*/ meltfptr[535])) == + ( /*_._VALROUT___V536*/ meltfptr[535])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V535*/ meltfptr[534]); - ((meltroutine_ptr_t) /*_.VALROUT___V536*/ meltfptr[535])->tabval[4] = - (melt_ptr_t) ( /*_.VALCLO___V535*/ meltfptr[534]); + NULL != /*_._VALCLO___V535*/ meltfptr[534]); + ((meltroutine_ptr_t) /*_._VALROUT___V536*/ meltfptr[535])->tabval[4] = + (melt_ptr_t) ( /*_._VALCLO___V535*/ meltfptr[534]); MELT_LOCATION ("warmelt-outobj.melt:3545:/ initchunk"); /*^putroutconst */ @@ -34682,12 +34757,12 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V536*/ meltfptr[535])) + ( /*_._VALROUT___V536*/ meltfptr[535])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_349__OUTPUCOD_OBJLOOP#5", NULL != ( /*_.LIST_EVERY__V57*/ meltfptr[56])); - ((meltroutine_ptr_t) /*_.VALROUT___V536*/ meltfptr[535])->tabval[5] = + ((meltroutine_ptr_t) /*_._VALROUT___V536*/ meltfptr[535])->tabval[5] = (melt_ptr_t) ( /*_.LIST_EVERY__V57*/ meltfptr[56]); MELT_LOCATION ("warmelt-outobj.melt:3545:/ initchunk"); @@ -34696,12 +34771,12 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V536*/ meltfptr[535])) + ( /*_._VALROUT___V536*/ meltfptr[535])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_349__OUTPUCOD_OBJLOOP#6", NULL != ( /*_.CLASS_OBJPUREVALUE__V64*/ meltfptr[63])); - ((meltroutine_ptr_t) /*_.VALROUT___V536*/ meltfptr[535])->tabval[6] = + ((meltroutine_ptr_t) /*_._VALROUT___V536*/ meltfptr[535])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_OBJPUREVALUE__V64*/ meltfptr[63]); MELT_LOCATION ("warmelt-outobj.melt:3545:/ initchunk"); @@ -34710,12 +34785,12 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V536*/ meltfptr[535])) + ( /*_._VALROUT___V536*/ meltfptr[535])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_349__OUTPUCOD_OBJLOOP#7", NULL != ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20])); - ((meltroutine_ptr_t) /*_.VALROUT___V536*/ meltfptr[535])->tabval[7] = + ((meltroutine_ptr_t) /*_._VALROUT___V536*/ meltfptr[535])->tabval[7] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]); MELT_LOCATION ("warmelt-outobj.melt:3564:/ initchunk"); @@ -34724,12 +34799,12 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V537*/ meltfptr[536])) + ( /*_._VALROUT___V537*/ meltfptr[536])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_353__LAMBDA_#0", NULL != ( /*_.CLASS_OBJPUREVALUE__V64*/ meltfptr[63])); - ((meltroutine_ptr_t) /*_.VALROUT___V537*/ meltfptr[536])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V537*/ meltfptr[536])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJPUREVALUE__V64*/ meltfptr[63]); MELT_LOCATION ("warmelt-outobj.melt:3564:/ initchunk"); @@ -34738,18 +34813,18 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V537*/ meltfptr[536])) + ( /*_._VALROUT___V537*/ meltfptr[536])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_353__LAMBDA_#1", NULL != ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20])); - ((meltroutine_ptr_t) /*_.VALROUT___V537*/ meltfptr[536])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V537*/ meltfptr[536])->tabval[1] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]); MELT_LOCATION ("warmelt-outobj.melt:3564:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V537*/ meltfptr[536]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V537*/ meltfptr[536]); MELT_LOCATION ("warmelt-outobj.melt:3545:/ initchunk"); /*^putroutconst */ @@ -34757,13 +34832,13 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V536*/ meltfptr[535])) + ( /*_._VALROUT___V536*/ meltfptr[535])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_349__OUTPUCOD_OBJLOOP#8", - NULL != ( /*_.VALROUT___V537*/ meltfptr[536])); - ((meltroutine_ptr_t) /*_.VALROUT___V536*/ meltfptr[535])->tabval[8] = - (melt_ptr_t) ( /*_.VALROUT___V537*/ meltfptr[536]); + NULL != ( /*_._VALROUT___V537*/ meltfptr[536])); + ((meltroutine_ptr_t) /*_._VALROUT___V536*/ meltfptr[535])->tabval[8] = + (melt_ptr_t) ( /*_._VALROUT___V537*/ meltfptr[536]); MELT_LOCATION ("warmelt-outobj.melt:3545:/ initchunk"); /*^putroutconst */ @@ -34771,12 +34846,12 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V536*/ meltfptr[535])) + ( /*_._VALROUT___V536*/ meltfptr[535])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_349__OUTPUCOD_OBJLOOP#9", NULL != ( /*_.CLASS_OBJPUREVALUE__V64*/ meltfptr[63])); - ((meltroutine_ptr_t) /*_.VALROUT___V536*/ meltfptr[535])->tabval[9] = + ((meltroutine_ptr_t) /*_._VALROUT___V536*/ meltfptr[535])->tabval[9] = (melt_ptr_t) ( /*_.CLASS_OBJPUREVALUE__V64*/ meltfptr[63]); MELT_LOCATION ("warmelt-outobj.melt:3545:/ initchunk"); @@ -34785,12 +34860,12 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V536*/ meltfptr[535])) + ( /*_._VALROUT___V536*/ meltfptr[535])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_349__OUTPUCOD_OBJLOOP#10", NULL != ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20])); - ((meltroutine_ptr_t) /*_.VALROUT___V536*/ meltfptr[535])->tabval[10] = + ((meltroutine_ptr_t) /*_._VALROUT___V536*/ meltfptr[535])->tabval[10] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]); MELT_LOCATION ("warmelt-outobj.melt:3545:/ initchunk"); @@ -34798,12 +34873,12 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V536*/ meltfptr[535])) == + ( /*_._VALROUT___V536*/ meltfptr[535])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALDATA___V192*/ meltfptr[191]); - ((meltroutine_ptr_t) /*_.VALROUT___V536*/ meltfptr[535])->tabval[11] = - (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); + NULL != /*_._VALDATA___V192*/ meltfptr[191]); + ((meltroutine_ptr_t) /*_._VALROUT___V536*/ meltfptr[535])->tabval[11] = + (melt_ptr_t) ( /*_._VALDATA___V192*/ meltfptr[191]); MELT_LOCATION ("warmelt-outobj.melt:3545:/ initchunk"); /*^putroutconst */ @@ -34811,12 +34886,12 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V536*/ meltfptr[535])) + ( /*_._VALROUT___V536*/ meltfptr[535])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_349__OUTPUCOD_OBJLOOP#12", NULL != ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_.VALROUT___V536*/ meltfptr[535])->tabval[12] = + ((meltroutine_ptr_t) /*_._VALROUT___V536*/ meltfptr[535])->tabval[12] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:3586:/ initchunk"); @@ -34825,12 +34900,12 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V538*/ meltfptr[537])) + ( /*_._VALROUT___V538*/ meltfptr[537])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_354__LAMBDA_#0", NULL != ( /*_.CLASS_OBJPUREVALUE__V64*/ meltfptr[63])); - ((meltroutine_ptr_t) /*_.VALROUT___V538*/ meltfptr[537])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V538*/ meltfptr[537])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJPUREVALUE__V64*/ meltfptr[63]); MELT_LOCATION ("warmelt-outobj.melt:3586:/ initchunk"); @@ -34839,12 +34914,12 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V538*/ meltfptr[537])) + ( /*_._VALROUT___V538*/ meltfptr[537])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_354__LAMBDA_#1", NULL != ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20])); - ((meltroutine_ptr_t) /*_.VALROUT___V538*/ meltfptr[537])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V538*/ meltfptr[537])->tabval[1] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]); MELT_LOCATION ("warmelt-outobj.melt:3586:/ initchunk"); @@ -34852,12 +34927,12 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V538*/ meltfptr[537])) == + ( /*_._VALROUT___V538*/ meltfptr[537])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALDATA___V192*/ meltfptr[191]); - ((meltroutine_ptr_t) /*_.VALROUT___V538*/ meltfptr[537])->tabval[2] = - (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); + NULL != /*_._VALDATA___V192*/ meltfptr[191]); + ((meltroutine_ptr_t) /*_._VALROUT___V538*/ meltfptr[537])->tabval[2] = + (melt_ptr_t) ( /*_._VALDATA___V192*/ meltfptr[191]); MELT_LOCATION ("warmelt-outobj.melt:3586:/ initchunk"); /*^putroutconst */ @@ -34865,18 +34940,18 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V538*/ meltfptr[537])) + ( /*_._VALROUT___V538*/ meltfptr[537])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_354__LAMBDA_#3", NULL != ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_.VALROUT___V538*/ meltfptr[537])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V538*/ meltfptr[537])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:3586:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V538*/ meltfptr[537]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V538*/ meltfptr[537]); MELT_LOCATION ("warmelt-outobj.melt:3545:/ initchunk"); /*^putroutconst */ @@ -34884,25 +34959,25 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V536*/ meltfptr[535])) + ( /*_._VALROUT___V536*/ meltfptr[535])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_349__OUTPUCOD_OBJLOOP#13", - NULL != ( /*_.VALROUT___V538*/ meltfptr[537])); - ((meltroutine_ptr_t) /*_.VALROUT___V536*/ meltfptr[535])->tabval[13] = - (melt_ptr_t) ( /*_.VALROUT___V538*/ meltfptr[537]); + NULL != ( /*_._VALROUT___V538*/ meltfptr[537])); + ((meltroutine_ptr_t) /*_._VALROUT___V536*/ meltfptr[535])->tabval[13] = + (melt_ptr_t) ( /*_._VALROUT___V538*/ meltfptr[537]); MELT_LOCATION ("warmelt-outobj.melt:3545:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V536*/ meltfptr[535])) == + ( /*_._VALROUT___V536*/ meltfptr[535])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALDATA___V192*/ meltfptr[191]); - ((meltroutine_ptr_t) /*_.VALROUT___V536*/ meltfptr[535])->tabval[14] = - (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); + NULL != /*_._VALDATA___V192*/ meltfptr[191]); + ((meltroutine_ptr_t) /*_._VALROUT___V536*/ meltfptr[535])->tabval[14] = + (melt_ptr_t) ( /*_._VALDATA___V192*/ meltfptr[191]); MELT_LOCATION ("warmelt-outobj.melt:3545:/ initchunk"); /*^putroutconst */ @@ -34910,55 +34985,55 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V536*/ meltfptr[535])) + ( /*_._VALROUT___V536*/ meltfptr[535])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_349__OUTPUCOD_OBJLOOP#15", NULL != ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_.VALROUT___V536*/ meltfptr[535])->tabval[15] = + ((meltroutine_ptr_t) /*_._VALROUT___V536*/ meltfptr[535])->tabval[15] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:3545:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V536*/ meltfptr[535]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V536*/ meltfptr[535]); /*putclosurout#72 */ melt_assertmsg ("putclosrout#72 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V539*/ meltfptr[538])) == + ( /*_._VALCLO___V539*/ meltfptr[538])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#72 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V536*/ meltfptr[535])) == + ( /*_._VALROUT___V536*/ meltfptr[535])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V539*/ meltfptr[538])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V536*/ meltfptr[535]); + ((meltclosure_ptr_t) /*_._VALCLO___V539*/ meltfptr[538])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V536*/ meltfptr[535]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V539*/ meltfptr[538]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V539*/ meltfptr[538]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V540*/ meltfptr[539])) == + ( /*_._VALDATA___V540*/ meltfptr[539])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V540*/ + ( /*_._VALDATA___V540*/ meltfptr[539])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V540*/ meltfptr[539]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V540*/ meltfptr[539]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V541*/ meltfptr[540]); + /*_._VALSTR___V541*/ meltfptr[540]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V540*/ meltfptr[539]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V540*/ meltfptr[539]); - melt_dbgtrace_written_object ( /*_.VALDATA___V540*/ meltfptr[539], + melt_dbgtrace_written_object ( /*_._VALDATA___V540*/ meltfptr[539], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:3604:/ initchunk"); @@ -34967,12 +35042,12 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V542*/ meltfptr[541])) + ( /*_._VALROUT___V542*/ meltfptr[541])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_355__OUTPUCOD_OBJEXIT#0", NULL != ( /*_.CLASS_OBJEXIT__V98*/ meltfptr[97])); - ((meltroutine_ptr_t) /*_.VALROUT___V542*/ meltfptr[541])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V542*/ meltfptr[541])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJEXIT__V98*/ meltfptr[97]); MELT_LOCATION ("warmelt-outobj.melt:3604:/ initchunk"); @@ -34981,12 +35056,12 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V542*/ meltfptr[541])) + ( /*_._VALROUT___V542*/ meltfptr[541])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_355__OUTPUCOD_OBJEXIT#1", NULL != ( /*_.CLASS_CLONED_SYMBOL__V13*/ meltfptr[12])); - ((meltroutine_ptr_t) /*_.VALROUT___V542*/ meltfptr[541])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V542*/ meltfptr[541])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_CLONED_SYMBOL__V13*/ meltfptr[12]); MELT_LOCATION ("warmelt-outobj.melt:3604:/ initchunk"); @@ -34994,36 +35069,36 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V542*/ meltfptr[541])) == + ( /*_._VALROUT___V542*/ meltfptr[541])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V259*/ meltfptr[258]); - ((meltroutine_ptr_t) /*_.VALROUT___V542*/ meltfptr[541])->tabval[2] = - (melt_ptr_t) ( /*_.VALCLO___V259*/ meltfptr[258]); + NULL != /*_._VALCLO___V259*/ meltfptr[258]); + ((meltroutine_ptr_t) /*_._VALROUT___V542*/ meltfptr[541])->tabval[2] = + (melt_ptr_t) ( /*_._VALCLO___V259*/ meltfptr[258]); MELT_LOCATION ("warmelt-outobj.melt:3604:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V542*/ meltfptr[541])) == + ( /*_._VALROUT___V542*/ meltfptr[541])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V535*/ meltfptr[534]); - ((meltroutine_ptr_t) /*_.VALROUT___V542*/ meltfptr[541])->tabval[3] = - (melt_ptr_t) ( /*_.VALCLO___V535*/ meltfptr[534]); + NULL != /*_._VALCLO___V535*/ meltfptr[534]); + ((meltroutine_ptr_t) /*_._VALROUT___V542*/ meltfptr[541])->tabval[3] = + (melt_ptr_t) ( /*_._VALCLO___V535*/ meltfptr[534]); MELT_LOCATION ("warmelt-outobj.melt:3604:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V542*/ meltfptr[541])) == + ( /*_._VALROUT___V542*/ meltfptr[541])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALDATA___V192*/ meltfptr[191]); - ((meltroutine_ptr_t) /*_.VALROUT___V542*/ meltfptr[541])->tabval[4] = - (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); + NULL != /*_._VALDATA___V192*/ meltfptr[191]); + ((meltroutine_ptr_t) /*_._VALROUT___V542*/ meltfptr[541])->tabval[4] = + (melt_ptr_t) ( /*_._VALDATA___V192*/ meltfptr[191]); MELT_LOCATION ("warmelt-outobj.melt:3604:/ initchunk"); /*^putroutconst */ @@ -35031,55 +35106,55 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V542*/ meltfptr[541])) + ( /*_._VALROUT___V542*/ meltfptr[541])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_355__OUTPUCOD_OBJEXIT#5", NULL != ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_.VALROUT___V542*/ meltfptr[541])->tabval[5] = + ((meltroutine_ptr_t) /*_._VALROUT___V542*/ meltfptr[541])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:3604:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V542*/ meltfptr[541]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V542*/ meltfptr[541]); /*putclosurout#73 */ melt_assertmsg ("putclosrout#73 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V543*/ meltfptr[542])) == + ( /*_._VALCLO___V543*/ meltfptr[542])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#73 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V542*/ meltfptr[541])) == + ( /*_._VALROUT___V542*/ meltfptr[541])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V543*/ meltfptr[542])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V542*/ meltfptr[541]); + ((meltclosure_ptr_t) /*_._VALCLO___V543*/ meltfptr[542])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V542*/ meltfptr[541]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V543*/ meltfptr[542]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V543*/ meltfptr[542]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V544*/ meltfptr[543])) == + ( /*_._VALDATA___V544*/ meltfptr[543])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V544*/ + ( /*_._VALDATA___V544*/ meltfptr[543])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V544*/ meltfptr[543]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V544*/ meltfptr[543]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V545*/ meltfptr[544]); + /*_._VALSTR___V545*/ meltfptr[544]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V544*/ meltfptr[543]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V544*/ meltfptr[543]); - melt_dbgtrace_written_object ( /*_.VALDATA___V544*/ meltfptr[543], + melt_dbgtrace_written_object ( /*_._VALDATA___V544*/ meltfptr[543], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:3624:/ initchunk"); @@ -35088,12 +35163,12 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V546*/ meltfptr[545])) + ( /*_._VALROUT___V546*/ meltfptr[545])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_359__OUTPUCOD_OBJAGAIN#0", NULL != ( /*_.CLASS_OBJAGAIN__V99*/ meltfptr[98])); - ((meltroutine_ptr_t) /*_.VALROUT___V546*/ meltfptr[545])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V546*/ meltfptr[545])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJAGAIN__V99*/ meltfptr[98]); MELT_LOCATION ("warmelt-outobj.melt:3624:/ initchunk"); @@ -35102,12 +35177,12 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V546*/ meltfptr[545])) + ( /*_._VALROUT___V546*/ meltfptr[545])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_359__OUTPUCOD_OBJAGAIN#1", NULL != ( /*_.CLASS_CLONED_SYMBOL__V13*/ meltfptr[12])); - ((meltroutine_ptr_t) /*_.VALROUT___V546*/ meltfptr[545])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V546*/ meltfptr[545])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_CLONED_SYMBOL__V13*/ meltfptr[12]); MELT_LOCATION ("warmelt-outobj.melt:3624:/ initchunk"); @@ -35115,36 +35190,36 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V546*/ meltfptr[545])) == + ( /*_._VALROUT___V546*/ meltfptr[545])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V259*/ meltfptr[258]); - ((meltroutine_ptr_t) /*_.VALROUT___V546*/ meltfptr[545])->tabval[2] = - (melt_ptr_t) ( /*_.VALCLO___V259*/ meltfptr[258]); + NULL != /*_._VALCLO___V259*/ meltfptr[258]); + ((meltroutine_ptr_t) /*_._VALROUT___V546*/ meltfptr[545])->tabval[2] = + (melt_ptr_t) ( /*_._VALCLO___V259*/ meltfptr[258]); MELT_LOCATION ("warmelt-outobj.melt:3624:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V546*/ meltfptr[545])) == + ( /*_._VALROUT___V546*/ meltfptr[545])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V535*/ meltfptr[534]); - ((meltroutine_ptr_t) /*_.VALROUT___V546*/ meltfptr[545])->tabval[3] = - (melt_ptr_t) ( /*_.VALCLO___V535*/ meltfptr[534]); + NULL != /*_._VALCLO___V535*/ meltfptr[534]); + ((meltroutine_ptr_t) /*_._VALROUT___V546*/ meltfptr[545])->tabval[3] = + (melt_ptr_t) ( /*_._VALCLO___V535*/ meltfptr[534]); MELT_LOCATION ("warmelt-outobj.melt:3624:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V546*/ meltfptr[545])) == + ( /*_._VALROUT___V546*/ meltfptr[545])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALDATA___V192*/ meltfptr[191]); - ((meltroutine_ptr_t) /*_.VALROUT___V546*/ meltfptr[545])->tabval[4] = - (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); + NULL != /*_._VALDATA___V192*/ meltfptr[191]); + ((meltroutine_ptr_t) /*_._VALROUT___V546*/ meltfptr[545])->tabval[4] = + (melt_ptr_t) ( /*_._VALDATA___V192*/ meltfptr[191]); MELT_LOCATION ("warmelt-outobj.melt:3624:/ initchunk"); /*^putroutconst */ @@ -35152,55 +35227,55 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V546*/ meltfptr[545])) + ( /*_._VALROUT___V546*/ meltfptr[545])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_359__OUTPUCOD_OBJAGAIN#5", NULL != ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_.VALROUT___V546*/ meltfptr[545])->tabval[5] = + ((meltroutine_ptr_t) /*_._VALROUT___V546*/ meltfptr[545])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:3624:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V546*/ meltfptr[545]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V546*/ meltfptr[545]); /*putclosurout#74 */ melt_assertmsg ("putclosrout#74 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V547*/ meltfptr[546])) == + ( /*_._VALCLO___V547*/ meltfptr[546])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#74 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V546*/ meltfptr[545])) == + ( /*_._VALROUT___V546*/ meltfptr[545])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V547*/ meltfptr[546])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V546*/ meltfptr[545]); + ((meltclosure_ptr_t) /*_._VALCLO___V547*/ meltfptr[546])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V546*/ meltfptr[545]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V547*/ meltfptr[546]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V547*/ meltfptr[546]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V548*/ meltfptr[547])) == + ( /*_._VALDATA___V548*/ meltfptr[547])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V548*/ + ( /*_._VALDATA___V548*/ meltfptr[547])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V548*/ meltfptr[547]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V548*/ meltfptr[547]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V549*/ meltfptr[548]); + /*_._VALSTR___V549*/ meltfptr[548]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V548*/ meltfptr[547]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V548*/ meltfptr[547]); - melt_dbgtrace_written_object ( /*_.VALDATA___V548*/ meltfptr[547], + melt_dbgtrace_written_object ( /*_._VALDATA___V548*/ meltfptr[547], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:3643:/ initchunk"); @@ -35209,12 +35284,12 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V550*/ meltfptr[549])) + ( /*_._VALROUT___V550*/ meltfptr[549])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_363__OUTPUCOD_OBJCOMPUTE#0", NULL != ( /*_.CLASS_OBJCOMPUTE__V100*/ meltfptr[99])); - ((meltroutine_ptr_t) /*_.VALROUT___V550*/ meltfptr[549])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V550*/ meltfptr[549])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJCOMPUTE__V100*/ meltfptr[99]); MELT_LOCATION ("warmelt-outobj.melt:3643:/ initchunk"); @@ -35223,12 +35298,12 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V550*/ meltfptr[549])) + ( /*_._VALROUT___V550*/ meltfptr[549])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_363__OUTPUCOD_OBJCOMPUTE#1", NULL != ( /*_.DISCR_INTEGER__V53*/ meltfptr[52])); - ((meltroutine_ptr_t) /*_.VALROUT___V550*/ meltfptr[549])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V550*/ meltfptr[549])->tabval[1] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V53*/ meltfptr[52]); MELT_LOCATION ("warmelt-outobj.melt:3643:/ initchunk"); @@ -35236,12 +35311,12 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V550*/ meltfptr[549])) == + ( /*_._VALROUT___V550*/ meltfptr[549])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V259*/ meltfptr[258]); - ((meltroutine_ptr_t) /*_.VALROUT___V550*/ meltfptr[549])->tabval[2] = - (melt_ptr_t) ( /*_.VALCLO___V259*/ meltfptr[258]); + NULL != /*_._VALCLO___V259*/ meltfptr[258]); + ((meltroutine_ptr_t) /*_._VALROUT___V550*/ meltfptr[549])->tabval[2] = + (melt_ptr_t) ( /*_._VALCLO___V259*/ meltfptr[258]); MELT_LOCATION ("warmelt-outobj.melt:3643:/ initchunk"); /*^putroutconst */ @@ -35249,12 +35324,12 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V550*/ meltfptr[549])) + ( /*_._VALROUT___V550*/ meltfptr[549])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_363__OUTPUCOD_OBJCOMPUTE#3", NULL != ( /*_.LIST_EVERY__V57*/ meltfptr[56])); - ((meltroutine_ptr_t) /*_.VALROUT___V550*/ meltfptr[549])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V550*/ meltfptr[549])->tabval[3] = (melt_ptr_t) ( /*_.LIST_EVERY__V57*/ meltfptr[56]); MELT_LOCATION ("warmelt-outobj.melt:3643:/ initchunk"); @@ -35263,12 +35338,12 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V550*/ meltfptr[549])) + ( /*_._VALROUT___V550*/ meltfptr[549])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_363__OUTPUCOD_OBJCOMPUTE#4", NULL != ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20])); - ((meltroutine_ptr_t) /*_.VALROUT___V550*/ meltfptr[549])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V550*/ meltfptr[549])->tabval[4] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]); MELT_LOCATION ("warmelt-outobj.melt:3654:/ initchunk"); @@ -35277,18 +35352,18 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V551*/ meltfptr[550])) + ( /*_._VALROUT___V551*/ meltfptr[550])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_367__LAMBDA_#0", NULL != ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20])); - ((meltroutine_ptr_t) /*_.VALROUT___V551*/ meltfptr[550])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V551*/ meltfptr[550])->tabval[0] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]); MELT_LOCATION ("warmelt-outobj.melt:3654:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V551*/ meltfptr[550]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V551*/ meltfptr[550]); MELT_LOCATION ("warmelt-outobj.melt:3643:/ initchunk"); /*^putroutconst */ @@ -35296,13 +35371,13 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V550*/ meltfptr[549])) + ( /*_._VALROUT___V550*/ meltfptr[549])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_363__OUTPUCOD_OBJCOMPUTE#5", - NULL != ( /*_.VALROUT___V551*/ meltfptr[550])); - ((meltroutine_ptr_t) /*_.VALROUT___V550*/ meltfptr[549])->tabval[5] = - (melt_ptr_t) ( /*_.VALROUT___V551*/ meltfptr[550]); + NULL != ( /*_._VALROUT___V551*/ meltfptr[550])); + ((meltroutine_ptr_t) /*_._VALROUT___V550*/ meltfptr[549])->tabval[5] = + (melt_ptr_t) ( /*_._VALROUT___V551*/ meltfptr[550]); MELT_LOCATION ("warmelt-outobj.melt:3643:/ initchunk"); /*^putroutconst */ @@ -35310,12 +35385,12 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V550*/ meltfptr[549])) + ( /*_._VALROUT___V550*/ meltfptr[549])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_363__OUTPUCOD_OBJCOMPUTE#6", NULL != ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20])); - ((meltroutine_ptr_t) /*_.VALROUT___V550*/ meltfptr[549])->tabval[6] = + ((meltroutine_ptr_t) /*_._VALROUT___V550*/ meltfptr[549])->tabval[6] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]); MELT_LOCATION ("warmelt-outobj.melt:3643:/ initchunk"); @@ -35323,12 +35398,12 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V550*/ meltfptr[549])) == + ( /*_._VALROUT___V550*/ meltfptr[549])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALDATA___V192*/ meltfptr[191]); - ((meltroutine_ptr_t) /*_.VALROUT___V550*/ meltfptr[549])->tabval[7] = - (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); + NULL != /*_._VALDATA___V192*/ meltfptr[191]); + ((meltroutine_ptr_t) /*_._VALROUT___V550*/ meltfptr[549])->tabval[7] = + (melt_ptr_t) ( /*_._VALDATA___V192*/ meltfptr[191]); MELT_LOCATION ("warmelt-outobj.melt:3643:/ initchunk"); /*^putroutconst */ @@ -35336,12 +35411,12 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V550*/ meltfptr[549])) + ( /*_._VALROUT___V550*/ meltfptr[549])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_363__OUTPUCOD_OBJCOMPUTE#8", NULL != ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_.VALROUT___V550*/ meltfptr[549])->tabval[8] = + ((meltroutine_ptr_t) /*_._VALROUT___V550*/ meltfptr[549])->tabval[8] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:3663:/ initchunk"); @@ -35350,12 +35425,12 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V552*/ meltfptr[551])) + ( /*_._VALROUT___V552*/ meltfptr[551])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_368__LAMBDA_#0", NULL != ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20])); - ((meltroutine_ptr_t) /*_.VALROUT___V552*/ meltfptr[551])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V552*/ meltfptr[551])->tabval[0] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]); MELT_LOCATION ("warmelt-outobj.melt:3663:/ initchunk"); @@ -35363,12 +35438,12 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V552*/ meltfptr[551])) == + ( /*_._VALROUT___V552*/ meltfptr[551])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALDATA___V192*/ meltfptr[191]); - ((meltroutine_ptr_t) /*_.VALROUT___V552*/ meltfptr[551])->tabval[1] = - (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); + NULL != /*_._VALDATA___V192*/ meltfptr[191]); + ((meltroutine_ptr_t) /*_._VALROUT___V552*/ meltfptr[551])->tabval[1] = + (melt_ptr_t) ( /*_._VALDATA___V192*/ meltfptr[191]); MELT_LOCATION ("warmelt-outobj.melt:3663:/ initchunk"); /*^putroutconst */ @@ -35376,18 +35451,18 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V552*/ meltfptr[551])) + ( /*_._VALROUT___V552*/ meltfptr[551])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_368__LAMBDA_#2", NULL != ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_.VALROUT___V552*/ meltfptr[551])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V552*/ meltfptr[551])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:3663:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V552*/ meltfptr[551]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V552*/ meltfptr[551]); MELT_LOCATION ("warmelt-outobj.melt:3643:/ initchunk"); /*^putroutconst */ @@ -35395,13 +35470,13 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V550*/ meltfptr[549])) + ( /*_._VALROUT___V550*/ meltfptr[549])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_363__OUTPUCOD_OBJCOMPUTE#9", - NULL != ( /*_.VALROUT___V552*/ meltfptr[551])); - ((meltroutine_ptr_t) /*_.VALROUT___V550*/ meltfptr[549])->tabval[9] = - (melt_ptr_t) ( /*_.VALROUT___V552*/ meltfptr[551]); + NULL != ( /*_._VALROUT___V552*/ meltfptr[551])); + ((meltroutine_ptr_t) /*_._VALROUT___V550*/ meltfptr[549])->tabval[9] = + (melt_ptr_t) ( /*_._VALROUT___V552*/ meltfptr[551]); MELT_LOCATION ("warmelt-outobj.melt:3643:/ initchunk"); /*^putroutconst */ @@ -35409,12 +35484,12 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V550*/ meltfptr[549])) + ( /*_._VALROUT___V550*/ meltfptr[549])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_363__OUTPUCOD_OBJCOMPUTE#10", NULL != ( /*_.MULTIPLE_EVERY__V101*/ meltfptr[100])); - ((meltroutine_ptr_t) /*_.VALROUT___V550*/ meltfptr[549])->tabval[10] = + ((meltroutine_ptr_t) /*_._VALROUT___V550*/ meltfptr[549])->tabval[10] = (melt_ptr_t) ( /*_.MULTIPLE_EVERY__V101*/ meltfptr[100]); MELT_LOCATION ("warmelt-outobj.melt:3643:/ initchunk"); @@ -35423,12 +35498,12 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V550*/ meltfptr[549])) + ( /*_._VALROUT___V550*/ meltfptr[549])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_363__OUTPUCOD_OBJCOMPUTE#11", NULL != ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20])); - ((meltroutine_ptr_t) /*_.VALROUT___V550*/ meltfptr[549])->tabval[11] = + ((meltroutine_ptr_t) /*_._VALROUT___V550*/ meltfptr[549])->tabval[11] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]); MELT_LOCATION ("warmelt-outobj.melt:3643:/ initchunk"); @@ -35436,12 +35511,12 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V550*/ meltfptr[549])) == + ( /*_._VALROUT___V550*/ meltfptr[549])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALDATA___V192*/ meltfptr[191]); - ((meltroutine_ptr_t) /*_.VALROUT___V550*/ meltfptr[549])->tabval[12] = - (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); + NULL != /*_._VALDATA___V192*/ meltfptr[191]); + ((meltroutine_ptr_t) /*_._VALROUT___V550*/ meltfptr[549])->tabval[12] = + (melt_ptr_t) ( /*_._VALDATA___V192*/ meltfptr[191]); MELT_LOCATION ("warmelt-outobj.melt:3643:/ initchunk"); /*^putroutconst */ @@ -35449,12 +35524,12 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V550*/ meltfptr[549])) + ( /*_._VALROUT___V550*/ meltfptr[549])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_363__OUTPUCOD_OBJCOMPUTE#13", NULL != ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_.VALROUT___V550*/ meltfptr[549])->tabval[13] = + ((meltroutine_ptr_t) /*_._VALROUT___V550*/ meltfptr[549])->tabval[13] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:3673:/ initchunk"); @@ -35463,12 +35538,12 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V553*/ meltfptr[552])) + ( /*_._VALROUT___V553*/ meltfptr[552])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_371__LAMBDA_#0", NULL != ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20])); - ((meltroutine_ptr_t) /*_.VALROUT___V553*/ meltfptr[552])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V553*/ meltfptr[552])->tabval[0] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]); MELT_LOCATION ("warmelt-outobj.melt:3673:/ initchunk"); @@ -35476,12 +35551,12 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V553*/ meltfptr[552])) == + ( /*_._VALROUT___V553*/ meltfptr[552])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALDATA___V192*/ meltfptr[191]); - ((meltroutine_ptr_t) /*_.VALROUT___V553*/ meltfptr[552])->tabval[1] = - (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); + NULL != /*_._VALDATA___V192*/ meltfptr[191]); + ((meltroutine_ptr_t) /*_._VALROUT___V553*/ meltfptr[552])->tabval[1] = + (melt_ptr_t) ( /*_._VALDATA___V192*/ meltfptr[191]); MELT_LOCATION ("warmelt-outobj.melt:3673:/ initchunk"); /*^putroutconst */ @@ -35489,18 +35564,18 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V553*/ meltfptr[552])) + ( /*_._VALROUT___V553*/ meltfptr[552])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_371__LAMBDA_#2", NULL != ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_.VALROUT___V553*/ meltfptr[552])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V553*/ meltfptr[552])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:3673:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V553*/ meltfptr[552]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V553*/ meltfptr[552]); MELT_LOCATION ("warmelt-outobj.melt:3643:/ initchunk"); /*^putroutconst */ @@ -35508,13 +35583,13 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V550*/ meltfptr[549])) + ( /*_._VALROUT___V550*/ meltfptr[549])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_363__OUTPUCOD_OBJCOMPUTE#14", - NULL != ( /*_.VALROUT___V553*/ meltfptr[552])); - ((meltroutine_ptr_t) /*_.VALROUT___V550*/ meltfptr[549])->tabval[14] = - (melt_ptr_t) ( /*_.VALROUT___V553*/ meltfptr[552]); + NULL != ( /*_._VALROUT___V553*/ meltfptr[552])); + ((meltroutine_ptr_t) /*_._VALROUT___V550*/ meltfptr[549])->tabval[14] = + (melt_ptr_t) ( /*_._VALROUT___V553*/ meltfptr[552]); MELT_LOCATION ("warmelt-outobj.melt:3643:/ initchunk"); /*^putroutconst */ @@ -35522,12 +35597,12 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V550*/ meltfptr[549])) + ( /*_._VALROUT___V550*/ meltfptr[549])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_363__OUTPUCOD_OBJCOMPUTE#15", NULL != ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20])); - ((meltroutine_ptr_t) /*_.VALROUT___V550*/ meltfptr[549])->tabval[15] = + ((meltroutine_ptr_t) /*_._VALROUT___V550*/ meltfptr[549])->tabval[15] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]); MELT_LOCATION ("warmelt-outobj.melt:3643:/ initchunk"); @@ -35535,12 +35610,12 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V550*/ meltfptr[549])) == + ( /*_._VALROUT___V550*/ meltfptr[549])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALDATA___V192*/ meltfptr[191]); - ((meltroutine_ptr_t) /*_.VALROUT___V550*/ meltfptr[549])->tabval[16] = - (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); + NULL != /*_._VALDATA___V192*/ meltfptr[191]); + ((meltroutine_ptr_t) /*_._VALROUT___V550*/ meltfptr[549])->tabval[16] = + (melt_ptr_t) ( /*_._VALDATA___V192*/ meltfptr[191]); MELT_LOCATION ("warmelt-outobj.melt:3643:/ initchunk"); /*^putroutconst */ @@ -35548,78 +35623,78 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V550*/ meltfptr[549])) + ( /*_._VALROUT___V550*/ meltfptr[549])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_363__OUTPUCOD_OBJCOMPUTE#17", NULL != ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_.VALROUT___V550*/ meltfptr[549])->tabval[17] = + ((meltroutine_ptr_t) /*_._VALROUT___V550*/ meltfptr[549])->tabval[17] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:3643:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V550*/ meltfptr[549]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V550*/ meltfptr[549]); /*putclosurout#75 */ melt_assertmsg ("putclosrout#75 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V554*/ meltfptr[553])) == + ( /*_._VALCLO___V554*/ meltfptr[553])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#75 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V550*/ meltfptr[549])) == + ( /*_._VALROUT___V550*/ meltfptr[549])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V554*/ meltfptr[553])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V550*/ meltfptr[549]); + ((meltclosure_ptr_t) /*_._VALCLO___V554*/ meltfptr[553])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V550*/ meltfptr[549]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V554*/ meltfptr[553]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V554*/ meltfptr[553]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V555*/ meltfptr[554])) == + ( /*_._VALDATA___V555*/ meltfptr[554])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V555*/ + ( /*_._VALDATA___V555*/ meltfptr[554])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V555*/ meltfptr[554]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V555*/ meltfptr[554]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V556*/ meltfptr[555]); + /*_._VALSTR___V556*/ meltfptr[555]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V555*/ meltfptr[554]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V555*/ meltfptr[554]); - melt_dbgtrace_written_object ( /*_.VALDATA___V555*/ meltfptr[554], + melt_dbgtrace_written_object ( /*_._VALDATA___V555*/ meltfptr[554], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V557*/ meltfptr[556])) == + ( /*_._VALDATA___V557*/ meltfptr[556])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V557*/ + ( /*_._VALDATA___V557*/ meltfptr[556])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V557*/ meltfptr[556]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V557*/ meltfptr[556]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V558*/ meltfptr[557]); + /*_._VALSTR___V558*/ meltfptr[557]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V557*/ meltfptr[556]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V557*/ meltfptr[556]); - melt_dbgtrace_written_object ( /*_.VALDATA___V557*/ meltfptr[556], + melt_dbgtrace_written_object ( /*_._VALDATA___V557*/ meltfptr[556], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:3689:/ initchunk"); @@ -35628,12 +35703,12 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V559*/ meltfptr[558])) + ( /*_._VALROUT___V559*/ meltfptr[558])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_372__OUTPUCOD_OBJCOND#0", NULL != ( /*_.CLASS_OBJCOND__V102*/ meltfptr[101])); - ((meltroutine_ptr_t) /*_.VALROUT___V559*/ meltfptr[558])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V559*/ meltfptr[558])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJCOND__V102*/ meltfptr[101]); MELT_LOCATION ("warmelt-outobj.melt:3689:/ initchunk"); @@ -35641,12 +35716,12 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V559*/ meltfptr[558])) == + ( /*_._VALROUT___V559*/ meltfptr[558])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V259*/ meltfptr[258]); - ((meltroutine_ptr_t) /*_.VALROUT___V559*/ meltfptr[558])->tabval[1] = - (melt_ptr_t) ( /*_.VALCLO___V259*/ meltfptr[258]); + NULL != /*_._VALCLO___V259*/ meltfptr[258]); + ((meltroutine_ptr_t) /*_._VALROUT___V559*/ meltfptr[558])->tabval[1] = + (melt_ptr_t) ( /*_._VALCLO___V259*/ meltfptr[258]); MELT_LOCATION ("warmelt-outobj.melt:3689:/ initchunk"); /*^putroutconst */ @@ -35654,12 +35729,12 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V559*/ meltfptr[558])) + ( /*_._VALROUT___V559*/ meltfptr[558])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_372__OUTPUCOD_OBJCOND#2", NULL != ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20])); - ((meltroutine_ptr_t) /*_.VALROUT___V559*/ meltfptr[558])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V559*/ meltfptr[558])->tabval[2] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]); MELT_LOCATION ("warmelt-outobj.melt:3689:/ initchunk"); @@ -35668,12 +35743,12 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V559*/ meltfptr[558])) + ( /*_._VALROUT___V559*/ meltfptr[558])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_372__OUTPUCOD_OBJCOND#3", NULL != ( /*_.CLASS_OBJPUREVALUE__V64*/ meltfptr[63])); - ((meltroutine_ptr_t) /*_.VALROUT___V559*/ meltfptr[558])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V559*/ meltfptr[558])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_OBJPUREVALUE__V64*/ meltfptr[63]); MELT_LOCATION ("warmelt-outobj.melt:3689:/ initchunk"); @@ -35681,12 +35756,12 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V559*/ meltfptr[558])) == + ( /*_._VALROUT___V559*/ meltfptr[558])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALDATA___V192*/ meltfptr[191]); - ((meltroutine_ptr_t) /*_.VALROUT___V559*/ meltfptr[558])->tabval[4] = - (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); + NULL != /*_._VALDATA___V192*/ meltfptr[191]); + ((meltroutine_ptr_t) /*_._VALROUT___V559*/ meltfptr[558])->tabval[4] = + (melt_ptr_t) ( /*_._VALDATA___V192*/ meltfptr[191]); MELT_LOCATION ("warmelt-outobj.melt:3689:/ initchunk"); /*^putroutconst */ @@ -35694,68 +35769,68 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V559*/ meltfptr[558])) + ( /*_._VALROUT___V559*/ meltfptr[558])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_372__OUTPUCOD_OBJCOND#5", NULL != ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_.VALROUT___V559*/ meltfptr[558])->tabval[5] = + ((meltroutine_ptr_t) /*_._VALROUT___V559*/ meltfptr[558])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:3689:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V559*/ meltfptr[558]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V559*/ meltfptr[558]); /*putclosurout#76 */ melt_assertmsg ("putclosrout#76 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V560*/ meltfptr[559])) == + ( /*_._VALCLO___V560*/ meltfptr[559])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#76 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V559*/ meltfptr[558])) == + ( /*_._VALROUT___V559*/ meltfptr[558])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V560*/ meltfptr[559])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V559*/ meltfptr[558]); + ((meltclosure_ptr_t) /*_._VALCLO___V560*/ meltfptr[559])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V559*/ meltfptr[558]); #undef meltfram__ -} /*end of meltmod__warmelt_outobj__initialmeltchunk_7 */ +} /*end of meltmod__WARMELTmiOUTOBJ__initialmeltchunk_7 */ void -meltmod__warmelt_outobj__initialmeltchunk_8 (meltinitial_frame_t * - meltmeltframptr__, - char meltpredefinited[]) +meltmod__WARMELTmiOUTOBJ__initialmeltchunk_8 (meltinitial_frame_t * + meltmeltframptr__, + char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L (void) meltpredefinited; -/*touch:DATACLOSURE_*/ - meltgc_touch ( /*_.VALCLO___V560*/ meltfptr[559]); +/*touch:_DATACLOSURE_*/ + meltgc_touch ( /*_._VALCLO___V560*/ meltfptr[559]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V561*/ meltfptr[560])) == + ( /*_._VALDATA___V561*/ meltfptr[560])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V561*/ + ( /*_._VALDATA___V561*/ meltfptr[560])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V561*/ meltfptr[560]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V561*/ meltfptr[560]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V562*/ meltfptr[561]); + /*_._VALSTR___V562*/ meltfptr[561]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V561*/ meltfptr[560]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V561*/ meltfptr[560]); - melt_dbgtrace_written_object ( /*_.VALDATA___V561*/ meltfptr[560], + melt_dbgtrace_written_object ( /*_._VALDATA___V561*/ meltfptr[560], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:3731:/ initchunk"); @@ -35764,12 +35839,12 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V563*/ meltfptr[562])) + ( /*_._VALROUT___V563*/ meltfptr[562])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_376__OUTPUCOD_OBJCPPIF#0", NULL != ( /*_.CLASS_OBJCPPIF__V103*/ meltfptr[102])); - ((meltroutine_ptr_t) /*_.VALROUT___V563*/ meltfptr[562])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V563*/ meltfptr[562])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJCPPIF__V103*/ meltfptr[102]); MELT_LOCATION ("warmelt-outobj.melt:3731:/ initchunk"); @@ -35777,24 +35852,24 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V563*/ meltfptr[562])) == + ( /*_._VALROUT___V563*/ meltfptr[562])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V263*/ meltfptr[262]); - ((meltroutine_ptr_t) /*_.VALROUT___V563*/ meltfptr[562])->tabval[1] = - (melt_ptr_t) ( /*_.VALCLO___V263*/ meltfptr[262]); + NULL != /*_._VALCLO___V263*/ meltfptr[262]); + ((meltroutine_ptr_t) /*_._VALROUT___V563*/ meltfptr[562])->tabval[1] = + (melt_ptr_t) ( /*_._VALCLO___V263*/ meltfptr[262]); MELT_LOCATION ("warmelt-outobj.melt:3731:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V563*/ meltfptr[562])) == + ( /*_._VALROUT___V563*/ meltfptr[562])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V259*/ meltfptr[258]); - ((meltroutine_ptr_t) /*_.VALROUT___V563*/ meltfptr[562])->tabval[2] = - (melt_ptr_t) ( /*_.VALCLO___V259*/ meltfptr[258]); + NULL != /*_._VALCLO___V259*/ meltfptr[258]); + ((meltroutine_ptr_t) /*_._VALROUT___V563*/ meltfptr[562])->tabval[2] = + (melt_ptr_t) ( /*_._VALCLO___V259*/ meltfptr[258]); MELT_LOCATION ("warmelt-outobj.melt:3731:/ initchunk"); /*^putroutconst */ @@ -35802,12 +35877,12 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V563*/ meltfptr[562])) + ( /*_._VALROUT___V563*/ meltfptr[562])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_376__OUTPUCOD_OBJCPPIF#3", NULL != ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20])); - ((meltroutine_ptr_t) /*_.VALROUT___V563*/ meltfptr[562])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V563*/ meltfptr[562])->tabval[3] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]); MELT_LOCATION ("warmelt-outobj.melt:3731:/ initchunk"); @@ -35815,12 +35890,12 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V563*/ meltfptr[562])) == + ( /*_._VALROUT___V563*/ meltfptr[562])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALDATA___V192*/ meltfptr[191]); - ((meltroutine_ptr_t) /*_.VALROUT___V563*/ meltfptr[562])->tabval[4] = - (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); + NULL != /*_._VALDATA___V192*/ meltfptr[191]); + ((meltroutine_ptr_t) /*_._VALROUT___V563*/ meltfptr[562])->tabval[4] = + (melt_ptr_t) ( /*_._VALDATA___V192*/ meltfptr[191]); MELT_LOCATION ("warmelt-outobj.melt:3731:/ initchunk"); /*^putroutconst */ @@ -35828,55 +35903,55 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V563*/ meltfptr[562])) + ( /*_._VALROUT___V563*/ meltfptr[562])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_376__OUTPUCOD_OBJCPPIF#5", NULL != ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_.VALROUT___V563*/ meltfptr[562])->tabval[5] = + ((meltroutine_ptr_t) /*_._VALROUT___V563*/ meltfptr[562])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:3731:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V563*/ meltfptr[562]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V563*/ meltfptr[562]); /*putclosurout#77 */ melt_assertmsg ("putclosrout#77 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V564*/ meltfptr[563])) == + ( /*_._VALCLO___V564*/ meltfptr[563])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#77 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V563*/ meltfptr[562])) == + ( /*_._VALROUT___V563*/ meltfptr[562])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V564*/ meltfptr[563])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V563*/ meltfptr[562]); + ((meltclosure_ptr_t) /*_._VALCLO___V564*/ meltfptr[563])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V563*/ meltfptr[562]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V564*/ meltfptr[563]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V564*/ meltfptr[563]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V565*/ meltfptr[564])) == + ( /*_._VALDATA___V565*/ meltfptr[564])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V565*/ + ( /*_._VALDATA___V565*/ meltfptr[564])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V565*/ meltfptr[564]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V565*/ meltfptr[564]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V566*/ meltfptr[565]); + /*_._VALSTR___V566*/ meltfptr[565]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V565*/ meltfptr[564]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V565*/ meltfptr[564]); - melt_dbgtrace_written_object ( /*_.VALDATA___V565*/ meltfptr[564], + melt_dbgtrace_written_object ( /*_._VALDATA___V565*/ meltfptr[564], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:3764:/ initchunk"); @@ -35885,13 +35960,13 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V567*/ meltfptr[566])) + ( /*_._VALROUT___V567*/ meltfptr[566])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_380__OUTPUCOD_OBJINTERNSYMBOL#0", NULL != ( /*_.CLASS_OBJINTERNSYMBOL__V104*/ meltfptr[103])); - ((meltroutine_ptr_t) /*_.VALROUT___V567*/ meltfptr[566])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V567*/ meltfptr[566])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJINTERNSYMBOL__V104*/ meltfptr[103]); MELT_LOCATION ("warmelt-outobj.melt:3764:/ initchunk"); @@ -35900,13 +35975,13 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V567*/ meltfptr[566])) + ( /*_._VALROUT___V567*/ meltfptr[566])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_380__OUTPUCOD_OBJINTERNSYMBOL#1", NULL != ( /*_.CLASS_OBJINITOBJECT__V33*/ meltfptr[32])); - ((meltroutine_ptr_t) /*_.VALROUT___V567*/ meltfptr[566])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V567*/ meltfptr[566])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_OBJINITOBJECT__V33*/ meltfptr[32]); MELT_LOCATION ("warmelt-outobj.melt:3764:/ initchunk"); @@ -35915,13 +35990,13 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V567*/ meltfptr[566])) + ( /*_._VALROUT___V567*/ meltfptr[566])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_380__OUTPUCOD_OBJINTERNSYMBOL#2", NULL != ( /*_.CLASS_NREP_DATASYMBOL__V105*/ meltfptr[104])); - ((meltroutine_ptr_t) /*_.VALROUT___V567*/ meltfptr[566])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V567*/ meltfptr[566])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NREP_DATASYMBOL__V105*/ meltfptr[104]); MELT_LOCATION ("warmelt-outobj.melt:3764:/ initchunk"); @@ -35929,12 +36004,12 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V567*/ meltfptr[566])) == + ( /*_._VALROUT___V567*/ meltfptr[566])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V259*/ meltfptr[258]); - ((meltroutine_ptr_t) /*_.VALROUT___V567*/ meltfptr[566])->tabval[3] = - (melt_ptr_t) ( /*_.VALCLO___V259*/ meltfptr[258]); + NULL != /*_._VALCLO___V259*/ meltfptr[258]); + ((meltroutine_ptr_t) /*_._VALROUT___V567*/ meltfptr[566])->tabval[3] = + (melt_ptr_t) ( /*_._VALCLO___V259*/ meltfptr[258]); MELT_LOCATION ("warmelt-outobj.melt:3764:/ initchunk"); /*^putroutconst */ @@ -35942,13 +36017,13 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V567*/ meltfptr[566])) + ( /*_._VALROUT___V567*/ meltfptr[566])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_380__OUTPUCOD_OBJINTERNSYMBOL#4", NULL != ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20])); - ((meltroutine_ptr_t) /*_.VALROUT___V567*/ meltfptr[566])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V567*/ meltfptr[566])->tabval[4] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]); MELT_LOCATION ("warmelt-outobj.melt:3764:/ initchunk"); @@ -35956,12 +36031,12 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V567*/ meltfptr[566])) == + ( /*_._VALROUT___V567*/ meltfptr[566])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALDATA___V192*/ meltfptr[191]); - ((meltroutine_ptr_t) /*_.VALROUT___V567*/ meltfptr[566])->tabval[5] = - (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); + NULL != /*_._VALDATA___V192*/ meltfptr[191]); + ((meltroutine_ptr_t) /*_._VALROUT___V567*/ meltfptr[566])->tabval[5] = + (melt_ptr_t) ( /*_._VALDATA___V192*/ meltfptr[191]); MELT_LOCATION ("warmelt-outobj.melt:3764:/ initchunk"); /*^putroutconst */ @@ -35969,79 +36044,79 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V567*/ meltfptr[566])) + ( /*_._VALROUT___V567*/ meltfptr[566])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_380__OUTPUCOD_OBJINTERNSYMBOL#6", NULL != ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_.VALROUT___V567*/ meltfptr[566])->tabval[6] = + ((meltroutine_ptr_t) /*_._VALROUT___V567*/ meltfptr[566])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:3764:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V567*/ meltfptr[566]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V567*/ meltfptr[566]); /*putclosurout#78 */ melt_assertmsg ("putclosrout#78 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V568*/ meltfptr[567])) == + ( /*_._VALCLO___V568*/ meltfptr[567])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#78 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V567*/ meltfptr[566])) == + ( /*_._VALROUT___V567*/ meltfptr[566])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V568*/ meltfptr[567])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V567*/ meltfptr[566]); + ((meltclosure_ptr_t) /*_._VALCLO___V568*/ meltfptr[567])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V567*/ meltfptr[566]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V568*/ meltfptr[567]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V568*/ meltfptr[567]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V569*/ meltfptr[568])) == + ( /*_._VALDATA___V569*/ meltfptr[568])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V569*/ + ( /*_._VALDATA___V569*/ meltfptr[568])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V569*/ meltfptr[568]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V569*/ meltfptr[568]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V570*/ meltfptr[569]); + /*_._VALSTR___V570*/ meltfptr[569]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V569*/ meltfptr[568]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V569*/ meltfptr[568]); - melt_dbgtrace_written_object ( /*_.VALDATA___V569*/ meltfptr[568], + melt_dbgtrace_written_object ( /*_._VALDATA___V569*/ meltfptr[568], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V571*/ meltfptr[570])) == + ( /*_._VALDATA___V571*/ meltfptr[570])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V571*/ + ( /*_._VALDATA___V571*/ meltfptr[570])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V571*/ meltfptr[570]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V571*/ meltfptr[570]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V572*/ meltfptr[571]); + /*_._VALSTR___V572*/ meltfptr[571]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V571*/ meltfptr[570]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V571*/ meltfptr[570]); - melt_dbgtrace_written_object ( /*_.VALDATA___V571*/ meltfptr[570], + melt_dbgtrace_written_object ( /*_._VALDATA___V571*/ meltfptr[570], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:3789:/ initchunk"); @@ -36050,13 +36125,13 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V573*/ meltfptr[572])) + ( /*_._VALROUT___V573*/ meltfptr[572])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_386__OUTPUCOD_OBJINTERNKEYWORD#0", NULL != ( /*_.CLASS_OBJINTERNKEYWORD__V106*/ meltfptr[105])); - ((meltroutine_ptr_t) /*_.VALROUT___V573*/ meltfptr[572])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V573*/ meltfptr[572])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJINTERNKEYWORD__V106*/ meltfptr[105]); MELT_LOCATION ("warmelt-outobj.melt:3789:/ initchunk"); @@ -36065,13 +36140,13 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V573*/ meltfptr[572])) + ( /*_._VALROUT___V573*/ meltfptr[572])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_386__OUTPUCOD_OBJINTERNKEYWORD#1", NULL != ( /*_.CLASS_NREP_DATAKEYWORD__V107*/ meltfptr[106])); - ((meltroutine_ptr_t) /*_.VALROUT___V573*/ meltfptr[572])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V573*/ meltfptr[572])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_NREP_DATAKEYWORD__V107*/ meltfptr[106]); MELT_LOCATION ("warmelt-outobj.melt:3789:/ initchunk"); @@ -36079,12 +36154,12 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V573*/ meltfptr[572])) == + ( /*_._VALROUT___V573*/ meltfptr[572])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V259*/ meltfptr[258]); - ((meltroutine_ptr_t) /*_.VALROUT___V573*/ meltfptr[572])->tabval[2] = - (melt_ptr_t) ( /*_.VALCLO___V259*/ meltfptr[258]); + NULL != /*_._VALCLO___V259*/ meltfptr[258]); + ((meltroutine_ptr_t) /*_._VALROUT___V573*/ meltfptr[572])->tabval[2] = + (melt_ptr_t) ( /*_._VALCLO___V259*/ meltfptr[258]); MELT_LOCATION ("warmelt-outobj.melt:3789:/ initchunk"); /*^putroutconst */ @@ -36092,13 +36167,13 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V573*/ meltfptr[572])) + ( /*_._VALROUT___V573*/ meltfptr[572])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_386__OUTPUCOD_OBJINTERNKEYWORD#3", NULL != ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20])); - ((meltroutine_ptr_t) /*_.VALROUT___V573*/ meltfptr[572])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V573*/ meltfptr[572])->tabval[3] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]); MELT_LOCATION ("warmelt-outobj.melt:3789:/ initchunk"); @@ -36106,12 +36181,12 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V573*/ meltfptr[572])) == + ( /*_._VALROUT___V573*/ meltfptr[572])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALDATA___V192*/ meltfptr[191]); - ((meltroutine_ptr_t) /*_.VALROUT___V573*/ meltfptr[572])->tabval[4] = - (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); + NULL != /*_._VALDATA___V192*/ meltfptr[191]); + ((meltroutine_ptr_t) /*_._VALROUT___V573*/ meltfptr[572])->tabval[4] = + (melt_ptr_t) ( /*_._VALDATA___V192*/ meltfptr[191]); MELT_LOCATION ("warmelt-outobj.melt:3789:/ initchunk"); /*^putroutconst */ @@ -36119,79 +36194,79 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V573*/ meltfptr[572])) + ( /*_._VALROUT___V573*/ meltfptr[572])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_386__OUTPUCOD_OBJINTERNKEYWORD#5", NULL != ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_.VALROUT___V573*/ meltfptr[572])->tabval[5] = + ((meltroutine_ptr_t) /*_._VALROUT___V573*/ meltfptr[572])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:3789:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V573*/ meltfptr[572]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V573*/ meltfptr[572]); /*putclosurout#79 */ melt_assertmsg ("putclosrout#79 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V574*/ meltfptr[573])) == + ( /*_._VALCLO___V574*/ meltfptr[573])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#79 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V573*/ meltfptr[572])) == + ( /*_._VALROUT___V573*/ meltfptr[572])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V574*/ meltfptr[573])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V573*/ meltfptr[572]); + ((meltclosure_ptr_t) /*_._VALCLO___V574*/ meltfptr[573])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V573*/ meltfptr[572]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V574*/ meltfptr[573]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V574*/ meltfptr[573]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V575*/ meltfptr[574])) == + ( /*_._VALDATA___V575*/ meltfptr[574])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V575*/ + ( /*_._VALDATA___V575*/ meltfptr[574])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V575*/ meltfptr[574]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V575*/ meltfptr[574]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V576*/ meltfptr[575]); + /*_._VALSTR___V576*/ meltfptr[575]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V575*/ meltfptr[574]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V575*/ meltfptr[574]); - melt_dbgtrace_written_object ( /*_.VALDATA___V575*/ meltfptr[574], + melt_dbgtrace_written_object ( /*_._VALDATA___V575*/ meltfptr[574], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V577*/ meltfptr[576])) == + ( /*_._VALDATA___V577*/ meltfptr[576])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V577*/ + ( /*_._VALDATA___V577*/ meltfptr[576])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V577*/ meltfptr[576]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V577*/ meltfptr[576]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V578*/ meltfptr[577]); + /*_._VALSTR___V578*/ meltfptr[577]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V577*/ meltfptr[576]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V577*/ meltfptr[576]); - melt_dbgtrace_written_object ( /*_.VALDATA___V577*/ meltfptr[576], + melt_dbgtrace_written_object ( /*_._VALDATA___V577*/ meltfptr[576], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:3813:/ initchunk"); @@ -36200,13 +36275,13 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V579*/ meltfptr[578])) + ( /*_._VALROUT___V579*/ meltfptr[578])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_392__OUTPUCOD_OBJGETNAMEDSYMBOL#0", NULL != ( /*_.CLASS_OBJGETNAMEDSYMBOL__V108*/ meltfptr[107])); - ((meltroutine_ptr_t) /*_.VALROUT___V579*/ meltfptr[578])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V579*/ meltfptr[578])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJGETNAMEDSYMBOL__V108*/ meltfptr[107]); MELT_LOCATION ("warmelt-outobj.melt:3813:/ initchunk"); @@ -36215,13 +36290,13 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V579*/ meltfptr[578])) + ( /*_._VALROUT___V579*/ meltfptr[578])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_392__OUTPUCOD_OBJGETNAMEDSYMBOL#1", NULL != ( /*_.CLASS_OBJINITOBJECT__V33*/ meltfptr[32])); - ((meltroutine_ptr_t) /*_.VALROUT___V579*/ meltfptr[578])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V579*/ meltfptr[578])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_OBJINITOBJECT__V33*/ meltfptr[32]); MELT_LOCATION ("warmelt-outobj.melt:3813:/ initchunk"); @@ -36230,13 +36305,13 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V579*/ meltfptr[578])) + ( /*_._VALROUT___V579*/ meltfptr[578])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_392__OUTPUCOD_OBJGETNAMEDSYMBOL#2", NULL != ( /*_.CLASS_NREP_DATASYMBOL__V105*/ meltfptr[104])); - ((meltroutine_ptr_t) /*_.VALROUT___V579*/ meltfptr[578])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V579*/ meltfptr[578])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NREP_DATASYMBOL__V105*/ meltfptr[104]); MELT_LOCATION ("warmelt-outobj.melt:3813:/ initchunk"); @@ -36244,12 +36319,12 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V579*/ meltfptr[578])) == + ( /*_._VALROUT___V579*/ meltfptr[578])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V259*/ meltfptr[258]); - ((meltroutine_ptr_t) /*_.VALROUT___V579*/ meltfptr[578])->tabval[3] = - (melt_ptr_t) ( /*_.VALCLO___V259*/ meltfptr[258]); + NULL != /*_._VALCLO___V259*/ meltfptr[258]); + ((meltroutine_ptr_t) /*_._VALROUT___V579*/ meltfptr[578])->tabval[3] = + (melt_ptr_t) ( /*_._VALCLO___V259*/ meltfptr[258]); MELT_LOCATION ("warmelt-outobj.melt:3813:/ initchunk"); /*^putroutconst */ @@ -36257,13 +36332,13 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V579*/ meltfptr[578])) + ( /*_._VALROUT___V579*/ meltfptr[578])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_392__OUTPUCOD_OBJGETNAMEDSYMBOL#4", NULL != ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20])); - ((meltroutine_ptr_t) /*_.VALROUT___V579*/ meltfptr[578])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V579*/ meltfptr[578])->tabval[4] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]); MELT_LOCATION ("warmelt-outobj.melt:3813:/ initchunk"); @@ -36272,13 +36347,13 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V579*/ meltfptr[578])) + ( /*_._VALROUT___V579*/ meltfptr[578])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_392__OUTPUCOD_OBJGETNAMEDSYMBOL#5", NULL != ( /*_.ADD2OUT__V15*/ meltfptr[14])); - ((meltroutine_ptr_t) /*_.VALROUT___V579*/ meltfptr[578])->tabval[5] = + ((meltroutine_ptr_t) /*_._VALROUT___V579*/ meltfptr[578])->tabval[5] = (melt_ptr_t) ( /*_.ADD2OUT__V15*/ meltfptr[14]); MELT_LOCATION ("warmelt-outobj.melt:3813:/ initchunk"); @@ -36286,12 +36361,12 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V579*/ meltfptr[578])) == + ( /*_._VALROUT___V579*/ meltfptr[578])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALDATA___V192*/ meltfptr[191]); - ((meltroutine_ptr_t) /*_.VALROUT___V579*/ meltfptr[578])->tabval[6] = - (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); + NULL != /*_._VALDATA___V192*/ meltfptr[191]); + ((meltroutine_ptr_t) /*_._VALROUT___V579*/ meltfptr[578])->tabval[6] = + (melt_ptr_t) ( /*_._VALDATA___V192*/ meltfptr[191]); MELT_LOCATION ("warmelt-outobj.melt:3813:/ initchunk"); /*^putroutconst */ @@ -36299,56 +36374,56 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V579*/ meltfptr[578])) + ( /*_._VALROUT___V579*/ meltfptr[578])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_392__OUTPUCOD_OBJGETNAMEDSYMBOL#7", NULL != ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_.VALROUT___V579*/ meltfptr[578])->tabval[7] = + ((meltroutine_ptr_t) /*_._VALROUT___V579*/ meltfptr[578])->tabval[7] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:3813:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V579*/ meltfptr[578]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V579*/ meltfptr[578]); /*putclosurout#80 */ melt_assertmsg ("putclosrout#80 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V580*/ meltfptr[579])) == + ( /*_._VALCLO___V580*/ meltfptr[579])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#80 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V579*/ meltfptr[578])) == + ( /*_._VALROUT___V579*/ meltfptr[578])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V580*/ meltfptr[579])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V579*/ meltfptr[578]); + ((meltclosure_ptr_t) /*_._VALCLO___V580*/ meltfptr[579])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V579*/ meltfptr[578]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V580*/ meltfptr[579]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V580*/ meltfptr[579]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V581*/ meltfptr[580])) == + ( /*_._VALDATA___V581*/ meltfptr[580])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V581*/ + ( /*_._VALDATA___V581*/ meltfptr[580])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V581*/ meltfptr[580]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V581*/ meltfptr[580]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V582*/ meltfptr[581]); + /*_._VALSTR___V582*/ meltfptr[581]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V581*/ meltfptr[580]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V581*/ meltfptr[580]); - melt_dbgtrace_written_object ( /*_.VALDATA___V581*/ meltfptr[580], + melt_dbgtrace_written_object ( /*_._VALDATA___V581*/ meltfptr[580], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:3864:/ initchunk"); @@ -36357,13 +36432,13 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V583*/ meltfptr[582])) + ( /*_._VALROUT___V583*/ meltfptr[582])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_396__OUTPUCOD_OBJGETNAMEDKEYWORD#0", NULL != ( /*_.CLASS_OBJGETNAMEDKEYWORD__V109*/ meltfptr[108])); - ((meltroutine_ptr_t) /*_.VALROUT___V583*/ meltfptr[582])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V583*/ meltfptr[582])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJGETNAMEDKEYWORD__V109*/ meltfptr[108]); MELT_LOCATION ("warmelt-outobj.melt:3864:/ initchunk"); @@ -36372,13 +36447,13 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V583*/ meltfptr[582])) + ( /*_._VALROUT___V583*/ meltfptr[582])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_396__OUTPUCOD_OBJGETNAMEDKEYWORD#1", NULL != ( /*_.CLASS_OBJINITOBJECT__V33*/ meltfptr[32])); - ((meltroutine_ptr_t) /*_.VALROUT___V583*/ meltfptr[582])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V583*/ meltfptr[582])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_OBJINITOBJECT__V33*/ meltfptr[32]); MELT_LOCATION ("warmelt-outobj.melt:3864:/ initchunk"); @@ -36387,13 +36462,13 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V583*/ meltfptr[582])) + ( /*_._VALROUT___V583*/ meltfptr[582])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_396__OUTPUCOD_OBJGETNAMEDKEYWORD#2", NULL != ( /*_.CLASS_NREP_DATAKEYWORD__V107*/ meltfptr[106])); - ((meltroutine_ptr_t) /*_.VALROUT___V583*/ meltfptr[582])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V583*/ meltfptr[582])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NREP_DATAKEYWORD__V107*/ meltfptr[106]); MELT_LOCATION ("warmelt-outobj.melt:3864:/ initchunk"); @@ -36401,12 +36476,12 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V583*/ meltfptr[582])) == + ( /*_._VALROUT___V583*/ meltfptr[582])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V259*/ meltfptr[258]); - ((meltroutine_ptr_t) /*_.VALROUT___V583*/ meltfptr[582])->tabval[3] = - (melt_ptr_t) ( /*_.VALCLO___V259*/ meltfptr[258]); + NULL != /*_._VALCLO___V259*/ meltfptr[258]); + ((meltroutine_ptr_t) /*_._VALROUT___V583*/ meltfptr[582])->tabval[3] = + (melt_ptr_t) ( /*_._VALCLO___V259*/ meltfptr[258]); MELT_LOCATION ("warmelt-outobj.melt:3864:/ initchunk"); /*^putroutconst */ @@ -36414,13 +36489,13 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V583*/ meltfptr[582])) + ( /*_._VALROUT___V583*/ meltfptr[582])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_396__OUTPUCOD_OBJGETNAMEDKEYWORD#4", NULL != ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20])); - ((meltroutine_ptr_t) /*_.VALROUT___V583*/ meltfptr[582])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V583*/ meltfptr[582])->tabval[4] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]); MELT_LOCATION ("warmelt-outobj.melt:3864:/ initchunk"); @@ -36428,12 +36503,12 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V583*/ meltfptr[582])) == + ( /*_._VALROUT___V583*/ meltfptr[582])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALDATA___V192*/ meltfptr[191]); - ((meltroutine_ptr_t) /*_.VALROUT___V583*/ meltfptr[582])->tabval[5] = - (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); + NULL != /*_._VALDATA___V192*/ meltfptr[191]); + ((meltroutine_ptr_t) /*_._VALROUT___V583*/ meltfptr[582])->tabval[5] = + (melt_ptr_t) ( /*_._VALDATA___V192*/ meltfptr[191]); MELT_LOCATION ("warmelt-outobj.melt:3864:/ initchunk"); /*^putroutconst */ @@ -36441,56 +36516,56 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V583*/ meltfptr[582])) + ( /*_._VALROUT___V583*/ meltfptr[582])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_396__OUTPUCOD_OBJGETNAMEDKEYWORD#6", NULL != ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_.VALROUT___V583*/ meltfptr[582])->tabval[6] = + ((meltroutine_ptr_t) /*_._VALROUT___V583*/ meltfptr[582])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:3864:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V583*/ meltfptr[582]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V583*/ meltfptr[582]); /*putclosurout#81 */ melt_assertmsg ("putclosrout#81 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V584*/ meltfptr[583])) == + ( /*_._VALCLO___V584*/ meltfptr[583])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#81 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V583*/ meltfptr[582])) == + ( /*_._VALROUT___V583*/ meltfptr[582])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V584*/ meltfptr[583])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V583*/ meltfptr[582]); + ((meltclosure_ptr_t) /*_._VALCLO___V584*/ meltfptr[583])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V583*/ meltfptr[582]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V584*/ meltfptr[583]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V584*/ meltfptr[583]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V585*/ meltfptr[584])) == + ( /*_._VALDATA___V585*/ meltfptr[584])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V585*/ + ( /*_._VALDATA___V585*/ meltfptr[584])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V585*/ meltfptr[584]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V585*/ meltfptr[584]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V586*/ meltfptr[585]); + /*_._VALSTR___V586*/ meltfptr[585]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V585*/ meltfptr[584]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V585*/ meltfptr[584]); - melt_dbgtrace_written_object ( /*_.VALDATA___V585*/ meltfptr[584], + melt_dbgtrace_written_object ( /*_._VALDATA___V585*/ meltfptr[584], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:3900:/ initchunk"); @@ -36499,12 +36574,12 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V587*/ meltfptr[586])) + ( /*_._VALROUT___V587*/ meltfptr[586])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_400__OUTPUCOD_OBJAPPLY#0", NULL != ( /*_.CLASS_OBJAPPLY__V110*/ meltfptr[109])); - ((meltroutine_ptr_t) /*_.VALROUT___V587*/ meltfptr[586])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V587*/ meltfptr[586])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJAPPLY__V110*/ meltfptr[109]); MELT_LOCATION ("warmelt-outobj.melt:3900:/ initchunk"); @@ -36513,12 +36588,12 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V587*/ meltfptr[586])) + ( /*_._VALROUT___V587*/ meltfptr[586])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_400__OUTPUCOD_OBJAPPLY#1", NULL != ( /*_.DISCR_LIST__V66*/ meltfptr[65])); - ((meltroutine_ptr_t) /*_.VALROUT___V587*/ meltfptr[586])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V587*/ meltfptr[586])->tabval[1] = (melt_ptr_t) ( /*_.DISCR_LIST__V66*/ meltfptr[65]); MELT_LOCATION ("warmelt-outobj.melt:3900:/ initchunk"); @@ -36527,12 +36602,12 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V587*/ meltfptr[586])) + ( /*_._VALROUT___V587*/ meltfptr[586])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_400__OUTPUCOD_OBJAPPLY#2", NULL != ( /*_.DISCR_INTEGER__V53*/ meltfptr[52])); - ((meltroutine_ptr_t) /*_.VALROUT___V587*/ meltfptr[586])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V587*/ meltfptr[586])->tabval[2] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V53*/ meltfptr[52]); MELT_LOCATION ("warmelt-outobj.melt:3900:/ initchunk"); @@ -36540,12 +36615,12 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V587*/ meltfptr[586])) == + ( /*_._VALROUT___V587*/ meltfptr[586])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V259*/ meltfptr[258]); - ((meltroutine_ptr_t) /*_.VALROUT___V587*/ meltfptr[586])->tabval[3] = - (melt_ptr_t) ( /*_.VALCLO___V259*/ meltfptr[258]); + NULL != /*_._VALCLO___V259*/ meltfptr[258]); + ((meltroutine_ptr_t) /*_._VALROUT___V587*/ meltfptr[586])->tabval[3] = + (melt_ptr_t) ( /*_._VALCLO___V259*/ meltfptr[258]); MELT_LOCATION ("warmelt-outobj.melt:3900:/ initchunk"); /*^putroutconst */ @@ -36553,12 +36628,12 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V587*/ meltfptr[586])) + ( /*_._VALROUT___V587*/ meltfptr[586])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_400__OUTPUCOD_OBJAPPLY#4", NULL != ( /*_.CLASS_OBJINSTR__V70*/ meltfptr[69])); - ((meltroutine_ptr_t) /*_.VALROUT___V587*/ meltfptr[586])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V587*/ meltfptr[586])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_OBJINSTR__V70*/ meltfptr[69]); MELT_LOCATION ("warmelt-outobj.melt:3900:/ initchunk"); @@ -36567,12 +36642,12 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V587*/ meltfptr[586])) + ( /*_._VALROUT___V587*/ meltfptr[586])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_400__OUTPUCOD_OBJAPPLY#5", NULL != ( /*_.GET_CTYPE__V111*/ meltfptr[110])); - ((meltroutine_ptr_t) /*_.VALROUT___V587*/ meltfptr[586])->tabval[5] = + ((meltroutine_ptr_t) /*_._VALROUT___V587*/ meltfptr[586])->tabval[5] = (melt_ptr_t) ( /*_.GET_CTYPE__V111*/ meltfptr[110]); MELT_LOCATION ("warmelt-outobj.melt:3900:/ initchunk"); @@ -36581,12 +36656,12 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V587*/ meltfptr[586])) + ( /*_._VALROUT___V587*/ meltfptr[586])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_400__OUTPUCOD_OBJAPPLY#6", NULL != ( /*_.CLASS_CTYPE__V29*/ meltfptr[28])); - ((meltroutine_ptr_t) /*_.VALROUT___V587*/ meltfptr[586])->tabval[6] = + ((meltroutine_ptr_t) /*_._VALROUT___V587*/ meltfptr[586])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_CTYPE__V29*/ meltfptr[28]); MELT_LOCATION ("warmelt-outobj.melt:3900:/ initchunk"); @@ -36595,12 +36670,12 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V587*/ meltfptr[586])) + ( /*_._VALROUT___V587*/ meltfptr[586])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_400__OUTPUCOD_OBJAPPLY#7", NULL != ( /*_.CLASS_OBJNIL__V26*/ meltfptr[25])); - ((meltroutine_ptr_t) /*_.VALROUT___V587*/ meltfptr[586])->tabval[7] = + ((meltroutine_ptr_t) /*_._VALROUT___V587*/ meltfptr[586])->tabval[7] = (melt_ptr_t) ( /*_.CLASS_OBJNIL__V26*/ meltfptr[25]); MELT_LOCATION ("warmelt-outobj.melt:3900:/ initchunk"); @@ -36609,12 +36684,12 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V587*/ meltfptr[586])) + ( /*_._VALROUT___V587*/ meltfptr[586])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_400__OUTPUCOD_OBJAPPLY#8", NULL != ( /*_.CTYPE_VALUE__V32*/ meltfptr[31])); - ((meltroutine_ptr_t) /*_.VALROUT___V587*/ meltfptr[586])->tabval[8] = + ((meltroutine_ptr_t) /*_._VALROUT___V587*/ meltfptr[586])->tabval[8] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V32*/ meltfptr[31]); MELT_LOCATION ("warmelt-outobj.melt:3900:/ initchunk"); @@ -36623,12 +36698,12 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V587*/ meltfptr[586])) + ( /*_._VALROUT___V587*/ meltfptr[586])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_400__OUTPUCOD_OBJAPPLY#9", NULL != ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20])); - ((meltroutine_ptr_t) /*_.VALROUT___V587*/ meltfptr[586])->tabval[9] = + ((meltroutine_ptr_t) /*_._VALROUT___V587*/ meltfptr[586])->tabval[9] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]); MELT_LOCATION ("warmelt-outobj.melt:3900:/ initchunk"); @@ -36636,12 +36711,12 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V587*/ meltfptr[586])) == + ( /*_._VALROUT___V587*/ meltfptr[586])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALDATA___V192*/ meltfptr[191]); - ((meltroutine_ptr_t) /*_.VALROUT___V587*/ meltfptr[586])->tabval[10] = - (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); + NULL != /*_._VALDATA___V192*/ meltfptr[191]); + ((meltroutine_ptr_t) /*_._VALROUT___V587*/ meltfptr[586])->tabval[10] = + (melt_ptr_t) ( /*_._VALDATA___V192*/ meltfptr[191]); MELT_LOCATION ("warmelt-outobj.melt:3900:/ initchunk"); /*^putroutconst */ @@ -36649,12 +36724,12 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V587*/ meltfptr[586])) + ( /*_._VALROUT___V587*/ meltfptr[586])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_400__OUTPUCOD_OBJAPPLY#11", NULL != ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_.VALROUT___V587*/ meltfptr[586])->tabval[11] = + ((meltroutine_ptr_t) /*_._VALROUT___V587*/ meltfptr[586])->tabval[11] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:3900:/ initchunk"); @@ -36663,12 +36738,12 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V587*/ meltfptr[586])) + ( /*_._VALROUT___V587*/ meltfptr[586])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_400__OUTPUCOD_OBJAPPLY#12", NULL != ( /*_.LIST_EVERY__V57*/ meltfptr[56])); - ((meltroutine_ptr_t) /*_.VALROUT___V587*/ meltfptr[586])->tabval[12] = + ((meltroutine_ptr_t) /*_._VALROUT___V587*/ meltfptr[586])->tabval[12] = (melt_ptr_t) ( /*_.LIST_EVERY__V57*/ meltfptr[56]); MELT_LOCATION ("warmelt-outobj.melt:3900:/ initchunk"); @@ -36677,12 +36752,12 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V587*/ meltfptr[586])) + ( /*_._VALROUT___V587*/ meltfptr[586])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_400__OUTPUCOD_OBJAPPLY#13", NULL != ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20])); - ((meltroutine_ptr_t) /*_.VALROUT___V587*/ meltfptr[586])->tabval[13] = + ((meltroutine_ptr_t) /*_._VALROUT___V587*/ meltfptr[586])->tabval[13] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]); MELT_LOCATION ("warmelt-outobj.melt:3900:/ initchunk"); @@ -36690,12 +36765,12 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V587*/ meltfptr[586])) == + ( /*_._VALROUT___V587*/ meltfptr[586])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALDATA___V192*/ meltfptr[191]); - ((meltroutine_ptr_t) /*_.VALROUT___V587*/ meltfptr[586])->tabval[14] = - (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); + NULL != /*_._VALDATA___V192*/ meltfptr[191]); + ((meltroutine_ptr_t) /*_._VALROUT___V587*/ meltfptr[586])->tabval[14] = + (melt_ptr_t) ( /*_._VALDATA___V192*/ meltfptr[191]); MELT_LOCATION ("warmelt-outobj.melt:3900:/ initchunk"); /*^putroutconst */ @@ -36703,12 +36778,12 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V587*/ meltfptr[586])) + ( /*_._VALROUT___V587*/ meltfptr[586])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_400__OUTPUCOD_OBJAPPLY#15", NULL != ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_.VALROUT___V587*/ meltfptr[586])->tabval[15] = + ((meltroutine_ptr_t) /*_._VALROUT___V587*/ meltfptr[586])->tabval[15] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:3958:/ initchunk"); @@ -36717,12 +36792,12 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V588*/ meltfptr[587])) + ( /*_._VALROUT___V588*/ meltfptr[587])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_406__LAMBDA_#0", NULL != ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20])); - ((meltroutine_ptr_t) /*_.VALROUT___V588*/ meltfptr[587])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V588*/ meltfptr[587])->tabval[0] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]); MELT_LOCATION ("warmelt-outobj.melt:3958:/ initchunk"); @@ -36730,12 +36805,12 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V588*/ meltfptr[587])) == + ( /*_._VALROUT___V588*/ meltfptr[587])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALDATA___V192*/ meltfptr[191]); - ((meltroutine_ptr_t) /*_.VALROUT___V588*/ meltfptr[587])->tabval[1] = - (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); + NULL != /*_._VALDATA___V192*/ meltfptr[191]); + ((meltroutine_ptr_t) /*_._VALROUT___V588*/ meltfptr[587])->tabval[1] = + (melt_ptr_t) ( /*_._VALDATA___V192*/ meltfptr[191]); MELT_LOCATION ("warmelt-outobj.melt:3958:/ initchunk"); /*^putroutconst */ @@ -36743,18 +36818,18 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V588*/ meltfptr[587])) + ( /*_._VALROUT___V588*/ meltfptr[587])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_406__LAMBDA_#2", NULL != ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_.VALROUT___V588*/ meltfptr[587])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V588*/ meltfptr[587])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:3958:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V588*/ meltfptr[587]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V588*/ meltfptr[587]); MELT_LOCATION ("warmelt-outobj.melt:3900:/ initchunk"); /*^putroutconst */ @@ -36762,13 +36837,13 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V587*/ meltfptr[586])) + ( /*_._VALROUT___V587*/ meltfptr[586])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_400__OUTPUCOD_OBJAPPLY#16", - NULL != ( /*_.VALROUT___V588*/ meltfptr[587])); - ((meltroutine_ptr_t) /*_.VALROUT___V587*/ meltfptr[586])->tabval[16] = - (melt_ptr_t) ( /*_.VALROUT___V588*/ meltfptr[587]); + NULL != ( /*_._VALROUT___V588*/ meltfptr[587])); + ((meltroutine_ptr_t) /*_._VALROUT___V587*/ meltfptr[586])->tabval[16] = + (melt_ptr_t) ( /*_._VALROUT___V588*/ meltfptr[587]); MELT_LOCATION ("warmelt-outobj.melt:3900:/ initchunk"); /*^putroutconst */ @@ -36776,78 +36851,78 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V587*/ meltfptr[586])) + ( /*_._VALROUT___V587*/ meltfptr[586])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_400__OUTPUCOD_OBJAPPLY#17", - NULL != ( /*_.VALROUT___V589*/ meltfptr[588])); - ((meltroutine_ptr_t) /*_.VALROUT___V587*/ meltfptr[586])->tabval[17] = - (melt_ptr_t) ( /*_.VALROUT___V589*/ meltfptr[588]); + NULL != ( /*_._VALROUT___V589*/ meltfptr[588])); + ((meltroutine_ptr_t) /*_._VALROUT___V587*/ meltfptr[586])->tabval[17] = + (melt_ptr_t) ( /*_._VALROUT___V589*/ meltfptr[588]); MELT_LOCATION ("warmelt-outobj.melt:3900:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V587*/ meltfptr[586]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V587*/ meltfptr[586]); /*putclosurout#82 */ melt_assertmsg ("putclosrout#82 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V590*/ meltfptr[589])) == + ( /*_._VALCLO___V590*/ meltfptr[589])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#82 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V587*/ meltfptr[586])) == + ( /*_._VALROUT___V587*/ meltfptr[586])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V590*/ meltfptr[589])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V587*/ meltfptr[586]); + ((meltclosure_ptr_t) /*_._VALCLO___V590*/ meltfptr[589])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V587*/ meltfptr[586]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V590*/ meltfptr[589]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V590*/ meltfptr[589]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V591*/ meltfptr[590])) == + ( /*_._VALDATA___V591*/ meltfptr[590])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V591*/ + ( /*_._VALDATA___V591*/ meltfptr[590])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V591*/ meltfptr[590]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V591*/ meltfptr[590]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V592*/ meltfptr[591]); + /*_._VALSTR___V592*/ meltfptr[591]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V591*/ meltfptr[590]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V591*/ meltfptr[590]); - melt_dbgtrace_written_object ( /*_.VALDATA___V591*/ meltfptr[590], + melt_dbgtrace_written_object ( /*_._VALDATA___V591*/ meltfptr[590], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V593*/ meltfptr[592])) == + ( /*_._VALDATA___V593*/ meltfptr[592])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V593*/ + ( /*_._VALDATA___V593*/ meltfptr[592])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V593*/ meltfptr[592]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V593*/ meltfptr[592]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V594*/ meltfptr[593]); + /*_._VALSTR___V594*/ meltfptr[593]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V593*/ meltfptr[592]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V593*/ meltfptr[592]); - melt_dbgtrace_written_object ( /*_.VALDATA___V593*/ meltfptr[592], + melt_dbgtrace_written_object ( /*_._VALDATA___V593*/ meltfptr[592], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:3997:/ initchunk"); @@ -36856,12 +36931,12 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V595*/ meltfptr[594])) + ( /*_._VALROUT___V595*/ meltfptr[594])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_408__OUTPUCOD_OBJMSEND#0", NULL != ( /*_.CLASS_OBJMSEND__V112*/ meltfptr[111])); - ((meltroutine_ptr_t) /*_.VALROUT___V595*/ meltfptr[594])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V595*/ meltfptr[594])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJMSEND__V112*/ meltfptr[111]); MELT_LOCATION ("warmelt-outobj.melt:3997:/ initchunk"); @@ -36870,12 +36945,12 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V595*/ meltfptr[594])) + ( /*_._VALROUT___V595*/ meltfptr[594])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_408__OUTPUCOD_OBJMSEND#1", NULL != ( /*_.DISCR_LIST__V66*/ meltfptr[65])); - ((meltroutine_ptr_t) /*_.VALROUT___V595*/ meltfptr[594])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V595*/ meltfptr[594])->tabval[1] = (melt_ptr_t) ( /*_.DISCR_LIST__V66*/ meltfptr[65]); MELT_LOCATION ("warmelt-outobj.melt:3997:/ initchunk"); @@ -36884,12 +36959,12 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V595*/ meltfptr[594])) + ( /*_._VALROUT___V595*/ meltfptr[594])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_408__OUTPUCOD_OBJMSEND#2", NULL != ( /*_.DISCR_INTEGER__V53*/ meltfptr[52])); - ((meltroutine_ptr_t) /*_.VALROUT___V595*/ meltfptr[594])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V595*/ meltfptr[594])->tabval[2] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V53*/ meltfptr[52]); MELT_LOCATION ("warmelt-outobj.melt:3997:/ initchunk"); @@ -36897,12 +36972,12 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V595*/ meltfptr[594])) == + ( /*_._VALROUT___V595*/ meltfptr[594])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V259*/ meltfptr[258]); - ((meltroutine_ptr_t) /*_.VALROUT___V595*/ meltfptr[594])->tabval[3] = - (melt_ptr_t) ( /*_.VALCLO___V259*/ meltfptr[258]); + NULL != /*_._VALCLO___V259*/ meltfptr[258]); + ((meltroutine_ptr_t) /*_._VALROUT___V595*/ meltfptr[594])->tabval[3] = + (melt_ptr_t) ( /*_._VALCLO___V259*/ meltfptr[258]); MELT_LOCATION ("warmelt-outobj.melt:3997:/ initchunk"); /*^putroutconst */ @@ -36910,12 +36985,12 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V595*/ meltfptr[594])) + ( /*_._VALROUT___V595*/ meltfptr[594])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_408__OUTPUCOD_OBJMSEND#4", NULL != ( /*_.GET_CTYPE__V111*/ meltfptr[110])); - ((meltroutine_ptr_t) /*_.VALROUT___V595*/ meltfptr[594])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V595*/ meltfptr[594])->tabval[4] = (melt_ptr_t) ( /*_.GET_CTYPE__V111*/ meltfptr[110]); MELT_LOCATION ("warmelt-outobj.melt:3997:/ initchunk"); @@ -36924,12 +36999,12 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V595*/ meltfptr[594])) + ( /*_._VALROUT___V595*/ meltfptr[594])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_408__OUTPUCOD_OBJMSEND#5", NULL != ( /*_.CLASS_CTYPE__V29*/ meltfptr[28])); - ((meltroutine_ptr_t) /*_.VALROUT___V595*/ meltfptr[594])->tabval[5] = + ((meltroutine_ptr_t) /*_._VALROUT___V595*/ meltfptr[594])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_CTYPE__V29*/ meltfptr[28]); MELT_LOCATION ("warmelt-outobj.melt:3997:/ initchunk"); @@ -36938,12 +37013,12 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V595*/ meltfptr[594])) + ( /*_._VALROUT___V595*/ meltfptr[594])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_408__OUTPUCOD_OBJMSEND#6", NULL != ( /*_.CLASS_OBJNIL__V26*/ meltfptr[25])); - ((meltroutine_ptr_t) /*_.VALROUT___V595*/ meltfptr[594])->tabval[6] = + ((meltroutine_ptr_t) /*_._VALROUT___V595*/ meltfptr[594])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_OBJNIL__V26*/ meltfptr[25]); MELT_LOCATION ("warmelt-outobj.melt:3997:/ initchunk"); @@ -36952,12 +37027,12 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V595*/ meltfptr[594])) + ( /*_._VALROUT___V595*/ meltfptr[594])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_408__OUTPUCOD_OBJMSEND#7", NULL != ( /*_.CTYPE_VALUE__V32*/ meltfptr[31])); - ((meltroutine_ptr_t) /*_.VALROUT___V595*/ meltfptr[594])->tabval[7] = + ((meltroutine_ptr_t) /*_._VALROUT___V595*/ meltfptr[594])->tabval[7] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V32*/ meltfptr[31]); MELT_LOCATION ("warmelt-outobj.melt:3997:/ initchunk"); @@ -36966,12 +37041,12 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V595*/ meltfptr[594])) + ( /*_._VALROUT___V595*/ meltfptr[594])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_408__OUTPUCOD_OBJMSEND#8", NULL != ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20])); - ((meltroutine_ptr_t) /*_.VALROUT___V595*/ meltfptr[594])->tabval[8] = + ((meltroutine_ptr_t) /*_._VALROUT___V595*/ meltfptr[594])->tabval[8] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]); MELT_LOCATION ("warmelt-outobj.melt:3997:/ initchunk"); @@ -36979,12 +37054,12 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V595*/ meltfptr[594])) == + ( /*_._VALROUT___V595*/ meltfptr[594])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALDATA___V192*/ meltfptr[191]); - ((meltroutine_ptr_t) /*_.VALROUT___V595*/ meltfptr[594])->tabval[9] = - (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); + NULL != /*_._VALDATA___V192*/ meltfptr[191]); + ((meltroutine_ptr_t) /*_._VALROUT___V595*/ meltfptr[594])->tabval[9] = + (melt_ptr_t) ( /*_._VALDATA___V192*/ meltfptr[191]); MELT_LOCATION ("warmelt-outobj.melt:3997:/ initchunk"); /*^putroutconst */ @@ -36992,12 +37067,12 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V595*/ meltfptr[594])) + ( /*_._VALROUT___V595*/ meltfptr[594])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_408__OUTPUCOD_OBJMSEND#10", NULL != ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_.VALROUT___V595*/ meltfptr[594])->tabval[10] = + ((meltroutine_ptr_t) /*_._VALROUT___V595*/ meltfptr[594])->tabval[10] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:3997:/ initchunk"); @@ -37006,12 +37081,12 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V595*/ meltfptr[594])) + ( /*_._VALROUT___V595*/ meltfptr[594])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_408__OUTPUCOD_OBJMSEND#11", NULL != ( /*_.LIST_EVERY__V57*/ meltfptr[56])); - ((meltroutine_ptr_t) /*_.VALROUT___V595*/ meltfptr[594])->tabval[11] = + ((meltroutine_ptr_t) /*_._VALROUT___V595*/ meltfptr[594])->tabval[11] = (melt_ptr_t) ( /*_.LIST_EVERY__V57*/ meltfptr[56]); MELT_LOCATION ("warmelt-outobj.melt:3997:/ initchunk"); @@ -37020,55 +37095,55 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V595*/ meltfptr[594])) + ( /*_._VALROUT___V595*/ meltfptr[594])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_408__OUTPUCOD_OBJMSEND#12", - NULL != ( /*_.VALROUT___V596*/ meltfptr[595])); - ((meltroutine_ptr_t) /*_.VALROUT___V595*/ meltfptr[594])->tabval[12] = - (melt_ptr_t) ( /*_.VALROUT___V596*/ meltfptr[595]); + NULL != ( /*_._VALROUT___V596*/ meltfptr[595])); + ((meltroutine_ptr_t) /*_._VALROUT___V595*/ meltfptr[594])->tabval[12] = + (melt_ptr_t) ( /*_._VALROUT___V596*/ meltfptr[595]); MELT_LOCATION ("warmelt-outobj.melt:3997:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V595*/ meltfptr[594]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V595*/ meltfptr[594]); /*putclosurout#83 */ melt_assertmsg ("putclosrout#83 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V597*/ meltfptr[596])) == + ( /*_._VALCLO___V597*/ meltfptr[596])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#83 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V595*/ meltfptr[594])) == + ( /*_._VALROUT___V595*/ meltfptr[594])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V597*/ meltfptr[596])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V595*/ meltfptr[594]); + ((meltclosure_ptr_t) /*_._VALCLO___V597*/ meltfptr[596])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V595*/ meltfptr[594]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V597*/ meltfptr[596]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V597*/ meltfptr[596]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V598*/ meltfptr[597])) == + ( /*_._VALDATA___V598*/ meltfptr[597])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V598*/ + ( /*_._VALDATA___V598*/ meltfptr[597])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V598*/ meltfptr[597]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V598*/ meltfptr[597]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V599*/ meltfptr[598]); + /*_._VALSTR___V599*/ meltfptr[598]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V598*/ meltfptr[597]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V598*/ meltfptr[597]); - melt_dbgtrace_written_object ( /*_.VALDATA___V598*/ meltfptr[597], + melt_dbgtrace_written_object ( /*_._VALDATA___V598*/ meltfptr[597], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:4095:/ initchunk"); @@ -37077,13 +37152,13 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V600*/ meltfptr[599])) + ( /*_._VALROUT___V600*/ meltfptr[599])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_413__OUTPUCOD_OBJMULTIAPPLY#0", NULL != ( /*_.CLASS_OBJMULTIAPPLY__V113*/ meltfptr[112])); - ((meltroutine_ptr_t) /*_.VALROUT___V600*/ meltfptr[599])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V600*/ meltfptr[599])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJMULTIAPPLY__V113*/ meltfptr[112]); MELT_LOCATION ("warmelt-outobj.melt:4095:/ initchunk"); @@ -37092,13 +37167,13 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V600*/ meltfptr[599])) + ( /*_._VALROUT___V600*/ meltfptr[599])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_413__OUTPUCOD_OBJMULTIAPPLY#1", NULL != ( /*_.DISCR_LIST__V66*/ meltfptr[65])); - ((meltroutine_ptr_t) /*_.VALROUT___V600*/ meltfptr[599])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V600*/ meltfptr[599])->tabval[1] = (melt_ptr_t) ( /*_.DISCR_LIST__V66*/ meltfptr[65]); MELT_LOCATION ("warmelt-outobj.melt:4095:/ initchunk"); @@ -37107,13 +37182,13 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V600*/ meltfptr[599])) + ( /*_._VALROUT___V600*/ meltfptr[599])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_413__OUTPUCOD_OBJMULTIAPPLY#2", NULL != ( /*_.DISCR_INTEGER__V53*/ meltfptr[52])); - ((meltroutine_ptr_t) /*_.VALROUT___V600*/ meltfptr[599])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V600*/ meltfptr[599])->tabval[2] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V53*/ meltfptr[52]); MELT_LOCATION ("warmelt-outobj.melt:4095:/ initchunk"); @@ -37121,21 +37196,21 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V600*/ meltfptr[599])) == + ( /*_._VALROUT___V600*/ meltfptr[599])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V259*/ meltfptr[258]); - ((meltroutine_ptr_t) /*_.VALROUT___V600*/ meltfptr[599])->tabval[3] = - (melt_ptr_t) ( /*_.VALCLO___V259*/ meltfptr[258]); + NULL != /*_._VALCLO___V259*/ meltfptr[258]); + ((meltroutine_ptr_t) /*_._VALROUT___V600*/ meltfptr[599])->tabval[3] = + (melt_ptr_t) ( /*_._VALCLO___V259*/ meltfptr[258]); #undef meltfram__ -} /*end of meltmod__warmelt_outobj__initialmeltchunk_8 */ +} /*end of meltmod__WARMELTmiOUTOBJ__initialmeltchunk_8 */ void -meltmod__warmelt_outobj__initialmeltchunk_9 (meltinitial_frame_t * - meltmeltframptr__, - char meltpredefinited[]) +meltmod__WARMELTmiOUTOBJ__initialmeltchunk_9 (meltinitial_frame_t * + meltmeltframptr__, + char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount @@ -37147,13 +37222,13 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V600*/ meltfptr[599])) + ( /*_._VALROUT___V600*/ meltfptr[599])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_413__OUTPUCOD_OBJMULTIAPPLY#4", NULL != ( /*_.MULTIPLE_EVERY__V101*/ meltfptr[100])); - ((meltroutine_ptr_t) /*_.VALROUT___V600*/ meltfptr[599])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V600*/ meltfptr[599])->tabval[4] = (melt_ptr_t) ( /*_.MULTIPLE_EVERY__V101*/ meltfptr[100]); MELT_LOCATION ("warmelt-outobj.melt:4095:/ initchunk"); @@ -37162,13 +37237,13 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V600*/ meltfptr[599])) + ( /*_._VALROUT___V600*/ meltfptr[599])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_413__OUTPUCOD_OBJMULTIAPPLY#5", NULL != ( /*_.GET_CTYPE__V111*/ meltfptr[110])); - ((meltroutine_ptr_t) /*_.VALROUT___V600*/ meltfptr[599])->tabval[5] = + ((meltroutine_ptr_t) /*_._VALROUT___V600*/ meltfptr[599])->tabval[5] = (melt_ptr_t) ( /*_.GET_CTYPE__V111*/ meltfptr[110]); MELT_LOCATION ("warmelt-outobj.melt:4141:/ initchunk"); @@ -37177,18 +37252,18 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V601*/ meltfptr[600])) + ( /*_._VALROUT___V601*/ meltfptr[600])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_417__LAMBDA_#0", NULL != ( /*_.GET_CTYPE__V111*/ meltfptr[110])); - ((meltroutine_ptr_t) /*_.VALROUT___V601*/ meltfptr[600])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V601*/ meltfptr[600])->tabval[0] = (melt_ptr_t) ( /*_.GET_CTYPE__V111*/ meltfptr[110]); MELT_LOCATION ("warmelt-outobj.melt:4141:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V601*/ meltfptr[600]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V601*/ meltfptr[600]); MELT_LOCATION ("warmelt-outobj.melt:4095:/ initchunk"); /*^putroutconst */ @@ -37196,14 +37271,14 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V600*/ meltfptr[599])) + ( /*_._VALROUT___V600*/ meltfptr[599])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_413__OUTPUCOD_OBJMULTIAPPLY#6", - NULL != ( /*_.VALROUT___V601*/ meltfptr[600])); - ((meltroutine_ptr_t) /*_.VALROUT___V600*/ meltfptr[599])->tabval[6] = - (melt_ptr_t) ( /*_.VALROUT___V601*/ meltfptr[600]); + NULL != ( /*_._VALROUT___V601*/ meltfptr[600])); + ((meltroutine_ptr_t) /*_._VALROUT___V600*/ meltfptr[599])->tabval[6] = + (melt_ptr_t) ( /*_._VALROUT___V601*/ meltfptr[600]); MELT_LOCATION ("warmelt-outobj.melt:4095:/ initchunk"); /*^putroutconst */ @@ -37211,13 +37286,13 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V600*/ meltfptr[599])) + ( /*_._VALROUT___V600*/ meltfptr[599])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_413__OUTPUCOD_OBJMULTIAPPLY#7", NULL != ( /*_.GET_CTYPE__V111*/ meltfptr[110])); - ((meltroutine_ptr_t) /*_.VALROUT___V600*/ meltfptr[599])->tabval[7] = + ((meltroutine_ptr_t) /*_._VALROUT___V600*/ meltfptr[599])->tabval[7] = (melt_ptr_t) ( /*_.GET_CTYPE__V111*/ meltfptr[110]); MELT_LOCATION ("warmelt-outobj.melt:4095:/ initchunk"); @@ -37226,13 +37301,13 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V600*/ meltfptr[599])) + ( /*_._VALROUT___V600*/ meltfptr[599])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_413__OUTPUCOD_OBJMULTIAPPLY#8", NULL != ( /*_.CLASS_CTYPE__V29*/ meltfptr[28])); - ((meltroutine_ptr_t) /*_.VALROUT___V600*/ meltfptr[599])->tabval[8] = + ((meltroutine_ptr_t) /*_._VALROUT___V600*/ meltfptr[599])->tabval[8] = (melt_ptr_t) ( /*_.CLASS_CTYPE__V29*/ meltfptr[28]); MELT_LOCATION ("warmelt-outobj.melt:4095:/ initchunk"); @@ -37241,13 +37316,13 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V600*/ meltfptr[599])) + ( /*_._VALROUT___V600*/ meltfptr[599])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_413__OUTPUCOD_OBJMULTIAPPLY#9", NULL != ( /*_.CTYPE_VALUE__V32*/ meltfptr[31])); - ((meltroutine_ptr_t) /*_.VALROUT___V600*/ meltfptr[599])->tabval[9] = + ((meltroutine_ptr_t) /*_._VALROUT___V600*/ meltfptr[599])->tabval[9] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V32*/ meltfptr[31]); MELT_LOCATION ("warmelt-outobj.melt:4095:/ initchunk"); @@ -37256,13 +37331,13 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V600*/ meltfptr[599])) + ( /*_._VALROUT___V600*/ meltfptr[599])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_413__OUTPUCOD_OBJMULTIAPPLY#10", NULL != ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20])); - ((meltroutine_ptr_t) /*_.VALROUT___V600*/ meltfptr[599])->tabval[10] = + ((meltroutine_ptr_t) /*_._VALROUT___V600*/ meltfptr[599])->tabval[10] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]); MELT_LOCATION ("warmelt-outobj.melt:4095:/ initchunk"); @@ -37270,12 +37345,12 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V600*/ meltfptr[599])) == + ( /*_._VALROUT___V600*/ meltfptr[599])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALDATA___V192*/ meltfptr[191]); - ((meltroutine_ptr_t) /*_.VALROUT___V600*/ meltfptr[599])->tabval[11] = - (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); + NULL != /*_._VALDATA___V192*/ meltfptr[191]); + ((meltroutine_ptr_t) /*_._VALROUT___V600*/ meltfptr[599])->tabval[11] = + (melt_ptr_t) ( /*_._VALDATA___V192*/ meltfptr[191]); MELT_LOCATION ("warmelt-outobj.melt:4095:/ initchunk"); /*^putroutconst */ @@ -37283,13 +37358,13 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V600*/ meltfptr[599])) + ( /*_._VALROUT___V600*/ meltfptr[599])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_413__OUTPUCOD_OBJMULTIAPPLY#12", NULL != ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_.VALROUT___V600*/ meltfptr[599])->tabval[12] = + ((meltroutine_ptr_t) /*_._VALROUT___V600*/ meltfptr[599])->tabval[12] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:4095:/ initchunk"); @@ -37298,13 +37373,13 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V600*/ meltfptr[599])) + ( /*_._VALROUT___V600*/ meltfptr[599])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_413__OUTPUCOD_OBJMULTIAPPLY#13", NULL != ( /*_.GET_CTYPE__V111*/ meltfptr[110])); - ((meltroutine_ptr_t) /*_.VALROUT___V600*/ meltfptr[599])->tabval[13] = + ((meltroutine_ptr_t) /*_._VALROUT___V600*/ meltfptr[599])->tabval[13] = (melt_ptr_t) ( /*_.GET_CTYPE__V111*/ meltfptr[110]); MELT_LOCATION ("warmelt-outobj.melt:4095:/ initchunk"); @@ -37313,13 +37388,13 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V600*/ meltfptr[599])) + ( /*_._VALROUT___V600*/ meltfptr[599])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_413__OUTPUCOD_OBJMULTIAPPLY#14", NULL != ( /*_.CLASS_CTYPE__V29*/ meltfptr[28])); - ((meltroutine_ptr_t) /*_.VALROUT___V600*/ meltfptr[599])->tabval[14] = + ((meltroutine_ptr_t) /*_._VALROUT___V600*/ meltfptr[599])->tabval[14] = (melt_ptr_t) ( /*_.CLASS_CTYPE__V29*/ meltfptr[28]); MELT_LOCATION ("warmelt-outobj.melt:4095:/ initchunk"); @@ -37327,12 +37402,12 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V600*/ meltfptr[599])) == + ( /*_._VALROUT___V600*/ meltfptr[599])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V259*/ meltfptr[258]); - ((meltroutine_ptr_t) /*_.VALROUT___V600*/ meltfptr[599])->tabval[15] = - (melt_ptr_t) ( /*_.VALCLO___V259*/ meltfptr[258]); + NULL != /*_._VALCLO___V259*/ meltfptr[258]); + ((meltroutine_ptr_t) /*_._VALROUT___V600*/ meltfptr[599])->tabval[15] = + (melt_ptr_t) ( /*_._VALCLO___V259*/ meltfptr[258]); MELT_LOCATION ("warmelt-outobj.melt:4095:/ initchunk"); /*^putroutconst */ @@ -37340,13 +37415,13 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V600*/ meltfptr[599])) + ( /*_._VALROUT___V600*/ meltfptr[599])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_413__OUTPUCOD_OBJMULTIAPPLY#16", NULL != ( /*_.CTYPE_VALUE__V32*/ meltfptr[31])); - ((meltroutine_ptr_t) /*_.VALROUT___V600*/ meltfptr[599])->tabval[16] = + ((meltroutine_ptr_t) /*_._VALROUT___V600*/ meltfptr[599])->tabval[16] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V32*/ meltfptr[31]); MELT_LOCATION ("warmelt-outobj.melt:4095:/ initchunk"); @@ -37355,13 +37430,13 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V600*/ meltfptr[599])) + ( /*_._VALROUT___V600*/ meltfptr[599])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_413__OUTPUCOD_OBJMULTIAPPLY#17", NULL != ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20])); - ((meltroutine_ptr_t) /*_.VALROUT___V600*/ meltfptr[599])->tabval[17] = + ((meltroutine_ptr_t) /*_._VALROUT___V600*/ meltfptr[599])->tabval[17] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]); MELT_LOCATION ("warmelt-outobj.melt:4184:/ initchunk"); @@ -37370,12 +37445,12 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V602*/ meltfptr[601])) + ( /*_._VALROUT___V602*/ meltfptr[601])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_418__LAMBDA_#0", NULL != ( /*_.GET_CTYPE__V111*/ meltfptr[110])); - ((meltroutine_ptr_t) /*_.VALROUT___V602*/ meltfptr[601])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V602*/ meltfptr[601])->tabval[0] = (melt_ptr_t) ( /*_.GET_CTYPE__V111*/ meltfptr[110]); MELT_LOCATION ("warmelt-outobj.melt:4184:/ initchunk"); @@ -37384,12 +37459,12 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V602*/ meltfptr[601])) + ( /*_._VALROUT___V602*/ meltfptr[601])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_418__LAMBDA_#1", NULL != ( /*_.CLASS_CTYPE__V29*/ meltfptr[28])); - ((meltroutine_ptr_t) /*_.VALROUT___V602*/ meltfptr[601])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V602*/ meltfptr[601])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_CTYPE__V29*/ meltfptr[28]); MELT_LOCATION ("warmelt-outobj.melt:4184:/ initchunk"); @@ -37397,12 +37472,12 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V602*/ meltfptr[601])) == + ( /*_._VALROUT___V602*/ meltfptr[601])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V259*/ meltfptr[258]); - ((meltroutine_ptr_t) /*_.VALROUT___V602*/ meltfptr[601])->tabval[2] = - (melt_ptr_t) ( /*_.VALCLO___V259*/ meltfptr[258]); + NULL != /*_._VALCLO___V259*/ meltfptr[258]); + ((meltroutine_ptr_t) /*_._VALROUT___V602*/ meltfptr[601])->tabval[2] = + (melt_ptr_t) ( /*_._VALCLO___V259*/ meltfptr[258]); MELT_LOCATION ("warmelt-outobj.melt:4184:/ initchunk"); /*^putroutconst */ @@ -37410,12 +37485,12 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V602*/ meltfptr[601])) + ( /*_._VALROUT___V602*/ meltfptr[601])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_418__LAMBDA_#3", NULL != ( /*_.CTYPE_VALUE__V32*/ meltfptr[31])); - ((meltroutine_ptr_t) /*_.VALROUT___V602*/ meltfptr[601])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V602*/ meltfptr[601])->tabval[3] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V32*/ meltfptr[31]); MELT_LOCATION ("warmelt-outobj.melt:4184:/ initchunk"); @@ -37424,18 +37499,18 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V602*/ meltfptr[601])) + ( /*_._VALROUT___V602*/ meltfptr[601])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_418__LAMBDA_#4", NULL != ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20])); - ((meltroutine_ptr_t) /*_.VALROUT___V602*/ meltfptr[601])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V602*/ meltfptr[601])->tabval[4] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]); MELT_LOCATION ("warmelt-outobj.melt:4184:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V602*/ meltfptr[601]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V602*/ meltfptr[601]); MELT_LOCATION ("warmelt-outobj.melt:4095:/ initchunk"); /*^putroutconst */ @@ -37443,14 +37518,14 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V600*/ meltfptr[599])) + ( /*_._VALROUT___V600*/ meltfptr[599])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_413__OUTPUCOD_OBJMULTIAPPLY#18", - NULL != ( /*_.VALROUT___V602*/ meltfptr[601])); - ((meltroutine_ptr_t) /*_.VALROUT___V600*/ meltfptr[599])->tabval[18] = - (melt_ptr_t) ( /*_.VALROUT___V602*/ meltfptr[601]); + NULL != ( /*_._VALROUT___V602*/ meltfptr[601])); + ((meltroutine_ptr_t) /*_._VALROUT___V600*/ meltfptr[599])->tabval[18] = + (melt_ptr_t) ( /*_._VALROUT___V602*/ meltfptr[601]); MELT_LOCATION ("warmelt-outobj.melt:4095:/ initchunk"); /*^putroutconst */ @@ -37458,13 +37533,13 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V600*/ meltfptr[599])) + ( /*_._VALROUT___V600*/ meltfptr[599])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_413__OUTPUCOD_OBJMULTIAPPLY#19", NULL != ( /*_.LIST_EVERY__V57*/ meltfptr[56])); - ((meltroutine_ptr_t) /*_.VALROUT___V600*/ meltfptr[599])->tabval[19] = + ((meltroutine_ptr_t) /*_._VALROUT___V600*/ meltfptr[599])->tabval[19] = (melt_ptr_t) ( /*_.LIST_EVERY__V57*/ meltfptr[56]); MELT_LOCATION ("warmelt-outobj.melt:4095:/ initchunk"); @@ -37473,13 +37548,13 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V600*/ meltfptr[599])) + ( /*_._VALROUT___V600*/ meltfptr[599])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_413__OUTPUCOD_OBJMULTIAPPLY#20", NULL != ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20])); - ((meltroutine_ptr_t) /*_.VALROUT___V600*/ meltfptr[599])->tabval[20] = + ((meltroutine_ptr_t) /*_._VALROUT___V600*/ meltfptr[599])->tabval[20] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]); MELT_LOCATION ("warmelt-outobj.melt:4212:/ initchunk"); @@ -37488,18 +37563,18 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V603*/ meltfptr[602])) + ( /*_._VALROUT___V603*/ meltfptr[602])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_419__LAMBDA_#0", NULL != ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20])); - ((meltroutine_ptr_t) /*_.VALROUT___V603*/ meltfptr[602])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V603*/ meltfptr[602])->tabval[0] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]); MELT_LOCATION ("warmelt-outobj.melt:4212:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V603*/ meltfptr[602]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V603*/ meltfptr[602]); MELT_LOCATION ("warmelt-outobj.melt:4095:/ initchunk"); /*^putroutconst */ @@ -37507,14 +37582,14 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V600*/ meltfptr[599])) + ( /*_._VALROUT___V600*/ meltfptr[599])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_413__OUTPUCOD_OBJMULTIAPPLY#21", - NULL != ( /*_.VALROUT___V603*/ meltfptr[602])); - ((meltroutine_ptr_t) /*_.VALROUT___V600*/ meltfptr[599])->tabval[21] = - (melt_ptr_t) ( /*_.VALROUT___V603*/ meltfptr[602]); + NULL != ( /*_._VALROUT___V603*/ meltfptr[602])); + ((meltroutine_ptr_t) /*_._VALROUT___V600*/ meltfptr[599])->tabval[21] = + (melt_ptr_t) ( /*_._VALROUT___V603*/ meltfptr[602]); MELT_LOCATION ("warmelt-outobj.melt:4095:/ initchunk"); /*^putroutconst */ @@ -37522,14 +37597,14 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V600*/ meltfptr[599])) + ( /*_._VALROUT___V600*/ meltfptr[599])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_413__OUTPUCOD_OBJMULTIAPPLY#22", - NULL != ( /*_.VALROUT___V604*/ meltfptr[603])); - ((meltroutine_ptr_t) /*_.VALROUT___V600*/ meltfptr[599])->tabval[22] = - (melt_ptr_t) ( /*_.VALROUT___V604*/ meltfptr[603]); + NULL != ( /*_._VALROUT___V604*/ meltfptr[603])); + ((meltroutine_ptr_t) /*_._VALROUT___V600*/ meltfptr[599])->tabval[22] = + (melt_ptr_t) ( /*_._VALROUT___V604*/ meltfptr[603]); MELT_LOCATION ("warmelt-outobj.melt:4095:/ initchunk"); /*^putroutconst */ @@ -37537,56 +37612,56 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V600*/ meltfptr[599])) + ( /*_._VALROUT___V600*/ meltfptr[599])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_413__OUTPUCOD_OBJMULTIAPPLY#23", - NULL != ( /*_.VALROUT___V605*/ meltfptr[604])); - ((meltroutine_ptr_t) /*_.VALROUT___V600*/ meltfptr[599])->tabval[23] = - (melt_ptr_t) ( /*_.VALROUT___V605*/ meltfptr[604]); + NULL != ( /*_._VALROUT___V605*/ meltfptr[604])); + ((meltroutine_ptr_t) /*_._VALROUT___V600*/ meltfptr[599])->tabval[23] = + (melt_ptr_t) ( /*_._VALROUT___V605*/ meltfptr[604]); MELT_LOCATION ("warmelt-outobj.melt:4095:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V600*/ meltfptr[599]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V600*/ meltfptr[599]); /*putclosurout#84 */ melt_assertmsg ("putclosrout#84 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V606*/ meltfptr[605])) == + ( /*_._VALCLO___V606*/ meltfptr[605])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#84 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V600*/ meltfptr[599])) == + ( /*_._VALROUT___V600*/ meltfptr[599])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V606*/ meltfptr[605])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V600*/ meltfptr[599]); + ((meltclosure_ptr_t) /*_._VALCLO___V606*/ meltfptr[605])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V600*/ meltfptr[599]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V606*/ meltfptr[605]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V606*/ meltfptr[605]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V607*/ meltfptr[606])) == + ( /*_._VALDATA___V607*/ meltfptr[606])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V607*/ + ( /*_._VALDATA___V607*/ meltfptr[606])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V607*/ meltfptr[606]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V607*/ meltfptr[606]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V608*/ meltfptr[607]); + /*_._VALSTR___V608*/ meltfptr[607]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V607*/ meltfptr[606]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V607*/ meltfptr[606]); - melt_dbgtrace_written_object ( /*_.VALDATA___V607*/ meltfptr[606], + melt_dbgtrace_written_object ( /*_._VALDATA___V607*/ meltfptr[606], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:4260:/ initchunk"); @@ -37595,13 +37670,13 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V609*/ meltfptr[608])) + ( /*_._VALROUT___V609*/ meltfptr[608])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_422__OUTPUCOD_OBJMULTIMSEND#0", NULL != ( /*_.CLASS_OBJMULTIMSEND__V114*/ meltfptr[113])); - ((meltroutine_ptr_t) /*_.VALROUT___V609*/ meltfptr[608])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V609*/ meltfptr[608])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJMULTIMSEND__V114*/ meltfptr[113]); MELT_LOCATION ("warmelt-outobj.melt:4260:/ initchunk"); @@ -37610,13 +37685,13 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V609*/ meltfptr[608])) + ( /*_._VALROUT___V609*/ meltfptr[608])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_422__OUTPUCOD_OBJMULTIMSEND#1", NULL != ( /*_.DISCR_LIST__V66*/ meltfptr[65])); - ((meltroutine_ptr_t) /*_.VALROUT___V609*/ meltfptr[608])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V609*/ meltfptr[608])->tabval[1] = (melt_ptr_t) ( /*_.DISCR_LIST__V66*/ meltfptr[65]); MELT_LOCATION ("warmelt-outobj.melt:4260:/ initchunk"); @@ -37625,13 +37700,13 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V609*/ meltfptr[608])) + ( /*_._VALROUT___V609*/ meltfptr[608])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_422__OUTPUCOD_OBJMULTIMSEND#2", NULL != ( /*_.DISCR_INTEGER__V53*/ meltfptr[52])); - ((meltroutine_ptr_t) /*_.VALROUT___V609*/ meltfptr[608])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V609*/ meltfptr[608])->tabval[2] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V53*/ meltfptr[52]); MELT_LOCATION ("warmelt-outobj.melt:4260:/ initchunk"); @@ -37639,12 +37714,12 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V609*/ meltfptr[608])) == + ( /*_._VALROUT___V609*/ meltfptr[608])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V259*/ meltfptr[258]); - ((meltroutine_ptr_t) /*_.VALROUT___V609*/ meltfptr[608])->tabval[3] = - (melt_ptr_t) ( /*_.VALCLO___V259*/ meltfptr[258]); + NULL != /*_._VALCLO___V259*/ meltfptr[258]); + ((meltroutine_ptr_t) /*_._VALROUT___V609*/ meltfptr[608])->tabval[3] = + (melt_ptr_t) ( /*_._VALCLO___V259*/ meltfptr[258]); MELT_LOCATION ("warmelt-outobj.melt:4260:/ initchunk"); /*^putroutconst */ @@ -37652,13 +37727,13 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V609*/ meltfptr[608])) + ( /*_._VALROUT___V609*/ meltfptr[608])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_422__OUTPUCOD_OBJMULTIMSEND#4", NULL != ( /*_.MULTIPLE_EVERY__V101*/ meltfptr[100])); - ((meltroutine_ptr_t) /*_.VALROUT___V609*/ meltfptr[608])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V609*/ meltfptr[608])->tabval[4] = (melt_ptr_t) ( /*_.MULTIPLE_EVERY__V101*/ meltfptr[100]); MELT_LOCATION ("warmelt-outobj.melt:4260:/ initchunk"); @@ -37667,13 +37742,13 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V609*/ meltfptr[608])) + ( /*_._VALROUT___V609*/ meltfptr[608])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_422__OUTPUCOD_OBJMULTIMSEND#5", NULL != ( /*_.GET_CTYPE__V111*/ meltfptr[110])); - ((meltroutine_ptr_t) /*_.VALROUT___V609*/ meltfptr[608])->tabval[5] = + ((meltroutine_ptr_t) /*_._VALROUT___V609*/ meltfptr[608])->tabval[5] = (melt_ptr_t) ( /*_.GET_CTYPE__V111*/ meltfptr[110]); MELT_LOCATION ("warmelt-outobj.melt:4293:/ initchunk"); @@ -37682,18 +37757,18 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V610*/ meltfptr[609])) + ( /*_._VALROUT___V610*/ meltfptr[609])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_426__LAMBDA_#0", NULL != ( /*_.GET_CTYPE__V111*/ meltfptr[110])); - ((meltroutine_ptr_t) /*_.VALROUT___V610*/ meltfptr[609])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V610*/ meltfptr[609])->tabval[0] = (melt_ptr_t) ( /*_.GET_CTYPE__V111*/ meltfptr[110]); MELT_LOCATION ("warmelt-outobj.melt:4293:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V610*/ meltfptr[609]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V610*/ meltfptr[609]); MELT_LOCATION ("warmelt-outobj.melt:4260:/ initchunk"); /*^putroutconst */ @@ -37701,14 +37776,14 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V609*/ meltfptr[608])) + ( /*_._VALROUT___V609*/ meltfptr[608])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_422__OUTPUCOD_OBJMULTIMSEND#6", - NULL != ( /*_.VALROUT___V610*/ meltfptr[609])); - ((meltroutine_ptr_t) /*_.VALROUT___V609*/ meltfptr[608])->tabval[6] = - (melt_ptr_t) ( /*_.VALROUT___V610*/ meltfptr[609]); + NULL != ( /*_._VALROUT___V610*/ meltfptr[609])); + ((meltroutine_ptr_t) /*_._VALROUT___V609*/ meltfptr[608])->tabval[6] = + (melt_ptr_t) ( /*_._VALROUT___V610*/ meltfptr[609]); MELT_LOCATION ("warmelt-outobj.melt:4260:/ initchunk"); /*^putroutconst */ @@ -37716,13 +37791,13 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V609*/ meltfptr[608])) + ( /*_._VALROUT___V609*/ meltfptr[608])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_422__OUTPUCOD_OBJMULTIMSEND#7", NULL != ( /*_.GET_CTYPE__V111*/ meltfptr[110])); - ((meltroutine_ptr_t) /*_.VALROUT___V609*/ meltfptr[608])->tabval[7] = + ((meltroutine_ptr_t) /*_._VALROUT___V609*/ meltfptr[608])->tabval[7] = (melt_ptr_t) ( /*_.GET_CTYPE__V111*/ meltfptr[110]); MELT_LOCATION ("warmelt-outobj.melt:4260:/ initchunk"); @@ -37731,13 +37806,13 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V609*/ meltfptr[608])) + ( /*_._VALROUT___V609*/ meltfptr[608])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_422__OUTPUCOD_OBJMULTIMSEND#8", NULL != ( /*_.CLASS_CTYPE__V29*/ meltfptr[28])); - ((meltroutine_ptr_t) /*_.VALROUT___V609*/ meltfptr[608])->tabval[8] = + ((meltroutine_ptr_t) /*_._VALROUT___V609*/ meltfptr[608])->tabval[8] = (melt_ptr_t) ( /*_.CLASS_CTYPE__V29*/ meltfptr[28]); MELT_LOCATION ("warmelt-outobj.melt:4260:/ initchunk"); @@ -37746,13 +37821,13 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V609*/ meltfptr[608])) + ( /*_._VALROUT___V609*/ meltfptr[608])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_422__OUTPUCOD_OBJMULTIMSEND#9", NULL != ( /*_.CTYPE_VALUE__V32*/ meltfptr[31])); - ((meltroutine_ptr_t) /*_.VALROUT___V609*/ meltfptr[608])->tabval[9] = + ((meltroutine_ptr_t) /*_._VALROUT___V609*/ meltfptr[608])->tabval[9] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V32*/ meltfptr[31]); MELT_LOCATION ("warmelt-outobj.melt:4260:/ initchunk"); @@ -37761,13 +37836,13 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V609*/ meltfptr[608])) + ( /*_._VALROUT___V609*/ meltfptr[608])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_422__OUTPUCOD_OBJMULTIMSEND#10", NULL != ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20])); - ((meltroutine_ptr_t) /*_.VALROUT___V609*/ meltfptr[608])->tabval[10] = + ((meltroutine_ptr_t) /*_._VALROUT___V609*/ meltfptr[608])->tabval[10] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]); MELT_LOCATION ("warmelt-outobj.melt:4260:/ initchunk"); @@ -37775,12 +37850,12 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V609*/ meltfptr[608])) == + ( /*_._VALROUT___V609*/ meltfptr[608])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALDATA___V192*/ meltfptr[191]); - ((meltroutine_ptr_t) /*_.VALROUT___V609*/ meltfptr[608])->tabval[11] = - (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); + NULL != /*_._VALDATA___V192*/ meltfptr[191]); + ((meltroutine_ptr_t) /*_._VALROUT___V609*/ meltfptr[608])->tabval[11] = + (melt_ptr_t) ( /*_._VALDATA___V192*/ meltfptr[191]); MELT_LOCATION ("warmelt-outobj.melt:4260:/ initchunk"); /*^putroutconst */ @@ -37788,13 +37863,13 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V609*/ meltfptr[608])) + ( /*_._VALROUT___V609*/ meltfptr[608])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_422__OUTPUCOD_OBJMULTIMSEND#12", NULL != ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_.VALROUT___V609*/ meltfptr[608])->tabval[12] = + ((meltroutine_ptr_t) /*_._VALROUT___V609*/ meltfptr[608])->tabval[12] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:4260:/ initchunk"); @@ -37803,13 +37878,13 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V609*/ meltfptr[608])) + ( /*_._VALROUT___V609*/ meltfptr[608])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_422__OUTPUCOD_OBJMULTIMSEND#13", NULL != ( /*_.GET_CTYPE__V111*/ meltfptr[110])); - ((meltroutine_ptr_t) /*_.VALROUT___V609*/ meltfptr[608])->tabval[13] = + ((meltroutine_ptr_t) /*_._VALROUT___V609*/ meltfptr[608])->tabval[13] = (melt_ptr_t) ( /*_.GET_CTYPE__V111*/ meltfptr[110]); MELT_LOCATION ("warmelt-outobj.melt:4260:/ initchunk"); @@ -37818,13 +37893,13 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V609*/ meltfptr[608])) + ( /*_._VALROUT___V609*/ meltfptr[608])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_422__OUTPUCOD_OBJMULTIMSEND#14", NULL != ( /*_.CLASS_CTYPE__V29*/ meltfptr[28])); - ((meltroutine_ptr_t) /*_.VALROUT___V609*/ meltfptr[608])->tabval[14] = + ((meltroutine_ptr_t) /*_._VALROUT___V609*/ meltfptr[608])->tabval[14] = (melt_ptr_t) ( /*_.CLASS_CTYPE__V29*/ meltfptr[28]); MELT_LOCATION ("warmelt-outobj.melt:4260:/ initchunk"); @@ -37832,12 +37907,12 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V609*/ meltfptr[608])) == + ( /*_._VALROUT___V609*/ meltfptr[608])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V259*/ meltfptr[258]); - ((meltroutine_ptr_t) /*_.VALROUT___V609*/ meltfptr[608])->tabval[15] = - (melt_ptr_t) ( /*_.VALCLO___V259*/ meltfptr[258]); + NULL != /*_._VALCLO___V259*/ meltfptr[258]); + ((meltroutine_ptr_t) /*_._VALROUT___V609*/ meltfptr[608])->tabval[15] = + (melt_ptr_t) ( /*_._VALCLO___V259*/ meltfptr[258]); MELT_LOCATION ("warmelt-outobj.melt:4260:/ initchunk"); /*^putroutconst */ @@ -37845,13 +37920,13 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V609*/ meltfptr[608])) + ( /*_._VALROUT___V609*/ meltfptr[608])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_422__OUTPUCOD_OBJMULTIMSEND#16", NULL != ( /*_.CTYPE_VALUE__V32*/ meltfptr[31])); - ((meltroutine_ptr_t) /*_.VALROUT___V609*/ meltfptr[608])->tabval[16] = + ((meltroutine_ptr_t) /*_._VALROUT___V609*/ meltfptr[608])->tabval[16] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V32*/ meltfptr[31]); MELT_LOCATION ("warmelt-outobj.melt:4260:/ initchunk"); @@ -37860,13 +37935,13 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V609*/ meltfptr[608])) + ( /*_._VALROUT___V609*/ meltfptr[608])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_422__OUTPUCOD_OBJMULTIMSEND#17", NULL != ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20])); - ((meltroutine_ptr_t) /*_.VALROUT___V609*/ meltfptr[608])->tabval[17] = + ((meltroutine_ptr_t) /*_._VALROUT___V609*/ meltfptr[608])->tabval[17] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]); MELT_LOCATION ("warmelt-outobj.melt:4343:/ initchunk"); @@ -37875,12 +37950,12 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V611*/ meltfptr[610])) + ( /*_._VALROUT___V611*/ meltfptr[610])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_427__LAMBDA_#0", NULL != ( /*_.GET_CTYPE__V111*/ meltfptr[110])); - ((meltroutine_ptr_t) /*_.VALROUT___V611*/ meltfptr[610])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V611*/ meltfptr[610])->tabval[0] = (melt_ptr_t) ( /*_.GET_CTYPE__V111*/ meltfptr[110]); MELT_LOCATION ("warmelt-outobj.melt:4343:/ initchunk"); @@ -37889,12 +37964,12 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V611*/ meltfptr[610])) + ( /*_._VALROUT___V611*/ meltfptr[610])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_427__LAMBDA_#1", NULL != ( /*_.CLASS_CTYPE__V29*/ meltfptr[28])); - ((meltroutine_ptr_t) /*_.VALROUT___V611*/ meltfptr[610])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V611*/ meltfptr[610])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_CTYPE__V29*/ meltfptr[28]); MELT_LOCATION ("warmelt-outobj.melt:4343:/ initchunk"); @@ -37902,12 +37977,12 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V611*/ meltfptr[610])) == + ( /*_._VALROUT___V611*/ meltfptr[610])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V259*/ meltfptr[258]); - ((meltroutine_ptr_t) /*_.VALROUT___V611*/ meltfptr[610])->tabval[2] = - (melt_ptr_t) ( /*_.VALCLO___V259*/ meltfptr[258]); + NULL != /*_._VALCLO___V259*/ meltfptr[258]); + ((meltroutine_ptr_t) /*_._VALROUT___V611*/ meltfptr[610])->tabval[2] = + (melt_ptr_t) ( /*_._VALCLO___V259*/ meltfptr[258]); MELT_LOCATION ("warmelt-outobj.melt:4343:/ initchunk"); /*^putroutconst */ @@ -37915,12 +37990,12 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V611*/ meltfptr[610])) + ( /*_._VALROUT___V611*/ meltfptr[610])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_427__LAMBDA_#3", NULL != ( /*_.CTYPE_VALUE__V32*/ meltfptr[31])); - ((meltroutine_ptr_t) /*_.VALROUT___V611*/ meltfptr[610])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V611*/ meltfptr[610])->tabval[3] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V32*/ meltfptr[31]); MELT_LOCATION ("warmelt-outobj.melt:4343:/ initchunk"); @@ -37929,18 +38004,18 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V611*/ meltfptr[610])) + ( /*_._VALROUT___V611*/ meltfptr[610])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_427__LAMBDA_#4", NULL != ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20])); - ((meltroutine_ptr_t) /*_.VALROUT___V611*/ meltfptr[610])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V611*/ meltfptr[610])->tabval[4] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]); MELT_LOCATION ("warmelt-outobj.melt:4343:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V611*/ meltfptr[610]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V611*/ meltfptr[610]); MELT_LOCATION ("warmelt-outobj.melt:4260:/ initchunk"); /*^putroutconst */ @@ -37948,14 +38023,14 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V609*/ meltfptr[608])) + ( /*_._VALROUT___V609*/ meltfptr[608])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_422__OUTPUCOD_OBJMULTIMSEND#18", - NULL != ( /*_.VALROUT___V611*/ meltfptr[610])); - ((meltroutine_ptr_t) /*_.VALROUT___V609*/ meltfptr[608])->tabval[18] = - (melt_ptr_t) ( /*_.VALROUT___V611*/ meltfptr[610]); + NULL != ( /*_._VALROUT___V611*/ meltfptr[610])); + ((meltroutine_ptr_t) /*_._VALROUT___V609*/ meltfptr[608])->tabval[18] = + (melt_ptr_t) ( /*_._VALROUT___V611*/ meltfptr[610]); MELT_LOCATION ("warmelt-outobj.melt:4260:/ initchunk"); /*^putroutconst */ @@ -37963,13 +38038,13 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V609*/ meltfptr[608])) + ( /*_._VALROUT___V609*/ meltfptr[608])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_422__OUTPUCOD_OBJMULTIMSEND#19", NULL != ( /*_.LIST_EVERY__V57*/ meltfptr[56])); - ((meltroutine_ptr_t) /*_.VALROUT___V609*/ meltfptr[608])->tabval[19] = + ((meltroutine_ptr_t) /*_._VALROUT___V609*/ meltfptr[608])->tabval[19] = (melt_ptr_t) ( /*_.LIST_EVERY__V57*/ meltfptr[56]); MELT_LOCATION ("warmelt-outobj.melt:4260:/ initchunk"); @@ -37978,13 +38053,13 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V609*/ meltfptr[608])) + ( /*_._VALROUT___V609*/ meltfptr[608])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_422__OUTPUCOD_OBJMULTIMSEND#20", NULL != ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20])); - ((meltroutine_ptr_t) /*_.VALROUT___V609*/ meltfptr[608])->tabval[20] = + ((meltroutine_ptr_t) /*_._VALROUT___V609*/ meltfptr[608])->tabval[20] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]); MELT_LOCATION ("warmelt-outobj.melt:4371:/ initchunk"); @@ -37993,18 +38068,18 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V612*/ meltfptr[611])) + ( /*_._VALROUT___V612*/ meltfptr[611])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_428__LAMBDA_#0", NULL != ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20])); - ((meltroutine_ptr_t) /*_.VALROUT___V612*/ meltfptr[611])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V612*/ meltfptr[611])->tabval[0] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]); MELT_LOCATION ("warmelt-outobj.melt:4371:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V612*/ meltfptr[611]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V612*/ meltfptr[611]); MELT_LOCATION ("warmelt-outobj.melt:4260:/ initchunk"); /*^putroutconst */ @@ -38012,14 +38087,14 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V609*/ meltfptr[608])) + ( /*_._VALROUT___V609*/ meltfptr[608])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_422__OUTPUCOD_OBJMULTIMSEND#21", - NULL != ( /*_.VALROUT___V612*/ meltfptr[611])); - ((meltroutine_ptr_t) /*_.VALROUT___V609*/ meltfptr[608])->tabval[21] = - (melt_ptr_t) ( /*_.VALROUT___V612*/ meltfptr[611]); + NULL != ( /*_._VALROUT___V612*/ meltfptr[611])); + ((meltroutine_ptr_t) /*_._VALROUT___V609*/ meltfptr[608])->tabval[21] = + (melt_ptr_t) ( /*_._VALROUT___V612*/ meltfptr[611]); MELT_LOCATION ("warmelt-outobj.melt:4260:/ initchunk"); /*^putroutconst */ @@ -38027,14 +38102,14 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V609*/ meltfptr[608])) + ( /*_._VALROUT___V609*/ meltfptr[608])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_422__OUTPUCOD_OBJMULTIMSEND#22", - NULL != ( /*_.VALROUT___V613*/ meltfptr[612])); - ((meltroutine_ptr_t) /*_.VALROUT___V609*/ meltfptr[608])->tabval[22] = - (melt_ptr_t) ( /*_.VALROUT___V613*/ meltfptr[612]); + NULL != ( /*_._VALROUT___V613*/ meltfptr[612])); + ((meltroutine_ptr_t) /*_._VALROUT___V609*/ meltfptr[608])->tabval[22] = + (melt_ptr_t) ( /*_._VALROUT___V613*/ meltfptr[612]); MELT_LOCATION ("warmelt-outobj.melt:4260:/ initchunk"); /*^putroutconst */ @@ -38042,56 +38117,56 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V609*/ meltfptr[608])) + ( /*_._VALROUT___V609*/ meltfptr[608])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_422__OUTPUCOD_OBJMULTIMSEND#23", - NULL != ( /*_.VALROUT___V614*/ meltfptr[613])); - ((meltroutine_ptr_t) /*_.VALROUT___V609*/ meltfptr[608])->tabval[23] = - (melt_ptr_t) ( /*_.VALROUT___V614*/ meltfptr[613]); + NULL != ( /*_._VALROUT___V614*/ meltfptr[613])); + ((meltroutine_ptr_t) /*_._VALROUT___V609*/ meltfptr[608])->tabval[23] = + (melt_ptr_t) ( /*_._VALROUT___V614*/ meltfptr[613]); MELT_LOCATION ("warmelt-outobj.melt:4260:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V609*/ meltfptr[608]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V609*/ meltfptr[608]); /*putclosurout#85 */ melt_assertmsg ("putclosrout#85 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V615*/ meltfptr[614])) == + ( /*_._VALCLO___V615*/ meltfptr[614])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#85 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V609*/ meltfptr[608])) == + ( /*_._VALROUT___V609*/ meltfptr[608])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V615*/ meltfptr[614])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V609*/ meltfptr[608]); + ((meltclosure_ptr_t) /*_._VALCLO___V615*/ meltfptr[614])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V609*/ meltfptr[608]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V615*/ meltfptr[614]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V615*/ meltfptr[614]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V616*/ meltfptr[615])) == + ( /*_._VALDATA___V616*/ meltfptr[615])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V616*/ + ( /*_._VALDATA___V616*/ meltfptr[615])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V616*/ meltfptr[615]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V616*/ meltfptr[615]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V617*/ meltfptr[616]); + /*_._VALSTR___V617*/ meltfptr[616]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V616*/ meltfptr[615]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V616*/ meltfptr[615]); - melt_dbgtrace_written_object ( /*_.VALDATA___V616*/ meltfptr[615], + melt_dbgtrace_written_object ( /*_._VALDATA___V616*/ meltfptr[615], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:4415:/ initchunk"); @@ -38100,12 +38175,12 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V618*/ meltfptr[617])) + ( /*_._VALROUT___V618*/ meltfptr[617])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_431__OUTPUCOD_OBJCLEAR#0", NULL != ( /*_.CLASS_OBJCLEAR__V115*/ meltfptr[114])); - ((meltroutine_ptr_t) /*_.VALROUT___V618*/ meltfptr[617])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V618*/ meltfptr[617])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJCLEAR__V115*/ meltfptr[114]); MELT_LOCATION ("warmelt-outobj.melt:4415:/ initchunk"); @@ -38113,12 +38188,12 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V618*/ meltfptr[617])) == + ( /*_._VALROUT___V618*/ meltfptr[617])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V259*/ meltfptr[258]); - ((meltroutine_ptr_t) /*_.VALROUT___V618*/ meltfptr[617])->tabval[1] = - (melt_ptr_t) ( /*_.VALCLO___V259*/ meltfptr[258]); + NULL != /*_._VALCLO___V259*/ meltfptr[258]); + ((meltroutine_ptr_t) /*_._VALROUT___V618*/ meltfptr[617])->tabval[1] = + (melt_ptr_t) ( /*_._VALCLO___V259*/ meltfptr[258]); MELT_LOCATION ("warmelt-outobj.melt:4415:/ initchunk"); /*^putroutconst */ @@ -38126,12 +38201,12 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V618*/ meltfptr[617])) + ( /*_._VALROUT___V618*/ meltfptr[617])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_431__OUTPUCOD_OBJCLEAR#2", NULL != ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20])); - ((meltroutine_ptr_t) /*_.VALROUT___V618*/ meltfptr[617])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V618*/ meltfptr[617])->tabval[2] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]); MELT_LOCATION ("warmelt-outobj.melt:4415:/ initchunk"); @@ -38139,12 +38214,12 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V618*/ meltfptr[617])) == + ( /*_._VALROUT___V618*/ meltfptr[617])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALDATA___V192*/ meltfptr[191]); - ((meltroutine_ptr_t) /*_.VALROUT___V618*/ meltfptr[617])->tabval[3] = - (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); + NULL != /*_._VALDATA___V192*/ meltfptr[191]); + ((meltroutine_ptr_t) /*_._VALROUT___V618*/ meltfptr[617])->tabval[3] = + (melt_ptr_t) ( /*_._VALDATA___V192*/ meltfptr[191]); MELT_LOCATION ("warmelt-outobj.melt:4415:/ initchunk"); /*^putroutconst */ @@ -38152,55 +38227,55 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V618*/ meltfptr[617])) + ( /*_._VALROUT___V618*/ meltfptr[617])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_431__OUTPUCOD_OBJCLEAR#4", NULL != ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_.VALROUT___V618*/ meltfptr[617])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V618*/ meltfptr[617])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:4415:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V618*/ meltfptr[617]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V618*/ meltfptr[617]); /*putclosurout#86 */ melt_assertmsg ("putclosrout#86 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V619*/ meltfptr[618])) == + ( /*_._VALCLO___V619*/ meltfptr[618])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#86 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V618*/ meltfptr[617])) == + ( /*_._VALROUT___V618*/ meltfptr[617])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V619*/ meltfptr[618])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V618*/ meltfptr[617]); + ((meltclosure_ptr_t) /*_._VALCLO___V619*/ meltfptr[618])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V618*/ meltfptr[617]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V619*/ meltfptr[618]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V619*/ meltfptr[618]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V620*/ meltfptr[619])) == + ( /*_._VALDATA___V620*/ meltfptr[619])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V620*/ + ( /*_._VALDATA___V620*/ meltfptr[619])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V620*/ meltfptr[619]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V620*/ meltfptr[619]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V621*/ meltfptr[620]); + /*_._VALSTR___V621*/ meltfptr[620]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V620*/ meltfptr[619]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V620*/ meltfptr[619]); - melt_dbgtrace_written_object ( /*_.VALDATA___V620*/ meltfptr[619], + melt_dbgtrace_written_object ( /*_._VALDATA___V620*/ meltfptr[619], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:4431:/ initchunk"); @@ -38209,13 +38284,13 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V622*/ meltfptr[621])) + ( /*_._VALROUT___V622*/ meltfptr[621])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_435__OUTPUCOD_OBJRAWALLOCOBJ#0", NULL != ( /*_.CLASS_OBJRAWALLOCOBJ__V116*/ meltfptr[115])); - ((meltroutine_ptr_t) /*_.VALROUT___V622*/ meltfptr[621])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V622*/ meltfptr[621])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJRAWALLOCOBJ__V116*/ meltfptr[115]); MELT_LOCATION ("warmelt-outobj.melt:4431:/ initchunk"); @@ -38224,13 +38299,13 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V622*/ meltfptr[621])) + ( /*_._VALROUT___V622*/ meltfptr[621])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_435__OUTPUCOD_OBJRAWALLOCOBJ#1", NULL != ( /*_.DISCR_INTEGER__V53*/ meltfptr[52])); - ((meltroutine_ptr_t) /*_.VALROUT___V622*/ meltfptr[621])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V622*/ meltfptr[621])->tabval[1] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V53*/ meltfptr[52]); MELT_LOCATION ("warmelt-outobj.melt:4431:/ initchunk"); @@ -38239,13 +38314,13 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V622*/ meltfptr[621])) + ( /*_._VALROUT___V622*/ meltfptr[621])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_435__OUTPUCOD_OBJRAWALLOCOBJ#2", NULL != ( /*_.CLASS_OBJVALUE__V28*/ meltfptr[27])); - ((meltroutine_ptr_t) /*_.VALROUT___V622*/ meltfptr[621])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V622*/ meltfptr[621])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_OBJVALUE__V28*/ meltfptr[27]); MELT_LOCATION ("warmelt-outobj.melt:4431:/ initchunk"); @@ -38253,12 +38328,12 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V622*/ meltfptr[621])) == + ( /*_._VALROUT___V622*/ meltfptr[621])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V259*/ meltfptr[258]); - ((meltroutine_ptr_t) /*_.VALROUT___V622*/ meltfptr[621])->tabval[3] = - (melt_ptr_t) ( /*_.VALCLO___V259*/ meltfptr[258]); + NULL != /*_._VALCLO___V259*/ meltfptr[258]); + ((meltroutine_ptr_t) /*_._VALROUT___V622*/ meltfptr[621])->tabval[3] = + (melt_ptr_t) ( /*_._VALCLO___V259*/ meltfptr[258]); MELT_LOCATION ("warmelt-outobj.melt:4431:/ initchunk"); /*^putroutconst */ @@ -38266,13 +38341,13 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V622*/ meltfptr[621])) + ( /*_._VALROUT___V622*/ meltfptr[621])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_435__OUTPUCOD_OBJRAWALLOCOBJ#4", NULL != ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20])); - ((meltroutine_ptr_t) /*_.VALROUT___V622*/ meltfptr[621])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V622*/ meltfptr[621])->tabval[4] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]); MELT_LOCATION ("warmelt-outobj.melt:4431:/ initchunk"); @@ -38280,12 +38355,12 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V622*/ meltfptr[621])) == + ( /*_._VALROUT___V622*/ meltfptr[621])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALDATA___V192*/ meltfptr[191]); - ((meltroutine_ptr_t) /*_.VALROUT___V622*/ meltfptr[621])->tabval[5] = - (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); + NULL != /*_._VALDATA___V192*/ meltfptr[191]); + ((meltroutine_ptr_t) /*_._VALROUT___V622*/ meltfptr[621])->tabval[5] = + (melt_ptr_t) ( /*_._VALDATA___V192*/ meltfptr[191]); MELT_LOCATION ("warmelt-outobj.melt:4431:/ initchunk"); /*^putroutconst */ @@ -38293,56 +38368,56 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V622*/ meltfptr[621])) + ( /*_._VALROUT___V622*/ meltfptr[621])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_435__OUTPUCOD_OBJRAWALLOCOBJ#6", NULL != ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_.VALROUT___V622*/ meltfptr[621])->tabval[6] = + ((meltroutine_ptr_t) /*_._VALROUT___V622*/ meltfptr[621])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:4431:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V622*/ meltfptr[621]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V622*/ meltfptr[621]); /*putclosurout#87 */ melt_assertmsg ("putclosrout#87 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V623*/ meltfptr[622])) == + ( /*_._VALCLO___V623*/ meltfptr[622])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#87 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V622*/ meltfptr[621])) == + ( /*_._VALROUT___V622*/ meltfptr[621])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V623*/ meltfptr[622])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V622*/ meltfptr[621]); + ((meltclosure_ptr_t) /*_._VALCLO___V623*/ meltfptr[622])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V622*/ meltfptr[621]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V623*/ meltfptr[622]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V623*/ meltfptr[622]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V624*/ meltfptr[623])) == + ( /*_._VALDATA___V624*/ meltfptr[623])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V624*/ + ( /*_._VALDATA___V624*/ meltfptr[623])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V624*/ meltfptr[623]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V624*/ meltfptr[623]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V625*/ meltfptr[624]); + /*_._VALSTR___V625*/ meltfptr[624]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V624*/ meltfptr[623]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V624*/ meltfptr[623]); - melt_dbgtrace_written_object ( /*_.VALDATA___V624*/ meltfptr[623], + melt_dbgtrace_written_object ( /*_._VALDATA___V624*/ meltfptr[623], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:4469:/ initchunk"); @@ -38351,13 +38426,13 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V626*/ meltfptr[625])) + ( /*_._VALROUT___V626*/ meltfptr[625])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_439__OUTPUCOD_OBJNEWCLOSURE#0", NULL != ( /*_.CLASS_OBJNEWCLOSURE__V117*/ meltfptr[116])); - ((meltroutine_ptr_t) /*_.VALROUT___V626*/ meltfptr[625])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V626*/ meltfptr[625])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJNEWCLOSURE__V117*/ meltfptr[116]); MELT_LOCATION ("warmelt-outobj.melt:4469:/ initchunk"); @@ -38366,13 +38441,13 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V626*/ meltfptr[625])) + ( /*_._VALROUT___V626*/ meltfptr[625])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_439__OUTPUCOD_OBJNEWCLOSURE#1", NULL != ( /*_.DISCR_INTEGER__V53*/ meltfptr[52])); - ((meltroutine_ptr_t) /*_.VALROUT___V626*/ meltfptr[625])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V626*/ meltfptr[625])->tabval[1] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V53*/ meltfptr[52]); MELT_LOCATION ("warmelt-outobj.melt:4469:/ initchunk"); @@ -38380,12 +38455,12 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V626*/ meltfptr[625])) == + ( /*_._VALROUT___V626*/ meltfptr[625])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V259*/ meltfptr[258]); - ((meltroutine_ptr_t) /*_.VALROUT___V626*/ meltfptr[625])->tabval[2] = - (melt_ptr_t) ( /*_.VALCLO___V259*/ meltfptr[258]); + NULL != /*_._VALCLO___V259*/ meltfptr[258]); + ((meltroutine_ptr_t) /*_._VALROUT___V626*/ meltfptr[625])->tabval[2] = + (melt_ptr_t) ( /*_._VALCLO___V259*/ meltfptr[258]); MELT_LOCATION ("warmelt-outobj.melt:4469:/ initchunk"); /*^putroutconst */ @@ -38393,13 +38468,13 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V626*/ meltfptr[625])) + ( /*_._VALROUT___V626*/ meltfptr[625])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_439__OUTPUCOD_OBJNEWCLOSURE#3", NULL != ( /*_.LIST_EVERY__V57*/ meltfptr[56])); - ((meltroutine_ptr_t) /*_.VALROUT___V626*/ meltfptr[625])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V626*/ meltfptr[625])->tabval[3] = (melt_ptr_t) ( /*_.LIST_EVERY__V57*/ meltfptr[56]); MELT_LOCATION ("warmelt-outobj.melt:4469:/ initchunk"); @@ -38408,13 +38483,13 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V626*/ meltfptr[625])) + ( /*_._VALROUT___V626*/ meltfptr[625])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_439__OUTPUCOD_OBJNEWCLOSURE#4", NULL != ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20])); - ((meltroutine_ptr_t) /*_.VALROUT___V626*/ meltfptr[625])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V626*/ meltfptr[625])->tabval[4] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]); MELT_LOCATION ("warmelt-outobj.melt:4469:/ initchunk"); @@ -38422,12 +38497,12 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V626*/ meltfptr[625])) == + ( /*_._VALROUT___V626*/ meltfptr[625])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALDATA___V192*/ meltfptr[191]); - ((meltroutine_ptr_t) /*_.VALROUT___V626*/ meltfptr[625])->tabval[5] = - (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); + NULL != /*_._VALDATA___V192*/ meltfptr[191]); + ((meltroutine_ptr_t) /*_._VALROUT___V626*/ meltfptr[625])->tabval[5] = + (melt_ptr_t) ( /*_._VALDATA___V192*/ meltfptr[191]); MELT_LOCATION ("warmelt-outobj.melt:4469:/ initchunk"); /*^putroutconst */ @@ -38435,13 +38510,13 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V626*/ meltfptr[625])) + ( /*_._VALROUT___V626*/ meltfptr[625])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_439__OUTPUCOD_OBJNEWCLOSURE#6", NULL != ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_.VALROUT___V626*/ meltfptr[625])->tabval[6] = + ((meltroutine_ptr_t) /*_._VALROUT___V626*/ meltfptr[625])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:4482:/ initchunk"); @@ -38450,12 +38525,12 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V627*/ meltfptr[626])) + ( /*_._VALROUT___V627*/ meltfptr[626])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_443__LAMBDA_#0", NULL != ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20])); - ((meltroutine_ptr_t) /*_.VALROUT___V627*/ meltfptr[626])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V627*/ meltfptr[626])->tabval[0] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]); MELT_LOCATION ("warmelt-outobj.melt:4482:/ initchunk"); @@ -38463,12 +38538,12 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V627*/ meltfptr[626])) == + ( /*_._VALROUT___V627*/ meltfptr[626])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALDATA___V192*/ meltfptr[191]); - ((meltroutine_ptr_t) /*_.VALROUT___V627*/ meltfptr[626])->tabval[1] = - (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); + NULL != /*_._VALDATA___V192*/ meltfptr[191]); + ((meltroutine_ptr_t) /*_._VALROUT___V627*/ meltfptr[626])->tabval[1] = + (melt_ptr_t) ( /*_._VALDATA___V192*/ meltfptr[191]); MELT_LOCATION ("warmelt-outobj.melt:4482:/ initchunk"); /*^putroutconst */ @@ -38476,18 +38551,18 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V627*/ meltfptr[626])) + ( /*_._VALROUT___V627*/ meltfptr[626])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_443__LAMBDA_#2", NULL != ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_.VALROUT___V627*/ meltfptr[626])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V627*/ meltfptr[626])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:4482:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V627*/ meltfptr[626]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V627*/ meltfptr[626]); MELT_LOCATION ("warmelt-outobj.melt:4469:/ initchunk"); /*^putroutconst */ @@ -38495,14 +38570,14 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V626*/ meltfptr[625])) + ( /*_._VALROUT___V626*/ meltfptr[625])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_439__OUTPUCOD_OBJNEWCLOSURE#7", - NULL != ( /*_.VALROUT___V627*/ meltfptr[626])); - ((meltroutine_ptr_t) /*_.VALROUT___V626*/ meltfptr[625])->tabval[7] = - (melt_ptr_t) ( /*_.VALROUT___V627*/ meltfptr[626]); + NULL != ( /*_._VALROUT___V627*/ meltfptr[626])); + ((meltroutine_ptr_t) /*_._VALROUT___V626*/ meltfptr[625])->tabval[7] = + (melt_ptr_t) ( /*_._VALROUT___V627*/ meltfptr[626]); MELT_LOCATION ("warmelt-outobj.melt:4469:/ initchunk"); /*^putroutconst */ @@ -38510,13 +38585,13 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V626*/ meltfptr[625])) + ( /*_._VALROUT___V626*/ meltfptr[625])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_439__OUTPUCOD_OBJNEWCLOSURE#8", NULL != ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20])); - ((meltroutine_ptr_t) /*_.VALROUT___V626*/ meltfptr[625])->tabval[8] = + ((meltroutine_ptr_t) /*_._VALROUT___V626*/ meltfptr[625])->tabval[8] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]); MELT_LOCATION ("warmelt-outobj.melt:4469:/ initchunk"); @@ -38524,12 +38599,12 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V626*/ meltfptr[625])) == + ( /*_._VALROUT___V626*/ meltfptr[625])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALDATA___V192*/ meltfptr[191]); - ((meltroutine_ptr_t) /*_.VALROUT___V626*/ meltfptr[625])->tabval[9] = - (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); + NULL != /*_._VALDATA___V192*/ meltfptr[191]); + ((meltroutine_ptr_t) /*_._VALROUT___V626*/ meltfptr[625])->tabval[9] = + (melt_ptr_t) ( /*_._VALDATA___V192*/ meltfptr[191]); MELT_LOCATION ("warmelt-outobj.melt:4469:/ initchunk"); /*^putroutconst */ @@ -38537,56 +38612,56 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V626*/ meltfptr[625])) + ( /*_._VALROUT___V626*/ meltfptr[625])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_439__OUTPUCOD_OBJNEWCLOSURE#10", NULL != ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_.VALROUT___V626*/ meltfptr[625])->tabval[10] = + ((meltroutine_ptr_t) /*_._VALROUT___V626*/ meltfptr[625])->tabval[10] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:4469:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V626*/ meltfptr[625]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V626*/ meltfptr[625]); /*putclosurout#88 */ melt_assertmsg ("putclosrout#88 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V628*/ meltfptr[627])) == + ( /*_._VALCLO___V628*/ meltfptr[627])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#88 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V626*/ meltfptr[625])) == + ( /*_._VALROUT___V626*/ meltfptr[625])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V628*/ meltfptr[627])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V626*/ meltfptr[625]); + ((meltclosure_ptr_t) /*_._VALCLO___V628*/ meltfptr[627])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V626*/ meltfptr[625]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V628*/ meltfptr[627]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V628*/ meltfptr[627]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V629*/ meltfptr[628])) == + ( /*_._VALDATA___V629*/ meltfptr[628])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V629*/ + ( /*_._VALDATA___V629*/ meltfptr[628])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V629*/ meltfptr[628]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V629*/ meltfptr[628]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V630*/ meltfptr[629]); + /*_._VALSTR___V630*/ meltfptr[629]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V629*/ meltfptr[628]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V629*/ meltfptr[628]); - melt_dbgtrace_written_object ( /*_.VALDATA___V629*/ meltfptr[628], + melt_dbgtrace_written_object ( /*_._VALDATA___V629*/ meltfptr[628], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:4502:/ initchunk"); @@ -38595,12 +38670,12 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V631*/ meltfptr[630])) + ( /*_._VALROUT___V631*/ meltfptr[630])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_444__OUTPUCOD_OBJTOUCH#0", NULL != ( /*_.CLASS_OBJTOUCH__V118*/ meltfptr[117])); - ((meltroutine_ptr_t) /*_.VALROUT___V631*/ meltfptr[630])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V631*/ meltfptr[630])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJTOUCH__V118*/ meltfptr[117]); MELT_LOCATION ("warmelt-outobj.melt:4502:/ initchunk"); @@ -38608,12 +38683,12 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V631*/ meltfptr[630])) == + ( /*_._VALROUT___V631*/ meltfptr[630])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V259*/ meltfptr[258]); - ((meltroutine_ptr_t) /*_.VALROUT___V631*/ meltfptr[630])->tabval[1] = - (melt_ptr_t) ( /*_.VALCLO___V259*/ meltfptr[258]); + NULL != /*_._VALCLO___V259*/ meltfptr[258]); + ((meltroutine_ptr_t) /*_._VALROUT___V631*/ meltfptr[630])->tabval[1] = + (melt_ptr_t) ( /*_._VALCLO___V259*/ meltfptr[258]); MELT_LOCATION ("warmelt-outobj.melt:4502:/ initchunk"); /*^putroutconst */ @@ -38621,68 +38696,68 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V631*/ meltfptr[630])) + ( /*_._VALROUT___V631*/ meltfptr[630])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_444__OUTPUCOD_OBJTOUCH#2", NULL != ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20])); - ((meltroutine_ptr_t) /*_.VALROUT___V631*/ meltfptr[630])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V631*/ meltfptr[630])->tabval[2] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]); MELT_LOCATION ("warmelt-outobj.melt:4502:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V631*/ meltfptr[630]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V631*/ meltfptr[630]); /*putclosurout#89 */ melt_assertmsg ("putclosrout#89 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V632*/ meltfptr[631])) == + ( /*_._VALCLO___V632*/ meltfptr[631])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#89 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V631*/ meltfptr[630])) == + ( /*_._VALROUT___V631*/ meltfptr[630])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V632*/ meltfptr[631])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V631*/ meltfptr[630]); + ((meltclosure_ptr_t) /*_._VALCLO___V632*/ meltfptr[631])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V631*/ meltfptr[630]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V632*/ meltfptr[631]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V632*/ meltfptr[631]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V633*/ meltfptr[632])) == + ( /*_._VALDATA___V633*/ meltfptr[632])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V633*/ + ( /*_._VALDATA___V633*/ meltfptr[632])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V633*/ meltfptr[632]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V633*/ meltfptr[632]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V634*/ meltfptr[633]); + /*_._VALSTR___V634*/ meltfptr[633]); #undef meltfram__ -} /*end of meltmod__warmelt_outobj__initialmeltchunk_9 */ +} /*end of meltmod__WARMELTmiOUTOBJ__initialmeltchunk_9 */ void -meltmod__warmelt_outobj__initialmeltchunk_10 (meltinitial_frame_t * - meltmeltframptr__, - char meltpredefinited[]) +meltmod__WARMELTmiOUTOBJ__initialmeltchunk_10 (meltinitial_frame_t * + meltmeltframptr__, + char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L (void) meltpredefinited; -/*touch:VALUEDATA_*/ - meltgc_touch ( /*_.VALDATA___V633*/ meltfptr[632]); +/*touch:_VALUEDATA_*/ + meltgc_touch ( /*_._VALDATA___V633*/ meltfptr[632]); - melt_dbgtrace_written_object ( /*_.VALDATA___V633*/ meltfptr[632], + melt_dbgtrace_written_object ( /*_._VALDATA___V633*/ meltfptr[632], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:4527:/ initchunk"); @@ -38691,13 +38766,13 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V635*/ meltfptr[634])) + ( /*_._VALROUT___V635*/ meltfptr[634])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_448__OUTPUCOD_DBGTRACEWRITEOBJ#0", NULL != ( /*_.CLASS_OBJDBGTRACEWRITEOBJ__V119*/ meltfptr[118])); - ((meltroutine_ptr_t) /*_.VALROUT___V635*/ meltfptr[634])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V635*/ meltfptr[634])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJDBGTRACEWRITEOBJ__V119*/ meltfptr[118]); MELT_LOCATION ("warmelt-outobj.melt:4527:/ initchunk"); @@ -38705,12 +38780,12 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V635*/ meltfptr[634])) == + ( /*_._VALROUT___V635*/ meltfptr[634])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V259*/ meltfptr[258]); - ((meltroutine_ptr_t) /*_.VALROUT___V635*/ meltfptr[634])->tabval[1] = - (melt_ptr_t) ( /*_.VALCLO___V259*/ meltfptr[258]); + NULL != /*_._VALCLO___V259*/ meltfptr[258]); + ((meltroutine_ptr_t) /*_._VALROUT___V635*/ meltfptr[634])->tabval[1] = + (melt_ptr_t) ( /*_._VALCLO___V259*/ meltfptr[258]); MELT_LOCATION ("warmelt-outobj.melt:4527:/ initchunk"); /*^putroutconst */ @@ -38718,56 +38793,56 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V635*/ meltfptr[634])) + ( /*_._VALROUT___V635*/ meltfptr[634])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_448__OUTPUCOD_DBGTRACEWRITEOBJ#2", NULL != ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20])); - ((meltroutine_ptr_t) /*_.VALROUT___V635*/ meltfptr[634])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V635*/ meltfptr[634])->tabval[2] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]); MELT_LOCATION ("warmelt-outobj.melt:4527:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V635*/ meltfptr[634]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V635*/ meltfptr[634]); /*putclosurout#90 */ melt_assertmsg ("putclosrout#90 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V636*/ meltfptr[635])) == + ( /*_._VALCLO___V636*/ meltfptr[635])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#90 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V635*/ meltfptr[634])) == + ( /*_._VALROUT___V635*/ meltfptr[634])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V636*/ meltfptr[635])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V635*/ meltfptr[634]); + ((meltclosure_ptr_t) /*_._VALCLO___V636*/ meltfptr[635])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V635*/ meltfptr[634]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V636*/ meltfptr[635]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V636*/ meltfptr[635]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V637*/ meltfptr[636])) == + ( /*_._VALDATA___V637*/ meltfptr[636])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V637*/ + ( /*_._VALDATA___V637*/ meltfptr[636])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V637*/ meltfptr[636]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V637*/ meltfptr[636]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V638*/ meltfptr[637]); + /*_._VALSTR___V638*/ meltfptr[637]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V637*/ meltfptr[636]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V637*/ meltfptr[636]); - melt_dbgtrace_written_object ( /*_.VALDATA___V637*/ meltfptr[636], + melt_dbgtrace_written_object ( /*_._VALDATA___V637*/ meltfptr[636], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:4547:/ initchunk"); @@ -38776,12 +38851,12 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V639*/ meltfptr[638])) + ( /*_._VALROUT___V639*/ meltfptr[638])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_452__OUTPUCOD_OBJPUTUPLE#0", NULL != ( /*_.CLASS_OBJPUTUPLE__V120*/ meltfptr[119])); - ((meltroutine_ptr_t) /*_.VALROUT___V639*/ meltfptr[638])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V639*/ meltfptr[638])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJPUTUPLE__V120*/ meltfptr[119]); MELT_LOCATION ("warmelt-outobj.melt:4547:/ initchunk"); @@ -38789,24 +38864,24 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V639*/ meltfptr[638])) == + ( /*_._VALROUT___V639*/ meltfptr[638])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V371*/ meltfptr[370]); - ((meltroutine_ptr_t) /*_.VALROUT___V639*/ meltfptr[638])->tabval[1] = - (melt_ptr_t) ( /*_.VALCLO___V371*/ meltfptr[370]); + NULL != /*_._VALCLO___V371*/ meltfptr[370]); + ((meltroutine_ptr_t) /*_._VALROUT___V639*/ meltfptr[638])->tabval[1] = + (melt_ptr_t) ( /*_._VALCLO___V371*/ meltfptr[370]); MELT_LOCATION ("warmelt-outobj.melt:4547:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V639*/ meltfptr[638])) == + ( /*_._VALROUT___V639*/ meltfptr[638])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V259*/ meltfptr[258]); - ((meltroutine_ptr_t) /*_.VALROUT___V639*/ meltfptr[638])->tabval[2] = - (melt_ptr_t) ( /*_.VALCLO___V259*/ meltfptr[258]); + NULL != /*_._VALCLO___V259*/ meltfptr[258]); + ((meltroutine_ptr_t) /*_._VALROUT___V639*/ meltfptr[638])->tabval[2] = + (melt_ptr_t) ( /*_._VALCLO___V259*/ meltfptr[258]); MELT_LOCATION ("warmelt-outobj.melt:4547:/ initchunk"); /*^putroutconst */ @@ -38814,12 +38889,12 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V639*/ meltfptr[638])) + ( /*_._VALROUT___V639*/ meltfptr[638])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_452__OUTPUCOD_OBJPUTUPLE#3", NULL != ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20])); - ((meltroutine_ptr_t) /*_.VALROUT___V639*/ meltfptr[638])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V639*/ meltfptr[638])->tabval[3] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]); MELT_LOCATION ("warmelt-outobj.melt:4547:/ initchunk"); @@ -38827,12 +38902,12 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V639*/ meltfptr[638])) == + ( /*_._VALROUT___V639*/ meltfptr[638])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALDATA___V192*/ meltfptr[191]); - ((meltroutine_ptr_t) /*_.VALROUT___V639*/ meltfptr[638])->tabval[4] = - (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); + NULL != /*_._VALDATA___V192*/ meltfptr[191]); + ((meltroutine_ptr_t) /*_._VALROUT___V639*/ meltfptr[638])->tabval[4] = + (melt_ptr_t) ( /*_._VALDATA___V192*/ meltfptr[191]); MELT_LOCATION ("warmelt-outobj.melt:4547:/ initchunk"); /*^putroutconst */ @@ -38840,78 +38915,78 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V639*/ meltfptr[638])) + ( /*_._VALROUT___V639*/ meltfptr[638])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_452__OUTPUCOD_OBJPUTUPLE#5", NULL != ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_.VALROUT___V639*/ meltfptr[638])->tabval[5] = + ((meltroutine_ptr_t) /*_._VALROUT___V639*/ meltfptr[638])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:4547:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V639*/ meltfptr[638]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V639*/ meltfptr[638]); /*putclosurout#91 */ melt_assertmsg ("putclosrout#91 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V640*/ meltfptr[639])) == + ( /*_._VALCLO___V640*/ meltfptr[639])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#91 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V639*/ meltfptr[638])) == + ( /*_._VALROUT___V639*/ meltfptr[638])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V640*/ meltfptr[639])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V639*/ meltfptr[638]); + ((meltclosure_ptr_t) /*_._VALCLO___V640*/ meltfptr[639])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V639*/ meltfptr[638]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V640*/ meltfptr[639]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V640*/ meltfptr[639]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V641*/ meltfptr[640])) == + ( /*_._VALDATA___V641*/ meltfptr[640])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V641*/ + ( /*_._VALDATA___V641*/ meltfptr[640])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V641*/ meltfptr[640]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V641*/ meltfptr[640]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V642*/ meltfptr[641]); + /*_._VALSTR___V642*/ meltfptr[641]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V641*/ meltfptr[640]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V641*/ meltfptr[640]); - melt_dbgtrace_written_object ( /*_.VALDATA___V641*/ meltfptr[640], + melt_dbgtrace_written_object ( /*_._VALDATA___V641*/ meltfptr[640], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V643*/ meltfptr[642])) == + ( /*_._VALDATA___V643*/ meltfptr[642])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V643*/ + ( /*_._VALDATA___V643*/ meltfptr[642])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V643*/ meltfptr[642]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V643*/ meltfptr[642]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V644*/ meltfptr[643]); + /*_._VALSTR___V644*/ meltfptr[643]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V643*/ meltfptr[642]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V643*/ meltfptr[642]); - melt_dbgtrace_written_object ( /*_.VALDATA___V643*/ meltfptr[642], + melt_dbgtrace_written_object ( /*_._VALDATA___V643*/ meltfptr[642], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:4620:/ initchunk"); @@ -38919,28 +38994,28 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (meltinitial_frame_t * /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V645*/ meltfptr[644])) == + ( /*_._VALDATA___V645*/ meltfptr[644])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (0 >= 0 && 0 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V645*/ + ( /*_._VALDATA___V645*/ meltfptr[644])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V645*/ meltfptr[644]))->obj_vartab[0] = + ((meltobject_ptr_t) ( /*_._VALDATA___V645*/ meltfptr[644]))->obj_vartab[0] = (melt_ptr_t) ( - /*_.VALBXINT___V646*/ meltfptr[645]); + /*_._VALBXINT___V646*/ meltfptr[645]); MELT_LOCATION ("warmelt-outobj.melt:4620:/ initchunk"); /*^touch */ - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V645*/ meltfptr[644]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V645*/ meltfptr[644]); MELT_LOCATION ("warmelt-outobj.melt:4620:/ initchunk"); /*^touchobj */ - melt_dbgtrace_written_object ( /*_.VALDATA___V645*/ meltfptr[644], + melt_dbgtrace_written_object ( /*_._VALDATA___V645*/ meltfptr[644], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:4622:/ initchunk"); @@ -38949,13 +39024,13 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V647*/ meltfptr[646])) + ( /*_._VALROUT___V647*/ meltfptr[646])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_460__OUTPUCOD_OBJPUTPAIRHEAD#0", NULL != ( /*_.CLASS_OBJPUTPAIR__V121*/ meltfptr[120])); - ((meltroutine_ptr_t) /*_.VALROUT___V647*/ meltfptr[646])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V647*/ meltfptr[646])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJPUTPAIR__V121*/ meltfptr[120]); MELT_LOCATION ("warmelt-outobj.melt:4622:/ initchunk"); @@ -38964,13 +39039,13 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V647*/ meltfptr[646])) + ( /*_._VALROUT___V647*/ meltfptr[646])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_460__OUTPUCOD_OBJPUTPAIRHEAD#1", NULL != ( /*_.CLASS_OBJPUTPAIRHEAD__V122*/ meltfptr[121])); - ((meltroutine_ptr_t) /*_.VALROUT___V647*/ meltfptr[646])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V647*/ meltfptr[646])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_OBJPUTPAIRHEAD__V122*/ meltfptr[121]); MELT_LOCATION ("warmelt-outobj.melt:4622:/ initchunk"); @@ -38978,12 +39053,12 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V647*/ meltfptr[646])) == + ( /*_._VALROUT___V647*/ meltfptr[646])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALDATA___V645*/ meltfptr[644]); - ((meltroutine_ptr_t) /*_.VALROUT___V647*/ meltfptr[646])->tabval[2] = - (melt_ptr_t) ( /*_.VALDATA___V645*/ meltfptr[644]); + NULL != /*_._VALDATA___V645*/ meltfptr[644]); + ((meltroutine_ptr_t) /*_._VALROUT___V647*/ meltfptr[646])->tabval[2] = + (melt_ptr_t) ( /*_._VALDATA___V645*/ meltfptr[644]); MELT_LOCATION ("warmelt-outobj.melt:4622:/ initchunk"); /*^putroutconst */ @@ -38991,13 +39066,13 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V647*/ meltfptr[646])) + ( /*_._VALROUT___V647*/ meltfptr[646])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_460__OUTPUCOD_OBJPUTPAIRHEAD#3", NULL != ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_.VALROUT___V647*/ meltfptr[646])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V647*/ meltfptr[646])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:4622:/ initchunk"); @@ -39005,12 +39080,12 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V647*/ meltfptr[646])) == + ( /*_._VALROUT___V647*/ meltfptr[646])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V259*/ meltfptr[258]); - ((meltroutine_ptr_t) /*_.VALROUT___V647*/ meltfptr[646])->tabval[4] = - (melt_ptr_t) ( /*_.VALCLO___V259*/ meltfptr[258]); + NULL != /*_._VALCLO___V259*/ meltfptr[258]); + ((meltroutine_ptr_t) /*_._VALROUT___V647*/ meltfptr[646])->tabval[4] = + (melt_ptr_t) ( /*_._VALCLO___V259*/ meltfptr[258]); MELT_LOCATION ("warmelt-outobj.melt:4622:/ initchunk"); /*^putroutconst */ @@ -39018,13 +39093,13 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V647*/ meltfptr[646])) + ( /*_._VALROUT___V647*/ meltfptr[646])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_460__OUTPUCOD_OBJPUTPAIRHEAD#5", NULL != ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20])); - ((meltroutine_ptr_t) /*_.VALROUT___V647*/ meltfptr[646])->tabval[5] = + ((meltroutine_ptr_t) /*_._VALROUT___V647*/ meltfptr[646])->tabval[5] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]); MELT_LOCATION ("warmelt-outobj.melt:4622:/ initchunk"); @@ -39032,77 +39107,77 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V647*/ meltfptr[646])) == + ( /*_._VALROUT___V647*/ meltfptr[646])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALDATA___V192*/ meltfptr[191]); - ((meltroutine_ptr_t) /*_.VALROUT___V647*/ meltfptr[646])->tabval[6] = - (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); + NULL != /*_._VALDATA___V192*/ meltfptr[191]); + ((meltroutine_ptr_t) /*_._VALROUT___V647*/ meltfptr[646])->tabval[6] = + (melt_ptr_t) ( /*_._VALDATA___V192*/ meltfptr[191]); MELT_LOCATION ("warmelt-outobj.melt:4622:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V647*/ meltfptr[646]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V647*/ meltfptr[646]); /*putclosurout#92 */ melt_assertmsg ("putclosrout#92 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V648*/ meltfptr[647])) == + ( /*_._VALCLO___V648*/ meltfptr[647])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#92 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V647*/ meltfptr[646])) == + ( /*_._VALROUT___V647*/ meltfptr[646])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V648*/ meltfptr[647])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V647*/ meltfptr[646]); + ((meltclosure_ptr_t) /*_._VALCLO___V648*/ meltfptr[647])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V647*/ meltfptr[646]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V648*/ meltfptr[647]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V648*/ meltfptr[647]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V649*/ meltfptr[648])) == + ( /*_._VALDATA___V649*/ meltfptr[648])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V649*/ + ( /*_._VALDATA___V649*/ meltfptr[648])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V649*/ meltfptr[648]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V649*/ meltfptr[648]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V650*/ meltfptr[649]); + /*_._VALSTR___V650*/ meltfptr[649]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V649*/ meltfptr[648]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V649*/ meltfptr[648]); - melt_dbgtrace_written_object ( /*_.VALDATA___V649*/ meltfptr[648], + melt_dbgtrace_written_object ( /*_._VALDATA___V649*/ meltfptr[648], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V651*/ meltfptr[650])) == + ( /*_._VALDATA___V651*/ meltfptr[650])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V651*/ + ( /*_._VALDATA___V651*/ meltfptr[650])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V651*/ meltfptr[650]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V651*/ meltfptr[650]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V652*/ meltfptr[651]); + /*_._VALSTR___V652*/ meltfptr[651]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V651*/ meltfptr[650]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V651*/ meltfptr[650]); - melt_dbgtrace_written_object ( /*_.VALDATA___V651*/ meltfptr[650], + melt_dbgtrace_written_object ( /*_._VALDATA___V651*/ meltfptr[650], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:4651:/ initchunk"); @@ -39111,13 +39186,13 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V653*/ meltfptr[652])) + ( /*_._VALROUT___V653*/ meltfptr[652])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_466__OUTPUCOD_OBJPUTPAIRTAIL#0", NULL != ( /*_.CLASS_OBJPUTPAIR__V121*/ meltfptr[120])); - ((meltroutine_ptr_t) /*_.VALROUT___V653*/ meltfptr[652])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V653*/ meltfptr[652])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJPUTPAIR__V121*/ meltfptr[120]); MELT_LOCATION ("warmelt-outobj.melt:4651:/ initchunk"); @@ -39126,13 +39201,13 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V653*/ meltfptr[652])) + ( /*_._VALROUT___V653*/ meltfptr[652])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_466__OUTPUCOD_OBJPUTPAIRTAIL#1", NULL != ( /*_.CLASS_OBJPUTPAIRTAIL__V123*/ meltfptr[122])); - ((meltroutine_ptr_t) /*_.VALROUT___V653*/ meltfptr[652])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V653*/ meltfptr[652])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_OBJPUTPAIRTAIL__V123*/ meltfptr[122]); MELT_LOCATION ("warmelt-outobj.melt:4651:/ initchunk"); @@ -39140,12 +39215,12 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V653*/ meltfptr[652])) == + ( /*_._VALROUT___V653*/ meltfptr[652])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V259*/ meltfptr[258]); - ((meltroutine_ptr_t) /*_.VALROUT___V653*/ meltfptr[652])->tabval[2] = - (melt_ptr_t) ( /*_.VALCLO___V259*/ meltfptr[258]); + NULL != /*_._VALCLO___V259*/ meltfptr[258]); + ((meltroutine_ptr_t) /*_._VALROUT___V653*/ meltfptr[652])->tabval[2] = + (melt_ptr_t) ( /*_._VALCLO___V259*/ meltfptr[258]); MELT_LOCATION ("warmelt-outobj.melt:4651:/ initchunk"); /*^putroutconst */ @@ -39153,13 +39228,13 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V653*/ meltfptr[652])) + ( /*_._VALROUT___V653*/ meltfptr[652])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_466__OUTPUCOD_OBJPUTPAIRTAIL#3", NULL != ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20])); - ((meltroutine_ptr_t) /*_.VALROUT___V653*/ meltfptr[652])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V653*/ meltfptr[652])->tabval[3] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]); MELT_LOCATION ("warmelt-outobj.melt:4651:/ initchunk"); @@ -39167,12 +39242,12 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V653*/ meltfptr[652])) == + ( /*_._VALROUT___V653*/ meltfptr[652])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALDATA___V192*/ meltfptr[191]); - ((meltroutine_ptr_t) /*_.VALROUT___V653*/ meltfptr[652])->tabval[4] = - (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); + NULL != /*_._VALDATA___V192*/ meltfptr[191]); + ((meltroutine_ptr_t) /*_._VALROUT___V653*/ meltfptr[652])->tabval[4] = + (melt_ptr_t) ( /*_._VALDATA___V192*/ meltfptr[191]); MELT_LOCATION ("warmelt-outobj.melt:4651:/ initchunk"); /*^putroutconst */ @@ -39180,56 +39255,56 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V653*/ meltfptr[652])) + ( /*_._VALROUT___V653*/ meltfptr[652])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_466__OUTPUCOD_OBJPUTPAIRTAIL#5", NULL != ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_.VALROUT___V653*/ meltfptr[652])->tabval[5] = + ((meltroutine_ptr_t) /*_._VALROUT___V653*/ meltfptr[652])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:4651:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V653*/ meltfptr[652]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V653*/ meltfptr[652]); /*putclosurout#93 */ melt_assertmsg ("putclosrout#93 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V654*/ meltfptr[653])) == + ( /*_._VALCLO___V654*/ meltfptr[653])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#93 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V653*/ meltfptr[652])) == + ( /*_._VALROUT___V653*/ meltfptr[652])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V654*/ meltfptr[653])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V653*/ meltfptr[652]); + ((meltclosure_ptr_t) /*_._VALCLO___V654*/ meltfptr[653])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V653*/ meltfptr[652]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V654*/ meltfptr[653]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V654*/ meltfptr[653]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V655*/ meltfptr[654])) == + ( /*_._VALDATA___V655*/ meltfptr[654])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V655*/ + ( /*_._VALDATA___V655*/ meltfptr[654])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V655*/ meltfptr[654]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V655*/ meltfptr[654]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V656*/ meltfptr[655]); + /*_._VALSTR___V656*/ meltfptr[655]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V655*/ meltfptr[654]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V655*/ meltfptr[654]); - melt_dbgtrace_written_object ( /*_.VALDATA___V655*/ meltfptr[654], + melt_dbgtrace_written_object ( /*_._VALDATA___V655*/ meltfptr[654], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:4677:/ initchunk"); @@ -39238,12 +39313,12 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V657*/ meltfptr[656])) + ( /*_._VALROUT___V657*/ meltfptr[656])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_470__OUTPUCOD_OBJPUTLIST#0", NULL != ( /*_.CLASS_OBJPUTLIST__V124*/ meltfptr[123])); - ((meltroutine_ptr_t) /*_.VALROUT___V657*/ meltfptr[656])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V657*/ meltfptr[656])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJPUTLIST__V124*/ meltfptr[123]); MELT_LOCATION ("warmelt-outobj.melt:4677:/ initchunk"); @@ -39251,12 +39326,12 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V657*/ meltfptr[656])) == + ( /*_._VALROUT___V657*/ meltfptr[656])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V259*/ meltfptr[258]); - ((meltroutine_ptr_t) /*_.VALROUT___V657*/ meltfptr[656])->tabval[1] = - (melt_ptr_t) ( /*_.VALCLO___V259*/ meltfptr[258]); + NULL != /*_._VALCLO___V259*/ meltfptr[258]); + ((meltroutine_ptr_t) /*_._VALROUT___V657*/ meltfptr[656])->tabval[1] = + (melt_ptr_t) ( /*_._VALCLO___V259*/ meltfptr[258]); MELT_LOCATION ("warmelt-outobj.melt:4677:/ initchunk"); /*^putroutconst */ @@ -39264,12 +39339,12 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V657*/ meltfptr[656])) + ( /*_._VALROUT___V657*/ meltfptr[656])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_470__OUTPUCOD_OBJPUTLIST#2", NULL != ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20])); - ((meltroutine_ptr_t) /*_.VALROUT___V657*/ meltfptr[656])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V657*/ meltfptr[656])->tabval[2] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]); MELT_LOCATION ("warmelt-outobj.melt:4677:/ initchunk"); @@ -39277,12 +39352,12 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V657*/ meltfptr[656])) == + ( /*_._VALROUT___V657*/ meltfptr[656])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALDATA___V192*/ meltfptr[191]); - ((meltroutine_ptr_t) /*_.VALROUT___V657*/ meltfptr[656])->tabval[3] = - (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); + NULL != /*_._VALDATA___V192*/ meltfptr[191]); + ((meltroutine_ptr_t) /*_._VALROUT___V657*/ meltfptr[656])->tabval[3] = + (melt_ptr_t) ( /*_._VALDATA___V192*/ meltfptr[191]); MELT_LOCATION ("warmelt-outobj.melt:4677:/ initchunk"); /*^putroutconst */ @@ -39290,55 +39365,55 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V657*/ meltfptr[656])) + ( /*_._VALROUT___V657*/ meltfptr[656])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_470__OUTPUCOD_OBJPUTLIST#4", NULL != ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_.VALROUT___V657*/ meltfptr[656])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V657*/ meltfptr[656])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:4677:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V657*/ meltfptr[656]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V657*/ meltfptr[656]); /*putclosurout#94 */ melt_assertmsg ("putclosrout#94 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V658*/ meltfptr[657])) == + ( /*_._VALCLO___V658*/ meltfptr[657])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#94 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V657*/ meltfptr[656])) == + ( /*_._VALROUT___V657*/ meltfptr[656])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V658*/ meltfptr[657])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V657*/ meltfptr[656]); + ((meltclosure_ptr_t) /*_._VALCLO___V658*/ meltfptr[657])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V657*/ meltfptr[656]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V658*/ meltfptr[657]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V658*/ meltfptr[657]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V659*/ meltfptr[658])) == + ( /*_._VALDATA___V659*/ meltfptr[658])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V659*/ + ( /*_._VALDATA___V659*/ meltfptr[658])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V659*/ meltfptr[658]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V659*/ meltfptr[658]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V660*/ meltfptr[659]); + /*_._VALSTR___V660*/ meltfptr[659]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V659*/ meltfptr[658]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V659*/ meltfptr[658]); - melt_dbgtrace_written_object ( /*_.VALDATA___V659*/ meltfptr[658], + melt_dbgtrace_written_object ( /*_._VALDATA___V659*/ meltfptr[658], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:4708:/ initchunk"); @@ -39347,12 +39422,12 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V661*/ meltfptr[660])) + ( /*_._VALROUT___V661*/ meltfptr[660])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_474__OUTPUCOD_OBJGETSLOT#0", NULL != ( /*_.CLASS_OBJGETSLOT__V125*/ meltfptr[124])); - ((meltroutine_ptr_t) /*_.VALROUT___V661*/ meltfptr[660])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V661*/ meltfptr[660])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJGETSLOT__V125*/ meltfptr[124]); MELT_LOCATION ("warmelt-outobj.melt:4708:/ initchunk"); @@ -39361,12 +39436,12 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V661*/ meltfptr[660])) + ( /*_._VALROUT___V661*/ meltfptr[660])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_474__OUTPUCOD_OBJGETSLOT#1", NULL != ( /*_.DISCR_INTEGER__V53*/ meltfptr[52])); - ((meltroutine_ptr_t) /*_.VALROUT___V661*/ meltfptr[660])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V661*/ meltfptr[660])->tabval[1] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V53*/ meltfptr[52]); MELT_LOCATION ("warmelt-outobj.melt:4708:/ initchunk"); @@ -39375,12 +39450,12 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V661*/ meltfptr[660])) + ( /*_._VALROUT___V661*/ meltfptr[660])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_474__OUTPUCOD_OBJGETSLOT#2", NULL != ( /*_.CLASS_FIELD__V126*/ meltfptr[125])); - ((meltroutine_ptr_t) /*_.VALROUT___V661*/ meltfptr[660])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V661*/ meltfptr[660])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_FIELD__V126*/ meltfptr[125]); MELT_LOCATION ("warmelt-outobj.melt:4708:/ initchunk"); @@ -39388,12 +39463,12 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V661*/ meltfptr[660])) == + ( /*_._VALROUT___V661*/ meltfptr[660])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V259*/ meltfptr[258]); - ((meltroutine_ptr_t) /*_.VALROUT___V661*/ meltfptr[660])->tabval[3] = - (melt_ptr_t) ( /*_.VALCLO___V259*/ meltfptr[258]); + NULL != /*_._VALCLO___V259*/ meltfptr[258]); + ((meltroutine_ptr_t) /*_._VALROUT___V661*/ meltfptr[660])->tabval[3] = + (melt_ptr_t) ( /*_._VALCLO___V259*/ meltfptr[258]); MELT_LOCATION ("warmelt-outobj.melt:4708:/ initchunk"); /*^putroutconst */ @@ -39401,12 +39476,12 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V661*/ meltfptr[660])) + ( /*_._VALROUT___V661*/ meltfptr[660])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_474__OUTPUCOD_OBJGETSLOT#4", NULL != ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20])); - ((meltroutine_ptr_t) /*_.VALROUT___V661*/ meltfptr[660])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V661*/ meltfptr[660])->tabval[4] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]); MELT_LOCATION ("warmelt-outobj.melt:4708:/ initchunk"); @@ -39415,12 +39490,12 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V661*/ meltfptr[660])) + ( /*_._VALROUT___V661*/ meltfptr[660])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_474__OUTPUCOD_OBJGETSLOT#5", NULL != ( /*_.LIST_EVERY__V57*/ meltfptr[56])); - ((meltroutine_ptr_t) /*_.VALROUT___V661*/ meltfptr[660])->tabval[5] = + ((meltroutine_ptr_t) /*_._VALROUT___V661*/ meltfptr[660])->tabval[5] = (melt_ptr_t) ( /*_.LIST_EVERY__V57*/ meltfptr[56]); MELT_LOCATION ("warmelt-outobj.melt:4708:/ initchunk"); @@ -39429,12 +39504,12 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V661*/ meltfptr[660])) + ( /*_._VALROUT___V661*/ meltfptr[660])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_474__OUTPUCOD_OBJGETSLOT#6", NULL != ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20])); - ((meltroutine_ptr_t) /*_.VALROUT___V661*/ meltfptr[660])->tabval[6] = + ((meltroutine_ptr_t) /*_._VALROUT___V661*/ meltfptr[660])->tabval[6] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]); MELT_LOCATION ("warmelt-outobj.melt:4708:/ initchunk"); @@ -39442,12 +39517,12 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V661*/ meltfptr[660])) == + ( /*_._VALROUT___V661*/ meltfptr[660])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALDATA___V192*/ meltfptr[191]); - ((meltroutine_ptr_t) /*_.VALROUT___V661*/ meltfptr[660])->tabval[7] = - (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); + NULL != /*_._VALDATA___V192*/ meltfptr[191]); + ((meltroutine_ptr_t) /*_._VALROUT___V661*/ meltfptr[660])->tabval[7] = + (melt_ptr_t) ( /*_._VALDATA___V192*/ meltfptr[191]); MELT_LOCATION ("warmelt-outobj.melt:4708:/ initchunk"); /*^putroutconst */ @@ -39455,12 +39530,12 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V661*/ meltfptr[660])) + ( /*_._VALROUT___V661*/ meltfptr[660])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_474__OUTPUCOD_OBJGETSLOT#8", NULL != ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_.VALROUT___V661*/ meltfptr[660])->tabval[8] = + ((meltroutine_ptr_t) /*_._VALROUT___V661*/ meltfptr[660])->tabval[8] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:4732:/ initchunk"); @@ -39469,12 +39544,12 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V662*/ meltfptr[661])) + ( /*_._VALROUT___V662*/ meltfptr[661])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_480__LAMBDA_#0", NULL != ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20])); - ((meltroutine_ptr_t) /*_.VALROUT___V662*/ meltfptr[661])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V662*/ meltfptr[661])->tabval[0] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]); MELT_LOCATION ("warmelt-outobj.melt:4732:/ initchunk"); @@ -39482,12 +39557,12 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V662*/ meltfptr[661])) == + ( /*_._VALROUT___V662*/ meltfptr[661])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALDATA___V192*/ meltfptr[191]); - ((meltroutine_ptr_t) /*_.VALROUT___V662*/ meltfptr[661])->tabval[1] = - (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); + NULL != /*_._VALDATA___V192*/ meltfptr[191]); + ((meltroutine_ptr_t) /*_._VALROUT___V662*/ meltfptr[661])->tabval[1] = + (melt_ptr_t) ( /*_._VALDATA___V192*/ meltfptr[191]); MELT_LOCATION ("warmelt-outobj.melt:4732:/ initchunk"); /*^putroutconst */ @@ -39495,18 +39570,18 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V662*/ meltfptr[661])) + ( /*_._VALROUT___V662*/ meltfptr[661])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_480__LAMBDA_#2", NULL != ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_.VALROUT___V662*/ meltfptr[661])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V662*/ meltfptr[661])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:4732:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V662*/ meltfptr[661]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V662*/ meltfptr[661]); MELT_LOCATION ("warmelt-outobj.melt:4708:/ initchunk"); /*^putroutconst */ @@ -39514,25 +39589,25 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V661*/ meltfptr[660])) + ( /*_._VALROUT___V661*/ meltfptr[660])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_474__OUTPUCOD_OBJGETSLOT#9", - NULL != ( /*_.VALROUT___V662*/ meltfptr[661])); - ((meltroutine_ptr_t) /*_.VALROUT___V661*/ meltfptr[660])->tabval[9] = - (melt_ptr_t) ( /*_.VALROUT___V662*/ meltfptr[661]); + NULL != ( /*_._VALROUT___V662*/ meltfptr[661])); + ((meltroutine_ptr_t) /*_._VALROUT___V661*/ meltfptr[660])->tabval[9] = + (melt_ptr_t) ( /*_._VALROUT___V662*/ meltfptr[661]); MELT_LOCATION ("warmelt-outobj.melt:4708:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V661*/ meltfptr[660])) == + ( /*_._VALROUT___V661*/ meltfptr[660])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALDATA___V192*/ meltfptr[191]); - ((meltroutine_ptr_t) /*_.VALROUT___V661*/ meltfptr[660])->tabval[10] = - (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); + NULL != /*_._VALDATA___V192*/ meltfptr[191]); + ((meltroutine_ptr_t) /*_._VALROUT___V661*/ meltfptr[660])->tabval[10] = + (melt_ptr_t) ( /*_._VALDATA___V192*/ meltfptr[191]); MELT_LOCATION ("warmelt-outobj.melt:4708:/ initchunk"); /*^putroutconst */ @@ -39540,78 +39615,78 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V661*/ meltfptr[660])) + ( /*_._VALROUT___V661*/ meltfptr[660])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_474__OUTPUCOD_OBJGETSLOT#11", NULL != ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_.VALROUT___V661*/ meltfptr[660])->tabval[11] = + ((meltroutine_ptr_t) /*_._VALROUT___V661*/ meltfptr[660])->tabval[11] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:4708:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V661*/ meltfptr[660]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V661*/ meltfptr[660]); /*putclosurout#95 */ melt_assertmsg ("putclosrout#95 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V663*/ meltfptr[662])) == + ( /*_._VALCLO___V663*/ meltfptr[662])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#95 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V661*/ meltfptr[660])) == + ( /*_._VALROUT___V661*/ meltfptr[660])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V663*/ meltfptr[662])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V661*/ meltfptr[660]); + ((meltclosure_ptr_t) /*_._VALCLO___V663*/ meltfptr[662])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V661*/ meltfptr[660]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V663*/ meltfptr[662]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V663*/ meltfptr[662]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V664*/ meltfptr[663])) == + ( /*_._VALDATA___V664*/ meltfptr[663])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V664*/ + ( /*_._VALDATA___V664*/ meltfptr[663])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V664*/ meltfptr[663]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V664*/ meltfptr[663]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V665*/ meltfptr[664]); + /*_._VALSTR___V665*/ meltfptr[664]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V664*/ meltfptr[663]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V664*/ meltfptr[663]); - melt_dbgtrace_written_object ( /*_.VALDATA___V664*/ meltfptr[663], + melt_dbgtrace_written_object ( /*_._VALDATA___V664*/ meltfptr[663], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V666*/ meltfptr[665])) == + ( /*_._VALDATA___V666*/ meltfptr[665])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V666*/ + ( /*_._VALDATA___V666*/ meltfptr[665])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V666*/ meltfptr[665]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V666*/ meltfptr[665]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V667*/ meltfptr[666]); + /*_._VALSTR___V667*/ meltfptr[666]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V666*/ meltfptr[665]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V666*/ meltfptr[665]); - melt_dbgtrace_written_object ( /*_.VALDATA___V666*/ meltfptr[665], + melt_dbgtrace_written_object ( /*_._VALDATA___V666*/ meltfptr[665], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:4747:/ initchunk"); @@ -39620,12 +39695,12 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V668*/ meltfptr[667])) + ( /*_._VALROUT___V668*/ meltfptr[667])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_481__OUTPUCOD_OBJPUTSLOT#0", NULL != ( /*_.CLASS_OBJPUTSLOT__V127*/ meltfptr[126])); - ((meltroutine_ptr_t) /*_.VALROUT___V668*/ meltfptr[667])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V668*/ meltfptr[667])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJPUTSLOT__V127*/ meltfptr[126]); MELT_LOCATION ("warmelt-outobj.melt:4747:/ initchunk"); @@ -39634,12 +39709,12 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V668*/ meltfptr[667])) + ( /*_._VALROUT___V668*/ meltfptr[667])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_481__OUTPUCOD_OBJPUTSLOT#1", NULL != ( /*_.CLASS_NREP__V39*/ meltfptr[38])); - ((meltroutine_ptr_t) /*_.VALROUT___V668*/ meltfptr[667])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V668*/ meltfptr[667])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_NREP__V39*/ meltfptr[38]); MELT_LOCATION ("warmelt-outobj.melt:4747:/ initchunk"); @@ -39647,12 +39722,12 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V668*/ meltfptr[667])) == + ( /*_._VALROUT___V668*/ meltfptr[667])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V259*/ meltfptr[258]); - ((meltroutine_ptr_t) /*_.VALROUT___V668*/ meltfptr[667])->tabval[2] = - (melt_ptr_t) ( /*_.VALCLO___V259*/ meltfptr[258]); + NULL != /*_._VALCLO___V259*/ meltfptr[258]); + ((meltroutine_ptr_t) /*_._VALROUT___V668*/ meltfptr[667])->tabval[2] = + (melt_ptr_t) ( /*_._VALCLO___V259*/ meltfptr[258]); MELT_LOCATION ("warmelt-outobj.melt:4747:/ initchunk"); /*^putroutconst */ @@ -39660,12 +39735,12 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V668*/ meltfptr[667])) + ( /*_._VALROUT___V668*/ meltfptr[667])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_481__OUTPUCOD_OBJPUTSLOT#3", NULL != ( /*_.CLASS_NAMED__V14*/ meltfptr[13])); - ((meltroutine_ptr_t) /*_.VALROUT___V668*/ meltfptr[667])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V668*/ meltfptr[667])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_NAMED__V14*/ meltfptr[13]); MELT_LOCATION ("warmelt-outobj.melt:4747:/ initchunk"); @@ -39674,12 +39749,12 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V668*/ meltfptr[667])) + ( /*_._VALROUT___V668*/ meltfptr[667])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_481__OUTPUCOD_OBJPUTSLOT#4", NULL != ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20])); - ((meltroutine_ptr_t) /*_.VALROUT___V668*/ meltfptr[667])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V668*/ meltfptr[667])->tabval[4] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]); MELT_LOCATION ("warmelt-outobj.melt:4747:/ initchunk"); @@ -39688,12 +39763,12 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V668*/ meltfptr[667])) + ( /*_._VALROUT___V668*/ meltfptr[667])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_481__OUTPUCOD_OBJPUTSLOT#5", NULL != ( /*_.CLASS_FIELD__V126*/ meltfptr[125])); - ((meltroutine_ptr_t) /*_.VALROUT___V668*/ meltfptr[667])->tabval[5] = + ((meltroutine_ptr_t) /*_._VALROUT___V668*/ meltfptr[667])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_FIELD__V126*/ meltfptr[125]); MELT_LOCATION ("warmelt-outobj.melt:4747:/ initchunk"); @@ -39701,12 +39776,12 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V668*/ meltfptr[667])) == + ( /*_._VALROUT___V668*/ meltfptr[667])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALDATA___V192*/ meltfptr[191]); - ((meltroutine_ptr_t) /*_.VALROUT___V668*/ meltfptr[667])->tabval[6] = - (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); + NULL != /*_._VALDATA___V192*/ meltfptr[191]); + ((meltroutine_ptr_t) /*_._VALROUT___V668*/ meltfptr[667])->tabval[6] = + (melt_ptr_t) ( /*_._VALDATA___V192*/ meltfptr[191]); MELT_LOCATION ("warmelt-outobj.melt:4747:/ initchunk"); /*^putroutconst */ @@ -39714,55 +39789,55 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V668*/ meltfptr[667])) + ( /*_._VALROUT___V668*/ meltfptr[667])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_481__OUTPUCOD_OBJPUTSLOT#7", NULL != ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_.VALROUT___V668*/ meltfptr[667])->tabval[7] = + ((meltroutine_ptr_t) /*_._VALROUT___V668*/ meltfptr[667])->tabval[7] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:4747:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V668*/ meltfptr[667]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V668*/ meltfptr[667]); /*putclosurout#96 */ melt_assertmsg ("putclosrout#96 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V669*/ meltfptr[668])) == + ( /*_._VALCLO___V669*/ meltfptr[668])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#96 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V668*/ meltfptr[667])) == + ( /*_._VALROUT___V668*/ meltfptr[667])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V669*/ meltfptr[668])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V668*/ meltfptr[667]); + ((meltclosure_ptr_t) /*_._VALCLO___V669*/ meltfptr[668])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V668*/ meltfptr[667]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V669*/ meltfptr[668]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V669*/ meltfptr[668]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V670*/ meltfptr[669])) == + ( /*_._VALDATA___V670*/ meltfptr[669])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V670*/ + ( /*_._VALDATA___V670*/ meltfptr[669])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V670*/ meltfptr[669]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V670*/ meltfptr[669]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V671*/ meltfptr[670]); + /*_._VALSTR___V671*/ meltfptr[670]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V670*/ meltfptr[669]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V670*/ meltfptr[669]); - melt_dbgtrace_written_object ( /*_.VALDATA___V670*/ meltfptr[669], + melt_dbgtrace_written_object ( /*_._VALDATA___V670*/ meltfptr[669], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:4822:/ initchunk"); @@ -39771,13 +39846,13 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V672*/ meltfptr[671])) + ( /*_._VALROUT___V672*/ meltfptr[671])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_485__OUTPUCOD_OBJPUTCLOSUROUT#0", NULL != ( /*_.CLASS_OBJPUTCLOSUROUT__V128*/ meltfptr[127])); - ((meltroutine_ptr_t) /*_.VALROUT___V672*/ meltfptr[671])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V672*/ meltfptr[671])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJPUTCLOSUROUT__V128*/ meltfptr[127]); MELT_LOCATION ("warmelt-outobj.melt:4822:/ initchunk"); @@ -39785,12 +39860,12 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V672*/ meltfptr[671])) == + ( /*_._VALROUT___V672*/ meltfptr[671])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V259*/ meltfptr[258]); - ((meltroutine_ptr_t) /*_.VALROUT___V672*/ meltfptr[671])->tabval[1] = - (melt_ptr_t) ( /*_.VALCLO___V259*/ meltfptr[258]); + NULL != /*_._VALCLO___V259*/ meltfptr[258]); + ((meltroutine_ptr_t) /*_._VALROUT___V672*/ meltfptr[671])->tabval[1] = + (melt_ptr_t) ( /*_._VALCLO___V259*/ meltfptr[258]); MELT_LOCATION ("warmelt-outobj.melt:4822:/ initchunk"); /*^putroutconst */ @@ -39798,13 +39873,13 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V672*/ meltfptr[671])) + ( /*_._VALROUT___V672*/ meltfptr[671])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_485__OUTPUCOD_OBJPUTCLOSUROUT#2", NULL != ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20])); - ((meltroutine_ptr_t) /*_.VALROUT___V672*/ meltfptr[671])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V672*/ meltfptr[671])->tabval[2] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]); MELT_LOCATION ("warmelt-outobj.melt:4822:/ initchunk"); @@ -39812,12 +39887,12 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V672*/ meltfptr[671])) == + ( /*_._VALROUT___V672*/ meltfptr[671])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALDATA___V192*/ meltfptr[191]); - ((meltroutine_ptr_t) /*_.VALROUT___V672*/ meltfptr[671])->tabval[3] = - (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); + NULL != /*_._VALDATA___V192*/ meltfptr[191]); + ((meltroutine_ptr_t) /*_._VALROUT___V672*/ meltfptr[671])->tabval[3] = + (melt_ptr_t) ( /*_._VALDATA___V192*/ meltfptr[191]); MELT_LOCATION ("warmelt-outobj.melt:4822:/ initchunk"); /*^putroutconst */ @@ -39825,56 +39900,56 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V672*/ meltfptr[671])) + ( /*_._VALROUT___V672*/ meltfptr[671])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_485__OUTPUCOD_OBJPUTCLOSUROUT#4", NULL != ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_.VALROUT___V672*/ meltfptr[671])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V672*/ meltfptr[671])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:4822:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V672*/ meltfptr[671]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V672*/ meltfptr[671]); /*putclosurout#97 */ melt_assertmsg ("putclosrout#97 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V673*/ meltfptr[672])) == + ( /*_._VALCLO___V673*/ meltfptr[672])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#97 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V672*/ meltfptr[671])) == + ( /*_._VALROUT___V672*/ meltfptr[671])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V673*/ meltfptr[672])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V672*/ meltfptr[671]); + ((meltclosure_ptr_t) /*_._VALCLO___V673*/ meltfptr[672])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V672*/ meltfptr[671]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V673*/ meltfptr[672]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V673*/ meltfptr[672]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V674*/ meltfptr[673])) == + ( /*_._VALDATA___V674*/ meltfptr[673])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V674*/ + ( /*_._VALDATA___V674*/ meltfptr[673])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V674*/ meltfptr[673]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V674*/ meltfptr[673]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V675*/ meltfptr[674]); + /*_._VALSTR___V675*/ meltfptr[674]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V674*/ meltfptr[673]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V674*/ meltfptr[673]); - melt_dbgtrace_written_object ( /*_.VALDATA___V674*/ meltfptr[673], + melt_dbgtrace_written_object ( /*_._VALDATA___V674*/ meltfptr[673], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:4866:/ initchunk"); @@ -39883,13 +39958,13 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V676*/ meltfptr[675])) + ( /*_._VALROUT___V676*/ meltfptr[675])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_489__OUTPUCOD_OBJPUTCLOSEDV#0", NULL != ( /*_.CLASS_OBJPUTCLOSEDV__V129*/ meltfptr[128])); - ((meltroutine_ptr_t) /*_.VALROUT___V676*/ meltfptr[675])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V676*/ meltfptr[675])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJPUTCLOSEDV__V129*/ meltfptr[128]); MELT_LOCATION ("warmelt-outobj.melt:4866:/ initchunk"); @@ -39897,12 +39972,12 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V676*/ meltfptr[675])) == + ( /*_._VALROUT___V676*/ meltfptr[675])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V259*/ meltfptr[258]); - ((meltroutine_ptr_t) /*_.VALROUT___V676*/ meltfptr[675])->tabval[1] = - (melt_ptr_t) ( /*_.VALCLO___V259*/ meltfptr[258]); + NULL != /*_._VALCLO___V259*/ meltfptr[258]); + ((meltroutine_ptr_t) /*_._VALROUT___V676*/ meltfptr[675])->tabval[1] = + (melt_ptr_t) ( /*_._VALCLO___V259*/ meltfptr[258]); MELT_LOCATION ("warmelt-outobj.melt:4866:/ initchunk"); /*^putroutconst */ @@ -39910,13 +39985,13 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V676*/ meltfptr[675])) + ( /*_._VALROUT___V676*/ meltfptr[675])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_489__OUTPUCOD_OBJPUTCLOSEDV#2", NULL != ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20])); - ((meltroutine_ptr_t) /*_.VALROUT___V676*/ meltfptr[675])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V676*/ meltfptr[675])->tabval[2] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]); MELT_LOCATION ("warmelt-outobj.melt:4866:/ initchunk"); @@ -39924,12 +39999,12 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V676*/ meltfptr[675])) == + ( /*_._VALROUT___V676*/ meltfptr[675])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALDATA___V192*/ meltfptr[191]); - ((meltroutine_ptr_t) /*_.VALROUT___V676*/ meltfptr[675])->tabval[3] = - (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); + NULL != /*_._VALDATA___V192*/ meltfptr[191]); + ((meltroutine_ptr_t) /*_._VALROUT___V676*/ meltfptr[675])->tabval[3] = + (melt_ptr_t) ( /*_._VALDATA___V192*/ meltfptr[191]); MELT_LOCATION ("warmelt-outobj.melt:4866:/ initchunk"); /*^putroutconst */ @@ -39937,69 +40012,69 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V676*/ meltfptr[675])) + ( /*_._VALROUT___V676*/ meltfptr[675])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_489__OUTPUCOD_OBJPUTCLOSEDV#4", NULL != ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_.VALROUT___V676*/ meltfptr[675])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V676*/ meltfptr[675])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:4866:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V676*/ meltfptr[675]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V676*/ meltfptr[675]); /*putclosurout#98 */ melt_assertmsg ("putclosrout#98 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V677*/ meltfptr[676])) == + ( /*_._VALCLO___V677*/ meltfptr[676])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#98 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V676*/ meltfptr[675])) == + ( /*_._VALROUT___V676*/ meltfptr[675])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V677*/ meltfptr[676])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V676*/ meltfptr[675]); + ((meltclosure_ptr_t) /*_._VALCLO___V677*/ meltfptr[676])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V676*/ meltfptr[675]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V677*/ meltfptr[676]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V677*/ meltfptr[676]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V678*/ meltfptr[677])) == + ( /*_._VALDATA___V678*/ meltfptr[677])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V678*/ + ( /*_._VALDATA___V678*/ meltfptr[677])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V678*/ meltfptr[677]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V678*/ meltfptr[677]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V679*/ meltfptr[678]); + /*_._VALSTR___V679*/ meltfptr[678]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V678*/ meltfptr[677]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V678*/ meltfptr[677]); #undef meltfram__ -} /*end of meltmod__warmelt_outobj__initialmeltchunk_10 */ +} /*end of meltmod__WARMELTmiOUTOBJ__initialmeltchunk_10 */ void -meltmod__warmelt_outobj__initialmeltchunk_11 (meltinitial_frame_t * - meltmeltframptr__, - char meltpredefinited[]) +meltmod__WARMELTmiOUTOBJ__initialmeltchunk_11 (meltinitial_frame_t * + meltmeltframptr__, + char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L (void) meltpredefinited; - melt_dbgtrace_written_object ( /*_.VALDATA___V678*/ meltfptr[677], + melt_dbgtrace_written_object ( /*_._VALDATA___V678*/ meltfptr[677], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:4902:/ initchunk"); @@ -40008,13 +40083,13 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V680*/ meltfptr[679])) + ( /*_._VALROUT___V680*/ meltfptr[679])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_493__OUTPUCOD_OBJPUTCLOSEDNOTNULLV#0", NULL != ( /*_.CLASS_OBJPUTCLOSEDNOTNULLV__V130*/ meltfptr[129])); - ((meltroutine_ptr_t) /*_.VALROUT___V680*/ meltfptr[679])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V680*/ meltfptr[679])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJPUTCLOSEDNOTNULLV__V130*/ meltfptr[129]); MELT_LOCATION ("warmelt-outobj.melt:4902:/ initchunk"); @@ -40022,12 +40097,12 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V680*/ meltfptr[679])) == + ( /*_._VALROUT___V680*/ meltfptr[679])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V259*/ meltfptr[258]); - ((meltroutine_ptr_t) /*_.VALROUT___V680*/ meltfptr[679])->tabval[1] = - (melt_ptr_t) ( /*_.VALCLO___V259*/ meltfptr[258]); + NULL != /*_._VALCLO___V259*/ meltfptr[258]); + ((meltroutine_ptr_t) /*_._VALROUT___V680*/ meltfptr[679])->tabval[1] = + (melt_ptr_t) ( /*_._VALCLO___V259*/ meltfptr[258]); MELT_LOCATION ("warmelt-outobj.melt:4902:/ initchunk"); /*^putroutconst */ @@ -40035,13 +40110,13 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V680*/ meltfptr[679])) + ( /*_._VALROUT___V680*/ meltfptr[679])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_493__OUTPUCOD_OBJPUTCLOSEDNOTNULLV#2", NULL != ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20])); - ((meltroutine_ptr_t) /*_.VALROUT___V680*/ meltfptr[679])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V680*/ meltfptr[679])->tabval[2] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]); MELT_LOCATION ("warmelt-outobj.melt:4902:/ initchunk"); @@ -40049,12 +40124,12 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V680*/ meltfptr[679])) == + ( /*_._VALROUT___V680*/ meltfptr[679])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALDATA___V192*/ meltfptr[191]); - ((meltroutine_ptr_t) /*_.VALROUT___V680*/ meltfptr[679])->tabval[3] = - (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); + NULL != /*_._VALDATA___V192*/ meltfptr[191]); + ((meltroutine_ptr_t) /*_._VALROUT___V680*/ meltfptr[679])->tabval[3] = + (melt_ptr_t) ( /*_._VALDATA___V192*/ meltfptr[191]); MELT_LOCATION ("warmelt-outobj.melt:4902:/ initchunk"); /*^putroutconst */ @@ -40062,56 +40137,56 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V680*/ meltfptr[679])) + ( /*_._VALROUT___V680*/ meltfptr[679])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_493__OUTPUCOD_OBJPUTCLOSEDNOTNULLV#4", NULL != ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_.VALROUT___V680*/ meltfptr[679])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V680*/ meltfptr[679])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:4902:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V680*/ meltfptr[679]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V680*/ meltfptr[679]); /*putclosurout#99 */ melt_assertmsg ("putclosrout#99 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V681*/ meltfptr[680])) == + ( /*_._VALCLO___V681*/ meltfptr[680])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#99 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V680*/ meltfptr[679])) == + ( /*_._VALROUT___V680*/ meltfptr[679])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V681*/ meltfptr[680])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V680*/ meltfptr[679]); + ((meltclosure_ptr_t) /*_._VALCLO___V681*/ meltfptr[680])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V680*/ meltfptr[679]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V681*/ meltfptr[680]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V681*/ meltfptr[680]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V682*/ meltfptr[681])) == + ( /*_._VALDATA___V682*/ meltfptr[681])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V682*/ + ( /*_._VALDATA___V682*/ meltfptr[681])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V682*/ meltfptr[681]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V682*/ meltfptr[681]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V683*/ meltfptr[682]); + /*_._VALSTR___V683*/ meltfptr[682]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V682*/ meltfptr[681]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V682*/ meltfptr[681]); - melt_dbgtrace_written_object ( /*_.VALDATA___V682*/ meltfptr[681], + melt_dbgtrace_written_object ( /*_._VALDATA___V682*/ meltfptr[681], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:4942:/ initchunk"); @@ -40120,13 +40195,13 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V684*/ meltfptr[683])) + ( /*_._VALROUT___V684*/ meltfptr[683])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_497__OUTPUCOD_OBJPUTROUTCONST#0", NULL != ( /*_.CLASS_OBJPUTROUTCONST__V131*/ meltfptr[130])); - ((meltroutine_ptr_t) /*_.VALROUT___V684*/ meltfptr[683])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V684*/ meltfptr[683])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJPUTROUTCONST__V131*/ meltfptr[130]); MELT_LOCATION ("warmelt-outobj.melt:4942:/ initchunk"); @@ -40135,13 +40210,13 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V684*/ meltfptr[683])) + ( /*_._VALROUT___V684*/ meltfptr[683])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_497__OUTPUCOD_OBJPUTROUTCONST#1", NULL != ( /*_.CLASS_OBJINITROUTINE__V42*/ meltfptr[41])); - ((meltroutine_ptr_t) /*_.VALROUT___V684*/ meltfptr[683])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V684*/ meltfptr[683])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_OBJINITROUTINE__V42*/ meltfptr[41]); MELT_LOCATION ("warmelt-outobj.melt:4942:/ initchunk"); @@ -40149,12 +40224,12 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V684*/ meltfptr[683])) == + ( /*_._VALROUT___V684*/ meltfptr[683])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V259*/ meltfptr[258]); - ((meltroutine_ptr_t) /*_.VALROUT___V684*/ meltfptr[683])->tabval[2] = - (melt_ptr_t) ( /*_.VALCLO___V259*/ meltfptr[258]); + NULL != /*_._VALCLO___V259*/ meltfptr[258]); + ((meltroutine_ptr_t) /*_._VALROUT___V684*/ meltfptr[683])->tabval[2] = + (melt_ptr_t) ( /*_._VALCLO___V259*/ meltfptr[258]); MELT_LOCATION ("warmelt-outobj.melt:4942:/ initchunk"); /*^putroutconst */ @@ -40162,13 +40237,13 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V684*/ meltfptr[683])) + ( /*_._VALROUT___V684*/ meltfptr[683])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_497__OUTPUCOD_OBJPUTROUTCONST#3", NULL != ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20])); - ((meltroutine_ptr_t) /*_.VALROUT___V684*/ meltfptr[683])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V684*/ meltfptr[683])->tabval[3] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]); MELT_LOCATION ("warmelt-outobj.melt:4942:/ initchunk"); @@ -40176,12 +40251,12 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V684*/ meltfptr[683])) == + ( /*_._VALROUT___V684*/ meltfptr[683])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALDATA___V192*/ meltfptr[191]); - ((meltroutine_ptr_t) /*_.VALROUT___V684*/ meltfptr[683])->tabval[4] = - (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); + NULL != /*_._VALDATA___V192*/ meltfptr[191]); + ((meltroutine_ptr_t) /*_._VALROUT___V684*/ meltfptr[683])->tabval[4] = + (melt_ptr_t) ( /*_._VALDATA___V192*/ meltfptr[191]); MELT_LOCATION ("warmelt-outobj.melt:4942:/ initchunk"); /*^putroutconst */ @@ -40189,56 +40264,56 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V684*/ meltfptr[683])) + ( /*_._VALROUT___V684*/ meltfptr[683])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_497__OUTPUCOD_OBJPUTROUTCONST#5", NULL != ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_.VALROUT___V684*/ meltfptr[683])->tabval[5] = + ((meltroutine_ptr_t) /*_._VALROUT___V684*/ meltfptr[683])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:4942:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V684*/ meltfptr[683]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V684*/ meltfptr[683]); /*putclosurout#100 */ melt_assertmsg ("putclosrout#100 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V685*/ meltfptr[684])) == + ( /*_._VALCLO___V685*/ meltfptr[684])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#100 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V684*/ meltfptr[683])) == + ( /*_._VALROUT___V684*/ meltfptr[683])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V685*/ meltfptr[684])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V684*/ meltfptr[683]); + ((meltclosure_ptr_t) /*_._VALCLO___V685*/ meltfptr[684])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V684*/ meltfptr[683]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V685*/ meltfptr[684]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V685*/ meltfptr[684]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V686*/ meltfptr[685])) == + ( /*_._VALDATA___V686*/ meltfptr[685])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V686*/ + ( /*_._VALDATA___V686*/ meltfptr[685])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V686*/ meltfptr[685]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V686*/ meltfptr[685]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V687*/ meltfptr[686]); + /*_._VALSTR___V687*/ meltfptr[686]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V686*/ meltfptr[685]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V686*/ meltfptr[685]); - melt_dbgtrace_written_object ( /*_.VALDATA___V686*/ meltfptr[685], + melt_dbgtrace_written_object ( /*_._VALDATA___V686*/ meltfptr[685], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:4981:/ initchunk"); @@ -40247,13 +40322,13 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V688*/ meltfptr[687])) + ( /*_._VALROUT___V688*/ meltfptr[687])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_501__OUTPUCOD_OBJPUTROUTCONSTNOTNULL#0", NULL != ( /*_.CLASS_OBJPUTROUTCONSTNOTNULL__V132*/ meltfptr[131])); - ((meltroutine_ptr_t) /*_.VALROUT___V688*/ meltfptr[687])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V688*/ meltfptr[687])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJPUTROUTCONSTNOTNULL__V132*/ meltfptr[131]); MELT_LOCATION ("warmelt-outobj.melt:4981:/ initchunk"); @@ -40261,12 +40336,12 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V688*/ meltfptr[687])) == + ( /*_._VALROUT___V688*/ meltfptr[687])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V259*/ meltfptr[258]); - ((meltroutine_ptr_t) /*_.VALROUT___V688*/ meltfptr[687])->tabval[1] = - (melt_ptr_t) ( /*_.VALCLO___V259*/ meltfptr[258]); + NULL != /*_._VALCLO___V259*/ meltfptr[258]); + ((meltroutine_ptr_t) /*_._VALROUT___V688*/ meltfptr[687])->tabval[1] = + (melt_ptr_t) ( /*_._VALCLO___V259*/ meltfptr[258]); MELT_LOCATION ("warmelt-outobj.melt:4981:/ initchunk"); /*^putroutconst */ @@ -40274,13 +40349,13 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V688*/ meltfptr[687])) + ( /*_._VALROUT___V688*/ meltfptr[687])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_501__OUTPUCOD_OBJPUTROUTCONSTNOTNULL#2", NULL != ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20])); - ((meltroutine_ptr_t) /*_.VALROUT___V688*/ meltfptr[687])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V688*/ meltfptr[687])->tabval[2] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]); MELT_LOCATION ("warmelt-outobj.melt:4981:/ initchunk"); @@ -40288,12 +40363,12 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V688*/ meltfptr[687])) == + ( /*_._VALROUT___V688*/ meltfptr[687])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALDATA___V192*/ meltfptr[191]); - ((meltroutine_ptr_t) /*_.VALROUT___V688*/ meltfptr[687])->tabval[3] = - (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); + NULL != /*_._VALDATA___V192*/ meltfptr[191]); + ((meltroutine_ptr_t) /*_._VALROUT___V688*/ meltfptr[687])->tabval[3] = + (melt_ptr_t) ( /*_._VALDATA___V192*/ meltfptr[191]); MELT_LOCATION ("warmelt-outobj.melt:4981:/ initchunk"); /*^putroutconst */ @@ -40301,56 +40376,56 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V688*/ meltfptr[687])) + ( /*_._VALROUT___V688*/ meltfptr[687])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_501__OUTPUCOD_OBJPUTROUTCONSTNOTNULL#4", NULL != ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_.VALROUT___V688*/ meltfptr[687])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V688*/ meltfptr[687])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:4981:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V688*/ meltfptr[687]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V688*/ meltfptr[687]); /*putclosurout#101 */ melt_assertmsg ("putclosrout#101 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V689*/ meltfptr[688])) == + ( /*_._VALCLO___V689*/ meltfptr[688])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#101 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V688*/ meltfptr[687])) == + ( /*_._VALROUT___V688*/ meltfptr[687])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V689*/ meltfptr[688])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V688*/ meltfptr[687]); + ((meltclosure_ptr_t) /*_._VALCLO___V689*/ meltfptr[688])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V688*/ meltfptr[687]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V689*/ meltfptr[688]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V689*/ meltfptr[688]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V690*/ meltfptr[689])) == + ( /*_._VALDATA___V690*/ meltfptr[689])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V690*/ + ( /*_._VALDATA___V690*/ meltfptr[689])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V690*/ meltfptr[689]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V690*/ meltfptr[689]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V691*/ meltfptr[690]); + /*_._VALSTR___V691*/ meltfptr[690]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V690*/ meltfptr[689]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V690*/ meltfptr[689]); - melt_dbgtrace_written_object ( /*_.VALDATA___V690*/ meltfptr[689], + melt_dbgtrace_written_object ( /*_._VALDATA___V690*/ meltfptr[689], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:5014:/ initchunk"); @@ -40359,13 +40434,13 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V692*/ meltfptr[691])) + ( /*_._VALROUT___V692*/ meltfptr[691])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_505__OUTPUCOD_OBJPUTHOOKCONST#0", NULL != ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7])); - ((meltroutine_ptr_t) /*_.VALROUT___V692*/ meltfptr[691])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V692*/ meltfptr[691])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7]); MELT_LOCATION ("warmelt-outobj.melt:5014:/ initchunk"); @@ -40374,13 +40449,13 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V692*/ meltfptr[691])) + ( /*_._VALROUT___V692*/ meltfptr[691])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_505__OUTPUCOD_OBJPUTHOOKCONST#1", NULL != ( /*_.CLASS_OBJPUTHOOKCONST__V133*/ meltfptr[132])); - ((meltroutine_ptr_t) /*_.VALROUT___V692*/ meltfptr[691])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V692*/ meltfptr[691])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_OBJPUTHOOKCONST__V133*/ meltfptr[132]); MELT_LOCATION ("warmelt-outobj.melt:5014:/ initchunk"); @@ -40389,13 +40464,13 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V692*/ meltfptr[691])) + ( /*_._VALROUT___V692*/ meltfptr[691])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_505__OUTPUCOD_OBJPUTHOOKCONST#2", NULL != ( /*_.CLASS_OBJINSTR__V70*/ meltfptr[69])); - ((meltroutine_ptr_t) /*_.VALROUT___V692*/ meltfptr[691])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V692*/ meltfptr[691])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_OBJINSTR__V70*/ meltfptr[69]); MELT_LOCATION ("warmelt-outobj.melt:5014:/ initchunk"); @@ -40404,13 +40479,13 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V692*/ meltfptr[691])) + ( /*_._VALROUT___V692*/ meltfptr[691])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_505__OUTPUCOD_OBJPUTHOOKCONST#3", NULL != ( /*_.CLASS_OBJINITELEM__V20*/ meltfptr[19])); - ((meltroutine_ptr_t) /*_.VALROUT___V692*/ meltfptr[691])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V692*/ meltfptr[691])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_OBJINITELEM__V20*/ meltfptr[19]); MELT_LOCATION ("warmelt-outobj.melt:5014:/ initchunk"); @@ -40419,13 +40494,13 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V692*/ meltfptr[691])) + ( /*_._VALROUT___V692*/ meltfptr[691])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_505__OUTPUCOD_OBJPUTHOOKCONST#4", NULL != ( /*_.CLASS_NREP_BOUND_DATA__V134*/ meltfptr[133])); - ((meltroutine_ptr_t) /*_.VALROUT___V692*/ meltfptr[691])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V692*/ meltfptr[691])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_NREP_BOUND_DATA__V134*/ meltfptr[133]); MELT_LOCATION ("warmelt-outobj.melt:5014:/ initchunk"); @@ -40433,12 +40508,12 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V692*/ meltfptr[691])) == + ( /*_._VALROUT___V692*/ meltfptr[691])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V259*/ meltfptr[258]); - ((meltroutine_ptr_t) /*_.VALROUT___V692*/ meltfptr[691])->tabval[5] = - (melt_ptr_t) ( /*_.VALCLO___V259*/ meltfptr[258]); + NULL != /*_._VALCLO___V259*/ meltfptr[258]); + ((meltroutine_ptr_t) /*_._VALROUT___V692*/ meltfptr[691])->tabval[5] = + (melt_ptr_t) ( /*_._VALCLO___V259*/ meltfptr[258]); MELT_LOCATION ("warmelt-outobj.melt:5014:/ initchunk"); /*^putroutconst */ @@ -40446,13 +40521,13 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V692*/ meltfptr[691])) + ( /*_._VALROUT___V692*/ meltfptr[691])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_505__OUTPUCOD_OBJPUTHOOKCONST#6", NULL != ( /*_.ADD2OUT__V15*/ meltfptr[14])); - ((meltroutine_ptr_t) /*_.VALROUT___V692*/ meltfptr[691])->tabval[6] = + ((meltroutine_ptr_t) /*_._VALROUT___V692*/ meltfptr[691])->tabval[6] = (melt_ptr_t) ( /*_.ADD2OUT__V15*/ meltfptr[14]); MELT_LOCATION ("warmelt-outobj.melt:5014:/ initchunk"); @@ -40461,79 +40536,79 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V692*/ meltfptr[691])) + ( /*_._VALROUT___V692*/ meltfptr[691])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_505__OUTPUCOD_OBJPUTHOOKCONST#7", NULL != ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20])); - ((meltroutine_ptr_t) /*_.VALROUT___V692*/ meltfptr[691])->tabval[7] = + ((meltroutine_ptr_t) /*_._VALROUT___V692*/ meltfptr[691])->tabval[7] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]); MELT_LOCATION ("warmelt-outobj.melt:5014:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V692*/ meltfptr[691]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V692*/ meltfptr[691]); /*putclosurout#102 */ melt_assertmsg ("putclosrout#102 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V693*/ meltfptr[692])) == + ( /*_._VALCLO___V693*/ meltfptr[692])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#102 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V692*/ meltfptr[691])) == + ( /*_._VALROUT___V692*/ meltfptr[691])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V693*/ meltfptr[692])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V692*/ meltfptr[691]); + ((meltclosure_ptr_t) /*_._VALCLO___V693*/ meltfptr[692])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V692*/ meltfptr[691]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V693*/ meltfptr[692]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V693*/ meltfptr[692]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V694*/ meltfptr[693])) == + ( /*_._VALDATA___V694*/ meltfptr[693])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V694*/ + ( /*_._VALDATA___V694*/ meltfptr[693])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V694*/ meltfptr[693]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V694*/ meltfptr[693]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V695*/ meltfptr[694]); + /*_._VALSTR___V695*/ meltfptr[694]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V694*/ meltfptr[693]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V694*/ meltfptr[693]); - melt_dbgtrace_written_object ( /*_.VALDATA___V694*/ meltfptr[693], + melt_dbgtrace_written_object ( /*_._VALDATA___V694*/ meltfptr[693], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V696*/ meltfptr[695])) == + ( /*_._VALDATA___V696*/ meltfptr[695])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V696*/ + ( /*_._VALDATA___V696*/ meltfptr[695])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V696*/ meltfptr[695]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V696*/ meltfptr[695]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V697*/ meltfptr[696]); + /*_._VALSTR___V697*/ meltfptr[696]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V696*/ meltfptr[695]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V696*/ meltfptr[695]); - melt_dbgtrace_written_object ( /*_.VALDATA___V696*/ meltfptr[695], + melt_dbgtrace_written_object ( /*_._VALDATA___V696*/ meltfptr[695], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:5054:/ initchunk"); @@ -40542,13 +40617,13 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V698*/ meltfptr[697])) + ( /*_._VALROUT___V698*/ meltfptr[697])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_511__OUTPUCOD_OBJPUTHOOKDATA#0", NULL != ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7])); - ((meltroutine_ptr_t) /*_.VALROUT___V698*/ meltfptr[697])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V698*/ meltfptr[697])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7]); MELT_LOCATION ("warmelt-outobj.melt:5054:/ initchunk"); @@ -40557,13 +40632,13 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V698*/ meltfptr[697])) + ( /*_._VALROUT___V698*/ meltfptr[697])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_511__OUTPUCOD_OBJPUTHOOKDATA#1", NULL != ( /*_.CLASS_OBJPUTHOOKDATA__V135*/ meltfptr[134])); - ((meltroutine_ptr_t) /*_.VALROUT___V698*/ meltfptr[697])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V698*/ meltfptr[697])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_OBJPUTHOOKDATA__V135*/ meltfptr[134]); MELT_LOCATION ("warmelt-outobj.melt:5054:/ initchunk"); @@ -40572,13 +40647,13 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V698*/ meltfptr[697])) + ( /*_._VALROUT___V698*/ meltfptr[697])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_511__OUTPUCOD_OBJPUTHOOKDATA#2", NULL != ( /*_.CLASS_OBJINSTR__V70*/ meltfptr[69])); - ((meltroutine_ptr_t) /*_.VALROUT___V698*/ meltfptr[697])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V698*/ meltfptr[697])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_OBJINSTR__V70*/ meltfptr[69]); MELT_LOCATION ("warmelt-outobj.melt:5054:/ initchunk"); @@ -40587,13 +40662,13 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V698*/ meltfptr[697])) + ( /*_._VALROUT___V698*/ meltfptr[697])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_511__OUTPUCOD_OBJPUTHOOKDATA#3", NULL != ( /*_.CLASS_OBJINITELEM__V20*/ meltfptr[19])); - ((meltroutine_ptr_t) /*_.VALROUT___V698*/ meltfptr[697])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V698*/ meltfptr[697])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_OBJINITELEM__V20*/ meltfptr[19]); MELT_LOCATION ("warmelt-outobj.melt:5054:/ initchunk"); @@ -40602,13 +40677,13 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V698*/ meltfptr[697])) + ( /*_._VALROUT___V698*/ meltfptr[697])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_511__OUTPUCOD_OBJPUTHOOKDATA#4", NULL != ( /*_.CLASS_NREP_BOUND_DATA__V134*/ meltfptr[133])); - ((meltroutine_ptr_t) /*_.VALROUT___V698*/ meltfptr[697])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V698*/ meltfptr[697])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_NREP_BOUND_DATA__V134*/ meltfptr[133]); MELT_LOCATION ("warmelt-outobj.melt:5054:/ initchunk"); @@ -40617,13 +40692,13 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V698*/ meltfptr[697])) + ( /*_._VALROUT___V698*/ meltfptr[697])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_511__OUTPUCOD_OBJPUTHOOKDATA#5", NULL != ( /*_.CLASS_OBJINITHOOK__V38*/ meltfptr[37])); - ((meltroutine_ptr_t) /*_.VALROUT___V698*/ meltfptr[697])->tabval[5] = + ((meltroutine_ptr_t) /*_._VALROUT___V698*/ meltfptr[697])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_OBJINITHOOK__V38*/ meltfptr[37]); MELT_LOCATION ("warmelt-outobj.melt:5054:/ initchunk"); @@ -40631,12 +40706,12 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V698*/ meltfptr[697])) == + ( /*_._VALROUT___V698*/ meltfptr[697])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V259*/ meltfptr[258]); - ((meltroutine_ptr_t) /*_.VALROUT___V698*/ meltfptr[697])->tabval[6] = - (melt_ptr_t) ( /*_.VALCLO___V259*/ meltfptr[258]); + NULL != /*_._VALCLO___V259*/ meltfptr[258]); + ((meltroutine_ptr_t) /*_._VALROUT___V698*/ meltfptr[697])->tabval[6] = + (melt_ptr_t) ( /*_._VALCLO___V259*/ meltfptr[258]); MELT_LOCATION ("warmelt-outobj.melt:5054:/ initchunk"); /*^putroutconst */ @@ -40644,13 +40719,13 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V698*/ meltfptr[697])) + ( /*_._VALROUT___V698*/ meltfptr[697])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_511__OUTPUCOD_OBJPUTHOOKDATA#7", NULL != ( /*_.ADD2OUT__V15*/ meltfptr[14])); - ((meltroutine_ptr_t) /*_.VALROUT___V698*/ meltfptr[697])->tabval[7] = + ((meltroutine_ptr_t) /*_._VALROUT___V698*/ meltfptr[697])->tabval[7] = (melt_ptr_t) ( /*_.ADD2OUT__V15*/ meltfptr[14]); MELT_LOCATION ("warmelt-outobj.melt:5054:/ initchunk"); @@ -40659,56 +40734,56 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V698*/ meltfptr[697])) + ( /*_._VALROUT___V698*/ meltfptr[697])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_511__OUTPUCOD_OBJPUTHOOKDATA#8", NULL != ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20])); - ((meltroutine_ptr_t) /*_.VALROUT___V698*/ meltfptr[697])->tabval[8] = + ((meltroutine_ptr_t) /*_._VALROUT___V698*/ meltfptr[697])->tabval[8] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]); MELT_LOCATION ("warmelt-outobj.melt:5054:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V698*/ meltfptr[697]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V698*/ meltfptr[697]); /*putclosurout#103 */ melt_assertmsg ("putclosrout#103 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V699*/ meltfptr[698])) == + ( /*_._VALCLO___V699*/ meltfptr[698])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#103 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V698*/ meltfptr[697])) == + ( /*_._VALROUT___V698*/ meltfptr[697])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V699*/ meltfptr[698])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V698*/ meltfptr[697]); + ((meltclosure_ptr_t) /*_._VALCLO___V699*/ meltfptr[698])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V698*/ meltfptr[697]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V699*/ meltfptr[698]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V699*/ meltfptr[698]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V700*/ meltfptr[699])) == + ( /*_._VALDATA___V700*/ meltfptr[699])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V700*/ + ( /*_._VALDATA___V700*/ meltfptr[699])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V700*/ meltfptr[699]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V700*/ meltfptr[699]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V701*/ meltfptr[700]); + /*_._VALSTR___V701*/ meltfptr[700]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V700*/ meltfptr[699]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V700*/ meltfptr[699]); - melt_dbgtrace_written_object ( /*_.VALDATA___V700*/ meltfptr[699], + melt_dbgtrace_written_object ( /*_._VALDATA___V700*/ meltfptr[699], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:5083:/ initchunk"); @@ -40717,13 +40792,13 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V702*/ meltfptr[701])) + ( /*_._VALROUT___V702*/ meltfptr[701])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_515__OUTPUCOD_OBJPUTXTRARESULT#0", NULL != ( /*_.CLASS_OBJPUTXTRARESULT__V136*/ meltfptr[135])); - ((meltroutine_ptr_t) /*_.VALROUT___V702*/ meltfptr[701])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V702*/ meltfptr[701])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJPUTXTRARESULT__V136*/ meltfptr[135]); MELT_LOCATION ("warmelt-outobj.melt:5083:/ initchunk"); @@ -40732,13 +40807,13 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V702*/ meltfptr[701])) + ( /*_._VALROUT___V702*/ meltfptr[701])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_515__OUTPUCOD_OBJPUTXTRARESULT#1", NULL != ( /*_.GET_CTYPE__V111*/ meltfptr[110])); - ((meltroutine_ptr_t) /*_.VALROUT___V702*/ meltfptr[701])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V702*/ meltfptr[701])->tabval[1] = (melt_ptr_t) ( /*_.GET_CTYPE__V111*/ meltfptr[110]); MELT_LOCATION ("warmelt-outobj.melt:5083:/ initchunk"); @@ -40746,12 +40821,12 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V702*/ meltfptr[701])) == + ( /*_._VALROUT___V702*/ meltfptr[701])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V259*/ meltfptr[258]); - ((meltroutine_ptr_t) /*_.VALROUT___V702*/ meltfptr[701])->tabval[2] = - (melt_ptr_t) ( /*_.VALCLO___V259*/ meltfptr[258]); + NULL != /*_._VALCLO___V259*/ meltfptr[258]); + ((meltroutine_ptr_t) /*_._VALROUT___V702*/ meltfptr[701])->tabval[2] = + (melt_ptr_t) ( /*_._VALCLO___V259*/ meltfptr[258]); MELT_LOCATION ("warmelt-outobj.melt:5083:/ initchunk"); /*^putroutconst */ @@ -40759,13 +40834,13 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V702*/ meltfptr[701])) + ( /*_._VALROUT___V702*/ meltfptr[701])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_515__OUTPUCOD_OBJPUTXTRARESULT#3", NULL != ( /*_.CLASS_CTYPE__V29*/ meltfptr[28])); - ((meltroutine_ptr_t) /*_.VALROUT___V702*/ meltfptr[701])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V702*/ meltfptr[701])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_CTYPE__V29*/ meltfptr[28]); MELT_LOCATION ("warmelt-outobj.melt:5083:/ initchunk"); @@ -40774,13 +40849,13 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V702*/ meltfptr[701])) + ( /*_._VALROUT___V702*/ meltfptr[701])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_515__OUTPUCOD_OBJPUTXTRARESULT#4", NULL != ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7])); - ((meltroutine_ptr_t) /*_.VALROUT___V702*/ meltfptr[701])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V702*/ meltfptr[701])->tabval[4] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7]); MELT_LOCATION ("warmelt-outobj.melt:5083:/ initchunk"); @@ -40789,13 +40864,13 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V702*/ meltfptr[701])) + ( /*_._VALROUT___V702*/ meltfptr[701])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_515__OUTPUCOD_OBJPUTXTRARESULT#5", NULL != ( /*_.CLASS_NAMED__V14*/ meltfptr[13])); - ((meltroutine_ptr_t) /*_.VALROUT___V702*/ meltfptr[701])->tabval[5] = + ((meltroutine_ptr_t) /*_._VALROUT___V702*/ meltfptr[701])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_NAMED__V14*/ meltfptr[13]); MELT_LOCATION ("warmelt-outobj.melt:5083:/ initchunk"); @@ -40804,13 +40879,13 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V702*/ meltfptr[701])) + ( /*_._VALROUT___V702*/ meltfptr[701])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_515__OUTPUCOD_OBJPUTXTRARESULT#6", NULL != ( /*_.CTYPE_VALUE__V32*/ meltfptr[31])); - ((meltroutine_ptr_t) /*_.VALROUT___V702*/ meltfptr[701])->tabval[6] = + ((meltroutine_ptr_t) /*_._VALROUT___V702*/ meltfptr[701])->tabval[6] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V32*/ meltfptr[31]); MELT_LOCATION ("warmelt-outobj.melt:5083:/ initchunk"); @@ -40819,13 +40894,13 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V702*/ meltfptr[701])) + ( /*_._VALROUT___V702*/ meltfptr[701])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_515__OUTPUCOD_OBJPUTXTRARESULT#7", NULL != ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20])); - ((meltroutine_ptr_t) /*_.VALROUT___V702*/ meltfptr[701])->tabval[7] = + ((meltroutine_ptr_t) /*_._VALROUT___V702*/ meltfptr[701])->tabval[7] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]); MELT_LOCATION ("warmelt-outobj.melt:5083:/ initchunk"); @@ -40833,12 +40908,12 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V702*/ meltfptr[701])) == + ( /*_._VALROUT___V702*/ meltfptr[701])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALDATA___V192*/ meltfptr[191]); - ((meltroutine_ptr_t) /*_.VALROUT___V702*/ meltfptr[701])->tabval[8] = - (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); + NULL != /*_._VALDATA___V192*/ meltfptr[191]); + ((meltroutine_ptr_t) /*_._VALROUT___V702*/ meltfptr[701])->tabval[8] = + (melt_ptr_t) ( /*_._VALDATA___V192*/ meltfptr[191]); MELT_LOCATION ("warmelt-outobj.melt:5083:/ initchunk"); /*^putroutconst */ @@ -40846,56 +40921,56 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V702*/ meltfptr[701])) + ( /*_._VALROUT___V702*/ meltfptr[701])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_515__OUTPUCOD_OBJPUTXTRARESULT#9", NULL != ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_.VALROUT___V702*/ meltfptr[701])->tabval[9] = + ((meltroutine_ptr_t) /*_._VALROUT___V702*/ meltfptr[701])->tabval[9] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:5083:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V702*/ meltfptr[701]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V702*/ meltfptr[701]); /*putclosurout#104 */ melt_assertmsg ("putclosrout#104 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V703*/ meltfptr[702])) == + ( /*_._VALCLO___V703*/ meltfptr[702])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#104 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V702*/ meltfptr[701])) == + ( /*_._VALROUT___V702*/ meltfptr[701])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V703*/ meltfptr[702])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V702*/ meltfptr[701]); + ((meltclosure_ptr_t) /*_._VALCLO___V703*/ meltfptr[702])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V702*/ meltfptr[701]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V703*/ meltfptr[702]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V703*/ meltfptr[702]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V704*/ meltfptr[703])) == + ( /*_._VALDATA___V704*/ meltfptr[703])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V704*/ + ( /*_._VALDATA___V704*/ meltfptr[703])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V704*/ meltfptr[703]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V704*/ meltfptr[703]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V705*/ meltfptr[704]); + /*_._VALSTR___V705*/ meltfptr[704]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V704*/ meltfptr[703]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V704*/ meltfptr[703]); - melt_dbgtrace_written_object ( /*_.VALDATA___V704*/ meltfptr[703], + melt_dbgtrace_written_object ( /*_._VALDATA___V704*/ meltfptr[703], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:5124:/ initchunk"); @@ -40904,12 +40979,12 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V706*/ meltfptr[705])) + ( /*_._VALROUT___V706*/ meltfptr[705])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_519__OUTPUCOD_OBJEXPV#0", NULL != ( /*_.CLASS_OBJEXPV__V137*/ meltfptr[136])); - ((meltroutine_ptr_t) /*_.VALROUT___V706*/ meltfptr[705])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V706*/ meltfptr[705])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJEXPV__V137*/ meltfptr[136]); MELT_LOCATION ("warmelt-outobj.melt:5124:/ initchunk"); @@ -40918,12 +40993,12 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V706*/ meltfptr[705])) + ( /*_._VALROUT___V706*/ meltfptr[705])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_519__OUTPUCOD_OBJEXPV#1", NULL != ( /*_.DISCR_INTEGER__V53*/ meltfptr[52])); - ((meltroutine_ptr_t) /*_.VALROUT___V706*/ meltfptr[705])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V706*/ meltfptr[705])->tabval[1] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V53*/ meltfptr[52]); MELT_LOCATION ("warmelt-outobj.melt:5124:/ initchunk"); @@ -40932,12 +41007,12 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V706*/ meltfptr[705])) + ( /*_._VALROUT___V706*/ meltfptr[705])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_519__OUTPUCOD_OBJEXPV#2", NULL != ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20])); - ((meltroutine_ptr_t) /*_.VALROUT___V706*/ meltfptr[705])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V706*/ meltfptr[705])->tabval[2] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]); MELT_LOCATION ("warmelt-outobj.melt:5124:/ initchunk"); @@ -40945,12 +41020,12 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V706*/ meltfptr[705])) == + ( /*_._VALROUT___V706*/ meltfptr[705])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALDATA___V192*/ meltfptr[191]); - ((meltroutine_ptr_t) /*_.VALROUT___V706*/ meltfptr[705])->tabval[3] = - (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); + NULL != /*_._VALDATA___V192*/ meltfptr[191]); + ((meltroutine_ptr_t) /*_._VALROUT___V706*/ meltfptr[705])->tabval[3] = + (melt_ptr_t) ( /*_._VALDATA___V192*/ meltfptr[191]); MELT_LOCATION ("warmelt-outobj.melt:5124:/ initchunk"); /*^putroutconst */ @@ -40958,55 +41033,55 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V706*/ meltfptr[705])) + ( /*_._VALROUT___V706*/ meltfptr[705])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_519__OUTPUCOD_OBJEXPV#4", NULL != ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_.VALROUT___V706*/ meltfptr[705])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V706*/ meltfptr[705])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:5124:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V706*/ meltfptr[705]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V706*/ meltfptr[705]); /*putclosurout#105 */ melt_assertmsg ("putclosrout#105 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V707*/ meltfptr[706])) == + ( /*_._VALCLO___V707*/ meltfptr[706])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#105 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V706*/ meltfptr[705])) == + ( /*_._VALROUT___V706*/ meltfptr[705])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V707*/ meltfptr[706])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V706*/ meltfptr[705]); + ((meltclosure_ptr_t) /*_._VALCLO___V707*/ meltfptr[706])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V706*/ meltfptr[705]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V707*/ meltfptr[706]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V707*/ meltfptr[706]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V708*/ meltfptr[707])) == + ( /*_._VALDATA___V708*/ meltfptr[707])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V708*/ + ( /*_._VALDATA___V708*/ meltfptr[707])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V708*/ meltfptr[707]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V708*/ meltfptr[707]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V709*/ meltfptr[708]); + /*_._VALSTR___V709*/ meltfptr[708]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V708*/ meltfptr[707]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V708*/ meltfptr[707]); - melt_dbgtrace_written_object ( /*_.VALDATA___V708*/ meltfptr[707], + melt_dbgtrace_written_object ( /*_._VALDATA___V708*/ meltfptr[707], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:5140:/ initchunk"); @@ -41015,13 +41090,13 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V710*/ meltfptr[709])) + ( /*_._VALROUT___V710*/ meltfptr[709])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_523__OUTPUCOD_OBJLOCATEDEXPV#0", NULL != ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7])); - ((meltroutine_ptr_t) /*_.VALROUT___V710*/ meltfptr[709])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V710*/ meltfptr[709])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7]); MELT_LOCATION ("warmelt-outobj.melt:5140:/ initchunk"); @@ -41030,13 +41105,13 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V710*/ meltfptr[709])) + ( /*_._VALROUT___V710*/ meltfptr[709])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_523__OUTPUCOD_OBJLOCATEDEXPV#1", NULL != ( /*_.CLASS_OBJLOCATEDEXPV__V138*/ meltfptr[137])); - ((meltroutine_ptr_t) /*_.VALROUT___V710*/ meltfptr[709])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V710*/ meltfptr[709])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_OBJLOCATEDEXPV__V138*/ meltfptr[137]); MELT_LOCATION ("warmelt-outobj.melt:5140:/ initchunk"); @@ -41045,13 +41120,13 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V710*/ meltfptr[709])) + ( /*_._VALROUT___V710*/ meltfptr[709])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_523__OUTPUCOD_OBJLOCATEDEXPV#2", NULL != ( /*_.CTYPE_VOID__V30*/ meltfptr[29])); - ((meltroutine_ptr_t) /*_.VALROUT___V710*/ meltfptr[709])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V710*/ meltfptr[709])->tabval[2] = (melt_ptr_t) ( /*_.CTYPE_VOID__V30*/ meltfptr[29]); MELT_LOCATION ("warmelt-outobj.melt:5140:/ initchunk"); @@ -41059,24 +41134,24 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V710*/ meltfptr[709])) == + ( /*_._VALROUT___V710*/ meltfptr[709])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V259*/ meltfptr[258]); - ((meltroutine_ptr_t) /*_.VALROUT___V710*/ meltfptr[709])->tabval[3] = - (melt_ptr_t) ( /*_.VALCLO___V259*/ meltfptr[258]); + NULL != /*_._VALCLO___V259*/ meltfptr[258]); + ((meltroutine_ptr_t) /*_._VALROUT___V710*/ meltfptr[709])->tabval[3] = + (melt_ptr_t) ( /*_._VALCLO___V259*/ meltfptr[258]); MELT_LOCATION ("warmelt-outobj.melt:5140:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V710*/ meltfptr[709])) == + ( /*_._VALROUT___V710*/ meltfptr[709])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V263*/ meltfptr[262]); - ((meltroutine_ptr_t) /*_.VALROUT___V710*/ meltfptr[709])->tabval[4] = - (melt_ptr_t) ( /*_.VALCLO___V263*/ meltfptr[262]); + NULL != /*_._VALCLO___V263*/ meltfptr[262]); + ((meltroutine_ptr_t) /*_._VALROUT___V710*/ meltfptr[709])->tabval[4] = + (melt_ptr_t) ( /*_._VALCLO___V263*/ meltfptr[262]); MELT_LOCATION ("warmelt-outobj.melt:5140:/ initchunk"); /*^putroutconst */ @@ -41084,13 +41159,13 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V710*/ meltfptr[709])) + ( /*_._VALROUT___V710*/ meltfptr[709])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_523__OUTPUCOD_OBJLOCATEDEXPV#5", NULL != ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20])); - ((meltroutine_ptr_t) /*_.VALROUT___V710*/ meltfptr[709])->tabval[5] = + ((meltroutine_ptr_t) /*_._VALROUT___V710*/ meltfptr[709])->tabval[5] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]); MELT_LOCATION ("warmelt-outobj.melt:5140:/ initchunk"); @@ -41098,12 +41173,12 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V710*/ meltfptr[709])) == + ( /*_._VALROUT___V710*/ meltfptr[709])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALDATA___V192*/ meltfptr[191]); - ((meltroutine_ptr_t) /*_.VALROUT___V710*/ meltfptr[709])->tabval[6] = - (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); + NULL != /*_._VALDATA___V192*/ meltfptr[191]); + ((meltroutine_ptr_t) /*_._VALROUT___V710*/ meltfptr[709])->tabval[6] = + (melt_ptr_t) ( /*_._VALDATA___V192*/ meltfptr[191]); MELT_LOCATION ("warmelt-outobj.melt:5140:/ initchunk"); /*^putroutconst */ @@ -41111,56 +41186,56 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V710*/ meltfptr[709])) + ( /*_._VALROUT___V710*/ meltfptr[709])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_523__OUTPUCOD_OBJLOCATEDEXPV#7", NULL != ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_.VALROUT___V710*/ meltfptr[709])->tabval[7] = + ((meltroutine_ptr_t) /*_._VALROUT___V710*/ meltfptr[709])->tabval[7] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:5140:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V710*/ meltfptr[709]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V710*/ meltfptr[709]); /*putclosurout#106 */ melt_assertmsg ("putclosrout#106 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V711*/ meltfptr[710])) == + ( /*_._VALCLO___V711*/ meltfptr[710])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#106 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V710*/ meltfptr[709])) == + ( /*_._VALROUT___V710*/ meltfptr[709])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V711*/ meltfptr[710])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V710*/ meltfptr[709]); + ((meltclosure_ptr_t) /*_._VALCLO___V711*/ meltfptr[710])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V710*/ meltfptr[709]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V711*/ meltfptr[710]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V711*/ meltfptr[710]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V712*/ meltfptr[711])) == + ( /*_._VALDATA___V712*/ meltfptr[711])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V712*/ + ( /*_._VALDATA___V712*/ meltfptr[711])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V712*/ meltfptr[711]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V712*/ meltfptr[711]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V713*/ meltfptr[712]); + /*_._VALSTR___V713*/ meltfptr[712]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V712*/ meltfptr[711]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V712*/ meltfptr[711]); - melt_dbgtrace_written_object ( /*_.VALDATA___V712*/ meltfptr[711], + melt_dbgtrace_written_object ( /*_._VALDATA___V712*/ meltfptr[711], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:5181:/ initchunk"); @@ -41169,13 +41244,13 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V714*/ meltfptr[713])) + ( /*_._VALROUT___V714*/ meltfptr[713])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_527__OUTPUCOD_VERBATIMSTRING#0", NULL != ( /*_.DISCR_VERBATIM_STRING__V88*/ meltfptr[87])); - ((meltroutine_ptr_t) /*_.VALROUT___V714*/ meltfptr[713])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V714*/ meltfptr[713])->tabval[0] = (melt_ptr_t) ( /*_.DISCR_VERBATIM_STRING__V88*/ meltfptr[87]); MELT_LOCATION ("warmelt-outobj.melt:5181:/ initchunk"); @@ -41183,12 +41258,12 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V714*/ meltfptr[713])) == + ( /*_._VALROUT___V714*/ meltfptr[713])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALDATA___V192*/ meltfptr[191]); - ((meltroutine_ptr_t) /*_.VALROUT___V714*/ meltfptr[713])->tabval[1] = - (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); + NULL != /*_._VALDATA___V192*/ meltfptr[191]); + ((meltroutine_ptr_t) /*_._VALROUT___V714*/ meltfptr[713])->tabval[1] = + (melt_ptr_t) ( /*_._VALDATA___V192*/ meltfptr[191]); MELT_LOCATION ("warmelt-outobj.melt:5181:/ initchunk"); /*^putroutconst */ @@ -41196,34 +41271,34 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V714*/ meltfptr[713])) + ( /*_._VALROUT___V714*/ meltfptr[713])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_527__OUTPUCOD_VERBATIMSTRING#2", NULL != ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_.VALROUT___V714*/ meltfptr[713])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V714*/ meltfptr[713])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:5181:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V714*/ meltfptr[713]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V714*/ meltfptr[713]); /*putclosurout#107 */ melt_assertmsg ("putclosrout#107 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V715*/ meltfptr[714])) == + ( /*_._VALCLO___V715*/ meltfptr[714])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#107 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V714*/ meltfptr[713])) == + ( /*_._VALROUT___V714*/ meltfptr[713])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V715*/ meltfptr[714])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V714*/ meltfptr[713]); + ((meltclosure_ptr_t) /*_._VALCLO___V715*/ meltfptr[714])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V714*/ meltfptr[713]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V715*/ meltfptr[714]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V715*/ meltfptr[714]); MELT_LOCATION ("warmelt-outobj.melt:5192:/ initchunk"); /*^putroutconst */ @@ -41231,12 +41306,12 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V716*/ meltfptr[715])) + ( /*_._VALROUT___V716*/ meltfptr[715])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_529__OUTPUCOD_STRING#0", NULL != ( /*_.DISCR_STRING__V54*/ meltfptr[53])); - ((meltroutine_ptr_t) /*_.VALROUT___V716*/ meltfptr[715])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V716*/ meltfptr[715])->tabval[0] = (melt_ptr_t) ( /*_.DISCR_STRING__V54*/ meltfptr[53]); MELT_LOCATION ("warmelt-outobj.melt:5192:/ initchunk"); @@ -41244,12 +41319,12 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V716*/ meltfptr[715])) == + ( /*_._VALROUT___V716*/ meltfptr[715])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALDATA___V192*/ meltfptr[191]); - ((meltroutine_ptr_t) /*_.VALROUT___V716*/ meltfptr[715])->tabval[1] = - (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); + NULL != /*_._VALDATA___V192*/ meltfptr[191]); + ((meltroutine_ptr_t) /*_._VALROUT___V716*/ meltfptr[715])->tabval[1] = + (melt_ptr_t) ( /*_._VALDATA___V192*/ meltfptr[191]); MELT_LOCATION ("warmelt-outobj.melt:5192:/ initchunk"); /*^putroutconst */ @@ -41257,48 +41332,48 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V716*/ meltfptr[715])) + ( /*_._VALROUT___V716*/ meltfptr[715])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_529__OUTPUCOD_STRING#2", NULL != ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_.VALROUT___V716*/ meltfptr[715])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V716*/ meltfptr[715])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:5192:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V716*/ meltfptr[715]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V716*/ meltfptr[715]); /*putclosurout#108 */ melt_assertmsg ("putclosrout#108 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V717*/ meltfptr[716])) == + ( /*_._VALCLO___V717*/ meltfptr[716])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#108 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V716*/ meltfptr[715])) == + ( /*_._VALROUT___V716*/ meltfptr[715])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V717*/ meltfptr[716])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V716*/ meltfptr[715]); + ((meltclosure_ptr_t) /*_._VALCLO___V717*/ meltfptr[716])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V716*/ meltfptr[715]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V717*/ meltfptr[716]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V717*/ meltfptr[716]); /*putclosurout#109 */ melt_assertmsg ("putclosrout#109 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V719*/ meltfptr[718])) == + ( /*_._VALCLO___V719*/ meltfptr[718])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#109 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V718*/ meltfptr[717])) == + ( /*_._VALROUT___V718*/ meltfptr[717])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V719*/ meltfptr[718])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V718*/ meltfptr[717]); + ((meltclosure_ptr_t) /*_._VALCLO___V719*/ meltfptr[718])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V718*/ meltfptr[717]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V719*/ meltfptr[718]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V719*/ meltfptr[718]); MELT_LOCATION ("warmelt-outobj.melt:5212:/ initchunk"); /*^putroutconst */ @@ -41306,12 +41381,12 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V720*/ meltfptr[719])) + ( /*_._VALROUT___V720*/ meltfptr[719])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_533__OUTPUCOD_FINALRETURN#0", NULL != ( /*_.CLASS_OBJFINALRETURN__V139*/ meltfptr[138])); - ((meltroutine_ptr_t) /*_.VALROUT___V720*/ meltfptr[719])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V720*/ meltfptr[719])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJFINALRETURN__V139*/ meltfptr[138]); MELT_LOCATION ("warmelt-outobj.melt:5212:/ initchunk"); @@ -41319,24 +41394,24 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V720*/ meltfptr[719])) == + ( /*_._VALROUT___V720*/ meltfptr[719])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V259*/ meltfptr[258]); - ((meltroutine_ptr_t) /*_.VALROUT___V720*/ meltfptr[719])->tabval[1] = - (melt_ptr_t) ( /*_.VALCLO___V259*/ meltfptr[258]); + NULL != /*_._VALCLO___V259*/ meltfptr[258]); + ((meltroutine_ptr_t) /*_._VALROUT___V720*/ meltfptr[719])->tabval[1] = + (melt_ptr_t) ( /*_._VALCLO___V259*/ meltfptr[258]); MELT_LOCATION ("warmelt-outobj.melt:5212:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V720*/ meltfptr[719])) == + ( /*_._VALROUT___V720*/ meltfptr[719])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALDATA___V192*/ meltfptr[191]); - ((meltroutine_ptr_t) /*_.VALROUT___V720*/ meltfptr[719])->tabval[2] = - (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); + NULL != /*_._VALDATA___V192*/ meltfptr[191]); + ((meltroutine_ptr_t) /*_._VALROUT___V720*/ meltfptr[719])->tabval[2] = + (melt_ptr_t) ( /*_._VALDATA___V192*/ meltfptr[191]); MELT_LOCATION ("warmelt-outobj.melt:5212:/ initchunk"); /*^putroutconst */ @@ -41344,68 +41419,68 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V720*/ meltfptr[719])) + ( /*_._VALROUT___V720*/ meltfptr[719])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_533__OUTPUCOD_FINALRETURN#3", NULL != ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_.VALROUT___V720*/ meltfptr[719])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V720*/ meltfptr[719])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:5212:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V720*/ meltfptr[719]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V720*/ meltfptr[719]); /*putclosurout#110 */ melt_assertmsg ("putclosrout#110 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V721*/ meltfptr[720])) == + ( /*_._VALCLO___V721*/ meltfptr[720])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#110 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V720*/ meltfptr[719])) == + ( /*_._VALROUT___V720*/ meltfptr[719])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V721*/ meltfptr[720])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V720*/ meltfptr[719]); + ((meltclosure_ptr_t) /*_._VALCLO___V721*/ meltfptr[720])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V720*/ meltfptr[719]); #undef meltfram__ -} /*end of meltmod__warmelt_outobj__initialmeltchunk_11 */ +} /*end of meltmod__WARMELTmiOUTOBJ__initialmeltchunk_11 */ void -meltmod__warmelt_outobj__initialmeltchunk_12 (meltinitial_frame_t * - meltmeltframptr__, - char meltpredefinited[]) +meltmod__WARMELTmiOUTOBJ__initialmeltchunk_12 (meltinitial_frame_t * + meltmeltframptr__, + char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L (void) meltpredefinited; -/*touch:DATACLOSURE_*/ - meltgc_touch ( /*_.VALCLO___V721*/ meltfptr[720]); +/*touch:_DATACLOSURE_*/ + meltgc_touch ( /*_._VALCLO___V721*/ meltfptr[720]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V722*/ meltfptr[721])) == + ( /*_._VALDATA___V722*/ meltfptr[721])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V722*/ + ( /*_._VALDATA___V722*/ meltfptr[721])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V722*/ meltfptr[721]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V722*/ meltfptr[721]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V723*/ meltfptr[722]); + /*_._VALSTR___V723*/ meltfptr[722]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V722*/ meltfptr[721]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V722*/ meltfptr[721]); - melt_dbgtrace_written_object ( /*_.VALDATA___V722*/ meltfptr[721], + melt_dbgtrace_written_object ( /*_._VALDATA___V722*/ meltfptr[721], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:5225:/ initchunk"); @@ -41414,13 +41489,13 @@ meltmod__warmelt_outobj__initialmeltchunk_12 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V724*/ meltfptr[723])) + ( /*_._VALROUT___V724*/ meltfptr[723])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_537__SORTED_NAMED_DICT_TUPLE#0", NULL != ( /*_.DISCR_LIST__V66*/ meltfptr[65])); - ((meltroutine_ptr_t) /*_.VALROUT___V724*/ meltfptr[723])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V724*/ meltfptr[723])->tabval[0] = (melt_ptr_t) ( /*_.DISCR_LIST__V66*/ meltfptr[65]); MELT_LOCATION ("warmelt-outobj.melt:5225:/ initchunk"); @@ -41429,13 +41504,13 @@ meltmod__warmelt_outobj__initialmeltchunk_12 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V724*/ meltfptr[723])) + ( /*_._VALROUT___V724*/ meltfptr[723])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_537__SORTED_NAMED_DICT_TUPLE#1", NULL != ( /*_.CLASS_NAMED__V14*/ meltfptr[13])); - ((meltroutine_ptr_t) /*_.VALROUT___V724*/ meltfptr[723])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V724*/ meltfptr[723])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_NAMED__V14*/ meltfptr[13]); MELT_LOCATION ("warmelt-outobj.melt:5225:/ initchunk"); @@ -41444,13 +41519,13 @@ meltmod__warmelt_outobj__initialmeltchunk_12 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V724*/ meltfptr[723])) + ( /*_._VALROUT___V724*/ meltfptr[723])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_537__SORTED_NAMED_DICT_TUPLE#2", NULL != ( /*_.LIST_TO_MULTIPLE__V67*/ meltfptr[66])); - ((meltroutine_ptr_t) /*_.VALROUT___V724*/ meltfptr[723])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V724*/ meltfptr[723])->tabval[2] = (melt_ptr_t) ( /*_.LIST_TO_MULTIPLE__V67*/ meltfptr[66]); MELT_LOCATION ("warmelt-outobj.melt:5225:/ initchunk"); @@ -41459,13 +41534,13 @@ meltmod__warmelt_outobj__initialmeltchunk_12 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V724*/ meltfptr[723])) + ( /*_._VALROUT___V724*/ meltfptr[723])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_537__SORTED_NAMED_DICT_TUPLE#3", NULL != ( /*_.COMPARE_NAMED_ALPHA__V140*/ meltfptr[139])); - ((meltroutine_ptr_t) /*_.VALROUT___V724*/ meltfptr[723])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V724*/ meltfptr[723])->tabval[3] = (melt_ptr_t) ( /*_.COMPARE_NAMED_ALPHA__V140*/ meltfptr[139]); MELT_LOCATION ("warmelt-outobj.melt:5225:/ initchunk"); @@ -41474,56 +41549,56 @@ meltmod__warmelt_outobj__initialmeltchunk_12 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V724*/ meltfptr[723])) + ( /*_._VALROUT___V724*/ meltfptr[723])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_537__SORTED_NAMED_DICT_TUPLE#4", NULL != ( /*_.DISCR_MULTIPLE__V68*/ meltfptr[67])); - ((meltroutine_ptr_t) /*_.VALROUT___V724*/ meltfptr[723])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V724*/ meltfptr[723])->tabval[4] = (melt_ptr_t) ( /*_.DISCR_MULTIPLE__V68*/ meltfptr[67]); MELT_LOCATION ("warmelt-outobj.melt:5225:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V724*/ meltfptr[723]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V724*/ meltfptr[723]); /*putclosurout#111 */ melt_assertmsg ("putclosrout#111 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V725*/ meltfptr[724])) == + ( /*_._VALCLO___V725*/ meltfptr[724])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#111 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V724*/ meltfptr[723])) == + ( /*_._VALROUT___V724*/ meltfptr[723])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V725*/ meltfptr[724])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V724*/ meltfptr[723]); + ((meltclosure_ptr_t) /*_._VALCLO___V725*/ meltfptr[724])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V724*/ meltfptr[723]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V725*/ meltfptr[724]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V725*/ meltfptr[724]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V726*/ meltfptr[725])) == + ( /*_._VALDATA___V726*/ meltfptr[725])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V726*/ + ( /*_._VALDATA___V726*/ meltfptr[725])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V726*/ meltfptr[725]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V726*/ meltfptr[725]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V727*/ meltfptr[726]); + /*_._VALSTR___V727*/ meltfptr[726]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V726*/ meltfptr[725]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V726*/ meltfptr[725]); - melt_dbgtrace_written_object ( /*_.VALDATA___V726*/ meltfptr[725], + melt_dbgtrace_written_object ( /*_._VALDATA___V726*/ meltfptr[725], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:5242:/ initchunk"); @@ -41532,13 +41607,13 @@ meltmod__warmelt_outobj__initialmeltchunk_12 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V728*/ meltfptr[727])) + ( /*_._VALROUT___V728*/ meltfptr[727])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_541__OUTPUT_EXPORTED_OFFSETS#0", NULL != ( /*_.CLASS_ANY_MODULE_CONTEXT__V141*/ meltfptr[140])); - ((meltroutine_ptr_t) /*_.VALROUT___V728*/ meltfptr[727])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V728*/ meltfptr[727])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_ANY_MODULE_CONTEXT__V141*/ meltfptr[140]); MELT_LOCATION ("warmelt-outobj.melt:5242:/ initchunk"); @@ -41546,12 +41621,12 @@ meltmod__warmelt_outobj__initialmeltchunk_12 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V728*/ meltfptr[727])) == + ( /*_._VALROUT___V728*/ meltfptr[727])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V725*/ meltfptr[724]); - ((meltroutine_ptr_t) /*_.VALROUT___V728*/ meltfptr[727])->tabval[1] = - (melt_ptr_t) ( /*_.VALCLO___V725*/ meltfptr[724]); + NULL != /*_._VALCLO___V725*/ meltfptr[724]); + ((meltroutine_ptr_t) /*_._VALROUT___V728*/ meltfptr[727])->tabval[1] = + (melt_ptr_t) ( /*_._VALCLO___V725*/ meltfptr[724]); MELT_LOCATION ("warmelt-outobj.melt:5242:/ initchunk"); /*^putroutconst */ @@ -41559,13 +41634,13 @@ meltmod__warmelt_outobj__initialmeltchunk_12 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V728*/ meltfptr[727])) + ( /*_._VALROUT___V728*/ meltfptr[727])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_541__OUTPUT_EXPORTED_OFFSETS#2", NULL != ( /*_.CLASS_FIELD__V126*/ meltfptr[125])); - ((meltroutine_ptr_t) /*_.VALROUT___V728*/ meltfptr[727])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V728*/ meltfptr[727])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_FIELD__V126*/ meltfptr[125]); MELT_LOCATION ("warmelt-outobj.melt:5242:/ initchunk"); @@ -41574,13 +41649,13 @@ meltmod__warmelt_outobj__initialmeltchunk_12 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V728*/ meltfptr[727])) + ( /*_._VALROUT___V728*/ meltfptr[727])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_541__OUTPUT_EXPORTED_OFFSETS#3", NULL != ( /*_.CLASS_NAMED__V14*/ meltfptr[13])); - ((meltroutine_ptr_t) /*_.VALROUT___V728*/ meltfptr[727])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V728*/ meltfptr[727])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_NAMED__V14*/ meltfptr[13]); MELT_LOCATION ("warmelt-outobj.melt:5242:/ initchunk"); @@ -41588,12 +41663,12 @@ meltmod__warmelt_outobj__initialmeltchunk_12 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V728*/ meltfptr[727])) == + ( /*_._VALROUT___V728*/ meltfptr[727])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALDATA___V192*/ meltfptr[191]); - ((meltroutine_ptr_t) /*_.VALROUT___V728*/ meltfptr[727])->tabval[4] = - (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); + NULL != /*_._VALDATA___V192*/ meltfptr[191]); + ((meltroutine_ptr_t) /*_._VALROUT___V728*/ meltfptr[727])->tabval[4] = + (melt_ptr_t) ( /*_._VALDATA___V192*/ meltfptr[191]); MELT_LOCATION ("warmelt-outobj.melt:5242:/ initchunk"); /*^putroutconst */ @@ -41601,13 +41676,13 @@ meltmod__warmelt_outobj__initialmeltchunk_12 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V728*/ meltfptr[727])) + ( /*_._VALROUT___V728*/ meltfptr[727])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_541__OUTPUT_EXPORTED_OFFSETS#5", NULL != ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_.VALROUT___V728*/ meltfptr[727])->tabval[5] = + ((meltroutine_ptr_t) /*_._VALROUT___V728*/ meltfptr[727])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:5242:/ initchunk"); @@ -41616,79 +41691,79 @@ meltmod__warmelt_outobj__initialmeltchunk_12 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V728*/ meltfptr[727])) + ( /*_._VALROUT___V728*/ meltfptr[727])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_541__OUTPUT_EXPORTED_OFFSETS#6", NULL != ( /*_.CLASS_CLASS__V35*/ meltfptr[34])); - ((meltroutine_ptr_t) /*_.VALROUT___V728*/ meltfptr[727])->tabval[6] = + ((meltroutine_ptr_t) /*_._VALROUT___V728*/ meltfptr[727])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_CLASS__V35*/ meltfptr[34]); MELT_LOCATION ("warmelt-outobj.melt:5242:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V728*/ meltfptr[727]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V728*/ meltfptr[727]); /*putclosurout#112 */ melt_assertmsg ("putclosrout#112 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V729*/ meltfptr[728])) == + ( /*_._VALCLO___V729*/ meltfptr[728])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#112 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V728*/ meltfptr[727])) == + ( /*_._VALROUT___V728*/ meltfptr[727])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V729*/ meltfptr[728])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V728*/ meltfptr[727]); + ((meltclosure_ptr_t) /*_._VALCLO___V729*/ meltfptr[728])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V728*/ meltfptr[727]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V729*/ meltfptr[728]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V729*/ meltfptr[728]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V730*/ meltfptr[729])) == + ( /*_._VALDATA___V730*/ meltfptr[729])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V730*/ + ( /*_._VALDATA___V730*/ meltfptr[729])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V730*/ meltfptr[729]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V730*/ meltfptr[729]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V731*/ meltfptr[730]); + /*_._VALSTR___V731*/ meltfptr[730]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V730*/ meltfptr[729]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V730*/ meltfptr[729]); - melt_dbgtrace_written_object ( /*_.VALDATA___V730*/ meltfptr[729], + melt_dbgtrace_written_object ( /*_._VALDATA___V730*/ meltfptr[729], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V732*/ meltfptr[731])) == + ( /*_._VALDATA___V732*/ meltfptr[731])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V732*/ + ( /*_._VALDATA___V732*/ meltfptr[731])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V732*/ meltfptr[731]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V732*/ meltfptr[731]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V733*/ meltfptr[732]); + /*_._VALSTR___V733*/ meltfptr[732]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V732*/ meltfptr[731]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V732*/ meltfptr[731]); - melt_dbgtrace_written_object ( /*_.VALDATA___V732*/ meltfptr[731], + melt_dbgtrace_written_object ( /*_._VALDATA___V732*/ meltfptr[731], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:5304:/ initchunk"); @@ -41696,117 +41771,117 @@ meltmod__warmelt_outobj__initialmeltchunk_12 (meltinitial_frame_t * /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V734*/ meltfptr[733])) == + ( /*_._VALDATA___V734*/ meltfptr[733])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V734*/ + ( /*_._VALDATA___V734*/ meltfptr[733])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V734*/ meltfptr[733]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V734*/ meltfptr[733]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V735*/ meltfptr[734]); + /*_._VALSTR___V735*/ meltfptr[734]); MELT_LOCATION ("warmelt-outobj.melt:5304:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V734*/ meltfptr[733])) == + ( /*_._VALDATA___V734*/ meltfptr[733])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V734*/ + ( /*_._VALDATA___V734*/ meltfptr[733])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V734*/ meltfptr[733]))->obj_vartab[4] = + ((meltobject_ptr_t) ( /*_._VALDATA___V734*/ meltfptr[733]))->obj_vartab[4] = (melt_ptr_t) ( /*_.CLASS_ROOT__V18*/ meltfptr[17]); /*putupl#26 */ melt_assertmsg ("putupl #26 checktup", melt_magic_discr ((melt_ptr_t) - ( /*_.VALTUP___V736*/ meltfptr[735])) == + ( /*_._VALTUP___V736*/ meltfptr[735])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #26 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) - ( /*_.VALTUP___V736*/ + ( /*_._VALTUP___V736*/ meltfptr[735])))); - ((meltmultiple_ptr_t) ( /*_.VALTUP___V736*/ meltfptr[735]))->tabval[0] = + ((meltmultiple_ptr_t) ( /*_._VALTUP___V736*/ meltfptr[735]))->tabval[0] = (melt_ptr_t) ( /*_.CLASS_ROOT__V18*/ meltfptr[17]); - /*touch:INITUP_ */ - meltgc_touch ( /*_.VALTUP___V736*/ meltfptr[735]); + /*touch:_INITUP_ */ + meltgc_touch ( /*_._VALTUP___V736*/ meltfptr[735]); MELT_LOCATION ("warmelt-outobj.melt:5304:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V734*/ meltfptr[733])) == + ( /*_._VALDATA___V734*/ meltfptr[733])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V734*/ + ( /*_._VALDATA___V734*/ meltfptr[733])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V734*/ meltfptr[733]))->obj_vartab[5] = + ((meltobject_ptr_t) ( /*_._VALDATA___V734*/ meltfptr[733]))->obj_vartab[5] = (melt_ptr_t) ( - /*_.VALTUP___V736*/ meltfptr[735]); + /*_._VALTUP___V736*/ meltfptr[735]); MELT_LOCATION ("warmelt-outobj.melt:5304:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V737*/ meltfptr[736])) == + ( /*_._VALDATA___V737*/ meltfptr[736])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V737*/ + ( /*_._VALDATA___V737*/ meltfptr[736])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V737*/ meltfptr[736]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V737*/ meltfptr[736]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V738*/ meltfptr[737]); + /*_._VALSTR___V738*/ meltfptr[737]); MELT_LOCATION ("warmelt-outobj.melt:5304:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V737*/ meltfptr[736])) == + ( /*_._VALDATA___V737*/ meltfptr[736])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V737*/ + ( /*_._VALDATA___V737*/ meltfptr[736])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V737*/ meltfptr[736]))->obj_vartab[2] = + ((meltobject_ptr_t) ( /*_._VALDATA___V737*/ meltfptr[736]))->obj_vartab[2] = (melt_ptr_t) ( - /*_.VALDATA___V734*/ meltfptr[733]); + /*_._VALDATA___V734*/ meltfptr[733]); MELT_LOCATION ("warmelt-outobj.melt:5304:/ initchunk"); /*^touch */ - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V737*/ meltfptr[736]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V737*/ meltfptr[736]); MELT_LOCATION ("warmelt-outobj.melt:5304:/ initchunk"); /*^touchobj */ - melt_dbgtrace_written_object ( /*_.VALDATA___V737*/ meltfptr[736], + melt_dbgtrace_written_object ( /*_._VALDATA___V737*/ meltfptr[736], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:5304:/ initchunk"); @@ -41814,46 +41889,46 @@ meltmod__warmelt_outobj__initialmeltchunk_12 (meltinitial_frame_t * /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V739*/ meltfptr[738])) == + ( /*_._VALDATA___V739*/ meltfptr[738])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V739*/ + ( /*_._VALDATA___V739*/ meltfptr[738])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V739*/ meltfptr[738]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V739*/ meltfptr[738]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V740*/ meltfptr[739]); + /*_._VALSTR___V740*/ meltfptr[739]); MELT_LOCATION ("warmelt-outobj.melt:5304:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V739*/ meltfptr[738])) == + ( /*_._VALDATA___V739*/ meltfptr[738])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V739*/ + ( /*_._VALDATA___V739*/ meltfptr[738])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V739*/ meltfptr[738]))->obj_vartab[2] = + ((meltobject_ptr_t) ( /*_._VALDATA___V739*/ meltfptr[738]))->obj_vartab[2] = (melt_ptr_t) ( - /*_.VALDATA___V734*/ meltfptr[733]); + /*_._VALDATA___V734*/ meltfptr[733]); MELT_LOCATION ("warmelt-outobj.melt:5304:/ initchunk"); /*^touch */ - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V739*/ meltfptr[738]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V739*/ meltfptr[738]); MELT_LOCATION ("warmelt-outobj.melt:5304:/ initchunk"); /*^touchobj */ - melt_dbgtrace_written_object ( /*_.VALDATA___V739*/ meltfptr[738], + melt_dbgtrace_written_object ( /*_._VALDATA___V739*/ meltfptr[738], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:5304:/ initchunk"); @@ -41861,46 +41936,46 @@ meltmod__warmelt_outobj__initialmeltchunk_12 (meltinitial_frame_t * /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V741*/ meltfptr[740])) == + ( /*_._VALDATA___V741*/ meltfptr[740])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V741*/ + ( /*_._VALDATA___V741*/ meltfptr[740])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V741*/ meltfptr[740]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V741*/ meltfptr[740]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V742*/ meltfptr[741]); + /*_._VALSTR___V742*/ meltfptr[741]); MELT_LOCATION ("warmelt-outobj.melt:5304:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V741*/ meltfptr[740])) == + ( /*_._VALDATA___V741*/ meltfptr[740])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V741*/ + ( /*_._VALDATA___V741*/ meltfptr[740])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V741*/ meltfptr[740]))->obj_vartab[2] = + ((meltobject_ptr_t) ( /*_._VALDATA___V741*/ meltfptr[740]))->obj_vartab[2] = (melt_ptr_t) ( - /*_.VALDATA___V734*/ meltfptr[733]); + /*_._VALDATA___V734*/ meltfptr[733]); MELT_LOCATION ("warmelt-outobj.melt:5304:/ initchunk"); /*^touch */ - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V741*/ meltfptr[740]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V741*/ meltfptr[740]); MELT_LOCATION ("warmelt-outobj.melt:5304:/ initchunk"); /*^touchobj */ - melt_dbgtrace_written_object ( /*_.VALDATA___V741*/ meltfptr[740], + melt_dbgtrace_written_object ( /*_._VALDATA___V741*/ meltfptr[740], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:5304:/ initchunk"); @@ -41908,249 +41983,249 @@ meltmod__warmelt_outobj__initialmeltchunk_12 (meltinitial_frame_t * /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V743*/ meltfptr[742])) == + ( /*_._VALDATA___V743*/ meltfptr[742])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V743*/ + ( /*_._VALDATA___V743*/ meltfptr[742])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V743*/ meltfptr[742]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V743*/ meltfptr[742]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V744*/ meltfptr[743]); + /*_._VALSTR___V744*/ meltfptr[743]); MELT_LOCATION ("warmelt-outobj.melt:5304:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V743*/ meltfptr[742])) == + ( /*_._VALDATA___V743*/ meltfptr[742])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V743*/ + ( /*_._VALDATA___V743*/ meltfptr[742])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V743*/ meltfptr[742]))->obj_vartab[2] = + ((meltobject_ptr_t) ( /*_._VALDATA___V743*/ meltfptr[742]))->obj_vartab[2] = (melt_ptr_t) ( - /*_.VALDATA___V734*/ meltfptr[733]); + /*_._VALDATA___V734*/ meltfptr[733]); MELT_LOCATION ("warmelt-outobj.melt:5304:/ initchunk"); /*^touch */ - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V743*/ meltfptr[742]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V743*/ meltfptr[742]); MELT_LOCATION ("warmelt-outobj.melt:5304:/ initchunk"); /*^touchobj */ - melt_dbgtrace_written_object ( /*_.VALDATA___V743*/ meltfptr[742], + melt_dbgtrace_written_object ( /*_._VALDATA___V743*/ meltfptr[742], "new static instance"); /*putupl#27 */ melt_assertmsg ("putupl #27 checktup", melt_magic_discr ((melt_ptr_t) - ( /*_.VALTUP___V745*/ meltfptr[744])) == + ( /*_._VALTUP___V745*/ meltfptr[744])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #27 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) - ( /*_.VALTUP___V745*/ + ( /*_._VALTUP___V745*/ meltfptr[744])))); - ((meltmultiple_ptr_t) ( /*_.VALTUP___V745*/ meltfptr[744]))->tabval[0] = - (melt_ptr_t) ( /*_.VALDATA___V737*/ meltfptr[736]); + ((meltmultiple_ptr_t) ( /*_._VALTUP___V745*/ meltfptr[744]))->tabval[0] = + (melt_ptr_t) ( /*_._VALDATA___V737*/ meltfptr[736]); /*putupl#28 */ melt_assertmsg ("putupl #28 checktup", melt_magic_discr ((melt_ptr_t) - ( /*_.VALTUP___V745*/ meltfptr[744])) == + ( /*_._VALTUP___V745*/ meltfptr[744])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #28 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) - ( /*_.VALTUP___V745*/ + ( /*_._VALTUP___V745*/ meltfptr[744])))); - ((meltmultiple_ptr_t) ( /*_.VALTUP___V745*/ meltfptr[744]))->tabval[1] = - (melt_ptr_t) ( /*_.VALDATA___V739*/ meltfptr[738]); + ((meltmultiple_ptr_t) ( /*_._VALTUP___V745*/ meltfptr[744]))->tabval[1] = + (melt_ptr_t) ( /*_._VALDATA___V739*/ meltfptr[738]); /*putupl#29 */ melt_assertmsg ("putupl #29 checktup", melt_magic_discr ((melt_ptr_t) - ( /*_.VALTUP___V745*/ meltfptr[744])) == + ( /*_._VALTUP___V745*/ meltfptr[744])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #29 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) - ( /*_.VALTUP___V745*/ + ( /*_._VALTUP___V745*/ meltfptr[744])))); - ((meltmultiple_ptr_t) ( /*_.VALTUP___V745*/ meltfptr[744]))->tabval[2] = - (melt_ptr_t) ( /*_.VALDATA___V741*/ meltfptr[740]); + ((meltmultiple_ptr_t) ( /*_._VALTUP___V745*/ meltfptr[744]))->tabval[2] = + (melt_ptr_t) ( /*_._VALDATA___V741*/ meltfptr[740]); /*putupl#30 */ melt_assertmsg ("putupl #30 checktup", melt_magic_discr ((melt_ptr_t) - ( /*_.VALTUP___V745*/ meltfptr[744])) == + ( /*_._VALTUP___V745*/ meltfptr[744])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #30 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) - ( /*_.VALTUP___V745*/ + ( /*_._VALTUP___V745*/ meltfptr[744])))); - ((meltmultiple_ptr_t) ( /*_.VALTUP___V745*/ meltfptr[744]))->tabval[3] = - (melt_ptr_t) ( /*_.VALDATA___V743*/ meltfptr[742]); + ((meltmultiple_ptr_t) ( /*_._VALTUP___V745*/ meltfptr[744]))->tabval[3] = + (melt_ptr_t) ( /*_._VALDATA___V743*/ meltfptr[742]); - /*touch:INITUP_ */ - meltgc_touch ( /*_.VALTUP___V745*/ meltfptr[744]); + /*touch:_INITUP_ */ + meltgc_touch ( /*_._VALTUP___V745*/ meltfptr[744]); MELT_LOCATION ("warmelt-outobj.melt:5304:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V734*/ meltfptr[733])) == + ( /*_._VALDATA___V734*/ meltfptr[733])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V734*/ + ( /*_._VALDATA___V734*/ meltfptr[733])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V734*/ meltfptr[733]))->obj_vartab[6] = + ((meltobject_ptr_t) ( /*_._VALDATA___V734*/ meltfptr[733]))->obj_vartab[6] = (melt_ptr_t) ( - /*_.VALTUP___V745*/ meltfptr[744]); + /*_._VALTUP___V745*/ meltfptr[744]); MELT_LOCATION ("warmelt-outobj.melt:5304:/ initchunk"); /*^touch */ - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V734*/ meltfptr[733]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V734*/ meltfptr[733]); MELT_LOCATION ("warmelt-outobj.melt:5304:/ initchunk"); /*^touchobj */ - melt_dbgtrace_written_object ( /*_.VALDATA___V734*/ meltfptr[733], + melt_dbgtrace_written_object ( /*_._VALDATA___V734*/ meltfptr[733], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V746*/ meltfptr[745])) == + ( /*_._VALDATA___V746*/ meltfptr[745])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V746*/ + ( /*_._VALDATA___V746*/ meltfptr[745])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V746*/ meltfptr[745]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V746*/ meltfptr[745]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V747*/ meltfptr[746]); + /*_._VALSTR___V747*/ meltfptr[746]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V746*/ meltfptr[745]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V746*/ meltfptr[745]); - melt_dbgtrace_written_object ( /*_.VALDATA___V746*/ meltfptr[745], + melt_dbgtrace_written_object ( /*_._VALDATA___V746*/ meltfptr[745], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V748*/ meltfptr[747])) == + ( /*_._VALDATA___V748*/ meltfptr[747])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V748*/ + ( /*_._VALDATA___V748*/ meltfptr[747])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V748*/ meltfptr[747]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V748*/ meltfptr[747]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V749*/ meltfptr[748]); + /*_._VALSTR___V749*/ meltfptr[748]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V748*/ meltfptr[747]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V748*/ meltfptr[747]); - melt_dbgtrace_written_object ( /*_.VALDATA___V748*/ meltfptr[747], + melt_dbgtrace_written_object ( /*_._VALDATA___V748*/ meltfptr[747], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V750*/ meltfptr[749])) == + ( /*_._VALDATA___V750*/ meltfptr[749])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V750*/ + ( /*_._VALDATA___V750*/ meltfptr[749])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V750*/ meltfptr[749]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V750*/ meltfptr[749]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V751*/ meltfptr[750]); + /*_._VALSTR___V751*/ meltfptr[750]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V750*/ meltfptr[749]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V750*/ meltfptr[749]); - melt_dbgtrace_written_object ( /*_.VALDATA___V750*/ meltfptr[749], + melt_dbgtrace_written_object ( /*_._VALDATA___V750*/ meltfptr[749], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V752*/ meltfptr[751])) == + ( /*_._VALDATA___V752*/ meltfptr[751])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V752*/ + ( /*_._VALDATA___V752*/ meltfptr[751])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V752*/ meltfptr[751]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V752*/ meltfptr[751]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V753*/ meltfptr[752]); + /*_._VALSTR___V753*/ meltfptr[752]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V752*/ meltfptr[751]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V752*/ meltfptr[751]); - melt_dbgtrace_written_object ( /*_.VALDATA___V752*/ meltfptr[751], + melt_dbgtrace_written_object ( /*_._VALDATA___V752*/ meltfptr[751], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V754*/ meltfptr[753])) == + ( /*_._VALDATA___V754*/ meltfptr[753])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V754*/ + ( /*_._VALDATA___V754*/ meltfptr[753])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V754*/ meltfptr[753]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V754*/ meltfptr[753]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V755*/ meltfptr[754]); + /*_._VALSTR___V755*/ meltfptr[754]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V754*/ meltfptr[753]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V754*/ meltfptr[753]); - melt_dbgtrace_written_object ( /*_.VALDATA___V754*/ meltfptr[753], + melt_dbgtrace_written_object ( /*_._VALDATA___V754*/ meltfptr[753], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:5313:/ initchunk"); @@ -42158,40 +42233,40 @@ meltmod__warmelt_outobj__initialmeltchunk_12 (meltinitial_frame_t * /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V756*/ meltfptr[755])) == + ( /*_._VALDATA___V756*/ meltfptr[755])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V756*/ + ( /*_._VALDATA___V756*/ meltfptr[755])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V756*/ meltfptr[755]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V756*/ meltfptr[755]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V757*/ meltfptr[756]); + /*_._VALSTR___V757*/ meltfptr[756]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V759*/ meltfptr[758])) == + ( /*_._VALDATA___V759*/ meltfptr[758])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V759*/ + ( /*_._VALDATA___V759*/ meltfptr[758])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V759*/ meltfptr[758]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V759*/ meltfptr[758]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V760*/ meltfptr[759]); + /*_._VALSTR___V760*/ meltfptr[759]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V759*/ meltfptr[758]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V759*/ meltfptr[758]); - melt_dbgtrace_written_object ( /*_.VALDATA___V759*/ meltfptr[758], + melt_dbgtrace_written_object ( /*_._VALDATA___V759*/ meltfptr[758], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:5313:/ initchunk"); @@ -42199,69 +42274,69 @@ meltmod__warmelt_outobj__initialmeltchunk_12 (meltinitial_frame_t * /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V758*/ meltfptr[757])) == + ( /*_._VALDATA___V758*/ meltfptr[757])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (0 >= 0 && 0 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V758*/ + ( /*_._VALDATA___V758*/ meltfptr[757])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V758*/ meltfptr[757]))->obj_vartab[0] = + ((meltobject_ptr_t) ( /*_._VALDATA___V758*/ meltfptr[757]))->obj_vartab[0] = (melt_ptr_t) ( - /*_.VALDATA___V759*/ meltfptr[758]); + /*_._VALDATA___V759*/ meltfptr[758]); MELT_LOCATION ("warmelt-outobj.melt:5313:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V758*/ meltfptr[757])) == + ( /*_._VALDATA___V758*/ meltfptr[757])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V758*/ + ( /*_._VALDATA___V758*/ meltfptr[757])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V758*/ meltfptr[757]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V758*/ meltfptr[757]))->obj_vartab[1] = (melt_ptr_t) ( ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); MELT_LOCATION ("warmelt-outobj.melt:5313:/ initchunk"); /*^touch */ - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V758*/ meltfptr[757]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V758*/ meltfptr[757]); MELT_LOCATION ("warmelt-outobj.melt:5313:/ initchunk"); /*^touchobj */ - melt_dbgtrace_written_object ( /*_.VALDATA___V758*/ meltfptr[757], + melt_dbgtrace_written_object ( /*_._VALDATA___V758*/ meltfptr[757], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V762*/ meltfptr[761])) == + ( /*_._VALDATA___V762*/ meltfptr[761])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V762*/ + ( /*_._VALDATA___V762*/ meltfptr[761])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V762*/ meltfptr[761]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V762*/ meltfptr[761]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V763*/ meltfptr[762]); + /*_._VALSTR___V763*/ meltfptr[762]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V762*/ meltfptr[761]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V762*/ meltfptr[761]); - melt_dbgtrace_written_object ( /*_.VALDATA___V762*/ meltfptr[761], + melt_dbgtrace_written_object ( /*_._VALDATA___V762*/ meltfptr[761], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:5313:/ initchunk"); @@ -42269,69 +42344,69 @@ meltmod__warmelt_outobj__initialmeltchunk_12 (meltinitial_frame_t * /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V761*/ meltfptr[760])) == + ( /*_._VALDATA___V761*/ meltfptr[760])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (0 >= 0 && 0 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V761*/ + ( /*_._VALDATA___V761*/ meltfptr[760])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V761*/ meltfptr[760]))->obj_vartab[0] = + ((meltobject_ptr_t) ( /*_._VALDATA___V761*/ meltfptr[760]))->obj_vartab[0] = (melt_ptr_t) ( - /*_.VALDATA___V762*/ meltfptr[761]); + /*_._VALDATA___V762*/ meltfptr[761]); MELT_LOCATION ("warmelt-outobj.melt:5313:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V761*/ meltfptr[760])) == + ( /*_._VALDATA___V761*/ meltfptr[760])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V761*/ + ( /*_._VALDATA___V761*/ meltfptr[760])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V761*/ meltfptr[760]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V761*/ meltfptr[760]))->obj_vartab[1] = (melt_ptr_t) ( ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); MELT_LOCATION ("warmelt-outobj.melt:5313:/ initchunk"); /*^touch */ - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V761*/ meltfptr[760]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V761*/ meltfptr[760]); MELT_LOCATION ("warmelt-outobj.melt:5313:/ initchunk"); /*^touchobj */ - melt_dbgtrace_written_object ( /*_.VALDATA___V761*/ meltfptr[760], + melt_dbgtrace_written_object ( /*_._VALDATA___V761*/ meltfptr[760], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V765*/ meltfptr[764])) == + ( /*_._VALDATA___V765*/ meltfptr[764])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V765*/ + ( /*_._VALDATA___V765*/ meltfptr[764])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V765*/ meltfptr[764]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V765*/ meltfptr[764]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V766*/ meltfptr[765]); + /*_._VALSTR___V766*/ meltfptr[765]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V765*/ meltfptr[764]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V765*/ meltfptr[764]); - melt_dbgtrace_written_object ( /*_.VALDATA___V765*/ meltfptr[764], + melt_dbgtrace_written_object ( /*_._VALDATA___V765*/ meltfptr[764], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:5313:/ initchunk"); @@ -42339,69 +42414,69 @@ meltmod__warmelt_outobj__initialmeltchunk_12 (meltinitial_frame_t * /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V764*/ meltfptr[763])) == + ( /*_._VALDATA___V764*/ meltfptr[763])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (0 >= 0 && 0 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V764*/ + ( /*_._VALDATA___V764*/ meltfptr[763])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V764*/ meltfptr[763]))->obj_vartab[0] = + ((meltobject_ptr_t) ( /*_._VALDATA___V764*/ meltfptr[763]))->obj_vartab[0] = (melt_ptr_t) ( - /*_.VALDATA___V765*/ meltfptr[764]); + /*_._VALDATA___V765*/ meltfptr[764]); MELT_LOCATION ("warmelt-outobj.melt:5313:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V764*/ meltfptr[763])) == + ( /*_._VALDATA___V764*/ meltfptr[763])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V764*/ + ( /*_._VALDATA___V764*/ meltfptr[763])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V764*/ meltfptr[763]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V764*/ meltfptr[763]))->obj_vartab[1] = (melt_ptr_t) ( ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); MELT_LOCATION ("warmelt-outobj.melt:5313:/ initchunk"); /*^touch */ - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V764*/ meltfptr[763]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V764*/ meltfptr[763]); MELT_LOCATION ("warmelt-outobj.melt:5313:/ initchunk"); /*^touchobj */ - melt_dbgtrace_written_object ( /*_.VALDATA___V764*/ meltfptr[763], + melt_dbgtrace_written_object ( /*_._VALDATA___V764*/ meltfptr[763], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V768*/ meltfptr[767])) == + ( /*_._VALDATA___V768*/ meltfptr[767])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V768*/ + ( /*_._VALDATA___V768*/ meltfptr[767])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V768*/ meltfptr[767]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V768*/ meltfptr[767]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V769*/ meltfptr[768]); + /*_._VALSTR___V769*/ meltfptr[768]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V768*/ meltfptr[767]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V768*/ meltfptr[767]); - melt_dbgtrace_written_object ( /*_.VALDATA___V768*/ meltfptr[767], + melt_dbgtrace_written_object ( /*_._VALDATA___V768*/ meltfptr[767], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:5313:/ initchunk"); @@ -42409,299 +42484,299 @@ meltmod__warmelt_outobj__initialmeltchunk_12 (meltinitial_frame_t * /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V767*/ meltfptr[766])) == + ( /*_._VALDATA___V767*/ meltfptr[766])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (0 >= 0 && 0 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V767*/ + ( /*_._VALDATA___V767*/ meltfptr[766])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V767*/ meltfptr[766]))->obj_vartab[0] = + ((meltobject_ptr_t) ( /*_._VALDATA___V767*/ meltfptr[766]))->obj_vartab[0] = (melt_ptr_t) ( - /*_.VALDATA___V768*/ meltfptr[767]); + /*_._VALDATA___V768*/ meltfptr[767]); MELT_LOCATION ("warmelt-outobj.melt:5313:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V767*/ meltfptr[766])) == + ( /*_._VALDATA___V767*/ meltfptr[766])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V767*/ + ( /*_._VALDATA___V767*/ meltfptr[766])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V767*/ meltfptr[766]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V767*/ meltfptr[766]))->obj_vartab[1] = (melt_ptr_t) ( ((melt_ptr_t) (MELT_PREDEF (CTYPE_LONG)))); MELT_LOCATION ("warmelt-outobj.melt:5313:/ initchunk"); /*^touch */ - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V767*/ meltfptr[766]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V767*/ meltfptr[766]); MELT_LOCATION ("warmelt-outobj.melt:5313:/ initchunk"); /*^touchobj */ - melt_dbgtrace_written_object ( /*_.VALDATA___V767*/ meltfptr[766], + melt_dbgtrace_written_object ( /*_._VALDATA___V767*/ meltfptr[766], "new static instance"); /*putupl#31 */ melt_assertmsg ("putupl #31 checktup", melt_magic_discr ((melt_ptr_t) - ( /*_.VALTUP___V770*/ meltfptr[769])) == + ( /*_._VALTUP___V770*/ meltfptr[769])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #31 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) - ( /*_.VALTUP___V770*/ + ( /*_._VALTUP___V770*/ meltfptr[769])))); - ((meltmultiple_ptr_t) ( /*_.VALTUP___V770*/ meltfptr[769]))->tabval[0] = - (melt_ptr_t) ( /*_.VALDATA___V758*/ meltfptr[757]); + ((meltmultiple_ptr_t) ( /*_._VALTUP___V770*/ meltfptr[769]))->tabval[0] = + (melt_ptr_t) ( /*_._VALDATA___V758*/ meltfptr[757]); /*putupl#32 */ melt_assertmsg ("putupl #32 checktup", melt_magic_discr ((melt_ptr_t) - ( /*_.VALTUP___V770*/ meltfptr[769])) == + ( /*_._VALTUP___V770*/ meltfptr[769])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #32 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) - ( /*_.VALTUP___V770*/ + ( /*_._VALTUP___V770*/ meltfptr[769])))); - ((meltmultiple_ptr_t) ( /*_.VALTUP___V770*/ meltfptr[769]))->tabval[1] = - (melt_ptr_t) ( /*_.VALDATA___V761*/ meltfptr[760]); + ((meltmultiple_ptr_t) ( /*_._VALTUP___V770*/ meltfptr[769]))->tabval[1] = + (melt_ptr_t) ( /*_._VALDATA___V761*/ meltfptr[760]); /*putupl#33 */ melt_assertmsg ("putupl #33 checktup", melt_magic_discr ((melt_ptr_t) - ( /*_.VALTUP___V770*/ meltfptr[769])) == + ( /*_._VALTUP___V770*/ meltfptr[769])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #33 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) - ( /*_.VALTUP___V770*/ + ( /*_._VALTUP___V770*/ meltfptr[769])))); - ((meltmultiple_ptr_t) ( /*_.VALTUP___V770*/ meltfptr[769]))->tabval[2] = - (melt_ptr_t) ( /*_.VALDATA___V764*/ meltfptr[763]); + ((meltmultiple_ptr_t) ( /*_._VALTUP___V770*/ meltfptr[769]))->tabval[2] = + (melt_ptr_t) ( /*_._VALDATA___V764*/ meltfptr[763]); /*putupl#34 */ melt_assertmsg ("putupl #34 checktup", melt_magic_discr ((melt_ptr_t) - ( /*_.VALTUP___V770*/ meltfptr[769])) == + ( /*_._VALTUP___V770*/ meltfptr[769])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #34 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) - ( /*_.VALTUP___V770*/ + ( /*_._VALTUP___V770*/ meltfptr[769])))); - ((meltmultiple_ptr_t) ( /*_.VALTUP___V770*/ meltfptr[769]))->tabval[3] = - (melt_ptr_t) ( /*_.VALDATA___V767*/ meltfptr[766]); + ((meltmultiple_ptr_t) ( /*_._VALTUP___V770*/ meltfptr[769]))->tabval[3] = + (melt_ptr_t) ( /*_._VALDATA___V767*/ meltfptr[766]); - /*touch:INITUP_ */ - meltgc_touch ( /*_.VALTUP___V770*/ meltfptr[769]); + /*touch:_INITUP_ */ + meltgc_touch ( /*_._VALTUP___V770*/ meltfptr[769]); MELT_LOCATION ("warmelt-outobj.melt:5313:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V756*/ meltfptr[755])) == + ( /*_._VALDATA___V756*/ meltfptr[755])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V756*/ + ( /*_._VALDATA___V756*/ meltfptr[755])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V756*/ meltfptr[755]))->obj_vartab[2] = + ((meltobject_ptr_t) ( /*_._VALDATA___V756*/ meltfptr[755]))->obj_vartab[2] = (melt_ptr_t) ( - /*_.VALTUP___V770*/ meltfptr[769]); + /*_._VALTUP___V770*/ meltfptr[769]); MELT_LOCATION ("warmelt-outobj.melt:5313:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V756*/ meltfptr[755])) == + ( /*_._VALDATA___V756*/ meltfptr[755])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (3 >= 0 && 3 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V756*/ + ( /*_._VALDATA___V756*/ meltfptr[755])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V756*/ meltfptr[755]))->obj_vartab[3] = + ((meltobject_ptr_t) ( /*_._VALDATA___V756*/ meltfptr[755]))->obj_vartab[3] = (melt_ptr_t) ( ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); /*putupl#35 */ melt_assertmsg ("putupl #35 checktup", melt_magic_discr ((melt_ptr_t) - ( /*_.VALTUP___V776*/ meltfptr[775])) == + ( /*_._VALTUP___V776*/ meltfptr[775])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #35 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) - ( /*_.VALTUP___V776*/ + ( /*_._VALTUP___V776*/ meltfptr[775])))); - ((meltmultiple_ptr_t) ( /*_.VALTUP___V776*/ meltfptr[775]))->tabval[0] = - (melt_ptr_t) ( /*_.VALSTR___V771*/ meltfptr[770]); + ((meltmultiple_ptr_t) ( /*_._VALTUP___V776*/ meltfptr[775]))->tabval[0] = + (melt_ptr_t) ( /*_._VALSTR___V771*/ meltfptr[770]); /*putupl#36 */ melt_assertmsg ("putupl #36 checktup", melt_magic_discr ((melt_ptr_t) - ( /*_.VALTUP___V776*/ meltfptr[775])) == + ( /*_._VALTUP___V776*/ meltfptr[775])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #36 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) - ( /*_.VALTUP___V776*/ + ( /*_._VALTUP___V776*/ meltfptr[775])))); - ((meltmultiple_ptr_t) ( /*_.VALTUP___V776*/ meltfptr[775]))->tabval[1] = - (melt_ptr_t) ( /*_.VALDATA___V759*/ meltfptr[758]); + ((meltmultiple_ptr_t) ( /*_._VALTUP___V776*/ meltfptr[775]))->tabval[1] = + (melt_ptr_t) ( /*_._VALDATA___V759*/ meltfptr[758]); /*putupl#37 */ melt_assertmsg ("putupl #37 checktup", melt_magic_discr ((melt_ptr_t) - ( /*_.VALTUP___V776*/ meltfptr[775])) == + ( /*_._VALTUP___V776*/ meltfptr[775])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #37 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) - ( /*_.VALTUP___V776*/ + ( /*_._VALTUP___V776*/ meltfptr[775])))); - ((meltmultiple_ptr_t) ( /*_.VALTUP___V776*/ meltfptr[775]))->tabval[2] = - (melt_ptr_t) ( /*_.VALSTR___V772*/ meltfptr[771]); + ((meltmultiple_ptr_t) ( /*_._VALTUP___V776*/ meltfptr[775]))->tabval[2] = + (melt_ptr_t) ( /*_._VALSTR___V772*/ meltfptr[771]); /*putupl#38 */ melt_assertmsg ("putupl #38 checktup", melt_magic_discr ((melt_ptr_t) - ( /*_.VALTUP___V776*/ meltfptr[775])) == + ( /*_._VALTUP___V776*/ meltfptr[775])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #38 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) - ( /*_.VALTUP___V776*/ + ( /*_._VALTUP___V776*/ meltfptr[775])))); - ((meltmultiple_ptr_t) ( /*_.VALTUP___V776*/ meltfptr[775]))->tabval[3] = - (melt_ptr_t) ( /*_.VALDATA___V762*/ meltfptr[761]); + ((meltmultiple_ptr_t) ( /*_._VALTUP___V776*/ meltfptr[775]))->tabval[3] = + (melt_ptr_t) ( /*_._VALDATA___V762*/ meltfptr[761]); /*putupl#39 */ melt_assertmsg ("putupl #39 checktup", melt_magic_discr ((melt_ptr_t) - ( /*_.VALTUP___V776*/ meltfptr[775])) == + ( /*_._VALTUP___V776*/ meltfptr[775])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #39 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) - ( /*_.VALTUP___V776*/ + ( /*_._VALTUP___V776*/ meltfptr[775])))); - ((meltmultiple_ptr_t) ( /*_.VALTUP___V776*/ meltfptr[775]))->tabval[4] = - (melt_ptr_t) ( /*_.VALSTR___V773*/ meltfptr[772]); + ((meltmultiple_ptr_t) ( /*_._VALTUP___V776*/ meltfptr[775]))->tabval[4] = + (melt_ptr_t) ( /*_._VALSTR___V773*/ meltfptr[772]); /*putupl#40 */ melt_assertmsg ("putupl #40 checktup", melt_magic_discr ((melt_ptr_t) - ( /*_.VALTUP___V776*/ meltfptr[775])) == + ( /*_._VALTUP___V776*/ meltfptr[775])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #40 checkoff", (5 >= 0 && 5 < melt_multiple_length ((melt_ptr_t) - ( /*_.VALTUP___V776*/ + ( /*_._VALTUP___V776*/ meltfptr[775])))); - ((meltmultiple_ptr_t) ( /*_.VALTUP___V776*/ meltfptr[775]))->tabval[5] = - (melt_ptr_t) ( /*_.VALDATA___V765*/ meltfptr[764]); + ((meltmultiple_ptr_t) ( /*_._VALTUP___V776*/ meltfptr[775]))->tabval[5] = + (melt_ptr_t) ( /*_._VALDATA___V765*/ meltfptr[764]); /*putupl#41 */ melt_assertmsg ("putupl #41 checktup", melt_magic_discr ((melt_ptr_t) - ( /*_.VALTUP___V776*/ meltfptr[775])) == + ( /*_._VALTUP___V776*/ meltfptr[775])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #41 checkoff", (6 >= 0 && 6 < melt_multiple_length ((melt_ptr_t) - ( /*_.VALTUP___V776*/ + ( /*_._VALTUP___V776*/ meltfptr[775])))); - ((meltmultiple_ptr_t) ( /*_.VALTUP___V776*/ meltfptr[775]))->tabval[6] = - (melt_ptr_t) ( /*_.VALSTR___V774*/ meltfptr[773]); + ((meltmultiple_ptr_t) ( /*_._VALTUP___V776*/ meltfptr[775]))->tabval[6] = + (melt_ptr_t) ( /*_._VALSTR___V774*/ meltfptr[773]); /*putupl#42 */ melt_assertmsg ("putupl #42 checktup", melt_magic_discr ((melt_ptr_t) - ( /*_.VALTUP___V776*/ meltfptr[775])) == + ( /*_._VALTUP___V776*/ meltfptr[775])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #42 checkoff", (7 >= 0 && 7 < melt_multiple_length ((melt_ptr_t) - ( /*_.VALTUP___V776*/ + ( /*_._VALTUP___V776*/ meltfptr[775])))); - ((meltmultiple_ptr_t) ( /*_.VALTUP___V776*/ meltfptr[775]))->tabval[7] = - (melt_ptr_t) ( /*_.VALDATA___V768*/ meltfptr[767]); + ((meltmultiple_ptr_t) ( /*_._VALTUP___V776*/ meltfptr[775]))->tabval[7] = + (melt_ptr_t) ( /*_._VALDATA___V768*/ meltfptr[767]); /*putupl#43 */ melt_assertmsg ("putupl #43 checktup", melt_magic_discr ((melt_ptr_t) - ( /*_.VALTUP___V776*/ meltfptr[775])) == + ( /*_._VALTUP___V776*/ meltfptr[775])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #43 checkoff", (8 >= 0 && 8 < melt_multiple_length ((melt_ptr_t) - ( /*_.VALTUP___V776*/ + ( /*_._VALTUP___V776*/ meltfptr[775])))); - ((meltmultiple_ptr_t) ( /*_.VALTUP___V776*/ meltfptr[775]))->tabval[8] = - (melt_ptr_t) ( /*_.VALSTR___V775*/ meltfptr[774]); + ((meltmultiple_ptr_t) ( /*_._VALTUP___V776*/ meltfptr[775]))->tabval[8] = + (melt_ptr_t) ( /*_._VALSTR___V775*/ meltfptr[774]); - /*touch:INITUP_ */ - meltgc_touch ( /*_.VALTUP___V776*/ meltfptr[775]); + /*touch:_INITUP_ */ + meltgc_touch ( /*_._VALTUP___V776*/ meltfptr[775]); MELT_LOCATION ("warmelt-outobj.melt:5313:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V756*/ meltfptr[755])) == + ( /*_._VALDATA___V756*/ meltfptr[755])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V756*/ + ( /*_._VALDATA___V756*/ meltfptr[755])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V756*/ meltfptr[755]))->obj_vartab[4] = + ((meltobject_ptr_t) ( /*_._VALDATA___V756*/ meltfptr[755]))->obj_vartab[4] = (melt_ptr_t) ( - /*_.VALTUP___V776*/ meltfptr[775]); + /*_._VALTUP___V776*/ meltfptr[775]); MELT_LOCATION ("warmelt-outobj.melt:5313:/ initchunk"); /*^touch */ - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V756*/ meltfptr[755]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V756*/ meltfptr[755]); MELT_LOCATION ("warmelt-outobj.melt:5313:/ initchunk"); /*^touchobj */ - melt_dbgtrace_written_object ( /*_.VALDATA___V756*/ meltfptr[755], + melt_dbgtrace_written_object ( /*_._VALDATA___V756*/ meltfptr[755], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:5321:/ initchunk"); @@ -42710,13 +42785,13 @@ meltmod__warmelt_outobj__initialmeltchunk_12 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V777*/ meltfptr[776])) + ( /*_._VALROUT___V777*/ meltfptr[776])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_590__NTH_SECUNDARY_FILE#0", NULL != ( /*_.CLASS_ANY_MODULE_CONTEXT__V141*/ meltfptr[140])); - ((meltroutine_ptr_t) /*_.VALROUT___V777*/ meltfptr[776])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V777*/ meltfptr[776])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_ANY_MODULE_CONTEXT__V141*/ meltfptr[140]); MELT_LOCATION ("warmelt-outobj.melt:5321:/ initchunk"); @@ -42725,12 +42800,12 @@ meltmod__warmelt_outobj__initialmeltchunk_12 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V777*/ meltfptr[776])) + ( /*_._VALROUT___V777*/ meltfptr[776])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_590__NTH_SECUNDARY_FILE#1", NULL != ( /*_.DISCR_STRING__V54*/ meltfptr[53])); - ((meltroutine_ptr_t) /*_.VALROUT___V777*/ meltfptr[776])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V777*/ meltfptr[776])->tabval[1] = (melt_ptr_t) ( /*_.DISCR_STRING__V54*/ meltfptr[53]); MELT_LOCATION ("warmelt-outobj.melt:5321:/ initchunk"); @@ -42739,12 +42814,12 @@ meltmod__warmelt_outobj__initialmeltchunk_12 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V777*/ meltfptr[776])) + ( /*_._VALROUT___V777*/ meltfptr[776])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_590__NTH_SECUNDARY_FILE#2", NULL != ( /*_.DISCR_STRBUF__V69*/ meltfptr[68])); - ((meltroutine_ptr_t) /*_.VALROUT___V777*/ meltfptr[776])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V777*/ meltfptr[776])->tabval[2] = (melt_ptr_t) ( /*_.DISCR_STRBUF__V69*/ meltfptr[68]); MELT_LOCATION ("warmelt-outobj.melt:5321:/ initchunk"); @@ -42752,21 +42827,21 @@ meltmod__warmelt_outobj__initialmeltchunk_12 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V777*/ meltfptr[776])) == + ( /*_._VALROUT___V777*/ meltfptr[776])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALDATA___V734*/ meltfptr[733]); - ((meltroutine_ptr_t) /*_.VALROUT___V777*/ meltfptr[776])->tabval[3] = - (melt_ptr_t) ( /*_.VALDATA___V734*/ meltfptr[733]); + NULL != /*_._VALDATA___V734*/ meltfptr[733]); + ((meltroutine_ptr_t) /*_._VALROUT___V777*/ meltfptr[776])->tabval[3] = + (melt_ptr_t) ( /*_._VALDATA___V734*/ meltfptr[733]); #undef meltfram__ -} /*end of meltmod__warmelt_outobj__initialmeltchunk_12 */ +} /*end of meltmod__WARMELTmiOUTOBJ__initialmeltchunk_12 */ void -meltmod__warmelt_outobj__initialmeltchunk_13 (meltinitial_frame_t * - meltmeltframptr__, - char meltpredefinited[]) +meltmod__WARMELTmiOUTOBJ__initialmeltchunk_13 (meltinitial_frame_t * + meltmeltframptr__, + char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount @@ -42774,23 +42849,23 @@ meltmod__warmelt_outobj__initialmeltchunk_13 (meltinitial_frame_t * (void) meltpredefinited; MELT_LOCATION ("warmelt-outobj.melt:5321:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V777*/ meltfptr[776]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V777*/ meltfptr[776]); /*putclosurout#113 */ melt_assertmsg ("putclosrout#113 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V778*/ meltfptr[777])) == + ( /*_._VALCLO___V778*/ meltfptr[777])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#113 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V777*/ meltfptr[776])) == + ( /*_._VALROUT___V777*/ meltfptr[776])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V778*/ meltfptr[777])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V777*/ meltfptr[776]); + ((meltclosure_ptr_t) /*_._VALCLO___V778*/ meltfptr[777])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V777*/ meltfptr[776]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V778*/ meltfptr[777]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V778*/ meltfptr[777]); MELT_LOCATION ("warmelt-outobj.melt:5355:/ initchunk"); /*^putroutconst */ @@ -42798,13 +42873,13 @@ meltmod__warmelt_outobj__initialmeltchunk_13 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V779*/ meltfptr[778])) + ( /*_._VALROUT___V779*/ meltfptr[778])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_592__OUTPUT_MELT_DESCRIPTOR#0", NULL != ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7])); - ((meltroutine_ptr_t) /*_.VALROUT___V779*/ meltfptr[778])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V779*/ meltfptr[778])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7]); MELT_LOCATION ("warmelt-outobj.melt:5355:/ initchunk"); @@ -42813,13 +42888,13 @@ meltmod__warmelt_outobj__initialmeltchunk_13 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V779*/ meltfptr[778])) + ( /*_._VALROUT___V779*/ meltfptr[778])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_592__OUTPUT_MELT_DESCRIPTOR#1", NULL != ( /*_.CLASS_ANY_MODULE_CONTEXT__V141*/ meltfptr[140])); - ((meltroutine_ptr_t) /*_.VALROUT___V779*/ meltfptr[778])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V779*/ meltfptr[778])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_ANY_MODULE_CONTEXT__V141*/ meltfptr[140]); MELT_LOCATION ("warmelt-outobj.melt:5355:/ initchunk"); @@ -42828,13 +42903,13 @@ meltmod__warmelt_outobj__initialmeltchunk_13 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V779*/ meltfptr[778])) + ( /*_._VALROUT___V779*/ meltfptr[778])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_592__OUTPUT_MELT_DESCRIPTOR#2", NULL != ( /*_.DISCR_STRBUF__V69*/ meltfptr[68])); - ((meltroutine_ptr_t) /*_.VALROUT___V779*/ meltfptr[778])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V779*/ meltfptr[778])->tabval[2] = (melt_ptr_t) ( /*_.DISCR_STRBUF__V69*/ meltfptr[68]); MELT_LOCATION ("warmelt-outobj.melt:5355:/ initchunk"); @@ -42843,13 +42918,13 @@ meltmod__warmelt_outobj__initialmeltchunk_13 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V779*/ meltfptr[778])) + ( /*_._VALROUT___V779*/ meltfptr[778])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_592__OUTPUT_MELT_DESCRIPTOR#3", NULL != ( /*_.DISCR_LIST__V66*/ meltfptr[65])); - ((meltroutine_ptr_t) /*_.VALROUT___V779*/ meltfptr[778])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V779*/ meltfptr[778])->tabval[3] = (melt_ptr_t) ( /*_.DISCR_LIST__V66*/ meltfptr[65]); MELT_LOCATION ("warmelt-outobj.melt:5355:/ initchunk"); @@ -42858,13 +42933,13 @@ meltmod__warmelt_outobj__initialmeltchunk_13 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V779*/ meltfptr[778])) + ( /*_._VALROUT___V779*/ meltfptr[778])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_592__OUTPUT_MELT_DESCRIPTOR#4", NULL != ( /*_.LIST_TO_MULTIPLE__V67*/ meltfptr[66])); - ((meltroutine_ptr_t) /*_.VALROUT___V779*/ meltfptr[778])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V779*/ meltfptr[778])->tabval[4] = (melt_ptr_t) ( /*_.LIST_TO_MULTIPLE__V67*/ meltfptr[66]); MELT_LOCATION ("warmelt-outobj.melt:5355:/ initchunk"); @@ -42873,13 +42948,13 @@ meltmod__warmelt_outobj__initialmeltchunk_13 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V779*/ meltfptr[778])) + ( /*_._VALROUT___V779*/ meltfptr[778])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_592__OUTPUT_MELT_DESCRIPTOR#5", NULL != ( /*_.DISCR_MULTIPLE__V68*/ meltfptr[67])); - ((meltroutine_ptr_t) /*_.VALROUT___V779*/ meltfptr[778])->tabval[5] = + ((meltroutine_ptr_t) /*_._VALROUT___V779*/ meltfptr[778])->tabval[5] = (melt_ptr_t) ( /*_.DISCR_MULTIPLE__V68*/ meltfptr[67]); MELT_LOCATION ("warmelt-outobj.melt:5355:/ initchunk"); @@ -42888,13 +42963,13 @@ meltmod__warmelt_outobj__initialmeltchunk_13 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V779*/ meltfptr[778])) + ( /*_._VALROUT___V779*/ meltfptr[778])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_592__OUTPUT_MELT_DESCRIPTOR#6", NULL != ( /*_.DISCR_STRING__V54*/ meltfptr[53])); - ((meltroutine_ptr_t) /*_.VALROUT___V779*/ meltfptr[778])->tabval[6] = + ((meltroutine_ptr_t) /*_._VALROUT___V779*/ meltfptr[778])->tabval[6] = (melt_ptr_t) ( /*_.DISCR_STRING__V54*/ meltfptr[53]); MELT_LOCATION ("warmelt-outobj.melt:5355:/ initchunk"); @@ -42903,13 +42978,13 @@ meltmod__warmelt_outobj__initialmeltchunk_13 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V779*/ meltfptr[778])) + ( /*_._VALROUT___V779*/ meltfptr[778])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_592__OUTPUT_MELT_DESCRIPTOR#7", NULL != ( /*_.STRING4OUT__V95*/ meltfptr[94])); - ((meltroutine_ptr_t) /*_.VALROUT___V779*/ meltfptr[778])->tabval[7] = + ((meltroutine_ptr_t) /*_._VALROUT___V779*/ meltfptr[778])->tabval[7] = (melt_ptr_t) ( /*_.STRING4OUT__V95*/ meltfptr[94]); MELT_LOCATION ("warmelt-outobj.melt:5355:/ initchunk"); @@ -42918,14 +42993,14 @@ meltmod__warmelt_outobj__initialmeltchunk_13 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V779*/ meltfptr[778])) + ( /*_._VALROUT___V779*/ meltfptr[778])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_592__OUTPUT_MELT_DESCRIPTOR#8", NULL != ( /*_.CLASS_RUNNING_EXTENSION_MODULE_CONTEXT__V142*/ meltfptr[141])); - ((meltroutine_ptr_t) /*_.VALROUT___V779*/ meltfptr[778])->tabval[8] = + ((meltroutine_ptr_t) /*_._VALROUT___V779*/ meltfptr[778])->tabval[8] = (melt_ptr_t) ( /*_.CLASS_RUNNING_EXTENSION_MODULE_CONTEXT__V142*/ meltfptr[141]); @@ -42935,14 +43010,14 @@ meltmod__warmelt_outobj__initialmeltchunk_13 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V779*/ meltfptr[778])) + ( /*_._VALROUT___V779*/ meltfptr[778])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_592__OUTPUT_MELT_DESCRIPTOR#9", - NULL != ( /*_.VALSTR___V780*/ meltfptr[779])); - ((meltroutine_ptr_t) /*_.VALROUT___V779*/ meltfptr[778])->tabval[9] = - (melt_ptr_t) ( /*_.VALSTR___V780*/ meltfptr[779]); + NULL != ( /*_._VALSTR___V780*/ meltfptr[779])); + ((meltroutine_ptr_t) /*_._VALROUT___V779*/ meltfptr[778])->tabval[9] = + (melt_ptr_t) ( /*_._VALSTR___V780*/ meltfptr[779]); MELT_LOCATION ("warmelt-outobj.melt:5355:/ initchunk"); /*^putroutconst */ @@ -42950,14 +43025,14 @@ meltmod__warmelt_outobj__initialmeltchunk_13 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V779*/ meltfptr[778])) + ( /*_._VALROUT___V779*/ meltfptr[778])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_592__OUTPUT_MELT_DESCRIPTOR#10", - NULL != ( /*_.VALSTR___V781*/ meltfptr[780])); - ((meltroutine_ptr_t) /*_.VALROUT___V779*/ meltfptr[778])->tabval[10] = - (melt_ptr_t) ( /*_.VALSTR___V781*/ meltfptr[780]); + NULL != ( /*_._VALSTR___V781*/ meltfptr[780])); + ((meltroutine_ptr_t) /*_._VALROUT___V779*/ meltfptr[778])->tabval[10] = + (melt_ptr_t) ( /*_._VALSTR___V781*/ meltfptr[780]); MELT_LOCATION ("warmelt-outobj.melt:5355:/ initchunk"); /*^putroutconst */ @@ -42965,14 +43040,14 @@ meltmod__warmelt_outobj__initialmeltchunk_13 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V779*/ meltfptr[778])) + ( /*_._VALROUT___V779*/ meltfptr[778])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_592__OUTPUT_MELT_DESCRIPTOR#11", - NULL != ( /*_.VALSTR___V782*/ meltfptr[781])); - ((meltroutine_ptr_t) /*_.VALROUT___V779*/ meltfptr[778])->tabval[11] = - (melt_ptr_t) ( /*_.VALSTR___V782*/ meltfptr[781]); + NULL != ( /*_._VALSTR___V782*/ meltfptr[781])); + ((meltroutine_ptr_t) /*_._VALROUT___V779*/ meltfptr[778])->tabval[11] = + (melt_ptr_t) ( /*_._VALSTR___V782*/ meltfptr[781]); MELT_LOCATION ("warmelt-outobj.melt:5355:/ initchunk"); /*^putroutconst */ @@ -42980,14 +43055,14 @@ meltmod__warmelt_outobj__initialmeltchunk_13 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V779*/ meltfptr[778])) + ( /*_._VALROUT___V779*/ meltfptr[778])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_592__OUTPUT_MELT_DESCRIPTOR#12", - NULL != ( /*_.VALSTR___V783*/ meltfptr[782])); - ((meltroutine_ptr_t) /*_.VALROUT___V779*/ meltfptr[778])->tabval[12] = - (melt_ptr_t) ( /*_.VALSTR___V783*/ meltfptr[782]); + NULL != ( /*_._VALSTR___V783*/ meltfptr[782])); + ((meltroutine_ptr_t) /*_._VALROUT___V779*/ meltfptr[778])->tabval[12] = + (melt_ptr_t) ( /*_._VALSTR___V783*/ meltfptr[782]); MELT_LOCATION ("warmelt-outobj.melt:5355:/ initchunk"); /*^putroutconst */ @@ -42995,14 +43070,14 @@ meltmod__warmelt_outobj__initialmeltchunk_13 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V779*/ meltfptr[778])) + ( /*_._VALROUT___V779*/ meltfptr[778])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_592__OUTPUT_MELT_DESCRIPTOR#13", - NULL != ( /*_.VALSTR___V784*/ meltfptr[783])); - ((meltroutine_ptr_t) /*_.VALROUT___V779*/ meltfptr[778])->tabval[13] = - (melt_ptr_t) ( /*_.VALSTR___V784*/ meltfptr[783]); + NULL != ( /*_._VALSTR___V784*/ meltfptr[783])); + ((meltroutine_ptr_t) /*_._VALROUT___V779*/ meltfptr[778])->tabval[13] = + (melt_ptr_t) ( /*_._VALSTR___V784*/ meltfptr[783]); MELT_LOCATION ("warmelt-outobj.melt:5355:/ initchunk"); /*^putroutconst */ @@ -43010,14 +43085,14 @@ meltmod__warmelt_outobj__initialmeltchunk_13 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V779*/ meltfptr[778])) + ( /*_._VALROUT___V779*/ meltfptr[778])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_592__OUTPUT_MELT_DESCRIPTOR#14", - NULL != ( /*_.VALSTR___V785*/ meltfptr[784])); - ((meltroutine_ptr_t) /*_.VALROUT___V779*/ meltfptr[778])->tabval[14] = - (melt_ptr_t) ( /*_.VALSTR___V785*/ meltfptr[784]); + NULL != ( /*_._VALSTR___V785*/ meltfptr[784])); + ((meltroutine_ptr_t) /*_._VALROUT___V779*/ meltfptr[778])->tabval[14] = + (melt_ptr_t) ( /*_._VALSTR___V785*/ meltfptr[784]); MELT_LOCATION ("warmelt-outobj.melt:5355:/ initchunk"); /*^putroutconst */ @@ -43025,13 +43100,13 @@ meltmod__warmelt_outobj__initialmeltchunk_13 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V779*/ meltfptr[778])) + ( /*_._VALROUT___V779*/ meltfptr[778])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_592__OUTPUT_MELT_DESCRIPTOR#15", NULL != ( /*_.ADD2OUT__V15*/ meltfptr[14])); - ((meltroutine_ptr_t) /*_.VALROUT___V779*/ meltfptr[778])->tabval[15] = + ((meltroutine_ptr_t) /*_._VALROUT___V779*/ meltfptr[778])->tabval[15] = (melt_ptr_t) ( /*_.ADD2OUT__V15*/ meltfptr[14]); MELT_LOCATION ("warmelt-outobj.melt:5355:/ initchunk"); @@ -43039,123 +43114,123 @@ meltmod__warmelt_outobj__initialmeltchunk_13 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V779*/ meltfptr[778])) == + ( /*_._VALROUT___V779*/ meltfptr[778])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALDATA___V734*/ meltfptr[733]); - ((meltroutine_ptr_t) /*_.VALROUT___V779*/ meltfptr[778])->tabval[16] = - (melt_ptr_t) ( /*_.VALDATA___V734*/ meltfptr[733]); + NULL != /*_._VALDATA___V734*/ meltfptr[733]); + ((meltroutine_ptr_t) /*_._VALROUT___V779*/ meltfptr[778])->tabval[16] = + (melt_ptr_t) ( /*_._VALDATA___V734*/ meltfptr[733]); MELT_LOCATION ("warmelt-outobj.melt:5355:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V779*/ meltfptr[778]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V779*/ meltfptr[778]); /*putclosurout#114 */ melt_assertmsg ("putclosrout#114 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V786*/ meltfptr[785])) == + ( /*_._VALCLO___V786*/ meltfptr[785])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#114 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V779*/ meltfptr[778])) == + ( /*_._VALROUT___V779*/ meltfptr[778])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V786*/ meltfptr[785])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V779*/ meltfptr[778]); + ((meltclosure_ptr_t) /*_._VALCLO___V786*/ meltfptr[785])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V779*/ meltfptr[778]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V786*/ meltfptr[785]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V786*/ meltfptr[785]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V787*/ meltfptr[786])) == + ( /*_._VALDATA___V787*/ meltfptr[786])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V787*/ + ( /*_._VALDATA___V787*/ meltfptr[786])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V787*/ meltfptr[786]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V787*/ meltfptr[786]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V788*/ meltfptr[787]); + /*_._VALSTR___V788*/ meltfptr[787]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V787*/ meltfptr[786]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V787*/ meltfptr[786]); - melt_dbgtrace_written_object ( /*_.VALDATA___V787*/ meltfptr[786], + melt_dbgtrace_written_object ( /*_._VALDATA___V787*/ meltfptr[786], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V789*/ meltfptr[788])) == + ( /*_._VALDATA___V789*/ meltfptr[788])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V789*/ + ( /*_._VALDATA___V789*/ meltfptr[788])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V789*/ meltfptr[788]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V789*/ meltfptr[788]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V790*/ meltfptr[789]); + /*_._VALSTR___V790*/ meltfptr[789]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V789*/ meltfptr[788]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V789*/ meltfptr[788]); - melt_dbgtrace_written_object ( /*_.VALDATA___V789*/ meltfptr[788], + melt_dbgtrace_written_object ( /*_._VALDATA___V789*/ meltfptr[788], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V791*/ meltfptr[790])) == + ( /*_._VALDATA___V791*/ meltfptr[790])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V791*/ + ( /*_._VALDATA___V791*/ meltfptr[790])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V791*/ meltfptr[790]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V791*/ meltfptr[790]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V792*/ meltfptr[791]); + /*_._VALSTR___V792*/ meltfptr[791]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V791*/ meltfptr[790]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V791*/ meltfptr[790]); - melt_dbgtrace_written_object ( /*_.VALDATA___V791*/ meltfptr[790], + melt_dbgtrace_written_object ( /*_._VALDATA___V791*/ meltfptr[790], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V793*/ meltfptr[792])) == + ( /*_._VALDATA___V793*/ meltfptr[792])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V793*/ + ( /*_._VALDATA___V793*/ meltfptr[792])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V793*/ meltfptr[792]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V793*/ meltfptr[792]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V794*/ meltfptr[793]); + /*_._VALSTR___V794*/ meltfptr[793]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V793*/ meltfptr[792]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V793*/ meltfptr[792]); - melt_dbgtrace_written_object ( /*_.VALDATA___V793*/ meltfptr[792], + melt_dbgtrace_written_object ( /*_._VALDATA___V793*/ meltfptr[792], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:5771:/ initchunk"); @@ -43163,69 +43238,69 @@ meltmod__warmelt_outobj__initialmeltchunk_13 (meltinitial_frame_t * /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V795*/ meltfptr[794])) == + ( /*_._VALDATA___V795*/ meltfptr[794])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (0 >= 0 && 0 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V795*/ + ( /*_._VALDATA___V795*/ meltfptr[794])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V795*/ meltfptr[794]))->obj_vartab[0] = + ((meltobject_ptr_t) ( /*_._VALDATA___V795*/ meltfptr[794]))->obj_vartab[0] = (melt_ptr_t) ( - /*_.VALDATA___V793*/ meltfptr[792]); + /*_._VALDATA___V793*/ meltfptr[792]); MELT_LOCATION ("warmelt-outobj.melt:5771:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V795*/ meltfptr[794])) == + ( /*_._VALDATA___V795*/ meltfptr[794])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V795*/ + ( /*_._VALDATA___V795*/ meltfptr[794])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V795*/ meltfptr[794]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V795*/ meltfptr[794]))->obj_vartab[1] = (melt_ptr_t) ( ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); MELT_LOCATION ("warmelt-outobj.melt:5771:/ initchunk"); /*^touch */ - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V795*/ meltfptr[794]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V795*/ meltfptr[794]); MELT_LOCATION ("warmelt-outobj.melt:5771:/ initchunk"); /*^touchobj */ - melt_dbgtrace_written_object ( /*_.VALDATA___V795*/ meltfptr[794], + melt_dbgtrace_written_object ( /*_._VALDATA___V795*/ meltfptr[794], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V796*/ meltfptr[795])) == + ( /*_._VALDATA___V796*/ meltfptr[795])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V796*/ + ( /*_._VALDATA___V796*/ meltfptr[795])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V796*/ meltfptr[795]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V796*/ meltfptr[795]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V797*/ meltfptr[796]); + /*_._VALSTR___V797*/ meltfptr[796]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V796*/ meltfptr[795]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V796*/ meltfptr[795]); - melt_dbgtrace_written_object ( /*_.VALDATA___V796*/ meltfptr[795], + melt_dbgtrace_written_object ( /*_._VALDATA___V796*/ meltfptr[795], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:5771:/ initchunk"); @@ -43233,69 +43308,69 @@ meltmod__warmelt_outobj__initialmeltchunk_13 (meltinitial_frame_t * /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V798*/ meltfptr[797])) == + ( /*_._VALDATA___V798*/ meltfptr[797])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (0 >= 0 && 0 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V798*/ + ( /*_._VALDATA___V798*/ meltfptr[797])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V798*/ meltfptr[797]))->obj_vartab[0] = + ((meltobject_ptr_t) ( /*_._VALDATA___V798*/ meltfptr[797]))->obj_vartab[0] = (melt_ptr_t) ( - /*_.VALDATA___V796*/ meltfptr[795]); + /*_._VALDATA___V796*/ meltfptr[795]); MELT_LOCATION ("warmelt-outobj.melt:5771:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V798*/ meltfptr[797])) == + ( /*_._VALDATA___V798*/ meltfptr[797])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V798*/ + ( /*_._VALDATA___V798*/ meltfptr[797])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V798*/ meltfptr[797]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V798*/ meltfptr[797]))->obj_vartab[1] = (melt_ptr_t) ( ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); MELT_LOCATION ("warmelt-outobj.melt:5771:/ initchunk"); /*^touch */ - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V798*/ meltfptr[797]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V798*/ meltfptr[797]); MELT_LOCATION ("warmelt-outobj.melt:5771:/ initchunk"); /*^touchobj */ - melt_dbgtrace_written_object ( /*_.VALDATA___V798*/ meltfptr[797], + melt_dbgtrace_written_object ( /*_._VALDATA___V798*/ meltfptr[797], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V799*/ meltfptr[798])) == + ( /*_._VALDATA___V799*/ meltfptr[798])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V799*/ + ( /*_._VALDATA___V799*/ meltfptr[798])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V799*/ meltfptr[798]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V799*/ meltfptr[798]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V800*/ meltfptr[799]); + /*_._VALSTR___V800*/ meltfptr[799]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V799*/ meltfptr[798]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V799*/ meltfptr[798]); - melt_dbgtrace_written_object ( /*_.VALDATA___V799*/ meltfptr[798], + melt_dbgtrace_written_object ( /*_._VALDATA___V799*/ meltfptr[798], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:5771:/ initchunk"); @@ -43303,69 +43378,69 @@ meltmod__warmelt_outobj__initialmeltchunk_13 (meltinitial_frame_t * /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V801*/ meltfptr[800])) == + ( /*_._VALDATA___V801*/ meltfptr[800])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (0 >= 0 && 0 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V801*/ + ( /*_._VALDATA___V801*/ meltfptr[800])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V801*/ meltfptr[800]))->obj_vartab[0] = + ((meltobject_ptr_t) ( /*_._VALDATA___V801*/ meltfptr[800]))->obj_vartab[0] = (melt_ptr_t) ( - /*_.VALDATA___V799*/ meltfptr[798]); + /*_._VALDATA___V799*/ meltfptr[798]); MELT_LOCATION ("warmelt-outobj.melt:5771:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V801*/ meltfptr[800])) == + ( /*_._VALDATA___V801*/ meltfptr[800])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V801*/ + ( /*_._VALDATA___V801*/ meltfptr[800])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V801*/ meltfptr[800]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V801*/ meltfptr[800]))->obj_vartab[1] = (melt_ptr_t) ( ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); MELT_LOCATION ("warmelt-outobj.melt:5771:/ initchunk"); /*^touch */ - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V801*/ meltfptr[800]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V801*/ meltfptr[800]); MELT_LOCATION ("warmelt-outobj.melt:5771:/ initchunk"); /*^touchobj */ - melt_dbgtrace_written_object ( /*_.VALDATA___V801*/ meltfptr[800], + melt_dbgtrace_written_object ( /*_._VALDATA___V801*/ meltfptr[800], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V802*/ meltfptr[801])) == + ( /*_._VALDATA___V802*/ meltfptr[801])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V802*/ + ( /*_._VALDATA___V802*/ meltfptr[801])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V802*/ meltfptr[801]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V802*/ meltfptr[801]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V803*/ meltfptr[802]); + /*_._VALSTR___V803*/ meltfptr[802]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V802*/ meltfptr[801]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V802*/ meltfptr[801]); - melt_dbgtrace_written_object ( /*_.VALDATA___V802*/ meltfptr[801], + melt_dbgtrace_written_object ( /*_._VALDATA___V802*/ meltfptr[801], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:5771:/ initchunk"); @@ -43373,69 +43448,69 @@ meltmod__warmelt_outobj__initialmeltchunk_13 (meltinitial_frame_t * /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V804*/ meltfptr[803])) == + ( /*_._VALDATA___V804*/ meltfptr[803])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (0 >= 0 && 0 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V804*/ + ( /*_._VALDATA___V804*/ meltfptr[803])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V804*/ meltfptr[803]))->obj_vartab[0] = + ((meltobject_ptr_t) ( /*_._VALDATA___V804*/ meltfptr[803]))->obj_vartab[0] = (melt_ptr_t) ( - /*_.VALDATA___V802*/ meltfptr[801]); + /*_._VALDATA___V802*/ meltfptr[801]); MELT_LOCATION ("warmelt-outobj.melt:5771:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V804*/ meltfptr[803])) == + ( /*_._VALDATA___V804*/ meltfptr[803])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V804*/ + ( /*_._VALDATA___V804*/ meltfptr[803])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V804*/ meltfptr[803]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V804*/ meltfptr[803]))->obj_vartab[1] = (melt_ptr_t) ( ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); MELT_LOCATION ("warmelt-outobj.melt:5771:/ initchunk"); /*^touch */ - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V804*/ meltfptr[803]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V804*/ meltfptr[803]); MELT_LOCATION ("warmelt-outobj.melt:5771:/ initchunk"); /*^touchobj */ - melt_dbgtrace_written_object ( /*_.VALDATA___V804*/ meltfptr[803], + melt_dbgtrace_written_object ( /*_._VALDATA___V804*/ meltfptr[803], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V805*/ meltfptr[804])) == + ( /*_._VALDATA___V805*/ meltfptr[804])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V805*/ + ( /*_._VALDATA___V805*/ meltfptr[804])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V805*/ meltfptr[804]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V805*/ meltfptr[804]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V806*/ meltfptr[805]); + /*_._VALSTR___V806*/ meltfptr[805]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V805*/ meltfptr[804]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V805*/ meltfptr[804]); - melt_dbgtrace_written_object ( /*_.VALDATA___V805*/ meltfptr[804], + melt_dbgtrace_written_object ( /*_._VALDATA___V805*/ meltfptr[804], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:5771:/ initchunk"); @@ -43443,148 +43518,148 @@ meltmod__warmelt_outobj__initialmeltchunk_13 (meltinitial_frame_t * /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V807*/ meltfptr[806])) == + ( /*_._VALDATA___V807*/ meltfptr[806])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (0 >= 0 && 0 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V807*/ + ( /*_._VALDATA___V807*/ meltfptr[806])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V807*/ meltfptr[806]))->obj_vartab[0] = + ((meltobject_ptr_t) ( /*_._VALDATA___V807*/ meltfptr[806]))->obj_vartab[0] = (melt_ptr_t) ( - /*_.VALDATA___V805*/ meltfptr[804]); + /*_._VALDATA___V805*/ meltfptr[804]); MELT_LOCATION ("warmelt-outobj.melt:5771:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V807*/ meltfptr[806])) == + ( /*_._VALDATA___V807*/ meltfptr[806])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V807*/ + ( /*_._VALDATA___V807*/ meltfptr[806])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V807*/ meltfptr[806]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V807*/ meltfptr[806]))->obj_vartab[1] = (melt_ptr_t) ( ((melt_ptr_t) (MELT_PREDEF (CTYPE_LONG)))); MELT_LOCATION ("warmelt-outobj.melt:5771:/ initchunk"); /*^touch */ - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V807*/ meltfptr[806]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V807*/ meltfptr[806]); MELT_LOCATION ("warmelt-outobj.melt:5771:/ initchunk"); /*^touchobj */ - melt_dbgtrace_written_object ( /*_.VALDATA___V807*/ meltfptr[806], + melt_dbgtrace_written_object ( /*_._VALDATA___V807*/ meltfptr[806], "new static instance"); /*putupl#44 */ melt_assertmsg ("putupl #44 checktup", melt_magic_discr ((melt_ptr_t) - ( /*_.VALTUP___V808*/ meltfptr[807])) == + ( /*_._VALTUP___V808*/ meltfptr[807])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #44 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) - ( /*_.VALTUP___V808*/ + ( /*_._VALTUP___V808*/ meltfptr[807])))); - ((meltmultiple_ptr_t) ( /*_.VALTUP___V808*/ meltfptr[807]))->tabval[0] = - (melt_ptr_t) ( /*_.VALDATA___V795*/ meltfptr[794]); + ((meltmultiple_ptr_t) ( /*_._VALTUP___V808*/ meltfptr[807]))->tabval[0] = + (melt_ptr_t) ( /*_._VALDATA___V795*/ meltfptr[794]); /*putupl#45 */ melt_assertmsg ("putupl #45 checktup", melt_magic_discr ((melt_ptr_t) - ( /*_.VALTUP___V808*/ meltfptr[807])) == + ( /*_._VALTUP___V808*/ meltfptr[807])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #45 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) - ( /*_.VALTUP___V808*/ + ( /*_._VALTUP___V808*/ meltfptr[807])))); - ((meltmultiple_ptr_t) ( /*_.VALTUP___V808*/ meltfptr[807]))->tabval[1] = - (melt_ptr_t) ( /*_.VALDATA___V798*/ meltfptr[797]); + ((meltmultiple_ptr_t) ( /*_._VALTUP___V808*/ meltfptr[807]))->tabval[1] = + (melt_ptr_t) ( /*_._VALDATA___V798*/ meltfptr[797]); /*putupl#46 */ melt_assertmsg ("putupl #46 checktup", melt_magic_discr ((melt_ptr_t) - ( /*_.VALTUP___V808*/ meltfptr[807])) == + ( /*_._VALTUP___V808*/ meltfptr[807])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #46 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) - ( /*_.VALTUP___V808*/ + ( /*_._VALTUP___V808*/ meltfptr[807])))); - ((meltmultiple_ptr_t) ( /*_.VALTUP___V808*/ meltfptr[807]))->tabval[2] = - (melt_ptr_t) ( /*_.VALDATA___V801*/ meltfptr[800]); + ((meltmultiple_ptr_t) ( /*_._VALTUP___V808*/ meltfptr[807]))->tabval[2] = + (melt_ptr_t) ( /*_._VALDATA___V801*/ meltfptr[800]); /*putupl#47 */ melt_assertmsg ("putupl #47 checktup", melt_magic_discr ((melt_ptr_t) - ( /*_.VALTUP___V808*/ meltfptr[807])) == + ( /*_._VALTUP___V808*/ meltfptr[807])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #47 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) - ( /*_.VALTUP___V808*/ + ( /*_._VALTUP___V808*/ meltfptr[807])))); - ((meltmultiple_ptr_t) ( /*_.VALTUP___V808*/ meltfptr[807]))->tabval[3] = - (melt_ptr_t) ( /*_.VALDATA___V804*/ meltfptr[803]); + ((meltmultiple_ptr_t) ( /*_._VALTUP___V808*/ meltfptr[807]))->tabval[3] = + (melt_ptr_t) ( /*_._VALDATA___V804*/ meltfptr[803]); /*putupl#48 */ melt_assertmsg ("putupl #48 checktup", melt_magic_discr ((melt_ptr_t) - ( /*_.VALTUP___V808*/ meltfptr[807])) == + ( /*_._VALTUP___V808*/ meltfptr[807])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #48 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) - ( /*_.VALTUP___V808*/ + ( /*_._VALTUP___V808*/ meltfptr[807])))); - ((meltmultiple_ptr_t) ( /*_.VALTUP___V808*/ meltfptr[807]))->tabval[4] = - (melt_ptr_t) ( /*_.VALDATA___V807*/ meltfptr[806]); + ((meltmultiple_ptr_t) ( /*_._VALTUP___V808*/ meltfptr[807]))->tabval[4] = + (melt_ptr_t) ( /*_._VALDATA___V807*/ meltfptr[806]); - /*touch:INITUP_ */ - meltgc_touch ( /*_.VALTUP___V808*/ meltfptr[807]); + /*touch:_INITUP_ */ + meltgc_touch ( /*_._VALTUP___V808*/ meltfptr[807]); MELT_LOCATION ("warmelt-outobj.melt:5771:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V809*/ meltfptr[808])) == + ( /*_._VALDATA___V809*/ meltfptr[808])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V809*/ + ( /*_._VALDATA___V809*/ meltfptr[808])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V809*/ meltfptr[808]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V809*/ meltfptr[808]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V810*/ meltfptr[809]); + /*_._VALSTR___V810*/ meltfptr[809]); MELT_LOCATION ("warmelt-outobj.melt:5771:/ initchunk"); /*^touch */ - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V809*/ meltfptr[808]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V809*/ meltfptr[808]); MELT_LOCATION ("warmelt-outobj.melt:5771:/ initchunk"); /*^touchobj */ - melt_dbgtrace_written_object ( /*_.VALDATA___V809*/ meltfptr[808], + melt_dbgtrace_written_object ( /*_._VALDATA___V809*/ meltfptr[808], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:5780:/ initchunk"); @@ -43593,12 +43668,12 @@ meltmod__warmelt_outobj__initialmeltchunk_13 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V811*/ meltfptr[810])) + ( /*_._VALROUT___V811*/ meltfptr[810])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_624__SYNTESTGEN_ANY#0", NULL != ( /*_.CLASS_NAMED__V14*/ meltfptr[13])); - ((meltroutine_ptr_t) /*_.VALROUT___V811*/ meltfptr[810])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V811*/ meltfptr[810])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_NAMED__V14*/ meltfptr[13]); MELT_LOCATION ("warmelt-outobj.melt:5780:/ initchunk"); @@ -43607,12 +43682,12 @@ meltmod__warmelt_outobj__initialmeltchunk_13 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V811*/ meltfptr[810])) + ( /*_._VALROUT___V811*/ meltfptr[810])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_624__SYNTESTGEN_ANY#1", NULL != ( /*_.CLASS_LOCATED__V144*/ meltfptr[143])); - ((meltroutine_ptr_t) /*_.VALROUT___V811*/ meltfptr[810])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V811*/ meltfptr[810])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_LOCATED__V144*/ meltfptr[143]); MELT_LOCATION ("warmelt-outobj.melt:5780:/ initchunk"); @@ -43621,12 +43696,12 @@ meltmod__warmelt_outobj__initialmeltchunk_13 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V811*/ meltfptr[810])) + ( /*_._VALROUT___V811*/ meltfptr[810])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_624__SYNTESTGEN_ANY#2", NULL != ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7])); - ((meltroutine_ptr_t) /*_.VALROUT___V811*/ meltfptr[810])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V811*/ meltfptr[810])->tabval[2] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7]); MELT_LOCATION ("warmelt-outobj.melt:5780:/ initchunk"); @@ -43635,14 +43710,14 @@ meltmod__warmelt_outobj__initialmeltchunk_13 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V811*/ meltfptr[810])) + ( /*_._VALROUT___V811*/ meltfptr[810])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_624__SYNTESTGEN_ANY#3", NULL != ( /*_.CLASS_SOURCE_GENERATOR_DEVICE__V145*/ meltfptr[144])); - ((meltroutine_ptr_t) /*_.VALROUT___V811*/ meltfptr[810])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V811*/ meltfptr[810])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_SOURCE_GENERATOR_DEVICE__V145*/ meltfptr[144]); MELT_LOCATION ("warmelt-outobj.melt:5780:/ initchunk"); @@ -43651,79 +43726,79 @@ meltmod__warmelt_outobj__initialmeltchunk_13 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V811*/ meltfptr[810])) + ( /*_._VALROUT___V811*/ meltfptr[810])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_624__SYNTESTGEN_ANY#4", NULL != ( /*_.CLASS_ANY_MODULE_CONTEXT__V141*/ meltfptr[140])); - ((meltroutine_ptr_t) /*_.VALROUT___V811*/ meltfptr[810])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V811*/ meltfptr[810])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_ANY_MODULE_CONTEXT__V141*/ meltfptr[140]); MELT_LOCATION ("warmelt-outobj.melt:5780:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V811*/ meltfptr[810]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V811*/ meltfptr[810]); /*putclosurout#115 */ melt_assertmsg ("putclosrout#115 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V812*/ meltfptr[811])) == + ( /*_._VALCLO___V812*/ meltfptr[811])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#115 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V811*/ meltfptr[810])) == + ( /*_._VALROUT___V811*/ meltfptr[810])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V812*/ meltfptr[811])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V811*/ meltfptr[810]); + ((meltclosure_ptr_t) /*_._VALCLO___V812*/ meltfptr[811])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V811*/ meltfptr[810]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V812*/ meltfptr[811]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V812*/ meltfptr[811]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V813*/ meltfptr[812])) == + ( /*_._VALDATA___V813*/ meltfptr[812])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V813*/ + ( /*_._VALDATA___V813*/ meltfptr[812])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V813*/ meltfptr[812]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V813*/ meltfptr[812]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V814*/ meltfptr[813]); + /*_._VALSTR___V814*/ meltfptr[813]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V813*/ meltfptr[812]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V813*/ meltfptr[812]); - melt_dbgtrace_written_object ( /*_.VALDATA___V813*/ meltfptr[812], + melt_dbgtrace_written_object ( /*_._VALDATA___V813*/ meltfptr[812], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V815*/ meltfptr[814])) == + ( /*_._VALDATA___V815*/ meltfptr[814])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V815*/ + ( /*_._VALDATA___V815*/ meltfptr[814])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V815*/ meltfptr[814]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V815*/ meltfptr[814]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V816*/ meltfptr[815]); + /*_._VALSTR___V816*/ meltfptr[815]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V815*/ meltfptr[814]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V815*/ meltfptr[814]); - melt_dbgtrace_written_object ( /*_.VALDATA___V815*/ meltfptr[814], + melt_dbgtrace_written_object ( /*_._VALDATA___V815*/ meltfptr[814], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:5800:/ initchunk"); @@ -43732,13 +43807,13 @@ meltmod__warmelt_outobj__initialmeltchunk_13 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V817*/ meltfptr[816])) + ( /*_._VALROUT___V817*/ meltfptr[816])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_630__SUBSTITUTE_FORMALS_FOR_SYNTEST#0", NULL != ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7])); - ((meltroutine_ptr_t) /*_.VALROUT___V817*/ meltfptr[816])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V817*/ meltfptr[816])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7]); MELT_LOCATION ("warmelt-outobj.melt:5800:/ initchunk"); @@ -43747,13 +43822,13 @@ meltmod__warmelt_outobj__initialmeltchunk_13 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V817*/ meltfptr[816])) + ( /*_._VALROUT___V817*/ meltfptr[816])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_630__SUBSTITUTE_FORMALS_FOR_SYNTEST#1", NULL != ( /*_.CLASS_FORMAL_BINDING__V73*/ meltfptr[72])); - ((meltroutine_ptr_t) /*_.VALROUT___V817*/ meltfptr[816])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V817*/ meltfptr[816])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_FORMAL_BINDING__V73*/ meltfptr[72]); MELT_LOCATION ("warmelt-outobj.melt:5800:/ initchunk"); @@ -43762,13 +43837,13 @@ meltmod__warmelt_outobj__initialmeltchunk_13 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V817*/ meltfptr[816])) + ( /*_._VALROUT___V817*/ meltfptr[816])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_630__SUBSTITUTE_FORMALS_FOR_SYNTEST#2", NULL != ( /*_.CLASS_ANY_BINDING__V12*/ meltfptr[11])); - ((meltroutine_ptr_t) /*_.VALROUT___V817*/ meltfptr[816])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V817*/ meltfptr[816])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_ANY_BINDING__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-outobj.melt:5800:/ initchunk"); @@ -43777,13 +43852,13 @@ meltmod__warmelt_outobj__initialmeltchunk_13 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V817*/ meltfptr[816])) + ( /*_._VALROUT___V817*/ meltfptr[816])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_630__SUBSTITUTE_FORMALS_FOR_SYNTEST#3", NULL != ( /*_.DISCR_STRBUF__V69*/ meltfptr[68])); - ((meltroutine_ptr_t) /*_.VALROUT___V817*/ meltfptr[816])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V817*/ meltfptr[816])->tabval[3] = (melt_ptr_t) ( /*_.DISCR_STRBUF__V69*/ meltfptr[68]); MELT_LOCATION ("warmelt-outobj.melt:5800:/ initchunk"); @@ -43792,13 +43867,13 @@ meltmod__warmelt_outobj__initialmeltchunk_13 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V817*/ meltfptr[816])) + ( /*_._VALROUT___V817*/ meltfptr[816])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_630__SUBSTITUTE_FORMALS_FOR_SYNTEST#4", NULL != ( /*_.ADD2OUT__V15*/ meltfptr[14])); - ((meltroutine_ptr_t) /*_.VALROUT___V817*/ meltfptr[816])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V817*/ meltfptr[816])->tabval[4] = (melt_ptr_t) ( /*_.ADD2OUT__V15*/ meltfptr[14]); MELT_LOCATION ("warmelt-outobj.melt:5800:/ initchunk"); @@ -43807,13 +43882,13 @@ meltmod__warmelt_outobj__initialmeltchunk_13 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V817*/ meltfptr[816])) + ( /*_._VALROUT___V817*/ meltfptr[816])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_630__SUBSTITUTE_FORMALS_FOR_SYNTEST#5", NULL != ( /*_.CLASS_NAMED__V14*/ meltfptr[13])); - ((meltroutine_ptr_t) /*_.VALROUT___V817*/ meltfptr[816])->tabval[5] = + ((meltroutine_ptr_t) /*_._VALROUT___V817*/ meltfptr[816])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_NAMED__V14*/ meltfptr[13]); MELT_LOCATION ("warmelt-outobj.melt:5800:/ initchunk"); @@ -43822,13 +43897,13 @@ meltmod__warmelt_outobj__initialmeltchunk_13 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V817*/ meltfptr[816])) + ( /*_._VALROUT___V817*/ meltfptr[816])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_630__SUBSTITUTE_FORMALS_FOR_SYNTEST#6", NULL != ( /*_.DISCR_VERBATIM_STRING__V88*/ meltfptr[87])); - ((meltroutine_ptr_t) /*_.VALROUT___V817*/ meltfptr[816])->tabval[6] = + ((meltroutine_ptr_t) /*_._VALROUT___V817*/ meltfptr[816])->tabval[6] = (melt_ptr_t) ( /*_.DISCR_VERBATIM_STRING__V88*/ meltfptr[87]); MELT_LOCATION ("warmelt-outobj.melt:5800:/ initchunk"); @@ -43837,34 +43912,34 @@ meltmod__warmelt_outobj__initialmeltchunk_13 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V817*/ meltfptr[816])) + ( /*_._VALROUT___V817*/ meltfptr[816])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_630__SUBSTITUTE_FORMALS_FOR_SYNTEST#7", NULL != ( /*_.CLASS_CTYPE__V29*/ meltfptr[28])); - ((meltroutine_ptr_t) /*_.VALROUT___V817*/ meltfptr[816])->tabval[7] = + ((meltroutine_ptr_t) /*_._VALROUT___V817*/ meltfptr[816])->tabval[7] = (melt_ptr_t) ( /*_.CLASS_CTYPE__V29*/ meltfptr[28]); MELT_LOCATION ("warmelt-outobj.melt:5800:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V817*/ meltfptr[816]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V817*/ meltfptr[816]); /*putclosurout#116 */ melt_assertmsg ("putclosrout#116 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V818*/ meltfptr[817])) == + ( /*_._VALCLO___V818*/ meltfptr[817])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#116 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V817*/ meltfptr[816])) == + ( /*_._VALROUT___V817*/ meltfptr[816])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V818*/ meltfptr[817])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V817*/ meltfptr[816]); + ((meltclosure_ptr_t) /*_._VALCLO___V818*/ meltfptr[817])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V817*/ meltfptr[816]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V818*/ meltfptr[817]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V818*/ meltfptr[817]); MELT_LOCATION ("warmelt-outobj.melt:5826:/ initchunk"); /*^putroutconst */ @@ -43872,13 +43947,13 @@ meltmod__warmelt_outobj__initialmeltchunk_13 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V819*/ meltfptr[818])) + ( /*_._VALROUT___V819*/ meltfptr[818])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_632__EXPAND_TUPLE_FOR_SYNTEST#0", NULL != ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7])); - ((meltroutine_ptr_t) /*_.VALROUT___V819*/ meltfptr[818])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V819*/ meltfptr[818])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7]); MELT_LOCATION ("warmelt-outobj.melt:5826:/ initchunk"); @@ -43887,13 +43962,13 @@ meltmod__warmelt_outobj__initialmeltchunk_13 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V819*/ meltfptr[818])) + ( /*_._VALROUT___V819*/ meltfptr[818])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_632__EXPAND_TUPLE_FOR_SYNTEST#1", NULL != ( /*_.ADD2OUT__V15*/ meltfptr[14])); - ((meltroutine_ptr_t) /*_.VALROUT___V819*/ meltfptr[818])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V819*/ meltfptr[818])->tabval[1] = (melt_ptr_t) ( /*_.ADD2OUT__V15*/ meltfptr[14]); MELT_LOCATION ("warmelt-outobj.melt:5826:/ initchunk"); @@ -43902,34 +43977,34 @@ meltmod__warmelt_outobj__initialmeltchunk_13 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V819*/ meltfptr[818])) + ( /*_._VALROUT___V819*/ meltfptr[818])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_632__EXPAND_TUPLE_FOR_SYNTEST#2", NULL != ( /*_.CLASS_NAMED__V14*/ meltfptr[13])); - ((meltroutine_ptr_t) /*_.VALROUT___V819*/ meltfptr[818])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V819*/ meltfptr[818])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NAMED__V14*/ meltfptr[13]); MELT_LOCATION ("warmelt-outobj.melt:5826:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V819*/ meltfptr[818]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V819*/ meltfptr[818]); /*putclosurout#117 */ melt_assertmsg ("putclosrout#117 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V820*/ meltfptr[819])) == + ( /*_._VALCLO___V820*/ meltfptr[819])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#117 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V819*/ meltfptr[818])) == + ( /*_._VALROUT___V819*/ meltfptr[818])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V820*/ meltfptr[819])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V819*/ meltfptr[818]); + ((meltclosure_ptr_t) /*_._VALCLO___V820*/ meltfptr[819])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V819*/ meltfptr[818]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V820*/ meltfptr[819]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V820*/ meltfptr[819]); MELT_LOCATION ("warmelt-outobj.melt:5850:/ initchunk"); /*^putroutconst */ @@ -43937,12 +44012,12 @@ meltmod__warmelt_outobj__initialmeltchunk_13 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V821*/ meltfptr[820])) + ( /*_._VALROUT___V821*/ meltfptr[820])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_634__SYNTESTGEN_PRIMITIVE#0", NULL != ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7])); - ((meltroutine_ptr_t) /*_.VALROUT___V821*/ meltfptr[820])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V821*/ meltfptr[820])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7]); MELT_LOCATION ("warmelt-outobj.melt:5850:/ initchunk"); @@ -43951,12 +44026,12 @@ meltmod__warmelt_outobj__initialmeltchunk_13 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V821*/ meltfptr[820])) + ( /*_._VALROUT___V821*/ meltfptr[820])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_634__SYNTESTGEN_PRIMITIVE#1", NULL != ( /*_.CLASS_PRIMITIVE__V146*/ meltfptr[145])); - ((meltroutine_ptr_t) /*_.VALROUT___V821*/ meltfptr[820])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V821*/ meltfptr[820])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_PRIMITIVE__V146*/ meltfptr[145]); MELT_LOCATION ("warmelt-outobj.melt:5850:/ initchunk"); @@ -43965,14 +44040,14 @@ meltmod__warmelt_outobj__initialmeltchunk_13 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V821*/ meltfptr[820])) + ( /*_._VALROUT___V821*/ meltfptr[820])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_634__SYNTESTGEN_PRIMITIVE#2", NULL != ( /*_.CLASS_SOURCE_GENERATOR_DEVICE__V145*/ meltfptr[144])); - ((meltroutine_ptr_t) /*_.VALROUT___V821*/ meltfptr[820])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V821*/ meltfptr[820])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_SOURCE_GENERATOR_DEVICE__V145*/ meltfptr[144]); MELT_LOCATION ("warmelt-outobj.melt:5850:/ initchunk"); @@ -43981,13 +44056,13 @@ meltmod__warmelt_outobj__initialmeltchunk_13 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V821*/ meltfptr[820])) + ( /*_._VALROUT___V821*/ meltfptr[820])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_634__SYNTESTGEN_PRIMITIVE#3", NULL != ( /*_.CLASS_ANY_MODULE_CONTEXT__V141*/ meltfptr[140])); - ((meltroutine_ptr_t) /*_.VALROUT___V821*/ meltfptr[820])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V821*/ meltfptr[820])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_ANY_MODULE_CONTEXT__V141*/ meltfptr[140]); MELT_LOCATION ("warmelt-outobj.melt:5850:/ initchunk"); @@ -43996,12 +44071,12 @@ meltmod__warmelt_outobj__initialmeltchunk_13 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V821*/ meltfptr[820])) + ( /*_._VALROUT___V821*/ meltfptr[820])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_634__SYNTESTGEN_PRIMITIVE#4", NULL != ( /*_.CLASS_LOCATED__V144*/ meltfptr[143])); - ((meltroutine_ptr_t) /*_.VALROUT___V821*/ meltfptr[820])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V821*/ meltfptr[820])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_LOCATED__V144*/ meltfptr[143]); MELT_LOCATION ("warmelt-outobj.melt:5850:/ initchunk"); @@ -44010,12 +44085,12 @@ meltmod__warmelt_outobj__initialmeltchunk_13 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V821*/ meltfptr[820])) + ( /*_._VALROUT___V821*/ meltfptr[820])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_634__SYNTESTGEN_PRIMITIVE#5", NULL != ( /*_.CLASS_NAMED__V14*/ meltfptr[13])); - ((meltroutine_ptr_t) /*_.VALROUT___V821*/ meltfptr[820])->tabval[5] = + ((meltroutine_ptr_t) /*_._VALROUT___V821*/ meltfptr[820])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_NAMED__V14*/ meltfptr[13]); MELT_LOCATION ("warmelt-outobj.melt:5850:/ initchunk"); @@ -44024,13 +44099,13 @@ meltmod__warmelt_outobj__initialmeltchunk_13 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V821*/ meltfptr[820])) + ( /*_._VALROUT___V821*/ meltfptr[820])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_634__SYNTESTGEN_PRIMITIVE#6", NULL != ( /*_.CLASS_SOURCE_DEFPRIMITIVE__V147*/ meltfptr[146])); - ((meltroutine_ptr_t) /*_.VALROUT___V821*/ meltfptr[820])->tabval[6] = + ((meltroutine_ptr_t) /*_._VALROUT___V821*/ meltfptr[820])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_SOURCE_DEFPRIMITIVE__V147*/ meltfptr[146]); MELT_LOCATION ("warmelt-outobj.melt:5850:/ initchunk"); @@ -44039,12 +44114,12 @@ meltmod__warmelt_outobj__initialmeltchunk_13 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V821*/ meltfptr[820])) + ( /*_._VALROUT___V821*/ meltfptr[820])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_634__SYNTESTGEN_PRIMITIVE#7", NULL != ( /*_.DISCR_MAP_OBJECTS__V148*/ meltfptr[147])); - ((meltroutine_ptr_t) /*_.VALROUT___V821*/ meltfptr[820])->tabval[7] = + ((meltroutine_ptr_t) /*_._VALROUT___V821*/ meltfptr[820])->tabval[7] = (melt_ptr_t) ( /*_.DISCR_MAP_OBJECTS__V148*/ meltfptr[147]); MELT_LOCATION ("warmelt-outobj.melt:5850:/ initchunk"); @@ -44053,12 +44128,12 @@ meltmod__warmelt_outobj__initialmeltchunk_13 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V821*/ meltfptr[820])) + ( /*_._VALROUT___V821*/ meltfptr[820])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_634__SYNTESTGEN_PRIMITIVE#8", NULL != ( /*_.ADD2OUT__V15*/ meltfptr[14])); - ((meltroutine_ptr_t) /*_.VALROUT___V821*/ meltfptr[820])->tabval[8] = + ((meltroutine_ptr_t) /*_._VALROUT___V821*/ meltfptr[820])->tabval[8] = (melt_ptr_t) ( /*_.ADD2OUT__V15*/ meltfptr[14]); MELT_LOCATION ("warmelt-outobj.melt:5850:/ initchunk"); @@ -44066,12 +44141,12 @@ meltmod__warmelt_outobj__initialmeltchunk_13 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V821*/ meltfptr[820])) == + ( /*_._VALROUT___V821*/ meltfptr[820])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V818*/ meltfptr[817]); - ((meltroutine_ptr_t) /*_.VALROUT___V821*/ meltfptr[820])->tabval[9] = - (melt_ptr_t) ( /*_.VALCLO___V818*/ meltfptr[817]); + NULL != /*_._VALCLO___V818*/ meltfptr[817]); + ((meltroutine_ptr_t) /*_._VALROUT___V821*/ meltfptr[820])->tabval[9] = + (melt_ptr_t) ( /*_._VALCLO___V818*/ meltfptr[817]); MELT_LOCATION ("warmelt-outobj.melt:5850:/ initchunk"); /*^putroutconst */ @@ -44079,13 +44154,13 @@ meltmod__warmelt_outobj__initialmeltchunk_13 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V821*/ meltfptr[820])) + ( /*_._VALROUT___V821*/ meltfptr[820])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_634__SYNTESTGEN_PRIMITIVE#10", NULL != ( /*_.CTYPE_VOID__V30*/ meltfptr[29])); - ((meltroutine_ptr_t) /*_.VALROUT___V821*/ meltfptr[820])->tabval[10] = + ((meltroutine_ptr_t) /*_._VALROUT___V821*/ meltfptr[820])->tabval[10] = (melt_ptr_t) ( /*_.CTYPE_VOID__V30*/ meltfptr[29]); MELT_LOCATION ("warmelt-outobj.melt:5850:/ initchunk"); @@ -44094,13 +44169,13 @@ meltmod__warmelt_outobj__initialmeltchunk_13 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V821*/ meltfptr[820])) + ( /*_._VALROUT___V821*/ meltfptr[820])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_634__SYNTESTGEN_PRIMITIVE#11", NULL != ( /*_.CLASS_CTYPE__V29*/ meltfptr[28])); - ((meltroutine_ptr_t) /*_.VALROUT___V821*/ meltfptr[820])->tabval[11] = + ((meltroutine_ptr_t) /*_._VALROUT___V821*/ meltfptr[820])->tabval[11] = (melt_ptr_t) ( /*_.CLASS_CTYPE__V29*/ meltfptr[28]); MELT_LOCATION ("warmelt-outobj.melt:5850:/ initchunk"); @@ -44108,125 +44183,125 @@ meltmod__warmelt_outobj__initialmeltchunk_13 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V821*/ meltfptr[820])) == + ( /*_._VALROUT___V821*/ meltfptr[820])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V263*/ meltfptr[262]); - ((meltroutine_ptr_t) /*_.VALROUT___V821*/ meltfptr[820])->tabval[12] = - (melt_ptr_t) ( /*_.VALCLO___V263*/ meltfptr[262]); + NULL != /*_._VALCLO___V263*/ meltfptr[262]); + ((meltroutine_ptr_t) /*_._VALROUT___V821*/ meltfptr[820])->tabval[12] = + (melt_ptr_t) ( /*_._VALCLO___V263*/ meltfptr[262]); MELT_LOCATION ("warmelt-outobj.melt:5850:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V821*/ meltfptr[820])) == + ( /*_._VALROUT___V821*/ meltfptr[820])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V820*/ meltfptr[819]); - ((meltroutine_ptr_t) /*_.VALROUT___V821*/ meltfptr[820])->tabval[13] = - (melt_ptr_t) ( /*_.VALCLO___V820*/ meltfptr[819]); + NULL != /*_._VALCLO___V820*/ meltfptr[819]); + ((meltroutine_ptr_t) /*_._VALROUT___V821*/ meltfptr[820])->tabval[13] = + (melt_ptr_t) ( /*_._VALCLO___V820*/ meltfptr[819]); MELT_LOCATION ("warmelt-outobj.melt:5850:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V821*/ meltfptr[820]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V821*/ meltfptr[820]); /*putclosurout#118 */ melt_assertmsg ("putclosrout#118 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V822*/ meltfptr[821])) == + ( /*_._VALCLO___V822*/ meltfptr[821])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#118 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V821*/ meltfptr[820])) == + ( /*_._VALROUT___V821*/ meltfptr[820])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V822*/ meltfptr[821])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V821*/ meltfptr[820]); + ((meltclosure_ptr_t) /*_._VALCLO___V822*/ meltfptr[821])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V821*/ meltfptr[820]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V822*/ meltfptr[821]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V822*/ meltfptr[821]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V823*/ meltfptr[822])) == + ( /*_._VALDATA___V823*/ meltfptr[822])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V823*/ + ( /*_._VALDATA___V823*/ meltfptr[822])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V823*/ meltfptr[822]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V823*/ meltfptr[822]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V824*/ meltfptr[823]); + /*_._VALSTR___V824*/ meltfptr[823]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V823*/ meltfptr[822]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V823*/ meltfptr[822]); - melt_dbgtrace_written_object ( /*_.VALDATA___V823*/ meltfptr[822], + melt_dbgtrace_written_object ( /*_._VALDATA___V823*/ meltfptr[822], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V825*/ meltfptr[824])) == + ( /*_._VALDATA___V825*/ meltfptr[824])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V825*/ + ( /*_._VALDATA___V825*/ meltfptr[824])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V825*/ meltfptr[824]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V825*/ meltfptr[824]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V826*/ meltfptr[825]); + /*_._VALSTR___V826*/ meltfptr[825]); #undef meltfram__ -} /*end of meltmod__warmelt_outobj__initialmeltchunk_13 */ +} /*end of meltmod__WARMELTmiOUTOBJ__initialmeltchunk_13 */ void -meltmod__warmelt_outobj__initialmeltchunk_14 (meltinitial_frame_t * - meltmeltframptr__, - char meltpredefinited[]) +meltmod__WARMELTmiOUTOBJ__initialmeltchunk_14 (meltinitial_frame_t * + meltmeltframptr__, + char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L (void) meltpredefinited; -/*touch:VALUEDATA_*/ - meltgc_touch ( /*_.VALDATA___V825*/ meltfptr[824]); +/*touch:_VALUEDATA_*/ + meltgc_touch ( /*_._VALDATA___V825*/ meltfptr[824]); - melt_dbgtrace_written_object ( /*_.VALDATA___V825*/ meltfptr[824], + melt_dbgtrace_written_object ( /*_._VALDATA___V825*/ meltfptr[824], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V827*/ meltfptr[826])) == + ( /*_._VALDATA___V827*/ meltfptr[826])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V827*/ + ( /*_._VALDATA___V827*/ meltfptr[826])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V827*/ meltfptr[826]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V827*/ meltfptr[826]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V828*/ meltfptr[827]); + /*_._VALSTR___V828*/ meltfptr[827]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V827*/ meltfptr[826]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V827*/ meltfptr[826]); - melt_dbgtrace_written_object ( /*_.VALDATA___V827*/ meltfptr[826], + melt_dbgtrace_written_object ( /*_._VALDATA___V827*/ meltfptr[826], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:5910:/ initchunk"); @@ -44235,12 +44310,12 @@ meltmod__warmelt_outobj__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V829*/ meltfptr[828])) + ( /*_._VALROUT___V829*/ meltfptr[828])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_642__SYNTESTGEN_CITERATOR#0", NULL != ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7])); - ((meltroutine_ptr_t) /*_.VALROUT___V829*/ meltfptr[828])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V829*/ meltfptr[828])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7]); MELT_LOCATION ("warmelt-outobj.melt:5910:/ initchunk"); @@ -44249,12 +44324,12 @@ meltmod__warmelt_outobj__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V829*/ meltfptr[828])) + ( /*_._VALROUT___V829*/ meltfptr[828])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_642__SYNTESTGEN_CITERATOR#1", NULL != ( /*_.CLASS_CITERATOR__V90*/ meltfptr[89])); - ((meltroutine_ptr_t) /*_.VALROUT___V829*/ meltfptr[828])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V829*/ meltfptr[828])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_CITERATOR__V90*/ meltfptr[89]); MELT_LOCATION ("warmelt-outobj.melt:5910:/ initchunk"); @@ -44263,14 +44338,14 @@ meltmod__warmelt_outobj__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V829*/ meltfptr[828])) + ( /*_._VALROUT___V829*/ meltfptr[828])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_642__SYNTESTGEN_CITERATOR#2", NULL != ( /*_.CLASS_SOURCE_GENERATOR_DEVICE__V145*/ meltfptr[144])); - ((meltroutine_ptr_t) /*_.VALROUT___V829*/ meltfptr[828])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V829*/ meltfptr[828])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_SOURCE_GENERATOR_DEVICE__V145*/ meltfptr[144]); MELT_LOCATION ("warmelt-outobj.melt:5910:/ initchunk"); @@ -44279,13 +44354,13 @@ meltmod__warmelt_outobj__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V829*/ meltfptr[828])) + ( /*_._VALROUT___V829*/ meltfptr[828])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_642__SYNTESTGEN_CITERATOR#3", NULL != ( /*_.CLASS_ANY_MODULE_CONTEXT__V141*/ meltfptr[140])); - ((meltroutine_ptr_t) /*_.VALROUT___V829*/ meltfptr[828])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V829*/ meltfptr[828])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_ANY_MODULE_CONTEXT__V141*/ meltfptr[140]); MELT_LOCATION ("warmelt-outobj.melt:5910:/ initchunk"); @@ -44294,12 +44369,12 @@ meltmod__warmelt_outobj__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V829*/ meltfptr[828])) + ( /*_._VALROUT___V829*/ meltfptr[828])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_642__SYNTESTGEN_CITERATOR#4", NULL != ( /*_.CLASS_LOCATED__V144*/ meltfptr[143])); - ((meltroutine_ptr_t) /*_.VALROUT___V829*/ meltfptr[828])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V829*/ meltfptr[828])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_LOCATED__V144*/ meltfptr[143]); MELT_LOCATION ("warmelt-outobj.melt:5910:/ initchunk"); @@ -44308,12 +44383,12 @@ meltmod__warmelt_outobj__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V829*/ meltfptr[828])) + ( /*_._VALROUT___V829*/ meltfptr[828])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_642__SYNTESTGEN_CITERATOR#5", NULL != ( /*_.CLASS_NAMED__V14*/ meltfptr[13])); - ((meltroutine_ptr_t) /*_.VALROUT___V829*/ meltfptr[828])->tabval[5] = + ((meltroutine_ptr_t) /*_._VALROUT___V829*/ meltfptr[828])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_NAMED__V14*/ meltfptr[13]); MELT_LOCATION ("warmelt-outobj.melt:5910:/ initchunk"); @@ -44322,12 +44397,12 @@ meltmod__warmelt_outobj__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V829*/ meltfptr[828])) + ( /*_._VALROUT___V829*/ meltfptr[828])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_642__SYNTESTGEN_CITERATOR#6", NULL != ( /*_.DISCR_MAP_OBJECTS__V148*/ meltfptr[147])); - ((meltroutine_ptr_t) /*_.VALROUT___V829*/ meltfptr[828])->tabval[6] = + ((meltroutine_ptr_t) /*_._VALROUT___V829*/ meltfptr[828])->tabval[6] = (melt_ptr_t) ( /*_.DISCR_MAP_OBJECTS__V148*/ meltfptr[147]); MELT_LOCATION ("warmelt-outobj.melt:5910:/ initchunk"); @@ -44336,12 +44411,12 @@ meltmod__warmelt_outobj__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V829*/ meltfptr[828])) + ( /*_._VALROUT___V829*/ meltfptr[828])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_642__SYNTESTGEN_CITERATOR#7", NULL != ( /*_.DISCR_STRBUF__V69*/ meltfptr[68])); - ((meltroutine_ptr_t) /*_.VALROUT___V829*/ meltfptr[828])->tabval[7] = + ((meltroutine_ptr_t) /*_._VALROUT___V829*/ meltfptr[828])->tabval[7] = (melt_ptr_t) ( /*_.DISCR_STRBUF__V69*/ meltfptr[68]); MELT_LOCATION ("warmelt-outobj.melt:5910:/ initchunk"); @@ -44350,12 +44425,12 @@ meltmod__warmelt_outobj__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V829*/ meltfptr[828])) + ( /*_._VALROUT___V829*/ meltfptr[828])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_642__SYNTESTGEN_CITERATOR#8", NULL != ( /*_.ADD2OUT__V15*/ meltfptr[14])); - ((meltroutine_ptr_t) /*_.VALROUT___V829*/ meltfptr[828])->tabval[8] = + ((meltroutine_ptr_t) /*_._VALROUT___V829*/ meltfptr[828])->tabval[8] = (melt_ptr_t) ( /*_.ADD2OUT__V15*/ meltfptr[14]); MELT_LOCATION ("warmelt-outobj.melt:5910:/ initchunk"); @@ -44364,12 +44439,12 @@ meltmod__warmelt_outobj__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V829*/ meltfptr[828])) + ( /*_._VALROUT___V829*/ meltfptr[828])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_642__SYNTESTGEN_CITERATOR#9", NULL != ( /*_.DISCR_VERBATIM_STRING__V88*/ meltfptr[87])); - ((meltroutine_ptr_t) /*_.VALROUT___V829*/ meltfptr[828])->tabval[9] = + ((meltroutine_ptr_t) /*_._VALROUT___V829*/ meltfptr[828])->tabval[9] = (melt_ptr_t) ( /*_.DISCR_VERBATIM_STRING__V88*/ meltfptr[87]); MELT_LOCATION ("warmelt-outobj.melt:5910:/ initchunk"); @@ -44378,13 +44453,13 @@ meltmod__warmelt_outobj__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V829*/ meltfptr[828])) + ( /*_._VALROUT___V829*/ meltfptr[828])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_642__SYNTESTGEN_CITERATOR#10", NULL != ( /*_.CLASS_SOURCE_DEFCITERATOR__V149*/ meltfptr[148])); - ((meltroutine_ptr_t) /*_.VALROUT___V829*/ meltfptr[828])->tabval[10] = + ((meltroutine_ptr_t) /*_._VALROUT___V829*/ meltfptr[828])->tabval[10] = (melt_ptr_t) ( /*_.CLASS_SOURCE_DEFCITERATOR__V149*/ meltfptr[148]); MELT_LOCATION ("warmelt-outobj.melt:5910:/ initchunk"); @@ -44392,36 +44467,36 @@ meltmod__warmelt_outobj__initialmeltchunk_14 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V829*/ meltfptr[828])) == + ( /*_._VALROUT___V829*/ meltfptr[828])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V263*/ meltfptr[262]); - ((meltroutine_ptr_t) /*_.VALROUT___V829*/ meltfptr[828])->tabval[11] = - (melt_ptr_t) ( /*_.VALCLO___V263*/ meltfptr[262]); + NULL != /*_._VALCLO___V263*/ meltfptr[262]); + ((meltroutine_ptr_t) /*_._VALROUT___V829*/ meltfptr[828])->tabval[11] = + (melt_ptr_t) ( /*_._VALCLO___V263*/ meltfptr[262]); MELT_LOCATION ("warmelt-outobj.melt:5910:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V829*/ meltfptr[828])) == + ( /*_._VALROUT___V829*/ meltfptr[828])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V818*/ meltfptr[817]); - ((meltroutine_ptr_t) /*_.VALROUT___V829*/ meltfptr[828])->tabval[12] = - (melt_ptr_t) ( /*_.VALCLO___V818*/ meltfptr[817]); + NULL != /*_._VALCLO___V818*/ meltfptr[817]); + ((meltroutine_ptr_t) /*_._VALROUT___V829*/ meltfptr[828])->tabval[12] = + (melt_ptr_t) ( /*_._VALCLO___V818*/ meltfptr[817]); MELT_LOCATION ("warmelt-outobj.melt:5910:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V829*/ meltfptr[828])) == + ( /*_._VALROUT___V829*/ meltfptr[828])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V820*/ meltfptr[819]); - ((meltroutine_ptr_t) /*_.VALROUT___V829*/ meltfptr[828])->tabval[13] = - (melt_ptr_t) ( /*_.VALCLO___V820*/ meltfptr[819]); + NULL != /*_._VALCLO___V820*/ meltfptr[819]); + ((meltroutine_ptr_t) /*_._VALROUT___V829*/ meltfptr[828])->tabval[13] = + (melt_ptr_t) ( /*_._VALCLO___V820*/ meltfptr[819]); MELT_LOCATION ("warmelt-outobj.melt:5910:/ initchunk"); /*^putroutconst */ @@ -44429,56 +44504,56 @@ meltmod__warmelt_outobj__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V829*/ meltfptr[828])) + ( /*_._VALROUT___V829*/ meltfptr[828])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_642__SYNTESTGEN_CITERATOR#14", NULL != ( /*_.CLASS_ANY_BINDING__V12*/ meltfptr[11])); - ((meltroutine_ptr_t) /*_.VALROUT___V829*/ meltfptr[828])->tabval[14] = + ((meltroutine_ptr_t) /*_._VALROUT___V829*/ meltfptr[828])->tabval[14] = (melt_ptr_t) ( /*_.CLASS_ANY_BINDING__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-outobj.melt:5910:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V829*/ meltfptr[828]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V829*/ meltfptr[828]); /*putclosurout#119 */ melt_assertmsg ("putclosrout#119 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V830*/ meltfptr[829])) == + ( /*_._VALCLO___V830*/ meltfptr[829])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#119 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V829*/ meltfptr[828])) == + ( /*_._VALROUT___V829*/ meltfptr[828])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V830*/ meltfptr[829])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V829*/ meltfptr[828]); + ((meltclosure_ptr_t) /*_._VALCLO___V830*/ meltfptr[829])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V829*/ meltfptr[828]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V830*/ meltfptr[829]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V830*/ meltfptr[829]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V831*/ meltfptr[830])) == + ( /*_._VALDATA___V831*/ meltfptr[830])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V831*/ + ( /*_._VALDATA___V831*/ meltfptr[830])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V831*/ meltfptr[830]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V831*/ meltfptr[830]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V832*/ meltfptr[831]); + /*_._VALSTR___V832*/ meltfptr[831]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V831*/ meltfptr[830]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V831*/ meltfptr[830]); - melt_dbgtrace_written_object ( /*_.VALDATA___V831*/ meltfptr[830], + melt_dbgtrace_written_object ( /*_._VALDATA___V831*/ meltfptr[830], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:5978:/ initchunk"); @@ -44487,12 +44562,12 @@ meltmod__warmelt_outobj__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V833*/ meltfptr[832])) + ( /*_._VALROUT___V833*/ meltfptr[832])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_646__SYNTESTGEN_CMATCHER#0", NULL != ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7])); - ((meltroutine_ptr_t) /*_.VALROUT___V833*/ meltfptr[832])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V833*/ meltfptr[832])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7]); MELT_LOCATION ("warmelt-outobj.melt:5978:/ initchunk"); @@ -44501,12 +44576,12 @@ meltmod__warmelt_outobj__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V833*/ meltfptr[832])) + ( /*_._VALROUT___V833*/ meltfptr[832])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_646__SYNTESTGEN_CMATCHER#1", NULL != ( /*_.CLASS_CMATCHER__V150*/ meltfptr[149])); - ((meltroutine_ptr_t) /*_.VALROUT___V833*/ meltfptr[832])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V833*/ meltfptr[832])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_CMATCHER__V150*/ meltfptr[149]); MELT_LOCATION ("warmelt-outobj.melt:5978:/ initchunk"); @@ -44515,14 +44590,14 @@ meltmod__warmelt_outobj__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V833*/ meltfptr[832])) + ( /*_._VALROUT___V833*/ meltfptr[832])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_646__SYNTESTGEN_CMATCHER#2", NULL != ( /*_.CLASS_SOURCE_GENERATOR_DEVICE__V145*/ meltfptr[144])); - ((meltroutine_ptr_t) /*_.VALROUT___V833*/ meltfptr[832])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V833*/ meltfptr[832])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_SOURCE_GENERATOR_DEVICE__V145*/ meltfptr[144]); MELT_LOCATION ("warmelt-outobj.melt:5978:/ initchunk"); @@ -44531,13 +44606,13 @@ meltmod__warmelt_outobj__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V833*/ meltfptr[832])) + ( /*_._VALROUT___V833*/ meltfptr[832])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_646__SYNTESTGEN_CMATCHER#3", NULL != ( /*_.CLASS_ANY_MODULE_CONTEXT__V141*/ meltfptr[140])); - ((meltroutine_ptr_t) /*_.VALROUT___V833*/ meltfptr[832])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V833*/ meltfptr[832])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_ANY_MODULE_CONTEXT__V141*/ meltfptr[140]); MELT_LOCATION ("warmelt-outobj.melt:5978:/ initchunk"); @@ -44546,12 +44621,12 @@ meltmod__warmelt_outobj__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V833*/ meltfptr[832])) + ( /*_._VALROUT___V833*/ meltfptr[832])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_646__SYNTESTGEN_CMATCHER#4", NULL != ( /*_.CLASS_LOCATED__V144*/ meltfptr[143])); - ((meltroutine_ptr_t) /*_.VALROUT___V833*/ meltfptr[832])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V833*/ meltfptr[832])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_LOCATED__V144*/ meltfptr[143]); MELT_LOCATION ("warmelt-outobj.melt:5978:/ initchunk"); @@ -44560,12 +44635,12 @@ meltmod__warmelt_outobj__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V833*/ meltfptr[832])) + ( /*_._VALROUT___V833*/ meltfptr[832])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_646__SYNTESTGEN_CMATCHER#5", NULL != ( /*_.CLASS_NAMED__V14*/ meltfptr[13])); - ((meltroutine_ptr_t) /*_.VALROUT___V833*/ meltfptr[832])->tabval[5] = + ((meltroutine_ptr_t) /*_._VALROUT___V833*/ meltfptr[832])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_NAMED__V14*/ meltfptr[13]); MELT_LOCATION ("warmelt-outobj.melt:5978:/ initchunk"); @@ -44574,12 +44649,12 @@ meltmod__warmelt_outobj__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V833*/ meltfptr[832])) + ( /*_._VALROUT___V833*/ meltfptr[832])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_646__SYNTESTGEN_CMATCHER#6", NULL != ( /*_.CLASS_ANY_MATCHER__V151*/ meltfptr[150])); - ((meltroutine_ptr_t) /*_.VALROUT___V833*/ meltfptr[832])->tabval[6] = + ((meltroutine_ptr_t) /*_._VALROUT___V833*/ meltfptr[832])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_ANY_MATCHER__V151*/ meltfptr[150]); MELT_LOCATION ("warmelt-outobj.melt:5978:/ initchunk"); @@ -44588,13 +44663,13 @@ meltmod__warmelt_outobj__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V833*/ meltfptr[832])) + ( /*_._VALROUT___V833*/ meltfptr[832])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_646__SYNTESTGEN_CMATCHER#7", NULL != ( /*_.CLASS_SOURCE_DEFCMATCHER__V152*/ meltfptr[151])); - ((meltroutine_ptr_t) /*_.VALROUT___V833*/ meltfptr[832])->tabval[7] = + ((meltroutine_ptr_t) /*_._VALROUT___V833*/ meltfptr[832])->tabval[7] = (melt_ptr_t) ( /*_.CLASS_SOURCE_DEFCMATCHER__V152*/ meltfptr[151]); MELT_LOCATION ("warmelt-outobj.melt:5978:/ initchunk"); @@ -44603,12 +44678,12 @@ meltmod__warmelt_outobj__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V833*/ meltfptr[832])) + ( /*_._VALROUT___V833*/ meltfptr[832])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_646__SYNTESTGEN_CMATCHER#8", NULL != ( /*_.DISCR_MAP_OBJECTS__V148*/ meltfptr[147])); - ((meltroutine_ptr_t) /*_.VALROUT___V833*/ meltfptr[832])->tabval[8] = + ((meltroutine_ptr_t) /*_._VALROUT___V833*/ meltfptr[832])->tabval[8] = (melt_ptr_t) ( /*_.DISCR_MAP_OBJECTS__V148*/ meltfptr[147]); MELT_LOCATION ("warmelt-outobj.melt:5978:/ initchunk"); @@ -44617,12 +44692,12 @@ meltmod__warmelt_outobj__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V833*/ meltfptr[832])) + ( /*_._VALROUT___V833*/ meltfptr[832])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_646__SYNTESTGEN_CMATCHER#9", NULL != ( /*_.DISCR_STRBUF__V69*/ meltfptr[68])); - ((meltroutine_ptr_t) /*_.VALROUT___V833*/ meltfptr[832])->tabval[9] = + ((meltroutine_ptr_t) /*_._VALROUT___V833*/ meltfptr[832])->tabval[9] = (melt_ptr_t) ( /*_.DISCR_STRBUF__V69*/ meltfptr[68]); MELT_LOCATION ("warmelt-outobj.melt:5978:/ initchunk"); @@ -44631,12 +44706,12 @@ meltmod__warmelt_outobj__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V833*/ meltfptr[832])) + ( /*_._VALROUT___V833*/ meltfptr[832])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_646__SYNTESTGEN_CMATCHER#10", NULL != ( /*_.ADD2OUT__V15*/ meltfptr[14])); - ((meltroutine_ptr_t) /*_.VALROUT___V833*/ meltfptr[832])->tabval[10] = + ((meltroutine_ptr_t) /*_._VALROUT___V833*/ meltfptr[832])->tabval[10] = (melt_ptr_t) ( /*_.ADD2OUT__V15*/ meltfptr[14]); MELT_LOCATION ("warmelt-outobj.melt:5978:/ initchunk"); @@ -44645,12 +44720,12 @@ meltmod__warmelt_outobj__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V833*/ meltfptr[832])) + ( /*_._VALROUT___V833*/ meltfptr[832])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_646__SYNTESTGEN_CMATCHER#11", NULL != ( /*_.DISCR_VERBATIM_STRING__V88*/ meltfptr[87])); - ((meltroutine_ptr_t) /*_.VALROUT___V833*/ meltfptr[832])->tabval[11] = + ((meltroutine_ptr_t) /*_._VALROUT___V833*/ meltfptr[832])->tabval[11] = (melt_ptr_t) ( /*_.DISCR_VERBATIM_STRING__V88*/ meltfptr[87]); MELT_LOCATION ("warmelt-outobj.melt:5978:/ initchunk"); @@ -44658,36 +44733,36 @@ meltmod__warmelt_outobj__initialmeltchunk_14 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V833*/ meltfptr[832])) == + ( /*_._VALROUT___V833*/ meltfptr[832])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V818*/ meltfptr[817]); - ((meltroutine_ptr_t) /*_.VALROUT___V833*/ meltfptr[832])->tabval[12] = - (melt_ptr_t) ( /*_.VALCLO___V818*/ meltfptr[817]); + NULL != /*_._VALCLO___V818*/ meltfptr[817]); + ((meltroutine_ptr_t) /*_._VALROUT___V833*/ meltfptr[832])->tabval[12] = + (melt_ptr_t) ( /*_._VALCLO___V818*/ meltfptr[817]); MELT_LOCATION ("warmelt-outobj.melt:5978:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V833*/ meltfptr[832])) == + ( /*_._VALROUT___V833*/ meltfptr[832])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V263*/ meltfptr[262]); - ((meltroutine_ptr_t) /*_.VALROUT___V833*/ meltfptr[832])->tabval[13] = - (melt_ptr_t) ( /*_.VALCLO___V263*/ meltfptr[262]); + NULL != /*_._VALCLO___V263*/ meltfptr[262]); + ((meltroutine_ptr_t) /*_._VALROUT___V833*/ meltfptr[832])->tabval[13] = + (melt_ptr_t) ( /*_._VALCLO___V263*/ meltfptr[262]); MELT_LOCATION ("warmelt-outobj.melt:5978:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V833*/ meltfptr[832])) == + ( /*_._VALROUT___V833*/ meltfptr[832])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V820*/ meltfptr[819]); - ((meltroutine_ptr_t) /*_.VALROUT___V833*/ meltfptr[832])->tabval[14] = - (melt_ptr_t) ( /*_.VALCLO___V820*/ meltfptr[819]); + NULL != /*_._VALCLO___V820*/ meltfptr[819]); + ((meltroutine_ptr_t) /*_._VALROUT___V833*/ meltfptr[832])->tabval[14] = + (melt_ptr_t) ( /*_._VALCLO___V820*/ meltfptr[819]); MELT_LOCATION ("warmelt-outobj.melt:5978:/ initchunk"); /*^putroutconst */ @@ -44695,12 +44770,12 @@ meltmod__warmelt_outobj__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V833*/ meltfptr[832])) + ( /*_._VALROUT___V833*/ meltfptr[832])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_646__SYNTESTGEN_CMATCHER#15", NULL != ( /*_.CLASS_ANY_BINDING__V12*/ meltfptr[11])); - ((meltroutine_ptr_t) /*_.VALROUT___V833*/ meltfptr[832])->tabval[15] = + ((meltroutine_ptr_t) /*_._VALROUT___V833*/ meltfptr[832])->tabval[15] = (melt_ptr_t) ( /*_.CLASS_ANY_BINDING__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-outobj.melt:5978:/ initchunk"); @@ -44709,13 +44784,13 @@ meltmod__warmelt_outobj__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V833*/ meltfptr[832])) + ( /*_._VALROUT___V833*/ meltfptr[832])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_646__SYNTESTGEN_CMATCHER#16", - NULL != ( /*_.VALSTR___V834*/ meltfptr[833])); - ((meltroutine_ptr_t) /*_.VALROUT___V833*/ meltfptr[832])->tabval[16] = - (melt_ptr_t) ( /*_.VALSTR___V834*/ meltfptr[833]); + NULL != ( /*_._VALSTR___V834*/ meltfptr[833])); + ((meltroutine_ptr_t) /*_._VALROUT___V833*/ meltfptr[832])->tabval[16] = + (melt_ptr_t) ( /*_._VALSTR___V834*/ meltfptr[833]); MELT_LOCATION ("warmelt-outobj.melt:5978:/ initchunk"); /*^putroutconst */ @@ -44723,101 +44798,101 @@ meltmod__warmelt_outobj__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V833*/ meltfptr[832])) + ( /*_._VALROUT___V833*/ meltfptr[832])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_646__SYNTESTGEN_CMATCHER#17", - NULL != ( /*_.VALSTR___V835*/ meltfptr[834])); - ((meltroutine_ptr_t) /*_.VALROUT___V833*/ meltfptr[832])->tabval[17] = - (melt_ptr_t) ( /*_.VALSTR___V835*/ meltfptr[834]); + NULL != ( /*_._VALSTR___V835*/ meltfptr[834])); + ((meltroutine_ptr_t) /*_._VALROUT___V833*/ meltfptr[832])->tabval[17] = + (melt_ptr_t) ( /*_._VALSTR___V835*/ meltfptr[834]); MELT_LOCATION ("warmelt-outobj.melt:5978:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V833*/ meltfptr[832]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V833*/ meltfptr[832]); /*putclosurout#120 */ melt_assertmsg ("putclosrout#120 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V836*/ meltfptr[835])) == + ( /*_._VALCLO___V836*/ meltfptr[835])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#120 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V833*/ meltfptr[832])) == + ( /*_._VALROUT___V833*/ meltfptr[832])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V836*/ meltfptr[835])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V833*/ meltfptr[832]); + ((meltclosure_ptr_t) /*_._VALCLO___V836*/ meltfptr[835])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V833*/ meltfptr[832]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V836*/ meltfptr[835]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V836*/ meltfptr[835]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V837*/ meltfptr[836])) == + ( /*_._VALDATA___V837*/ meltfptr[836])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V837*/ + ( /*_._VALDATA___V837*/ meltfptr[836])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V837*/ meltfptr[836]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V837*/ meltfptr[836]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V838*/ meltfptr[837]); + /*_._VALSTR___V838*/ meltfptr[837]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V837*/ meltfptr[836]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V837*/ meltfptr[836]); - melt_dbgtrace_written_object ( /*_.VALDATA___V837*/ meltfptr[836], + melt_dbgtrace_written_object ( /*_._VALDATA___V837*/ meltfptr[836], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V839*/ meltfptr[838])) == + ( /*_._VALDATA___V839*/ meltfptr[838])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V839*/ + ( /*_._VALDATA___V839*/ meltfptr[838])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V839*/ meltfptr[838]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V839*/ meltfptr[838]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V840*/ meltfptr[839]); + /*_._VALSTR___V840*/ meltfptr[839]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V839*/ meltfptr[838]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V839*/ meltfptr[838]); - melt_dbgtrace_written_object ( /*_.VALDATA___V839*/ meltfptr[838], + melt_dbgtrace_written_object ( /*_._VALDATA___V839*/ meltfptr[838], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V841*/ meltfptr[840])) == + ( /*_._VALDATA___V841*/ meltfptr[840])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V841*/ + ( /*_._VALDATA___V841*/ meltfptr[840])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V841*/ meltfptr[840]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V841*/ meltfptr[840]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V842*/ meltfptr[841]); + /*_._VALSTR___V842*/ meltfptr[841]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V841*/ meltfptr[840]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V841*/ meltfptr[840]); - melt_dbgtrace_written_object ( /*_.VALDATA___V841*/ meltfptr[840], + melt_dbgtrace_written_object ( /*_._VALDATA___V841*/ meltfptr[840], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:6063:/ initchunk"); @@ -44826,13 +44901,13 @@ meltmod__warmelt_outobj__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V843*/ meltfptr[842])) + ( /*_._VALROUT___V843*/ meltfptr[842])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_656__EMIT_SYNTAX_TESTING_ROUTINE#0", NULL != ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7])); - ((meltroutine_ptr_t) /*_.VALROUT___V843*/ meltfptr[842])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V843*/ meltfptr[842])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7]); MELT_LOCATION ("warmelt-outobj.melt:6063:/ initchunk"); @@ -44841,13 +44916,13 @@ meltmod__warmelt_outobj__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V843*/ meltfptr[842])) + ( /*_._VALROUT___V843*/ meltfptr[842])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_656__EMIT_SYNTAX_TESTING_ROUTINE#1", NULL != ( /*_.CLASS_ANY_MODULE_CONTEXT__V141*/ meltfptr[140])); - ((meltroutine_ptr_t) /*_.VALROUT___V843*/ meltfptr[842])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V843*/ meltfptr[842])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_ANY_MODULE_CONTEXT__V141*/ meltfptr[140]); MELT_LOCATION ("warmelt-outobj.melt:6063:/ initchunk"); @@ -44856,13 +44931,13 @@ meltmod__warmelt_outobj__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V843*/ meltfptr[842])) + ( /*_._VALROUT___V843*/ meltfptr[842])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_656__EMIT_SYNTAX_TESTING_ROUTINE#2", NULL != ( /*_.DISCR_STRBUF__V69*/ meltfptr[68])); - ((meltroutine_ptr_t) /*_.VALROUT___V843*/ meltfptr[842])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V843*/ meltfptr[842])->tabval[2] = (melt_ptr_t) ( /*_.DISCR_STRBUF__V69*/ meltfptr[68]); MELT_LOCATION ("warmelt-outobj.melt:6063:/ initchunk"); @@ -44871,13 +44946,13 @@ meltmod__warmelt_outobj__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V843*/ meltfptr[842])) + ( /*_._VALROUT___V843*/ meltfptr[842])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_656__EMIT_SYNTAX_TESTING_ROUTINE#3", NULL != ( /*_.ADD2OUT__V15*/ meltfptr[14])); - ((meltroutine_ptr_t) /*_.VALROUT___V843*/ meltfptr[842])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V843*/ meltfptr[842])->tabval[3] = (melt_ptr_t) ( /*_.ADD2OUT__V15*/ meltfptr[14]); MELT_LOCATION ("warmelt-outobj.melt:6063:/ initchunk"); @@ -44886,13 +44961,13 @@ meltmod__warmelt_outobj__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V843*/ meltfptr[842])) + ( /*_._VALROUT___V843*/ meltfptr[842])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_656__EMIT_SYNTAX_TESTING_ROUTINE#4", NULL != ( /*_.DISCR_VERBATIM_STRING__V88*/ meltfptr[87])); - ((meltroutine_ptr_t) /*_.VALROUT___V843*/ meltfptr[842])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V843*/ meltfptr[842])->tabval[4] = (melt_ptr_t) ( /*_.DISCR_VERBATIM_STRING__V88*/ meltfptr[87]); MELT_LOCATION ("warmelt-outobj.melt:6063:/ initchunk"); @@ -44901,13 +44976,13 @@ meltmod__warmelt_outobj__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V843*/ meltfptr[842])) + ( /*_._VALROUT___V843*/ meltfptr[842])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_656__EMIT_SYNTAX_TESTING_ROUTINE#5", NULL != ( /*_.CLASS_SOURCE_GENERATOR_DEVICE__V145*/ meltfptr[144])); - ((meltroutine_ptr_t) /*_.VALROUT___V843*/ meltfptr[842])->tabval[5] = + ((meltroutine_ptr_t) /*_._VALROUT___V843*/ meltfptr[842])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_SOURCE_GENERATOR_DEVICE__V145*/ meltfptr[144]); MELT_LOCATION ("warmelt-outobj.melt:6063:/ initchunk"); @@ -44915,32 +44990,32 @@ meltmod__warmelt_outobj__initialmeltchunk_14 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V843*/ meltfptr[842])) == + ( /*_._VALROUT___V843*/ meltfptr[842])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALDATA___V809*/ meltfptr[808]); - ((meltroutine_ptr_t) /*_.VALROUT___V843*/ meltfptr[842])->tabval[6] = - (melt_ptr_t) ( /*_.VALDATA___V809*/ meltfptr[808]); + NULL != /*_._VALDATA___V809*/ meltfptr[808]); + ((meltroutine_ptr_t) /*_._VALROUT___V843*/ meltfptr[842])->tabval[6] = + (melt_ptr_t) ( /*_._VALDATA___V809*/ meltfptr[808]); MELT_LOCATION ("warmelt-outobj.melt:6063:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V843*/ meltfptr[842]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V843*/ meltfptr[842]); /*putclosurout#121 */ melt_assertmsg ("putclosrout#121 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V844*/ meltfptr[843])) == + ( /*_._VALCLO___V844*/ meltfptr[843])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#121 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V843*/ meltfptr[842])) == + ( /*_._VALROUT___V843*/ meltfptr[842])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V844*/ meltfptr[843])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V843*/ meltfptr[842]); + ((meltclosure_ptr_t) /*_._VALCLO___V844*/ meltfptr[843])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V843*/ meltfptr[842]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V844*/ meltfptr[843]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V844*/ meltfptr[843]); MELT_LOCATION ("warmelt-outobj.melt:6130:/ initchunk"); /*^putroutconst */ @@ -44948,13 +45023,13 @@ meltmod__warmelt_outobj__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V845*/ meltfptr[844])) + ( /*_._VALROUT___V845*/ meltfptr[844])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_658__NORMALIZE_MACROEXPANDED_LIST#0", NULL != ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7])); - ((meltroutine_ptr_t) /*_.VALROUT___V845*/ meltfptr[844])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V845*/ meltfptr[844])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7]); MELT_LOCATION ("warmelt-outobj.melt:6130:/ initchunk"); @@ -44963,13 +45038,13 @@ meltmod__warmelt_outobj__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V845*/ meltfptr[844])) + ( /*_._VALROUT___V845*/ meltfptr[844])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_658__NORMALIZE_MACROEXPANDED_LIST#1", NULL != ( /*_.CLASS_ANY_MODULE_CONTEXT__V141*/ meltfptr[140])); - ((meltroutine_ptr_t) /*_.VALROUT___V845*/ meltfptr[844])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V845*/ meltfptr[844])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_ANY_MODULE_CONTEXT__V141*/ meltfptr[140]); MELT_LOCATION ("warmelt-outobj.melt:6130:/ initchunk"); @@ -44978,13 +45053,13 @@ meltmod__warmelt_outobj__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V845*/ meltfptr[844])) + ( /*_._VALROUT___V845*/ meltfptr[844])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_658__NORMALIZE_MACROEXPANDED_LIST#2", NULL != ( /*_.CLASS_NORMALIZATION_CONTEXT__V153*/ meltfptr[152])); - ((meltroutine_ptr_t) /*_.VALROUT___V845*/ meltfptr[844])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V845*/ meltfptr[844])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V153*/ meltfptr[152]); MELT_LOCATION ("warmelt-outobj.melt:6130:/ initchunk"); @@ -44993,13 +45068,13 @@ meltmod__warmelt_outobj__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V845*/ meltfptr[844])) + ( /*_._VALROUT___V845*/ meltfptr[844])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_658__NORMALIZE_MACROEXPANDED_LIST#3", NULL != ( /*_.CLASS_ENVIRONMENT__V154*/ meltfptr[153])); - ((meltroutine_ptr_t) /*_.VALROUT___V845*/ meltfptr[844])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V845*/ meltfptr[844])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V154*/ meltfptr[153]); MELT_LOCATION ("warmelt-outobj.melt:6130:/ initchunk"); @@ -45008,13 +45083,13 @@ meltmod__warmelt_outobj__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V845*/ meltfptr[844])) + ( /*_._VALROUT___V845*/ meltfptr[844])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_658__NORMALIZE_MACROEXPANDED_LIST#4", NULL != ( /*_.CLASS_SOURCE__V155*/ meltfptr[154])); - ((meltroutine_ptr_t) /*_.VALROUT___V845*/ meltfptr[844])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V845*/ meltfptr[844])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_SOURCE__V155*/ meltfptr[154]); MELT_LOCATION ("warmelt-outobj.melt:6130:/ initchunk"); @@ -45023,13 +45098,13 @@ meltmod__warmelt_outobj__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V845*/ meltfptr[844])) + ( /*_._VALROUT___V845*/ meltfptr[844])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_658__NORMALIZE_MACROEXPANDED_LIST#5", NULL != ( /*_.CLASS_LOCATED__V144*/ meltfptr[143])); - ((meltroutine_ptr_t) /*_.VALROUT___V845*/ meltfptr[844])->tabval[5] = + ((meltroutine_ptr_t) /*_._VALROUT___V845*/ meltfptr[844])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_LOCATED__V144*/ meltfptr[143]); MELT_LOCATION ("warmelt-outobj.melt:6130:/ initchunk"); @@ -45038,7 +45113,7 @@ meltmod__warmelt_outobj__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V845*/ meltfptr[844])) + ( /*_._VALROUT___V845*/ meltfptr[844])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg @@ -45046,7 +45121,7 @@ meltmod__warmelt_outobj__initialmeltchunk_14 (meltinitial_frame_t * NULL != ( /*_.CLASS_SOURCE_UPDATE_CURRENT_MODULE_ENVIRONMENT_REFERENCE__V156*/ meltfptr[155])); - ((meltroutine_ptr_t) /*_.VALROUT___V845*/ meltfptr[844])->tabval[6] = + ((meltroutine_ptr_t) /*_._VALROUT___V845*/ meltfptr[844])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_SOURCE_UPDATE_CURRENT_MODULE_ENVIRONMENT_REFERENCE__V156*/ meltfptr[155]); MELT_LOCATION ("warmelt-outobj.melt:6130:/ initchunk"); @@ -45055,14 +45130,14 @@ meltmod__warmelt_outobj__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V845*/ meltfptr[844])) + ( /*_._VALROUT___V845*/ meltfptr[844])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_658__NORMALIZE_MACROEXPANDED_LIST#7", - NULL != ( /*_.VALSTR___V846*/ meltfptr[845])); - ((meltroutine_ptr_t) /*_.VALROUT___V845*/ meltfptr[844])->tabval[7] = - (melt_ptr_t) ( /*_.VALSTR___V846*/ meltfptr[845]); + NULL != ( /*_._VALSTR___V846*/ meltfptr[845])); + ((meltroutine_ptr_t) /*_._VALROUT___V845*/ meltfptr[844])->tabval[7] = + (melt_ptr_t) ( /*_._VALSTR___V846*/ meltfptr[845]); MELT_LOCATION ("warmelt-outobj.melt:6130:/ initchunk"); /*^putroutconst */ @@ -45070,13 +45145,13 @@ meltmod__warmelt_outobj__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V845*/ meltfptr[844])) + ( /*_._VALROUT___V845*/ meltfptr[844])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_658__NORMALIZE_MACROEXPANDED_LIST#8", NULL != ( /*_.CLASS_SOURCE_COMMENT__V157*/ meltfptr[156])); - ((meltroutine_ptr_t) /*_.VALROUT___V845*/ meltfptr[844])->tabval[8] = + ((meltroutine_ptr_t) /*_._VALROUT___V845*/ meltfptr[844])->tabval[8] = (melt_ptr_t) ( /*_.CLASS_SOURCE_COMMENT__V157*/ meltfptr[156]); MELT_LOCATION ("warmelt-outobj.melt:6130:/ initchunk"); @@ -45085,13 +45160,13 @@ meltmod__warmelt_outobj__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V845*/ meltfptr[844])) + ( /*_._VALROUT___V845*/ meltfptr[844])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_658__NORMALIZE_MACROEXPANDED_LIST#9", NULL != ( /*_.NORMAL_EXP__V158*/ meltfptr[157])); - ((meltroutine_ptr_t) /*_.VALROUT___V845*/ meltfptr[844])->tabval[9] = + ((meltroutine_ptr_t) /*_._VALROUT___V845*/ meltfptr[844])->tabval[9] = (melt_ptr_t) ( /*_.NORMAL_EXP__V158*/ meltfptr[157]); MELT_LOCATION ("warmelt-outobj.melt:6130:/ initchunk"); @@ -45100,13 +45175,13 @@ meltmod__warmelt_outobj__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V845*/ meltfptr[844])) + ( /*_._VALROUT___V845*/ meltfptr[844])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_658__NORMALIZE_MACROEXPANDED_LIST#10", NULL != ( /*_.CLASS_NREP__V39*/ meltfptr[38])); - ((meltroutine_ptr_t) /*_.VALROUT___V845*/ meltfptr[844])->tabval[10] = + ((meltroutine_ptr_t) /*_._VALROUT___V845*/ meltfptr[844])->tabval[10] = (melt_ptr_t) ( /*_.CLASS_NREP__V39*/ meltfptr[38]); MELT_LOCATION ("warmelt-outobj.melt:6130:/ initchunk"); @@ -45115,13 +45190,13 @@ meltmod__warmelt_outobj__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V845*/ meltfptr[844])) + ( /*_._VALROUT___V845*/ meltfptr[844])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_658__NORMALIZE_MACROEXPANDED_LIST#11", NULL != ( /*_.CLASS_NREP_ANYPROC__V159*/ meltfptr[158])); - ((meltroutine_ptr_t) /*_.VALROUT___V845*/ meltfptr[844])->tabval[11] = + ((meltroutine_ptr_t) /*_._VALROUT___V845*/ meltfptr[844])->tabval[11] = (melt_ptr_t) ( /*_.CLASS_NREP_ANYPROC__V159*/ meltfptr[158]); MELT_LOCATION ("warmelt-outobj.melt:6130:/ initchunk"); @@ -45130,13 +45205,13 @@ meltmod__warmelt_outobj__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V845*/ meltfptr[844])) + ( /*_._VALROUT___V845*/ meltfptr[844])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_658__NORMALIZE_MACROEXPANDED_LIST#12", NULL != ( /*_.WRAP_NORMAL_LET1__V160*/ meltfptr[159])); - ((meltroutine_ptr_t) /*_.VALROUT___V845*/ meltfptr[844])->tabval[12] = + ((meltroutine_ptr_t) /*_._VALROUT___V845*/ meltfptr[844])->tabval[12] = (melt_ptr_t) ( /*_.WRAP_NORMAL_LET1__V160*/ meltfptr[159]); MELT_LOCATION ("warmelt-outobj.melt:6130:/ initchunk"); @@ -45145,240 +45220,240 @@ meltmod__warmelt_outobj__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V845*/ meltfptr[844])) + ( /*_._VALROUT___V845*/ meltfptr[844])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_658__NORMALIZE_MACROEXPANDED_LIST#13", NULL != ( /*_.CLASS_NREP_INITPROC__V161*/ meltfptr[160])); - ((meltroutine_ptr_t) /*_.VALROUT___V845*/ meltfptr[844])->tabval[13] = + ((meltroutine_ptr_t) /*_._VALROUT___V845*/ meltfptr[844])->tabval[13] = (melt_ptr_t) ( /*_.CLASS_NREP_INITPROC__V161*/ meltfptr[160]); MELT_LOCATION ("warmelt-outobj.melt:6130:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V845*/ meltfptr[844]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V845*/ meltfptr[844]); /*putclosurout#122 */ melt_assertmsg ("putclosrout#122 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V847*/ meltfptr[846])) == + ( /*_._VALCLO___V847*/ meltfptr[846])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#122 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V845*/ meltfptr[844])) == + ( /*_._VALROUT___V845*/ meltfptr[844])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V847*/ meltfptr[846])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V845*/ meltfptr[844]); + ((meltclosure_ptr_t) /*_._VALCLO___V847*/ meltfptr[846])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V845*/ meltfptr[844]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V847*/ meltfptr[846]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V847*/ meltfptr[846]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V848*/ meltfptr[847])) == + ( /*_._VALDATA___V848*/ meltfptr[847])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V848*/ + ( /*_._VALDATA___V848*/ meltfptr[847])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V848*/ meltfptr[847]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V848*/ meltfptr[847]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V849*/ meltfptr[848]); + /*_._VALSTR___V849*/ meltfptr[848]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V848*/ meltfptr[847]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V848*/ meltfptr[847]); - melt_dbgtrace_written_object ( /*_.VALDATA___V848*/ meltfptr[847], + melt_dbgtrace_written_object ( /*_._VALDATA___V848*/ meltfptr[847], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V850*/ meltfptr[849])) == + ( /*_._VALDATA___V850*/ meltfptr[849])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V850*/ + ( /*_._VALDATA___V850*/ meltfptr[849])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V850*/ meltfptr[849]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V850*/ meltfptr[849]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V851*/ meltfptr[850]); + /*_._VALSTR___V851*/ meltfptr[850]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V850*/ meltfptr[849]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V850*/ meltfptr[849]); - melt_dbgtrace_written_object ( /*_.VALDATA___V850*/ meltfptr[849], + melt_dbgtrace_written_object ( /*_._VALDATA___V850*/ meltfptr[849], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V852*/ meltfptr[851])) == + ( /*_._VALDATA___V852*/ meltfptr[851])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V852*/ + ( /*_._VALDATA___V852*/ meltfptr[851])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V852*/ meltfptr[851]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V852*/ meltfptr[851]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V853*/ meltfptr[852]); + /*_._VALSTR___V853*/ meltfptr[852]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V852*/ meltfptr[851]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V852*/ meltfptr[851]); - melt_dbgtrace_written_object ( /*_.VALDATA___V852*/ meltfptr[851], + melt_dbgtrace_written_object ( /*_._VALDATA___V852*/ meltfptr[851], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V854*/ meltfptr[853])) == + ( /*_._VALDATA___V854*/ meltfptr[853])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V854*/ + ( /*_._VALDATA___V854*/ meltfptr[853])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V854*/ meltfptr[853]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V854*/ meltfptr[853]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V855*/ meltfptr[854]); + /*_._VALSTR___V855*/ meltfptr[854]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V854*/ meltfptr[853]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V854*/ meltfptr[853]); - melt_dbgtrace_written_object ( /*_.VALDATA___V854*/ meltfptr[853], + melt_dbgtrace_written_object ( /*_._VALDATA___V854*/ meltfptr[853], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V856*/ meltfptr[855])) == + ( /*_._VALDATA___V856*/ meltfptr[855])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V856*/ + ( /*_._VALDATA___V856*/ meltfptr[855])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V856*/ meltfptr[855]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V856*/ meltfptr[855]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V857*/ meltfptr[856]); + /*_._VALSTR___V857*/ meltfptr[856]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V856*/ meltfptr[855]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V856*/ meltfptr[855]); - melt_dbgtrace_written_object ( /*_.VALDATA___V856*/ meltfptr[855], + melt_dbgtrace_written_object ( /*_._VALDATA___V856*/ meltfptr[855], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V858*/ meltfptr[857])) == + ( /*_._VALDATA___V858*/ meltfptr[857])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V858*/ + ( /*_._VALDATA___V858*/ meltfptr[857])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V858*/ meltfptr[857]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V858*/ meltfptr[857]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V859*/ meltfptr[858]); + /*_._VALSTR___V859*/ meltfptr[858]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V858*/ meltfptr[857]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V858*/ meltfptr[857]); - melt_dbgtrace_written_object ( /*_.VALDATA___V858*/ meltfptr[857], + melt_dbgtrace_written_object ( /*_._VALDATA___V858*/ meltfptr[857], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V860*/ meltfptr[859])) == + ( /*_._VALDATA___V860*/ meltfptr[859])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V860*/ + ( /*_._VALDATA___V860*/ meltfptr[859])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V860*/ meltfptr[859]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V860*/ meltfptr[859]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V861*/ meltfptr[860]); + /*_._VALSTR___V861*/ meltfptr[860]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V860*/ meltfptr[859]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V860*/ meltfptr[859]); - melt_dbgtrace_written_object ( /*_.VALDATA___V860*/ meltfptr[859], + melt_dbgtrace_written_object ( /*_._VALDATA___V860*/ meltfptr[859], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V862*/ meltfptr[861])) == + ( /*_._VALDATA___V862*/ meltfptr[861])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V862*/ + ( /*_._VALDATA___V862*/ meltfptr[861])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V862*/ meltfptr[861]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V862*/ meltfptr[861]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V863*/ meltfptr[862]); + /*_._VALSTR___V863*/ meltfptr[862]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V862*/ meltfptr[861]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V862*/ meltfptr[861]); - melt_dbgtrace_written_object ( /*_.VALDATA___V862*/ meltfptr[861], + melt_dbgtrace_written_object ( /*_._VALDATA___V862*/ meltfptr[861], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V864*/ meltfptr[863])) == + ( /*_._VALDATA___V864*/ meltfptr[863])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V864*/ + ( /*_._VALDATA___V864*/ meltfptr[863])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V864*/ meltfptr[863]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V864*/ meltfptr[863]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V865*/ meltfptr[864]); + /*_._VALSTR___V865*/ meltfptr[864]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V864*/ meltfptr[863]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V864*/ meltfptr[863]); - melt_dbgtrace_written_object ( /*_.VALDATA___V864*/ meltfptr[863], + melt_dbgtrace_written_object ( /*_._VALDATA___V864*/ meltfptr[863], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:6220:/ initchunk"); @@ -45387,13 +45462,13 @@ meltmod__warmelt_outobj__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V866*/ meltfptr[865])) + ( /*_._VALROUT___V866*/ meltfptr[865])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_679__OUTPUT_HOOKS_WITH_MODVAR#0", NULL != ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7])); - ((meltroutine_ptr_t) /*_.VALROUT___V866*/ meltfptr[865])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V866*/ meltfptr[865])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7]); MELT_LOCATION ("warmelt-outobj.melt:6220:/ initchunk"); @@ -45402,13 +45477,13 @@ meltmod__warmelt_outobj__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V866*/ meltfptr[865])) + ( /*_._VALROUT___V866*/ meltfptr[865])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_679__OUTPUT_HOOKS_WITH_MODVAR#1", NULL != ( /*_.ADD2OUT__V15*/ meltfptr[14])); - ((meltroutine_ptr_t) /*_.VALROUT___V866*/ meltfptr[865])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V866*/ meltfptr[865])->tabval[1] = (melt_ptr_t) ( /*_.ADD2OUT__V15*/ meltfptr[14]); MELT_LOCATION ("warmelt-outobj.melt:6220:/ initchunk"); @@ -45417,13 +45492,13 @@ meltmod__warmelt_outobj__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V866*/ meltfptr[865])) + ( /*_._VALROUT___V866*/ meltfptr[865])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_679__OUTPUT_HOOKS_WITH_MODVAR#2", NULL != ( /*_.CLASS_HOOKROUTINEOBJ__V61*/ meltfptr[60])); - ((meltroutine_ptr_t) /*_.VALROUT___V866*/ meltfptr[865])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V866*/ meltfptr[865])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_HOOKROUTINEOBJ__V61*/ meltfptr[60]); MELT_LOCATION ("warmelt-outobj.melt:6220:/ initchunk"); @@ -45432,13 +45507,13 @@ meltmod__warmelt_outobj__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V866*/ meltfptr[865])) + ( /*_._VALROUT___V866*/ meltfptr[865])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_679__OUTPUT_HOOKS_WITH_MODVAR#3", NULL != ( /*_.CLASS_ROUTINEOBJ__V59*/ meltfptr[58])); - ((meltroutine_ptr_t) /*_.VALROUT___V866*/ meltfptr[865])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V866*/ meltfptr[865])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_ROUTINEOBJ__V59*/ meltfptr[58]); MELT_LOCATION ("warmelt-outobj.melt:6220:/ initchunk"); @@ -45447,13 +45522,13 @@ meltmod__warmelt_outobj__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V866*/ meltfptr[865])) + ( /*_._VALROUT___V866*/ meltfptr[865])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_679__OUTPUT_HOOKS_WITH_MODVAR#4", NULL != ( /*_.CLASS_NREP_HOOKPROC__V45*/ meltfptr[44])); - ((meltroutine_ptr_t) /*_.VALROUT___V866*/ meltfptr[865])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V866*/ meltfptr[865])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_NREP_HOOKPROC__V45*/ meltfptr[44]); MELT_LOCATION ("warmelt-outobj.melt:6220:/ initchunk"); @@ -45462,13 +45537,13 @@ meltmod__warmelt_outobj__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V866*/ meltfptr[865])) + ( /*_._VALROUT___V866*/ meltfptr[865])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_679__OUTPUT_HOOKS_WITH_MODVAR#5", NULL != ( /*_.CLASS_NREP_DATAHOOK__V162*/ meltfptr[161])); - ((meltroutine_ptr_t) /*_.VALROUT___V866*/ meltfptr[865])->tabval[5] = + ((meltroutine_ptr_t) /*_._VALROUT___V866*/ meltfptr[865])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_NREP_DATAHOOK__V162*/ meltfptr[161]); MELT_LOCATION ("warmelt-outobj.melt:6220:/ initchunk"); @@ -45477,13 +45552,13 @@ meltmod__warmelt_outobj__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V866*/ meltfptr[865])) + ( /*_._VALROUT___V866*/ meltfptr[865])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_679__OUTPUT_HOOKS_WITH_MODVAR#6", NULL != ( /*_.CLASS_CTYPE__V29*/ meltfptr[28])); - ((meltroutine_ptr_t) /*_.VALROUT___V866*/ meltfptr[865])->tabval[6] = + ((meltroutine_ptr_t) /*_._VALROUT___V866*/ meltfptr[865])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_CTYPE__V29*/ meltfptr[28]); MELT_LOCATION ("warmelt-outobj.melt:6220:/ initchunk"); @@ -45492,13 +45567,13 @@ meltmod__warmelt_outobj__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V866*/ meltfptr[865])) + ( /*_._VALROUT___V866*/ meltfptr[865])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_679__OUTPUT_HOOKS_WITH_MODVAR#7", NULL != ( /*_.CLASS_FORMAL_BINDING__V73*/ meltfptr[72])); - ((meltroutine_ptr_t) /*_.VALROUT___V866*/ meltfptr[865])->tabval[7] = + ((meltroutine_ptr_t) /*_._VALROUT___V866*/ meltfptr[865])->tabval[7] = (melt_ptr_t) ( /*_.CLASS_FORMAL_BINDING__V73*/ meltfptr[72]); MELT_LOCATION ("warmelt-outobj.melt:6220:/ initchunk"); @@ -45507,13 +45582,13 @@ meltmod__warmelt_outobj__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V866*/ meltfptr[865])) + ( /*_._VALROUT___V866*/ meltfptr[865])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_679__OUTPUT_HOOKS_WITH_MODVAR#8", NULL != ( /*_.CLASS_ANY_BINDING__V12*/ meltfptr[11])); - ((meltroutine_ptr_t) /*_.VALROUT___V866*/ meltfptr[865])->tabval[8] = + ((meltroutine_ptr_t) /*_._VALROUT___V866*/ meltfptr[865])->tabval[8] = (melt_ptr_t) ( /*_.CLASS_ANY_BINDING__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-outobj.melt:6220:/ initchunk"); @@ -45522,13 +45597,13 @@ meltmod__warmelt_outobj__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V866*/ meltfptr[865])) + ( /*_._VALROUT___V866*/ meltfptr[865])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_679__OUTPUT_HOOKS_WITH_MODVAR#9", NULL != ( /*_.CLASS_NAMED__V14*/ meltfptr[13])); - ((meltroutine_ptr_t) /*_.VALROUT___V866*/ meltfptr[865])->tabval[9] = + ((meltroutine_ptr_t) /*_._VALROUT___V866*/ meltfptr[865])->tabval[9] = (melt_ptr_t) ( /*_.CLASS_NAMED__V14*/ meltfptr[13]); MELT_LOCATION ("warmelt-outobj.melt:6220:/ initchunk"); @@ -45536,54 +45611,54 @@ meltmod__warmelt_outobj__initialmeltchunk_14 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V866*/ meltfptr[865])) == + ( /*_._VALROUT___V866*/ meltfptr[865])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V211*/ meltfptr[210]); - ((meltroutine_ptr_t) /*_.VALROUT___V866*/ meltfptr[865])->tabval[10] = - (melt_ptr_t) ( /*_.VALCLO___V211*/ meltfptr[210]); + NULL != /*_._VALCLO___V211*/ meltfptr[210]); + ((meltroutine_ptr_t) /*_._VALROUT___V866*/ meltfptr[865])->tabval[10] = + (melt_ptr_t) ( /*_._VALCLO___V211*/ meltfptr[210]); MELT_LOCATION ("warmelt-outobj.melt:6220:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V866*/ meltfptr[865]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V866*/ meltfptr[865]); /*putclosurout#123 */ melt_assertmsg ("putclosrout#123 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V867*/ meltfptr[866])) == + ( /*_._VALCLO___V867*/ meltfptr[866])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#123 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V866*/ meltfptr[865])) == + ( /*_._VALROUT___V866*/ meltfptr[865])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V867*/ meltfptr[866])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V866*/ meltfptr[865]); + ((meltclosure_ptr_t) /*_._VALCLO___V867*/ meltfptr[866])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V866*/ meltfptr[865]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V867*/ meltfptr[866]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V867*/ meltfptr[866]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V868*/ meltfptr[867])) == + ( /*_._VALDATA___V868*/ meltfptr[867])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V868*/ + ( /*_._VALDATA___V868*/ meltfptr[867])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V868*/ meltfptr[867]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V868*/ meltfptr[867]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V869*/ meltfptr[868]); + /*_._VALSTR___V869*/ meltfptr[868]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V868*/ meltfptr[867]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V868*/ meltfptr[867]); - melt_dbgtrace_written_object ( /*_.VALDATA___V868*/ meltfptr[867], + melt_dbgtrace_written_object ( /*_._VALDATA___V868*/ meltfptr[867], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:6357:/ initchunk"); @@ -45592,23 +45667,23 @@ meltmod__warmelt_outobj__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V870*/ meltfptr[869])) + ( /*_._VALROUT___V870*/ meltfptr[869])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_683__TRANSLATE_MACROEXPANDED_LIST#0", NULL != ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7])); - ((meltroutine_ptr_t) /*_.VALROUT___V870*/ meltfptr[869])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V870*/ meltfptr[869])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7]); #undef meltfram__ -} /*end of meltmod__warmelt_outobj__initialmeltchunk_14 */ +} /*end of meltmod__WARMELTmiOUTOBJ__initialmeltchunk_14 */ void -meltmod__warmelt_outobj__initialmeltchunk_15 (meltinitial_frame_t * - meltmeltframptr__, - char meltpredefinited[]) +meltmod__WARMELTmiOUTOBJ__initialmeltchunk_15 (meltinitial_frame_t * + meltmeltframptr__, + char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount @@ -45620,13 +45695,13 @@ meltmod__warmelt_outobj__initialmeltchunk_15 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V870*/ meltfptr[869])) + ( /*_._VALROUT___V870*/ meltfptr[869])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_683__TRANSLATE_MACROEXPANDED_LIST#1", NULL != ( /*_.CLASS_ANY_MODULE_CONTEXT__V141*/ meltfptr[140])); - ((meltroutine_ptr_t) /*_.VALROUT___V870*/ meltfptr[869])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V870*/ meltfptr[869])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_ANY_MODULE_CONTEXT__V141*/ meltfptr[140]); MELT_LOCATION ("warmelt-outobj.melt:6357:/ initchunk"); @@ -45635,13 +45710,13 @@ meltmod__warmelt_outobj__initialmeltchunk_15 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V870*/ meltfptr[869])) + ( /*_._VALROUT___V870*/ meltfptr[869])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_683__TRANSLATE_MACROEXPANDED_LIST#2", NULL != ( /*_.CLASS_NORMALIZATION_CONTEXT__V153*/ meltfptr[152])); - ((meltroutine_ptr_t) /*_.VALROUT___V870*/ meltfptr[869])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V870*/ meltfptr[869])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V153*/ meltfptr[152]); MELT_LOCATION ("warmelt-outobj.melt:6357:/ initchunk"); @@ -45650,13 +45725,13 @@ meltmod__warmelt_outobj__initialmeltchunk_15 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V870*/ meltfptr[869])) + ( /*_._VALROUT___V870*/ meltfptr[869])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_683__TRANSLATE_MACROEXPANDED_LIST#3", NULL != ( /*_.CLASS_ENVIRONMENT__V154*/ meltfptr[153])); - ((meltroutine_ptr_t) /*_.VALROUT___V870*/ meltfptr[869])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V870*/ meltfptr[869])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V154*/ meltfptr[153]); MELT_LOCATION ("warmelt-outobj.melt:6357:/ initchunk"); @@ -45665,13 +45740,13 @@ meltmod__warmelt_outobj__initialmeltchunk_15 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V870*/ meltfptr[869])) + ( /*_._VALROUT___V870*/ meltfptr[869])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_683__TRANSLATE_MACROEXPANDED_LIST#4", NULL != ( /*_.DISCR_STRBUF__V69*/ meltfptr[68])); - ((meltroutine_ptr_t) /*_.VALROUT___V870*/ meltfptr[869])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V870*/ meltfptr[869])->tabval[4] = (melt_ptr_t) ( /*_.DISCR_STRBUF__V69*/ meltfptr[68]); MELT_LOCATION ("warmelt-outobj.melt:6357:/ initchunk"); @@ -45679,12 +45754,12 @@ meltmod__warmelt_outobj__initialmeltchunk_15 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V870*/ meltfptr[869])) == + ( /*_._VALROUT___V870*/ meltfptr[869])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V847*/ meltfptr[846]); - ((meltroutine_ptr_t) /*_.VALROUT___V870*/ meltfptr[869])->tabval[5] = - (melt_ptr_t) ( /*_.VALCLO___V847*/ meltfptr[846]); + NULL != /*_._VALCLO___V847*/ meltfptr[846]); + ((meltroutine_ptr_t) /*_._VALROUT___V870*/ meltfptr[869])->tabval[5] = + (melt_ptr_t) ( /*_._VALCLO___V847*/ meltfptr[846]); MELT_LOCATION ("warmelt-outobj.melt:6357:/ initchunk"); /*^putroutconst */ @@ -45692,14 +45767,14 @@ meltmod__warmelt_outobj__initialmeltchunk_15 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V870*/ meltfptr[869])) + ( /*_._VALROUT___V870*/ meltfptr[869])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_683__TRANSLATE_MACROEXPANDED_LIST#6", - NULL != ( /*_.VALSTR___V871*/ meltfptr[870])); - ((meltroutine_ptr_t) /*_.VALROUT___V870*/ meltfptr[869])->tabval[6] = - (melt_ptr_t) ( /*_.VALSTR___V871*/ meltfptr[870]); + NULL != ( /*_._VALSTR___V871*/ meltfptr[870])); + ((meltroutine_ptr_t) /*_._VALROUT___V870*/ meltfptr[869])->tabval[6] = + (melt_ptr_t) ( /*_._VALSTR___V871*/ meltfptr[870]); MELT_LOCATION ("warmelt-outobj.melt:6357:/ initchunk"); /*^putroutconst */ @@ -45707,13 +45782,13 @@ meltmod__warmelt_outobj__initialmeltchunk_15 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V870*/ meltfptr[869])) + ( /*_._VALROUT___V870*/ meltfptr[869])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_683__TRANSLATE_MACROEXPANDED_LIST#7", NULL != ( /*_.DISCR_LIST__V66*/ meltfptr[65])); - ((meltroutine_ptr_t) /*_.VALROUT___V870*/ meltfptr[869])->tabval[7] = + ((meltroutine_ptr_t) /*_._VALROUT___V870*/ meltfptr[869])->tabval[7] = (melt_ptr_t) ( /*_.DISCR_LIST__V66*/ meltfptr[65]); MELT_LOCATION ("warmelt-outobj.melt:6357:/ initchunk"); @@ -45722,13 +45797,13 @@ meltmod__warmelt_outobj__initialmeltchunk_15 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V870*/ meltfptr[869])) + ( /*_._VALROUT___V870*/ meltfptr[869])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_683__TRANSLATE_MACROEXPANDED_LIST#8", NULL != ( /*_.DISCR_MAP_OBJECTS__V148*/ meltfptr[147])); - ((meltroutine_ptr_t) /*_.VALROUT___V870*/ meltfptr[869])->tabval[8] = + ((meltroutine_ptr_t) /*_._VALROUT___V870*/ meltfptr[869])->tabval[8] = (melt_ptr_t) ( /*_.DISCR_MAP_OBJECTS__V148*/ meltfptr[147]); MELT_LOCATION ("warmelt-outobj.melt:6357:/ initchunk"); @@ -45737,13 +45812,13 @@ meltmod__warmelt_outobj__initialmeltchunk_15 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V870*/ meltfptr[869])) + ( /*_._VALROUT___V870*/ meltfptr[869])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_683__TRANSLATE_MACROEXPANDED_LIST#9", NULL != ( /*_.CLASS_NREP_HOOKPROC__V45*/ meltfptr[44])); - ((meltroutine_ptr_t) /*_.VALROUT___V870*/ meltfptr[869])->tabval[9] = + ((meltroutine_ptr_t) /*_._VALROUT___V870*/ meltfptr[869])->tabval[9] = (melt_ptr_t) ( /*_.CLASS_NREP_HOOKPROC__V45*/ meltfptr[44]); MELT_LOCATION ("warmelt-outobj.melt:6357:/ initchunk"); @@ -45752,13 +45827,13 @@ meltmod__warmelt_outobj__initialmeltchunk_15 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V870*/ meltfptr[869])) + ( /*_._VALROUT___V870*/ meltfptr[869])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_683__TRANSLATE_MACROEXPANDED_LIST#10", NULL != ( /*_.COMPILE2OBJ_HOOK__V163*/ meltfptr[162])); - ((meltroutine_ptr_t) /*_.VALROUT___V870*/ meltfptr[869])->tabval[10] = + ((meltroutine_ptr_t) /*_._VALROUT___V870*/ meltfptr[869])->tabval[10] = (melt_ptr_t) ( /*_.COMPILE2OBJ_HOOK__V163*/ meltfptr[162]); MELT_LOCATION ("warmelt-outobj.melt:6357:/ initchunk"); @@ -45767,13 +45842,13 @@ meltmod__warmelt_outobj__initialmeltchunk_15 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V870*/ meltfptr[869])) + ( /*_._VALROUT___V870*/ meltfptr[869])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_683__TRANSLATE_MACROEXPANDED_LIST#11", NULL != ( /*_.CLASS_NREP_ANYPROC__V159*/ meltfptr[158])); - ((meltroutine_ptr_t) /*_.VALROUT___V870*/ meltfptr[869])->tabval[11] = + ((meltroutine_ptr_t) /*_._VALROUT___V870*/ meltfptr[869])->tabval[11] = (melt_ptr_t) ( /*_.CLASS_NREP_ANYPROC__V159*/ meltfptr[158]); MELT_LOCATION ("warmelt-outobj.melt:6357:/ initchunk"); @@ -45782,13 +45857,13 @@ meltmod__warmelt_outobj__initialmeltchunk_15 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V870*/ meltfptr[869])) + ( /*_._VALROUT___V870*/ meltfptr[869])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_683__TRANSLATE_MACROEXPANDED_LIST#12", NULL != ( /*_.COMPILE2OBJ_PROCEDURE__V164*/ meltfptr[163])); - ((meltroutine_ptr_t) /*_.VALROUT___V870*/ meltfptr[869])->tabval[12] = + ((meltroutine_ptr_t) /*_._VALROUT___V870*/ meltfptr[869])->tabval[12] = (melt_ptr_t) ( /*_.COMPILE2OBJ_PROCEDURE__V164*/ meltfptr[163]); MELT_LOCATION ("warmelt-outobj.melt:6357:/ initchunk"); @@ -45797,14 +45872,14 @@ meltmod__warmelt_outobj__initialmeltchunk_15 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V870*/ meltfptr[869])) + ( /*_._VALROUT___V870*/ meltfptr[869])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_683__TRANSLATE_MACROEXPANDED_LIST#13", - NULL != ( /*_.VALSTR___V872*/ meltfptr[871])); - ((meltroutine_ptr_t) /*_.VALROUT___V870*/ meltfptr[869])->tabval[13] = - (melt_ptr_t) ( /*_.VALSTR___V872*/ meltfptr[871]); + NULL != ( /*_._VALSTR___V872*/ meltfptr[871])); + ((meltroutine_ptr_t) /*_._VALROUT___V870*/ meltfptr[869])->tabval[13] = + (melt_ptr_t) ( /*_._VALSTR___V872*/ meltfptr[871]); MELT_LOCATION ("warmelt-outobj.melt:6357:/ initchunk"); /*^putroutconst */ @@ -45812,13 +45887,13 @@ meltmod__warmelt_outobj__initialmeltchunk_15 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V870*/ meltfptr[869])) + ( /*_._VALROUT___V870*/ meltfptr[869])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_683__TRANSLATE_MACROEXPANDED_LIST#14", NULL != ( /*_.CLASS_NREP_INITPROC__V161*/ meltfptr[160])); - ((meltroutine_ptr_t) /*_.VALROUT___V870*/ meltfptr[869])->tabval[14] = + ((meltroutine_ptr_t) /*_._VALROUT___V870*/ meltfptr[869])->tabval[14] = (melt_ptr_t) ( /*_.CLASS_NREP_INITPROC__V161*/ meltfptr[160]); MELT_LOCATION ("warmelt-outobj.melt:6357:/ initchunk"); @@ -45827,13 +45902,13 @@ meltmod__warmelt_outobj__initialmeltchunk_15 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V870*/ meltfptr[869])) + ( /*_._VALROUT___V870*/ meltfptr[869])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_683__TRANSLATE_MACROEXPANDED_LIST#15", NULL != ( /*_.LIST_TO_MULTIPLE__V67*/ meltfptr[66])); - ((meltroutine_ptr_t) /*_.VALROUT___V870*/ meltfptr[869])->tabval[15] = + ((meltroutine_ptr_t) /*_._VALROUT___V870*/ meltfptr[869])->tabval[15] = (melt_ptr_t) ( /*_.LIST_TO_MULTIPLE__V67*/ meltfptr[66]); MELT_LOCATION ("warmelt-outobj.melt:6357:/ initchunk"); @@ -45842,13 +45917,13 @@ meltmod__warmelt_outobj__initialmeltchunk_15 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V870*/ meltfptr[869])) + ( /*_._VALROUT___V870*/ meltfptr[869])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_683__TRANSLATE_MACROEXPANDED_LIST#16", NULL != ( /*_.DISCR_MULTIPLE__V68*/ meltfptr[67])); - ((meltroutine_ptr_t) /*_.VALROUT___V870*/ meltfptr[869])->tabval[16] = + ((meltroutine_ptr_t) /*_._VALROUT___V870*/ meltfptr[869])->tabval[16] = (melt_ptr_t) ( /*_.DISCR_MULTIPLE__V68*/ meltfptr[67]); MELT_LOCATION ("warmelt-outobj.melt:6357:/ initchunk"); @@ -45857,13 +45932,13 @@ meltmod__warmelt_outobj__initialmeltchunk_15 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V870*/ meltfptr[869])) + ( /*_._VALROUT___V870*/ meltfptr[869])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_683__TRANSLATE_MACROEXPANDED_LIST#17", NULL != ( /*_.ADD2OUT__V15*/ meltfptr[14])); - ((meltroutine_ptr_t) /*_.VALROUT___V870*/ meltfptr[869])->tabval[17] = + ((meltroutine_ptr_t) /*_._VALROUT___V870*/ meltfptr[869])->tabval[17] = (melt_ptr_t) ( /*_.ADD2OUT__V15*/ meltfptr[14]); MELT_LOCATION ("warmelt-outobj.melt:6357:/ initchunk"); @@ -45872,13 +45947,13 @@ meltmod__warmelt_outobj__initialmeltchunk_15 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V870*/ meltfptr[869])) + ( /*_._VALROUT___V870*/ meltfptr[869])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_683__TRANSLATE_MACROEXPANDED_LIST#18", NULL != ( /*_.DISCR_STRING__V54*/ meltfptr[53])); - ((meltroutine_ptr_t) /*_.VALROUT___V870*/ meltfptr[869])->tabval[18] = + ((meltroutine_ptr_t) /*_._VALROUT___V870*/ meltfptr[869])->tabval[18] = (melt_ptr_t) ( /*_.DISCR_STRING__V54*/ meltfptr[53]); MELT_LOCATION ("warmelt-outobj.melt:6357:/ initchunk"); @@ -45887,13 +45962,13 @@ meltmod__warmelt_outobj__initialmeltchunk_15 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V870*/ meltfptr[869])) + ( /*_._VALROUT___V870*/ meltfptr[869])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_683__TRANSLATE_MACROEXPANDED_LIST#19", NULL != ( /*_.DISCR_VERBATIM_STRING__V88*/ meltfptr[87])); - ((meltroutine_ptr_t) /*_.VALROUT___V870*/ meltfptr[869])->tabval[19] = + ((meltroutine_ptr_t) /*_._VALROUT___V870*/ meltfptr[869])->tabval[19] = (melt_ptr_t) ( /*_.DISCR_VERBATIM_STRING__V88*/ meltfptr[87]); MELT_LOCATION ("warmelt-outobj.melt:6357:/ initchunk"); @@ -45902,13 +45977,13 @@ meltmod__warmelt_outobj__initialmeltchunk_15 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V870*/ meltfptr[869])) + ( /*_._VALROUT___V870*/ meltfptr[869])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_683__TRANSLATE_MACROEXPANDED_LIST#20", NULL != ( /*_.CTYPE_VALUE__V32*/ meltfptr[31])); - ((meltroutine_ptr_t) /*_.VALROUT___V870*/ meltfptr[869])->tabval[20] = + ((meltroutine_ptr_t) /*_._VALROUT___V870*/ meltfptr[869])->tabval[20] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V32*/ meltfptr[31]); MELT_LOCATION ("warmelt-outobj.melt:6357:/ initchunk"); @@ -45917,13 +45992,13 @@ meltmod__warmelt_outobj__initialmeltchunk_15 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V870*/ meltfptr[869])) + ( /*_._VALROUT___V870*/ meltfptr[869])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_683__TRANSLATE_MACROEXPANDED_LIST#21", NULL != ( /*_.CLASS_CTYPE__V29*/ meltfptr[28])); - ((meltroutine_ptr_t) /*_.VALROUT___V870*/ meltfptr[869])->tabval[21] = + ((meltroutine_ptr_t) /*_._VALROUT___V870*/ meltfptr[869])->tabval[21] = (melt_ptr_t) ( /*_.CLASS_CTYPE__V29*/ meltfptr[28]); MELT_LOCATION ("warmelt-outobj.melt:6357:/ initchunk"); @@ -45932,14 +46007,14 @@ meltmod__warmelt_outobj__initialmeltchunk_15 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V870*/ meltfptr[869])) + ( /*_._VALROUT___V870*/ meltfptr[869])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_683__TRANSLATE_MACROEXPANDED_LIST#22", NULL != ( /*_.CLASS_NORMAL_MODULE_VARIABLE_BINDING__V11*/ meltfptr[10])); - ((meltroutine_ptr_t) /*_.VALROUT___V870*/ meltfptr[869])->tabval[22] = + ((meltroutine_ptr_t) /*_._VALROUT___V870*/ meltfptr[869])->tabval[22] = (melt_ptr_t) ( /*_.CLASS_NORMAL_MODULE_VARIABLE_BINDING__V11*/ meltfptr[10]); @@ -45948,12 +46023,12 @@ meltmod__warmelt_outobj__initialmeltchunk_15 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V870*/ meltfptr[869])) == + ( /*_._VALROUT___V870*/ meltfptr[869])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V211*/ meltfptr[210]); - ((meltroutine_ptr_t) /*_.VALROUT___V870*/ meltfptr[869])->tabval[23] = - (melt_ptr_t) ( /*_.VALCLO___V211*/ meltfptr[210]); + NULL != /*_._VALCLO___V211*/ meltfptr[210]); + ((meltroutine_ptr_t) /*_._VALROUT___V870*/ meltfptr[869])->tabval[23] = + (melt_ptr_t) ( /*_._VALCLO___V211*/ meltfptr[210]); MELT_LOCATION ("warmelt-outobj.melt:6357:/ initchunk"); /*^putroutconst */ @@ -45961,13 +46036,13 @@ meltmod__warmelt_outobj__initialmeltchunk_15 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V870*/ meltfptr[869])) + ( /*_._VALROUT___V870*/ meltfptr[869])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_683__TRANSLATE_MACROEXPANDED_LIST#24", NULL != ( /*_.CLASS_SOURCE_CHEADER__V165*/ meltfptr[164])); - ((meltroutine_ptr_t) /*_.VALROUT___V870*/ meltfptr[869])->tabval[24] = + ((meltroutine_ptr_t) /*_._VALROUT___V870*/ meltfptr[869])->tabval[24] = (melt_ptr_t) ( /*_.CLASS_SOURCE_CHEADER__V165*/ meltfptr[164]); MELT_LOCATION ("warmelt-outobj.melt:6357:/ initchunk"); @@ -45976,13 +46051,13 @@ meltmod__warmelt_outobj__initialmeltchunk_15 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V870*/ meltfptr[869])) + ( /*_._VALROUT___V870*/ meltfptr[869])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_683__TRANSLATE_MACROEXPANDED_LIST#25", NULL != ( /*_.CLASS_LOCATED__V144*/ meltfptr[143])); - ((meltroutine_ptr_t) /*_.VALROUT___V870*/ meltfptr[869])->tabval[25] = + ((meltroutine_ptr_t) /*_._VALROUT___V870*/ meltfptr[869])->tabval[25] = (melt_ptr_t) ( /*_.CLASS_LOCATED__V144*/ meltfptr[143]); MELT_LOCATION ("warmelt-outobj.melt:6357:/ initchunk"); @@ -45991,13 +46066,13 @@ meltmod__warmelt_outobj__initialmeltchunk_15 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V870*/ meltfptr[869])) + ( /*_._VALROUT___V870*/ meltfptr[869])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_683__TRANSLATE_MACROEXPANDED_LIST#26", NULL != ( /*_.CLASS_SOURCE_CODE_STRING__V166*/ meltfptr[165])); - ((meltroutine_ptr_t) /*_.VALROUT___V870*/ meltfptr[869])->tabval[26] = + ((meltroutine_ptr_t) /*_._VALROUT___V870*/ meltfptr[869])->tabval[26] = (melt_ptr_t) ( /*_.CLASS_SOURCE_CODE_STRING__V166*/ meltfptr[165]); MELT_LOCATION ("warmelt-outobj.melt:6357:/ initchunk"); @@ -46005,12 +46080,12 @@ meltmod__warmelt_outobj__initialmeltchunk_15 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V870*/ meltfptr[869])) == + ( /*_._VALROUT___V870*/ meltfptr[869])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V263*/ meltfptr[262]); - ((meltroutine_ptr_t) /*_.VALROUT___V870*/ meltfptr[869])->tabval[27] = - (melt_ptr_t) ( /*_.VALCLO___V263*/ meltfptr[262]); + NULL != /*_._VALCLO___V263*/ meltfptr[262]); + ((meltroutine_ptr_t) /*_._VALROUT___V870*/ meltfptr[869])->tabval[27] = + (melt_ptr_t) ( /*_._VALCLO___V263*/ meltfptr[262]); MELT_LOCATION ("warmelt-outobj.melt:6357:/ initchunk"); /*^putroutconst */ @@ -46018,13 +46093,13 @@ meltmod__warmelt_outobj__initialmeltchunk_15 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V870*/ meltfptr[869])) + ( /*_._VALROUT___V870*/ meltfptr[869])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_683__TRANSLATE_MACROEXPANDED_LIST#28", NULL != ( /*_.CLASS_SOURCE_CIMPLEMENT__V167*/ meltfptr[166])); - ((meltroutine_ptr_t) /*_.VALROUT___V870*/ meltfptr[869])->tabval[28] = + ((meltroutine_ptr_t) /*_._VALROUT___V870*/ meltfptr[869])->tabval[28] = (melt_ptr_t) ( /*_.CLASS_SOURCE_CIMPLEMENT__V167*/ meltfptr[166]); MELT_LOCATION ("warmelt-outobj.melt:6357:/ initchunk"); @@ -46033,13 +46108,13 @@ meltmod__warmelt_outobj__initialmeltchunk_15 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V870*/ meltfptr[869])) + ( /*_._VALROUT___V870*/ meltfptr[869])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_683__TRANSLATE_MACROEXPANDED_LIST#29", NULL != ( /*_.CLASS_HOOKROUTINEOBJ__V61*/ meltfptr[60])); - ((meltroutine_ptr_t) /*_.VALROUT___V870*/ meltfptr[869])->tabval[29] = + ((meltroutine_ptr_t) /*_._VALROUT___V870*/ meltfptr[869])->tabval[29] = (melt_ptr_t) ( /*_.CLASS_HOOKROUTINEOBJ__V61*/ meltfptr[60]); MELT_LOCATION ("warmelt-outobj.melt:6357:/ initchunk"); @@ -46048,13 +46123,13 @@ meltmod__warmelt_outobj__initialmeltchunk_15 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V870*/ meltfptr[869])) + ( /*_._VALROUT___V870*/ meltfptr[869])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_683__TRANSLATE_MACROEXPANDED_LIST#30", NULL != ( /*_.CLASS_ROUTINEOBJ__V59*/ meltfptr[58])); - ((meltroutine_ptr_t) /*_.VALROUT___V870*/ meltfptr[869])->tabval[30] = + ((meltroutine_ptr_t) /*_._VALROUT___V870*/ meltfptr[869])->tabval[30] = (melt_ptr_t) ( /*_.CLASS_ROUTINEOBJ__V59*/ meltfptr[58]); MELT_LOCATION ("warmelt-outobj.melt:6357:/ initchunk"); @@ -46063,13 +46138,13 @@ meltmod__warmelt_outobj__initialmeltchunk_15 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V870*/ meltfptr[869])) + ( /*_._VALROUT___V870*/ meltfptr[869])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_683__TRANSLATE_MACROEXPANDED_LIST#31", NULL != ( /*_.CLASS_NREP_DATAHOOK__V162*/ meltfptr[161])); - ((meltroutine_ptr_t) /*_.VALROUT___V870*/ meltfptr[869])->tabval[31] = + ((meltroutine_ptr_t) /*_._VALROUT___V870*/ meltfptr[869])->tabval[31] = (melt_ptr_t) ( /*_.CLASS_NREP_DATAHOOK__V162*/ meltfptr[161]); MELT_LOCATION ("warmelt-outobj.melt:6357:/ initchunk"); @@ -46078,13 +46153,13 @@ meltmod__warmelt_outobj__initialmeltchunk_15 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V870*/ meltfptr[869])) + ( /*_._VALROUT___V870*/ meltfptr[869])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_683__TRANSLATE_MACROEXPANDED_LIST#32", NULL != ( /*_.CLASS_PROCROUTINEOBJ__V60*/ meltfptr[59])); - ((meltroutine_ptr_t) /*_.VALROUT___V870*/ meltfptr[869])->tabval[32] = + ((meltroutine_ptr_t) /*_._VALROUT___V870*/ meltfptr[869])->tabval[32] = (melt_ptr_t) ( /*_.CLASS_PROCROUTINEOBJ__V60*/ meltfptr[59]); MELT_LOCATION ("warmelt-outobj.melt:6357:/ initchunk"); @@ -46092,24 +46167,24 @@ meltmod__warmelt_outobj__initialmeltchunk_15 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V870*/ meltfptr[869])) == + ( /*_._VALROUT___V870*/ meltfptr[869])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V778*/ meltfptr[777]); - ((meltroutine_ptr_t) /*_.VALROUT___V870*/ meltfptr[869])->tabval[33] = - (melt_ptr_t) ( /*_.VALCLO___V778*/ meltfptr[777]); + NULL != /*_._VALCLO___V778*/ meltfptr[777]); + ((meltroutine_ptr_t) /*_._VALROUT___V870*/ meltfptr[869])->tabval[33] = + (melt_ptr_t) ( /*_._VALCLO___V778*/ meltfptr[777]); MELT_LOCATION ("warmelt-outobj.melt:6357:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V870*/ meltfptr[869])) == + ( /*_._VALROUT___V870*/ meltfptr[869])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALDATA___V734*/ meltfptr[733]); - ((meltroutine_ptr_t) /*_.VALROUT___V870*/ meltfptr[869])->tabval[34] = - (melt_ptr_t) ( /*_.VALDATA___V734*/ meltfptr[733]); + NULL != /*_._VALDATA___V734*/ meltfptr[733]); + ((meltroutine_ptr_t) /*_._VALROUT___V870*/ meltfptr[869])->tabval[34] = + (melt_ptr_t) ( /*_._VALDATA___V734*/ meltfptr[733]); MELT_LOCATION ("warmelt-outobj.melt:6357:/ initchunk"); /*^putroutconst */ @@ -46117,13 +46192,13 @@ meltmod__warmelt_outobj__initialmeltchunk_15 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V870*/ meltfptr[869])) + ( /*_._VALROUT___V870*/ meltfptr[869])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_683__TRANSLATE_MACROEXPANDED_LIST#35", NULL != ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20])); - ((meltroutine_ptr_t) /*_.VALROUT___V870*/ meltfptr[869])->tabval[35] = + ((meltroutine_ptr_t) /*_._VALROUT___V870*/ meltfptr[869])->tabval[35] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]); MELT_LOCATION ("warmelt-outobj.melt:6357:/ initchunk"); @@ -46131,48 +46206,48 @@ meltmod__warmelt_outobj__initialmeltchunk_15 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V870*/ meltfptr[869])) == + ( /*_._VALROUT___V870*/ meltfptr[869])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V844*/ meltfptr[843]); - ((meltroutine_ptr_t) /*_.VALROUT___V870*/ meltfptr[869])->tabval[36] = - (melt_ptr_t) ( /*_.VALCLO___V844*/ meltfptr[843]); + NULL != /*_._VALCLO___V844*/ meltfptr[843]); + ((meltroutine_ptr_t) /*_._VALROUT___V870*/ meltfptr[869])->tabval[36] = + (melt_ptr_t) ( /*_._VALCLO___V844*/ meltfptr[843]); MELT_LOCATION ("warmelt-outobj.melt:6357:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V870*/ meltfptr[869])) == + ( /*_._VALROUT___V870*/ meltfptr[869])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V729*/ meltfptr[728]); - ((meltroutine_ptr_t) /*_.VALROUT___V870*/ meltfptr[869])->tabval[37] = - (melt_ptr_t) ( /*_.VALCLO___V729*/ meltfptr[728]); + NULL != /*_._VALCLO___V729*/ meltfptr[728]); + ((meltroutine_ptr_t) /*_._VALROUT___V870*/ meltfptr[869])->tabval[37] = + (melt_ptr_t) ( /*_._VALCLO___V729*/ meltfptr[728]); MELT_LOCATION ("warmelt-outobj.melt:6357:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V870*/ meltfptr[869])) == + ( /*_._VALROUT___V870*/ meltfptr[869])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V867*/ meltfptr[866]); - ((meltroutine_ptr_t) /*_.VALROUT___V870*/ meltfptr[869])->tabval[38] = - (melt_ptr_t) ( /*_.VALCLO___V867*/ meltfptr[866]); + NULL != /*_._VALCLO___V867*/ meltfptr[866]); + ((meltroutine_ptr_t) /*_._VALROUT___V870*/ meltfptr[869])->tabval[38] = + (melt_ptr_t) ( /*_._VALCLO___V867*/ meltfptr[866]); MELT_LOCATION ("warmelt-outobj.melt:6357:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V870*/ meltfptr[869])) == + ( /*_._VALROUT___V870*/ meltfptr[869])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALDATA___V192*/ meltfptr[191]); - ((meltroutine_ptr_t) /*_.VALROUT___V870*/ meltfptr[869])->tabval[39] = - (melt_ptr_t) ( /*_.VALDATA___V192*/ meltfptr[191]); + NULL != /*_._VALDATA___V192*/ meltfptr[191]); + ((meltroutine_ptr_t) /*_._VALROUT___V870*/ meltfptr[869])->tabval[39] = + (melt_ptr_t) ( /*_._VALDATA___V192*/ meltfptr[191]); MELT_LOCATION ("warmelt-outobj.melt:6357:/ initchunk"); /*^putroutconst */ @@ -46180,13 +46255,13 @@ meltmod__warmelt_outobj__initialmeltchunk_15 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V870*/ meltfptr[869])) + ( /*_._VALROUT___V870*/ meltfptr[869])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_683__TRANSLATE_MACROEXPANDED_LIST#40", NULL != ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_.VALROUT___V870*/ meltfptr[869])->tabval[40] = + ((meltroutine_ptr_t) /*_._VALROUT___V870*/ meltfptr[869])->tabval[40] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:6357:/ initchunk"); @@ -46194,12 +46269,12 @@ meltmod__warmelt_outobj__initialmeltchunk_15 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V870*/ meltfptr[869])) == + ( /*_._VALROUT___V870*/ meltfptr[869])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V786*/ meltfptr[785]); - ((meltroutine_ptr_t) /*_.VALROUT___V870*/ meltfptr[869])->tabval[41] = - (melt_ptr_t) ( /*_.VALCLO___V786*/ meltfptr[785]); + NULL != /*_._VALCLO___V786*/ meltfptr[785]); + ((meltroutine_ptr_t) /*_._VALROUT___V870*/ meltfptr[869])->tabval[41] = + (melt_ptr_t) ( /*_._VALCLO___V786*/ meltfptr[785]); MELT_LOCATION ("warmelt-outobj.melt:6357:/ initchunk"); /*^putroutconst */ @@ -46207,164 +46282,164 @@ meltmod__warmelt_outobj__initialmeltchunk_15 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V870*/ meltfptr[869])) + ( /*_._VALROUT___V870*/ meltfptr[869])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_683__TRANSLATE_MACROEXPANDED_LIST#42", - NULL != ( /*_.VALSTR___V873*/ meltfptr[872])); - ((meltroutine_ptr_t) /*_.VALROUT___V870*/ meltfptr[869])->tabval[42] = - (melt_ptr_t) ( /*_.VALSTR___V873*/ meltfptr[872]); + NULL != ( /*_._VALSTR___V873*/ meltfptr[872])); + ((meltroutine_ptr_t) /*_._VALROUT___V870*/ meltfptr[869])->tabval[42] = + (melt_ptr_t) ( /*_._VALSTR___V873*/ meltfptr[872]); MELT_LOCATION ("warmelt-outobj.melt:6357:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V870*/ meltfptr[869]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V870*/ meltfptr[869]); /*putclosurout#124 */ melt_assertmsg ("putclosrout#124 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V874*/ meltfptr[873])) == + ( /*_._VALCLO___V874*/ meltfptr[873])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#124 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V870*/ meltfptr[869])) == + ( /*_._VALROUT___V870*/ meltfptr[869])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V874*/ meltfptr[873])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V870*/ meltfptr[869]); + ((meltclosure_ptr_t) /*_._VALCLO___V874*/ meltfptr[873])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V870*/ meltfptr[869]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V874*/ meltfptr[873]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V874*/ meltfptr[873]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V875*/ meltfptr[874])) == + ( /*_._VALDATA___V875*/ meltfptr[874])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V875*/ + ( /*_._VALDATA___V875*/ meltfptr[874])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V875*/ meltfptr[874]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V875*/ meltfptr[874]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V876*/ meltfptr[875]); + /*_._VALSTR___V876*/ meltfptr[875]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V875*/ meltfptr[874]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V875*/ meltfptr[874]); - melt_dbgtrace_written_object ( /*_.VALDATA___V875*/ meltfptr[874], + melt_dbgtrace_written_object ( /*_._VALDATA___V875*/ meltfptr[874], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V877*/ meltfptr[876])) == + ( /*_._VALDATA___V877*/ meltfptr[876])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V877*/ + ( /*_._VALDATA___V877*/ meltfptr[876])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V877*/ meltfptr[876]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V877*/ meltfptr[876]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V878*/ meltfptr[877]); + /*_._VALSTR___V878*/ meltfptr[877]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V877*/ meltfptr[876]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V877*/ meltfptr[876]); - melt_dbgtrace_written_object ( /*_.VALDATA___V877*/ meltfptr[876], + melt_dbgtrace_written_object ( /*_._VALDATA___V877*/ meltfptr[876], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V879*/ meltfptr[878])) == + ( /*_._VALDATA___V879*/ meltfptr[878])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V879*/ + ( /*_._VALDATA___V879*/ meltfptr[878])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V879*/ meltfptr[878]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V879*/ meltfptr[878]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V880*/ meltfptr[879]); + /*_._VALSTR___V880*/ meltfptr[879]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V879*/ meltfptr[878]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V879*/ meltfptr[878]); - melt_dbgtrace_written_object ( /*_.VALDATA___V879*/ meltfptr[878], + melt_dbgtrace_written_object ( /*_._VALDATA___V879*/ meltfptr[878], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V881*/ meltfptr[880])) == + ( /*_._VALDATA___V881*/ meltfptr[880])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V881*/ + ( /*_._VALDATA___V881*/ meltfptr[880])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V881*/ meltfptr[880]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V881*/ meltfptr[880]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V882*/ meltfptr[881]); + /*_._VALSTR___V882*/ meltfptr[881]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V881*/ meltfptr[880]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V881*/ meltfptr[880]); - melt_dbgtrace_written_object ( /*_.VALDATA___V881*/ meltfptr[880], + melt_dbgtrace_written_object ( /*_._VALDATA___V881*/ meltfptr[880], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V883*/ meltfptr[882])) == + ( /*_._VALDATA___V883*/ meltfptr[882])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V883*/ + ( /*_._VALDATA___V883*/ meltfptr[882])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V883*/ meltfptr[882]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V883*/ meltfptr[882]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V884*/ meltfptr[883]); + /*_._VALSTR___V884*/ meltfptr[883]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V883*/ meltfptr[882]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V883*/ meltfptr[882]); - melt_dbgtrace_written_object ( /*_.VALDATA___V883*/ meltfptr[882], + melt_dbgtrace_written_object ( /*_._VALDATA___V883*/ meltfptr[882], "new static instance"); /*putclosurout#125 */ melt_assertmsg ("putclosrout#125 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V886*/ meltfptr[885])) == + ( /*_._VALCLO___V886*/ meltfptr[885])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#125 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V885*/ meltfptr[884])) == + ( /*_._VALROUT___V885*/ meltfptr[884])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V886*/ meltfptr[885])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V885*/ meltfptr[884]); + ((meltclosure_ptr_t) /*_._VALCLO___V886*/ meltfptr[885])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V885*/ meltfptr[884]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V886*/ meltfptr[885]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V886*/ meltfptr[885]); MELT_LOCATION ("warmelt-outobj.melt:6906:/ initchunk"); /*^putroutconst */ @@ -46372,12 +46447,12 @@ meltmod__warmelt_outobj__initialmeltchunk_15 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V887*/ meltfptr[886])) + ( /*_._VALROUT___V887*/ meltfptr[886])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_700__COMPILE_LIST_SEXPR#0", NULL != ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7])); - ((meltroutine_ptr_t) /*_.VALROUT___V887*/ meltfptr[886])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V887*/ meltfptr[886])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7]); MELT_LOCATION ("warmelt-outobj.melt:6906:/ initchunk"); @@ -46386,12 +46461,12 @@ meltmod__warmelt_outobj__initialmeltchunk_15 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V887*/ meltfptr[886])) + ( /*_._VALROUT___V887*/ meltfptr[886])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_700__COMPILE_LIST_SEXPR#1", NULL != ( /*_.CLASS_ENVIRONMENT__V154*/ meltfptr[153])); - ((meltroutine_ptr_t) /*_.VALROUT___V887*/ meltfptr[886])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V887*/ meltfptr[886])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V154*/ meltfptr[153]); MELT_LOCATION ("warmelt-outobj.melt:6906:/ initchunk"); @@ -46400,12 +46475,12 @@ meltmod__warmelt_outobj__initialmeltchunk_15 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V887*/ meltfptr[886])) + ( /*_._VALROUT___V887*/ meltfptr[886])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_700__COMPILE_LIST_SEXPR#2", NULL != ( /*_.DISCR_STRING__V54*/ meltfptr[53])); - ((meltroutine_ptr_t) /*_.VALROUT___V887*/ meltfptr[886])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V887*/ meltfptr[886])->tabval[2] = (melt_ptr_t) ( /*_.DISCR_STRING__V54*/ meltfptr[53]); MELT_LOCATION ("warmelt-outobj.melt:6906:/ initchunk"); @@ -46414,12 +46489,12 @@ meltmod__warmelt_outobj__initialmeltchunk_15 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V887*/ meltfptr[886])) + ( /*_._VALROUT___V887*/ meltfptr[886])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_700__COMPILE_LIST_SEXPR#3", NULL != ( /*_.CLASS_MODULE_CONTEXT__V168*/ meltfptr[167])); - ((meltroutine_ptr_t) /*_.VALROUT___V887*/ meltfptr[886])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V887*/ meltfptr[886])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_MODULE_CONTEXT__V168*/ meltfptr[167]); MELT_LOCATION ("warmelt-outobj.melt:6906:/ initchunk"); @@ -46428,12 +46503,12 @@ meltmod__warmelt_outobj__initialmeltchunk_15 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V887*/ meltfptr[886])) + ( /*_._VALROUT___V887*/ meltfptr[886])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_700__COMPILE_LIST_SEXPR#4", NULL != ( /*_.DISCR_MAP_STRINGS__V169*/ meltfptr[168])); - ((meltroutine_ptr_t) /*_.VALROUT___V887*/ meltfptr[886])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V887*/ meltfptr[886])->tabval[4] = (melt_ptr_t) ( /*_.DISCR_MAP_STRINGS__V169*/ meltfptr[168]); MELT_LOCATION ("warmelt-outobj.melt:6906:/ initchunk"); @@ -46442,12 +46517,12 @@ meltmod__warmelt_outobj__initialmeltchunk_15 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V887*/ meltfptr[886])) + ( /*_._VALROUT___V887*/ meltfptr[886])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_700__COMPILE_LIST_SEXPR#5", NULL != ( /*_.DISCR_INTEGER__V53*/ meltfptr[52])); - ((meltroutine_ptr_t) /*_.VALROUT___V887*/ meltfptr[886])->tabval[5] = + ((meltroutine_ptr_t) /*_._VALROUT___V887*/ meltfptr[886])->tabval[5] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V53*/ meltfptr[52]); MELT_LOCATION ("warmelt-outobj.melt:6906:/ initchunk"); @@ -46456,12 +46531,12 @@ meltmod__warmelt_outobj__initialmeltchunk_15 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V887*/ meltfptr[886])) + ( /*_._VALROUT___V887*/ meltfptr[886])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_700__COMPILE_LIST_SEXPR#6", NULL != ( /*_.DISCR_LIST__V66*/ meltfptr[65])); - ((meltroutine_ptr_t) /*_.VALROUT___V887*/ meltfptr[886])->tabval[6] = + ((meltroutine_ptr_t) /*_._VALROUT___V887*/ meltfptr[886])->tabval[6] = (melt_ptr_t) ( /*_.DISCR_LIST__V66*/ meltfptr[65]); MELT_LOCATION ("warmelt-outobj.melt:6906:/ initchunk"); @@ -46469,29 +46544,29 @@ meltmod__warmelt_outobj__initialmeltchunk_15 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V887*/ meltfptr[886])) == + ( /*_._VALROUT___V887*/ meltfptr[886])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V886*/ meltfptr[885]); - ((meltroutine_ptr_t) /*_.VALROUT___V887*/ meltfptr[886])->tabval[7] = - (melt_ptr_t) ( /*_.VALCLO___V886*/ meltfptr[885]); + NULL != /*_._VALCLO___V886*/ meltfptr[885]); + ((meltroutine_ptr_t) /*_._VALROUT___V887*/ meltfptr[886])->tabval[7] = + (melt_ptr_t) ( /*_._VALCLO___V886*/ meltfptr[885]); MELT_LOCATION ("warmelt-outobj.melt:6934:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V888*/ meltfptr[887])) == + ( /*_._VALROUT___V888*/ meltfptr[887])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V886*/ meltfptr[885]); - ((meltroutine_ptr_t) /*_.VALROUT___V888*/ meltfptr[887])->tabval[0] = - (melt_ptr_t) ( /*_.VALCLO___V886*/ meltfptr[885]); + NULL != /*_._VALCLO___V886*/ meltfptr[885]); + ((meltroutine_ptr_t) /*_._VALROUT___V888*/ meltfptr[887])->tabval[0] = + (melt_ptr_t) ( /*_._VALCLO___V886*/ meltfptr[885]); MELT_LOCATION ("warmelt-outobj.melt:6934:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V888*/ meltfptr[887]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V888*/ meltfptr[887]); MELT_LOCATION ("warmelt-outobj.melt:6906:/ initchunk"); /*^putroutconst */ @@ -46499,13 +46574,13 @@ meltmod__warmelt_outobj__initialmeltchunk_15 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V887*/ meltfptr[886])) + ( /*_._VALROUT___V887*/ meltfptr[886])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_700__COMPILE_LIST_SEXPR#8", - NULL != ( /*_.VALROUT___V888*/ meltfptr[887])); - ((meltroutine_ptr_t) /*_.VALROUT___V887*/ meltfptr[886])->tabval[8] = - (melt_ptr_t) ( /*_.VALROUT___V888*/ meltfptr[887]); + NULL != ( /*_._VALROUT___V888*/ meltfptr[887])); + ((meltroutine_ptr_t) /*_._VALROUT___V887*/ meltfptr[886])->tabval[8] = + (melt_ptr_t) ( /*_._VALROUT___V888*/ meltfptr[887]); MELT_LOCATION ("warmelt-outobj.melt:6906:/ initchunk"); /*^putroutconst */ @@ -46513,12 +46588,12 @@ meltmod__warmelt_outobj__initialmeltchunk_15 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V887*/ meltfptr[886])) + ( /*_._VALROUT___V887*/ meltfptr[886])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_700__COMPILE_LIST_SEXPR#9", NULL != ( /*_.CREATE_NORMCONTEXT__V170*/ meltfptr[169])); - ((meltroutine_ptr_t) /*_.VALROUT___V887*/ meltfptr[886])->tabval[9] = + ((meltroutine_ptr_t) /*_._VALROUT___V887*/ meltfptr[886])->tabval[9] = (melt_ptr_t) ( /*_.CREATE_NORMCONTEXT__V170*/ meltfptr[169]); MELT_LOCATION ("warmelt-outobj.melt:6906:/ initchunk"); @@ -46527,12 +46602,12 @@ meltmod__warmelt_outobj__initialmeltchunk_15 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V887*/ meltfptr[886])) + ( /*_._VALROUT___V887*/ meltfptr[886])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_700__COMPILE_LIST_SEXPR#10", NULL != ( /*_.INITIAL_ENVIRONMENT__V171*/ meltfptr[170])); - ((meltroutine_ptr_t) /*_.VALROUT___V887*/ meltfptr[886])->tabval[10] = + ((meltroutine_ptr_t) /*_._VALROUT___V887*/ meltfptr[886])->tabval[10] = (melt_ptr_t) ( /*_.INITIAL_ENVIRONMENT__V171*/ meltfptr[170]); MELT_LOCATION ("warmelt-outobj.melt:6906:/ initchunk"); @@ -46541,13 +46616,13 @@ meltmod__warmelt_outobj__initialmeltchunk_15 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V887*/ meltfptr[886])) + ( /*_._VALROUT___V887*/ meltfptr[886])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_700__COMPILE_LIST_SEXPR#11", NULL != ( /*_.CLASS_NORMALIZATION_CONTEXT__V153*/ meltfptr[152])); - ((meltroutine_ptr_t) /*_.VALROUT___V887*/ meltfptr[886])->tabval[11] = + ((meltroutine_ptr_t) /*_._VALROUT___V887*/ meltfptr[886])->tabval[11] = (melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V153*/ meltfptr[152]); MELT_LOCATION ("warmelt-outobj.melt:6906:/ initchunk"); @@ -46556,13 +46631,13 @@ meltmod__warmelt_outobj__initialmeltchunk_15 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V887*/ meltfptr[886])) + ( /*_._VALROUT___V887*/ meltfptr[886])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_700__COMPILE_LIST_SEXPR#12", NULL != ( /*_.MACROEXPAND_TOPLEVEL_LIST__V172*/ meltfptr[171])); - ((meltroutine_ptr_t) /*_.VALROUT___V887*/ meltfptr[886])->tabval[12] = + ((meltroutine_ptr_t) /*_._VALROUT___V887*/ meltfptr[886])->tabval[12] = (melt_ptr_t) ( /*_.MACROEXPAND_TOPLEVEL_LIST__V172*/ meltfptr[171]); MELT_LOCATION ("warmelt-outobj.melt:6906:/ initchunk"); @@ -46571,12 +46646,12 @@ meltmod__warmelt_outobj__initialmeltchunk_15 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V887*/ meltfptr[886])) + ( /*_._VALROUT___V887*/ meltfptr[886])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_700__COMPILE_LIST_SEXPR#13", NULL != ( /*_.MACROEXPAND_1__V173*/ meltfptr[172])); - ((meltroutine_ptr_t) /*_.VALROUT___V887*/ meltfptr[886])->tabval[13] = + ((meltroutine_ptr_t) /*_._VALROUT___V887*/ meltfptr[886])->tabval[13] = (melt_ptr_t) ( /*_.MACROEXPAND_1__V173*/ meltfptr[172]); MELT_LOCATION ("warmelt-outobj.melt:6906:/ initchunk"); @@ -46584,12 +46659,12 @@ meltmod__warmelt_outobj__initialmeltchunk_15 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V887*/ meltfptr[886])) == + ( /*_._VALROUT___V887*/ meltfptr[886])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V874*/ meltfptr[873]); - ((meltroutine_ptr_t) /*_.VALROUT___V887*/ meltfptr[886])->tabval[14] = - (melt_ptr_t) ( /*_.VALCLO___V874*/ meltfptr[873]); + NULL != /*_._VALCLO___V874*/ meltfptr[873]); + ((meltroutine_ptr_t) /*_._VALROUT___V887*/ meltfptr[886])->tabval[14] = + (melt_ptr_t) ( /*_._VALCLO___V874*/ meltfptr[873]); MELT_LOCATION ("warmelt-outobj.melt:6906:/ initchunk"); /*^putroutconst */ @@ -46597,216 +46672,216 @@ meltmod__warmelt_outobj__initialmeltchunk_15 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V887*/ meltfptr[886])) + ( /*_._VALROUT___V887*/ meltfptr[886])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_700__COMPILE_LIST_SEXPR#15", NULL != ( /*_.COMPILE2OBJ_INITPROC__V174*/ meltfptr[173])); - ((meltroutine_ptr_t) /*_.VALROUT___V887*/ meltfptr[886])->tabval[15] = + ((meltroutine_ptr_t) /*_._VALROUT___V887*/ meltfptr[886])->tabval[15] = (melt_ptr_t) ( /*_.COMPILE2OBJ_INITPROC__V174*/ meltfptr[173]); MELT_LOCATION ("warmelt-outobj.melt:6906:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V887*/ meltfptr[886]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V887*/ meltfptr[886]); /*putclosurout#126 */ melt_assertmsg ("putclosrout#126 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V889*/ meltfptr[888])) == + ( /*_._VALCLO___V889*/ meltfptr[888])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#126 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V887*/ meltfptr[886])) == + ( /*_._VALROUT___V887*/ meltfptr[886])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V889*/ meltfptr[888])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V887*/ meltfptr[886]); + ((meltclosure_ptr_t) /*_._VALCLO___V889*/ meltfptr[888])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V887*/ meltfptr[886]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V889*/ meltfptr[888]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V889*/ meltfptr[888]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V890*/ meltfptr[889])) == + ( /*_._VALDATA___V890*/ meltfptr[889])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V890*/ + ( /*_._VALDATA___V890*/ meltfptr[889])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V890*/ meltfptr[889]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V890*/ meltfptr[889]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V891*/ meltfptr[890]); + /*_._VALSTR___V891*/ meltfptr[890]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V890*/ meltfptr[889]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V890*/ meltfptr[889]); - melt_dbgtrace_written_object ( /*_.VALDATA___V890*/ meltfptr[889], + melt_dbgtrace_written_object ( /*_._VALDATA___V890*/ meltfptr[889], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V892*/ meltfptr[891])) == + ( /*_._VALDATA___V892*/ meltfptr[891])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V892*/ + ( /*_._VALDATA___V892*/ meltfptr[891])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V892*/ meltfptr[891]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V892*/ meltfptr[891]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V893*/ meltfptr[892]); + /*_._VALSTR___V893*/ meltfptr[892]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V892*/ meltfptr[891]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V892*/ meltfptr[891]); - melt_dbgtrace_written_object ( /*_.VALDATA___V892*/ meltfptr[891], + melt_dbgtrace_written_object ( /*_._VALDATA___V892*/ meltfptr[891], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V894*/ meltfptr[893])) == + ( /*_._VALDATA___V894*/ meltfptr[893])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V894*/ + ( /*_._VALDATA___V894*/ meltfptr[893])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V894*/ meltfptr[893]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V894*/ meltfptr[893]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V895*/ meltfptr[894]); + /*_._VALSTR___V895*/ meltfptr[894]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V894*/ meltfptr[893]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V894*/ meltfptr[893]); - melt_dbgtrace_written_object ( /*_.VALDATA___V894*/ meltfptr[893], + melt_dbgtrace_written_object ( /*_._VALDATA___V894*/ meltfptr[893], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V896*/ meltfptr[895])) == + ( /*_._VALDATA___V896*/ meltfptr[895])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V896*/ + ( /*_._VALDATA___V896*/ meltfptr[895])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V896*/ meltfptr[895]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V896*/ meltfptr[895]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V897*/ meltfptr[896]); + /*_._VALSTR___V897*/ meltfptr[896]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V896*/ meltfptr[895]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V896*/ meltfptr[895]); - melt_dbgtrace_written_object ( /*_.VALDATA___V896*/ meltfptr[895], + melt_dbgtrace_written_object ( /*_._VALDATA___V896*/ meltfptr[895], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V898*/ meltfptr[897])) == + ( /*_._VALDATA___V898*/ meltfptr[897])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V898*/ + ( /*_._VALDATA___V898*/ meltfptr[897])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V898*/ meltfptr[897]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V898*/ meltfptr[897]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V899*/ meltfptr[898]); + /*_._VALSTR___V899*/ meltfptr[898]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V898*/ meltfptr[897]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V898*/ meltfptr[897]); - melt_dbgtrace_written_object ( /*_.VALDATA___V898*/ meltfptr[897], + melt_dbgtrace_written_object ( /*_._VALDATA___V898*/ meltfptr[897], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V900*/ meltfptr[899])) == + ( /*_._VALDATA___V900*/ meltfptr[899])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V900*/ + ( /*_._VALDATA___V900*/ meltfptr[899])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V900*/ meltfptr[899]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V900*/ meltfptr[899]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V901*/ meltfptr[900]); + /*_._VALSTR___V901*/ meltfptr[900]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V900*/ meltfptr[899]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V900*/ meltfptr[899]); - melt_dbgtrace_written_object ( /*_.VALDATA___V900*/ meltfptr[899], + melt_dbgtrace_written_object ( /*_._VALDATA___V900*/ meltfptr[899], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V902*/ meltfptr[901])) == + ( /*_._VALDATA___V902*/ meltfptr[901])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V902*/ + ( /*_._VALDATA___V902*/ meltfptr[901])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V902*/ meltfptr[901]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V902*/ meltfptr[901]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V903*/ meltfptr[902]); + /*_._VALSTR___V903*/ meltfptr[902]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V902*/ meltfptr[901]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V902*/ meltfptr[901]); - melt_dbgtrace_written_object ( /*_.VALDATA___V902*/ meltfptr[901], + melt_dbgtrace_written_object ( /*_._VALDATA___V902*/ meltfptr[901], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V904*/ meltfptr[903])) == + ( /*_._VALDATA___V904*/ meltfptr[903])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V904*/ + ( /*_._VALDATA___V904*/ meltfptr[903])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V904*/ meltfptr[903]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V904*/ meltfptr[903]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V905*/ meltfptr[904]); + /*_._VALSTR___V905*/ meltfptr[904]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V904*/ meltfptr[903]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V904*/ meltfptr[903]); - melt_dbgtrace_written_object ( /*_.VALDATA___V904*/ meltfptr[903], + melt_dbgtrace_written_object ( /*_._VALDATA___V904*/ meltfptr[903], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:6980:/ initchunk"); @@ -46814,40 +46889,40 @@ meltmod__warmelt_outobj__initialmeltchunk_15 (meltinitial_frame_t * /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V906*/ meltfptr[905])) == + ( /*_._VALDATA___V906*/ meltfptr[905])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V906*/ + ( /*_._VALDATA___V906*/ meltfptr[905])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V906*/ meltfptr[905]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V906*/ meltfptr[905]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V907*/ meltfptr[906]); + /*_._VALSTR___V907*/ meltfptr[906]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V909*/ meltfptr[908])) == + ( /*_._VALDATA___V909*/ meltfptr[908])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V909*/ + ( /*_._VALDATA___V909*/ meltfptr[908])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V909*/ meltfptr[908]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V909*/ meltfptr[908]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V910*/ meltfptr[909]); + /*_._VALSTR___V910*/ meltfptr[909]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V909*/ meltfptr[908]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V909*/ meltfptr[908]); - melt_dbgtrace_written_object ( /*_.VALDATA___V909*/ meltfptr[908], + melt_dbgtrace_written_object ( /*_._VALDATA___V909*/ meltfptr[908], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:6980:/ initchunk"); @@ -46855,69 +46930,69 @@ meltmod__warmelt_outobj__initialmeltchunk_15 (meltinitial_frame_t * /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V908*/ meltfptr[907])) == + ( /*_._VALDATA___V908*/ meltfptr[907])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (0 >= 0 && 0 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V908*/ + ( /*_._VALDATA___V908*/ meltfptr[907])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V908*/ meltfptr[907]))->obj_vartab[0] = + ((meltobject_ptr_t) ( /*_._VALDATA___V908*/ meltfptr[907]))->obj_vartab[0] = (melt_ptr_t) ( - /*_.VALDATA___V909*/ meltfptr[908]); + /*_._VALDATA___V909*/ meltfptr[908]); MELT_LOCATION ("warmelt-outobj.melt:6980:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V908*/ meltfptr[907])) == + ( /*_._VALDATA___V908*/ meltfptr[907])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V908*/ + ( /*_._VALDATA___V908*/ meltfptr[907])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V908*/ meltfptr[907]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V908*/ meltfptr[907]))->obj_vartab[1] = (melt_ptr_t) ( ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); MELT_LOCATION ("warmelt-outobj.melt:6980:/ initchunk"); /*^touch */ - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V908*/ meltfptr[907]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V908*/ meltfptr[907]); MELT_LOCATION ("warmelt-outobj.melt:6980:/ initchunk"); /*^touchobj */ - melt_dbgtrace_written_object ( /*_.VALDATA___V908*/ meltfptr[907], + melt_dbgtrace_written_object ( /*_._VALDATA___V908*/ meltfptr[907], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V912*/ meltfptr[911])) == + ( /*_._VALDATA___V912*/ meltfptr[911])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V912*/ + ( /*_._VALDATA___V912*/ meltfptr[911])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V912*/ meltfptr[911]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V912*/ meltfptr[911]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V913*/ meltfptr[912]); + /*_._VALSTR___V913*/ meltfptr[912]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V912*/ meltfptr[911]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V912*/ meltfptr[911]); - melt_dbgtrace_written_object ( /*_.VALDATA___V912*/ meltfptr[911], + melt_dbgtrace_written_object ( /*_._VALDATA___V912*/ meltfptr[911], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:6980:/ initchunk"); @@ -46925,69 +47000,69 @@ meltmod__warmelt_outobj__initialmeltchunk_15 (meltinitial_frame_t * /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V911*/ meltfptr[910])) == + ( /*_._VALDATA___V911*/ meltfptr[910])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (0 >= 0 && 0 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V911*/ + ( /*_._VALDATA___V911*/ meltfptr[910])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V911*/ meltfptr[910]))->obj_vartab[0] = + ((meltobject_ptr_t) ( /*_._VALDATA___V911*/ meltfptr[910]))->obj_vartab[0] = (melt_ptr_t) ( - /*_.VALDATA___V912*/ meltfptr[911]); + /*_._VALDATA___V912*/ meltfptr[911]); MELT_LOCATION ("warmelt-outobj.melt:6980:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V911*/ meltfptr[910])) == + ( /*_._VALDATA___V911*/ meltfptr[910])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V911*/ + ( /*_._VALDATA___V911*/ meltfptr[910])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V911*/ meltfptr[910]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V911*/ meltfptr[910]))->obj_vartab[1] = (melt_ptr_t) ( ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); MELT_LOCATION ("warmelt-outobj.melt:6980:/ initchunk"); /*^touch */ - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V911*/ meltfptr[910]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V911*/ meltfptr[910]); MELT_LOCATION ("warmelt-outobj.melt:6980:/ initchunk"); /*^touchobj */ - melt_dbgtrace_written_object ( /*_.VALDATA___V911*/ meltfptr[910], + melt_dbgtrace_written_object ( /*_._VALDATA___V911*/ meltfptr[910], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V915*/ meltfptr[914])) == + ( /*_._VALDATA___V915*/ meltfptr[914])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V915*/ + ( /*_._VALDATA___V915*/ meltfptr[914])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V915*/ meltfptr[914]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V915*/ meltfptr[914]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V916*/ meltfptr[915]); + /*_._VALSTR___V916*/ meltfptr[915]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V915*/ meltfptr[914]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V915*/ meltfptr[914]); - melt_dbgtrace_written_object ( /*_.VALDATA___V915*/ meltfptr[914], + melt_dbgtrace_written_object ( /*_._VALDATA___V915*/ meltfptr[914], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:6980:/ initchunk"); @@ -46995,50 +47070,50 @@ meltmod__warmelt_outobj__initialmeltchunk_15 (meltinitial_frame_t * /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V914*/ meltfptr[913])) == + ( /*_._VALDATA___V914*/ meltfptr[913])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (0 >= 0 && 0 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V914*/ + ( /*_._VALDATA___V914*/ meltfptr[913])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V914*/ meltfptr[913]))->obj_vartab[0] = + ((meltobject_ptr_t) ( /*_._VALDATA___V914*/ meltfptr[913]))->obj_vartab[0] = (melt_ptr_t) ( - /*_.VALDATA___V915*/ meltfptr[914]); + /*_._VALDATA___V915*/ meltfptr[914]); MELT_LOCATION ("warmelt-outobj.melt:6980:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V914*/ meltfptr[913])) == + ( /*_._VALDATA___V914*/ meltfptr[913])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V914*/ + ( /*_._VALDATA___V914*/ meltfptr[913])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V914*/ meltfptr[913]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V914*/ meltfptr[913]))->obj_vartab[1] = (melt_ptr_t) ( ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); MELT_LOCATION ("warmelt-outobj.melt:6980:/ initchunk"); /*^touch */ - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V914*/ meltfptr[913]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V914*/ meltfptr[913]); #undef meltfram__ -} /*end of meltmod__warmelt_outobj__initialmeltchunk_15 */ +} /*end of meltmod__WARMELTmiOUTOBJ__initialmeltchunk_15 */ void -meltmod__warmelt_outobj__initialmeltchunk_16 (meltinitial_frame_t * - meltmeltframptr__, - char meltpredefinited[]) +meltmod__WARMELTmiOUTOBJ__initialmeltchunk_16 (meltinitial_frame_t * + meltmeltframptr__, + char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount @@ -47047,218 +47122,218 @@ meltmod__warmelt_outobj__initialmeltchunk_16 (meltinitial_frame_t * MELT_LOCATION ("warmelt-outobj.melt:6980:/ initchunk"); /*^touchobj */ - melt_dbgtrace_written_object ( /*_.VALDATA___V914*/ meltfptr[913], + melt_dbgtrace_written_object ( /*_._VALDATA___V914*/ meltfptr[913], "new static instance"); /*putupl#49 */ melt_assertmsg ("putupl #49 checktup", melt_magic_discr ((melt_ptr_t) - ( /*_.VALTUP___V917*/ meltfptr[916])) == + ( /*_._VALTUP___V917*/ meltfptr[916])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #49 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) - ( /*_.VALTUP___V917*/ + ( /*_._VALTUP___V917*/ meltfptr[916])))); - ((meltmultiple_ptr_t) ( /*_.VALTUP___V917*/ meltfptr[916]))->tabval[0] = - (melt_ptr_t) ( /*_.VALDATA___V908*/ meltfptr[907]); + ((meltmultiple_ptr_t) ( /*_._VALTUP___V917*/ meltfptr[916]))->tabval[0] = + (melt_ptr_t) ( /*_._VALDATA___V908*/ meltfptr[907]); /*putupl#50 */ melt_assertmsg ("putupl #50 checktup", melt_magic_discr ((melt_ptr_t) - ( /*_.VALTUP___V917*/ meltfptr[916])) == + ( /*_._VALTUP___V917*/ meltfptr[916])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #50 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) - ( /*_.VALTUP___V917*/ + ( /*_._VALTUP___V917*/ meltfptr[916])))); - ((meltmultiple_ptr_t) ( /*_.VALTUP___V917*/ meltfptr[916]))->tabval[1] = - (melt_ptr_t) ( /*_.VALDATA___V911*/ meltfptr[910]); + ((meltmultiple_ptr_t) ( /*_._VALTUP___V917*/ meltfptr[916]))->tabval[1] = + (melt_ptr_t) ( /*_._VALDATA___V911*/ meltfptr[910]); /*putupl#51 */ melt_assertmsg ("putupl #51 checktup", melt_magic_discr ((melt_ptr_t) - ( /*_.VALTUP___V917*/ meltfptr[916])) == + ( /*_._VALTUP___V917*/ meltfptr[916])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #51 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) - ( /*_.VALTUP___V917*/ + ( /*_._VALTUP___V917*/ meltfptr[916])))); - ((meltmultiple_ptr_t) ( /*_.VALTUP___V917*/ meltfptr[916]))->tabval[2] = - (melt_ptr_t) ( /*_.VALDATA___V914*/ meltfptr[913]); + ((meltmultiple_ptr_t) ( /*_._VALTUP___V917*/ meltfptr[916]))->tabval[2] = + (melt_ptr_t) ( /*_._VALDATA___V914*/ meltfptr[913]); - /*touch:INITUP_ */ - meltgc_touch ( /*_.VALTUP___V917*/ meltfptr[916]); + /*touch:_INITUP_ */ + meltgc_touch ( /*_._VALTUP___V917*/ meltfptr[916]); MELT_LOCATION ("warmelt-outobj.melt:6980:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V906*/ meltfptr[905])) == + ( /*_._VALDATA___V906*/ meltfptr[905])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V906*/ + ( /*_._VALDATA___V906*/ meltfptr[905])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V906*/ meltfptr[905]))->obj_vartab[2] = + ((meltobject_ptr_t) ( /*_._VALDATA___V906*/ meltfptr[905]))->obj_vartab[2] = (melt_ptr_t) ( - /*_.VALTUP___V917*/ meltfptr[916]); + /*_._VALTUP___V917*/ meltfptr[916]); MELT_LOCATION ("warmelt-outobj.melt:6980:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V906*/ meltfptr[905])) == + ( /*_._VALDATA___V906*/ meltfptr[905])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (3 >= 0 && 3 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V906*/ + ( /*_._VALDATA___V906*/ meltfptr[905])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V906*/ meltfptr[905]))->obj_vartab[3] = + ((meltobject_ptr_t) ( /*_._VALDATA___V906*/ meltfptr[905]))->obj_vartab[3] = (melt_ptr_t) ( ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); /*putupl#52 */ melt_assertmsg ("putupl #52 checktup", melt_magic_discr ((melt_ptr_t) - ( /*_.VALTUP___V922*/ meltfptr[921])) == + ( /*_._VALTUP___V922*/ meltfptr[921])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #52 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) - ( /*_.VALTUP___V922*/ + ( /*_._VALTUP___V922*/ meltfptr[921])))); - ((meltmultiple_ptr_t) ( /*_.VALTUP___V922*/ meltfptr[921]))->tabval[0] = - (melt_ptr_t) ( /*_.VALSTR___V918*/ meltfptr[917]); + ((meltmultiple_ptr_t) ( /*_._VALTUP___V922*/ meltfptr[921]))->tabval[0] = + (melt_ptr_t) ( /*_._VALSTR___V918*/ meltfptr[917]); /*putupl#53 */ melt_assertmsg ("putupl #53 checktup", melt_magic_discr ((melt_ptr_t) - ( /*_.VALTUP___V922*/ meltfptr[921])) == + ( /*_._VALTUP___V922*/ meltfptr[921])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #53 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) - ( /*_.VALTUP___V922*/ + ( /*_._VALTUP___V922*/ meltfptr[921])))); - ((meltmultiple_ptr_t) ( /*_.VALTUP___V922*/ meltfptr[921]))->tabval[1] = - (melt_ptr_t) ( /*_.VALDATA___V909*/ meltfptr[908]); + ((meltmultiple_ptr_t) ( /*_._VALTUP___V922*/ meltfptr[921]))->tabval[1] = + (melt_ptr_t) ( /*_._VALDATA___V909*/ meltfptr[908]); /*putupl#54 */ melt_assertmsg ("putupl #54 checktup", melt_magic_discr ((melt_ptr_t) - ( /*_.VALTUP___V922*/ meltfptr[921])) == + ( /*_._VALTUP___V922*/ meltfptr[921])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #54 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) - ( /*_.VALTUP___V922*/ + ( /*_._VALTUP___V922*/ meltfptr[921])))); - ((meltmultiple_ptr_t) ( /*_.VALTUP___V922*/ meltfptr[921]))->tabval[2] = - (melt_ptr_t) ( /*_.VALSTR___V919*/ meltfptr[918]); + ((meltmultiple_ptr_t) ( /*_._VALTUP___V922*/ meltfptr[921]))->tabval[2] = + (melt_ptr_t) ( /*_._VALSTR___V919*/ meltfptr[918]); /*putupl#55 */ melt_assertmsg ("putupl #55 checktup", melt_magic_discr ((melt_ptr_t) - ( /*_.VALTUP___V922*/ meltfptr[921])) == + ( /*_._VALTUP___V922*/ meltfptr[921])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #55 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) - ( /*_.VALTUP___V922*/ + ( /*_._VALTUP___V922*/ meltfptr[921])))); - ((meltmultiple_ptr_t) ( /*_.VALTUP___V922*/ meltfptr[921]))->tabval[3] = - (melt_ptr_t) ( /*_.VALDATA___V912*/ meltfptr[911]); + ((meltmultiple_ptr_t) ( /*_._VALTUP___V922*/ meltfptr[921]))->tabval[3] = + (melt_ptr_t) ( /*_._VALDATA___V912*/ meltfptr[911]); /*putupl#56 */ melt_assertmsg ("putupl #56 checktup", melt_magic_discr ((melt_ptr_t) - ( /*_.VALTUP___V922*/ meltfptr[921])) == + ( /*_._VALTUP___V922*/ meltfptr[921])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #56 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) - ( /*_.VALTUP___V922*/ + ( /*_._VALTUP___V922*/ meltfptr[921])))); - ((meltmultiple_ptr_t) ( /*_.VALTUP___V922*/ meltfptr[921]))->tabval[4] = - (melt_ptr_t) ( /*_.VALSTR___V920*/ meltfptr[919]); + ((meltmultiple_ptr_t) ( /*_._VALTUP___V922*/ meltfptr[921]))->tabval[4] = + (melt_ptr_t) ( /*_._VALSTR___V920*/ meltfptr[919]); /*putupl#57 */ melt_assertmsg ("putupl #57 checktup", melt_magic_discr ((melt_ptr_t) - ( /*_.VALTUP___V922*/ meltfptr[921])) == + ( /*_._VALTUP___V922*/ meltfptr[921])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #57 checkoff", (5 >= 0 && 5 < melt_multiple_length ((melt_ptr_t) - ( /*_.VALTUP___V922*/ + ( /*_._VALTUP___V922*/ meltfptr[921])))); - ((meltmultiple_ptr_t) ( /*_.VALTUP___V922*/ meltfptr[921]))->tabval[5] = - (melt_ptr_t) ( /*_.VALDATA___V915*/ meltfptr[914]); + ((meltmultiple_ptr_t) ( /*_._VALTUP___V922*/ meltfptr[921]))->tabval[5] = + (melt_ptr_t) ( /*_._VALDATA___V915*/ meltfptr[914]); /*putupl#58 */ melt_assertmsg ("putupl #58 checktup", melt_magic_discr ((melt_ptr_t) - ( /*_.VALTUP___V922*/ meltfptr[921])) == + ( /*_._VALTUP___V922*/ meltfptr[921])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #58 checkoff", (6 >= 0 && 6 < melt_multiple_length ((melt_ptr_t) - ( /*_.VALTUP___V922*/ + ( /*_._VALTUP___V922*/ meltfptr[921])))); - ((meltmultiple_ptr_t) ( /*_.VALTUP___V922*/ meltfptr[921]))->tabval[6] = - (melt_ptr_t) ( /*_.VALSTR___V921*/ meltfptr[920]); + ((meltmultiple_ptr_t) ( /*_._VALTUP___V922*/ meltfptr[921]))->tabval[6] = + (melt_ptr_t) ( /*_._VALSTR___V921*/ meltfptr[920]); - /*touch:INITUP_ */ - meltgc_touch ( /*_.VALTUP___V922*/ meltfptr[921]); + /*touch:_INITUP_ */ + meltgc_touch ( /*_._VALTUP___V922*/ meltfptr[921]); MELT_LOCATION ("warmelt-outobj.melt:6980:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V906*/ meltfptr[905])) == + ( /*_._VALDATA___V906*/ meltfptr[905])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V906*/ + ( /*_._VALDATA___V906*/ meltfptr[905])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V906*/ meltfptr[905]))->obj_vartab[4] = + ((meltobject_ptr_t) ( /*_._VALDATA___V906*/ meltfptr[905]))->obj_vartab[4] = (melt_ptr_t) ( - /*_.VALTUP___V922*/ meltfptr[921]); + /*_._VALTUP___V922*/ meltfptr[921]); MELT_LOCATION ("warmelt-outobj.melt:6980:/ initchunk"); /*^touch */ - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V906*/ meltfptr[905]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V906*/ meltfptr[905]); MELT_LOCATION ("warmelt-outobj.melt:6980:/ initchunk"); /*^touchobj */ - melt_dbgtrace_written_object ( /*_.VALDATA___V906*/ meltfptr[905], + melt_dbgtrace_written_object ( /*_._VALDATA___V906*/ meltfptr[905], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:6990:/ initchunk"); @@ -47267,13 +47342,13 @@ meltmod__warmelt_outobj__initialmeltchunk_16 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V923*/ meltfptr[922])) + ( /*_._VALROUT___V923*/ meltfptr[922])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_736__AUTOBOX_NORMAL_RETURN#0", NULL != ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7])); - ((meltroutine_ptr_t) /*_.VALROUT___V923*/ meltfptr[922])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V923*/ meltfptr[922])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7]); MELT_LOCATION ("warmelt-outobj.melt:6990:/ initchunk"); @@ -47282,13 +47357,13 @@ meltmod__warmelt_outobj__initialmeltchunk_16 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V923*/ meltfptr[922])) + ( /*_._VALROUT___V923*/ meltfptr[922])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_736__AUTOBOX_NORMAL_RETURN#1", NULL != ( /*_.DISCR_LIST__V66*/ meltfptr[65])); - ((meltroutine_ptr_t) /*_.VALROUT___V923*/ meltfptr[922])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V923*/ meltfptr[922])->tabval[1] = (melt_ptr_t) ( /*_.DISCR_LIST__V66*/ meltfptr[65]); MELT_LOCATION ("warmelt-outobj.melt:6990:/ initchunk"); @@ -47297,13 +47372,13 @@ meltmod__warmelt_outobj__initialmeltchunk_16 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V923*/ meltfptr[922])) + ( /*_._VALROUT___V923*/ meltfptr[922])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_736__AUTOBOX_NORMAL_RETURN#2", NULL != ( /*_.CLASS_CTYPE__V29*/ meltfptr[28])); - ((meltroutine_ptr_t) /*_.VALROUT___V923*/ meltfptr[922])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V923*/ meltfptr[922])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_CTYPE__V29*/ meltfptr[28]); MELT_LOCATION ("warmelt-outobj.melt:6990:/ initchunk"); @@ -47312,36 +47387,36 @@ meltmod__warmelt_outobj__initialmeltchunk_16 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V923*/ meltfptr[922])) + ( /*_._VALROUT___V923*/ meltfptr[922])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_736__AUTOBOX_NORMAL_RETURN#3", NULL != ( /*_.CLONE_SYMBOL__V175*/ meltfptr[174])); - ((meltroutine_ptr_t) /*_.VALROUT___V923*/ meltfptr[922])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V923*/ meltfptr[922])->tabval[3] = (melt_ptr_t) ( /*_.CLONE_SYMBOL__V175*/ meltfptr[174]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V924*/ meltfptr[923])) == + ( /*_._VALDATA___V924*/ meltfptr[923])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V924*/ + ( /*_._VALDATA___V924*/ meltfptr[923])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V924*/ meltfptr[923]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V924*/ meltfptr[923]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V925*/ meltfptr[924]); + /*_._VALSTR___V925*/ meltfptr[924]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V924*/ meltfptr[923]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V924*/ meltfptr[923]); - melt_dbgtrace_written_object ( /*_.VALDATA___V924*/ meltfptr[923], + melt_dbgtrace_written_object ( /*_._VALDATA___V924*/ meltfptr[923], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:6990:/ initchunk"); @@ -47350,14 +47425,14 @@ meltmod__warmelt_outobj__initialmeltchunk_16 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V923*/ meltfptr[922])) + ( /*_._VALROUT___V923*/ meltfptr[922])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_736__AUTOBOX_NORMAL_RETURN#4", - NULL != ( /*_.VALDATA___V924*/ meltfptr[923])); - ((meltroutine_ptr_t) /*_.VALROUT___V923*/ meltfptr[922])->tabval[4] = - (melt_ptr_t) ( /*_.VALDATA___V924*/ meltfptr[923]); + NULL != ( /*_._VALDATA___V924*/ meltfptr[923])); + ((meltroutine_ptr_t) /*_._VALROUT___V923*/ meltfptr[922])->tabval[4] = + (melt_ptr_t) ( /*_._VALDATA___V924*/ meltfptr[923]); MELT_LOCATION ("warmelt-outobj.melt:6990:/ initchunk"); /*^putroutconst */ @@ -47365,13 +47440,13 @@ meltmod__warmelt_outobj__initialmeltchunk_16 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V923*/ meltfptr[922])) + ( /*_._VALROUT___V923*/ meltfptr[922])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_736__AUTOBOX_NORMAL_RETURN#5", NULL != ( /*_.CLASS_NORMAL_LET_BINDING__V176*/ meltfptr[175])); - ((meltroutine_ptr_t) /*_.VALROUT___V923*/ meltfptr[922])->tabval[5] = + ((meltroutine_ptr_t) /*_._VALROUT___V923*/ meltfptr[922])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_NORMAL_LET_BINDING__V176*/ meltfptr[175]); MELT_LOCATION ("warmelt-outobj.melt:6990:/ initchunk"); @@ -47380,13 +47455,13 @@ meltmod__warmelt_outobj__initialmeltchunk_16 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V923*/ meltfptr[922])) + ( /*_._VALROUT___V923*/ meltfptr[922])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_736__AUTOBOX_NORMAL_RETURN#6", NULL != ( /*_.CTYPE_VALUE__V32*/ meltfptr[31])); - ((meltroutine_ptr_t) /*_.VALROUT___V923*/ meltfptr[922])->tabval[6] = + ((meltroutine_ptr_t) /*_._VALROUT___V923*/ meltfptr[922])->tabval[6] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V32*/ meltfptr[31]); MELT_LOCATION ("warmelt-outobj.melt:6990:/ initchunk"); @@ -47395,13 +47470,13 @@ meltmod__warmelt_outobj__initialmeltchunk_16 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V923*/ meltfptr[922])) + ( /*_._VALROUT___V923*/ meltfptr[922])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_736__AUTOBOX_NORMAL_RETURN#7", NULL != ( /*_.CLASS_NREP_LOCSYMOCC__V177*/ meltfptr[176])); - ((meltroutine_ptr_t) /*_.VALROUT___V923*/ meltfptr[922])->tabval[7] = + ((meltroutine_ptr_t) /*_._VALROUT___V923*/ meltfptr[922])->tabval[7] = (melt_ptr_t) ( /*_.CLASS_NREP_LOCSYMOCC__V177*/ meltfptr[176]); MELT_LOCATION ("warmelt-outobj.melt:6990:/ initchunk"); @@ -47410,13 +47485,13 @@ meltmod__warmelt_outobj__initialmeltchunk_16 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V923*/ meltfptr[922])) + ( /*_._VALROUT___V923*/ meltfptr[922])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_736__AUTOBOX_NORMAL_RETURN#8", NULL != ( /*_.CLASS_NREP_RETURN__V178*/ meltfptr[177])); - ((meltroutine_ptr_t) /*_.VALROUT___V923*/ meltfptr[922])->tabval[8] = + ((meltroutine_ptr_t) /*_._VALROUT___V923*/ meltfptr[922])->tabval[8] = (melt_ptr_t) ( /*_.CLASS_NREP_RETURN__V178*/ meltfptr[177]); MELT_LOCATION ("warmelt-outobj.melt:6990:/ initchunk"); @@ -47425,13 +47500,13 @@ meltmod__warmelt_outobj__initialmeltchunk_16 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V923*/ meltfptr[922])) + ( /*_._VALROUT___V923*/ meltfptr[922])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_736__AUTOBOX_NORMAL_RETURN#9", NULL != ( /*_.CTYPE_LONG__V78*/ meltfptr[77])); - ((meltroutine_ptr_t) /*_.VALROUT___V923*/ meltfptr[922])->tabval[9] = + ((meltroutine_ptr_t) /*_._VALROUT___V923*/ meltfptr[922])->tabval[9] = (melt_ptr_t) ( /*_.CTYPE_LONG__V78*/ meltfptr[77]); MELT_LOCATION ("warmelt-outobj.melt:6990:/ initchunk"); @@ -47440,13 +47515,13 @@ meltmod__warmelt_outobj__initialmeltchunk_16 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V923*/ meltfptr[922])) + ( /*_._VALROUT___V923*/ meltfptr[922])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_736__AUTOBOX_NORMAL_RETURN#10", NULL != ( /*_.CLASS_NREP_CHUNK__V179*/ meltfptr[178])); - ((meltroutine_ptr_t) /*_.VALROUT___V923*/ meltfptr[922])->tabval[10] = + ((meltroutine_ptr_t) /*_._VALROUT___V923*/ meltfptr[922])->tabval[10] = (melt_ptr_t) ( /*_.CLASS_NREP_CHUNK__V179*/ meltfptr[178]); MELT_LOCATION ("warmelt-outobj.melt:6990:/ initchunk"); @@ -47455,36 +47530,36 @@ meltmod__warmelt_outobj__initialmeltchunk_16 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V923*/ meltfptr[922])) + ( /*_._VALROUT___V923*/ meltfptr[922])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_736__AUTOBOX_NORMAL_RETURN#11", NULL != ( /*_.DISCR_VERBATIM_STRING__V88*/ meltfptr[87])); - ((meltroutine_ptr_t) /*_.VALROUT___V923*/ meltfptr[922])->tabval[11] = + ((meltroutine_ptr_t) /*_._VALROUT___V923*/ meltfptr[922])->tabval[11] = (melt_ptr_t) ( /*_.DISCR_VERBATIM_STRING__V88*/ meltfptr[87]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V926*/ meltfptr[925])) == + ( /*_._VALDATA___V926*/ meltfptr[925])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V926*/ + ( /*_._VALDATA___V926*/ meltfptr[925])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V926*/ meltfptr[925]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V926*/ meltfptr[925]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V927*/ meltfptr[926]); + /*_._VALSTR___V927*/ meltfptr[926]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V926*/ meltfptr[925]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V926*/ meltfptr[925]); - melt_dbgtrace_written_object ( /*_.VALDATA___V926*/ meltfptr[925], + melt_dbgtrace_written_object ( /*_._VALDATA___V926*/ meltfptr[925], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:6990:/ initchunk"); @@ -47493,14 +47568,14 @@ meltmod__warmelt_outobj__initialmeltchunk_16 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V923*/ meltfptr[922])) + ( /*_._VALROUT___V923*/ meltfptr[922])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_736__AUTOBOX_NORMAL_RETURN#12", - NULL != ( /*_.VALDATA___V926*/ meltfptr[925])); - ((meltroutine_ptr_t) /*_.VALROUT___V923*/ meltfptr[922])->tabval[12] = - (melt_ptr_t) ( /*_.VALDATA___V926*/ meltfptr[925]); + NULL != ( /*_._VALDATA___V926*/ meltfptr[925])); + ((meltroutine_ptr_t) /*_._VALROUT___V923*/ meltfptr[922])->tabval[12] = + (melt_ptr_t) ( /*_._VALDATA___V926*/ meltfptr[925]); MELT_LOCATION ("warmelt-outobj.melt:6990:/ initchunk"); /*^putroutconst */ @@ -47508,13 +47583,13 @@ meltmod__warmelt_outobj__initialmeltchunk_16 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V923*/ meltfptr[922])) + ( /*_._VALROUT___V923*/ meltfptr[922])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_736__AUTOBOX_NORMAL_RETURN#13", NULL != ( /*_.CLASS_LET_BINDING__V180*/ meltfptr[179])); - ((meltroutine_ptr_t) /*_.VALROUT___V923*/ meltfptr[922])->tabval[13] = + ((meltroutine_ptr_t) /*_._VALROUT___V923*/ meltfptr[922])->tabval[13] = (melt_ptr_t) ( /*_.CLASS_LET_BINDING__V180*/ meltfptr[179]); MELT_LOCATION ("warmelt-outobj.melt:6990:/ initchunk"); @@ -47523,36 +47598,36 @@ meltmod__warmelt_outobj__initialmeltchunk_16 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V923*/ meltfptr[922])) + ( /*_._VALROUT___V923*/ meltfptr[922])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_736__AUTOBOX_NORMAL_RETURN#14", NULL != ( /*_.CTYPE_CSTRING__V181*/ meltfptr[180])); - ((meltroutine_ptr_t) /*_.VALROUT___V923*/ meltfptr[922])->tabval[14] = + ((meltroutine_ptr_t) /*_._VALROUT___V923*/ meltfptr[922])->tabval[14] = (melt_ptr_t) ( /*_.CTYPE_CSTRING__V181*/ meltfptr[180]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V928*/ meltfptr[927])) == + ( /*_._VALDATA___V928*/ meltfptr[927])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V928*/ + ( /*_._VALDATA___V928*/ meltfptr[927])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V928*/ meltfptr[927]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V928*/ meltfptr[927]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V929*/ meltfptr[928]); + /*_._VALSTR___V929*/ meltfptr[928]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V928*/ meltfptr[927]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V928*/ meltfptr[927]); - melt_dbgtrace_written_object ( /*_.VALDATA___V928*/ meltfptr[927], + melt_dbgtrace_written_object ( /*_._VALDATA___V928*/ meltfptr[927], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:6990:/ initchunk"); @@ -47561,14 +47636,14 @@ meltmod__warmelt_outobj__initialmeltchunk_16 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V923*/ meltfptr[922])) + ( /*_._VALROUT___V923*/ meltfptr[922])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_736__AUTOBOX_NORMAL_RETURN#15", - NULL != ( /*_.VALDATA___V928*/ meltfptr[927])); - ((meltroutine_ptr_t) /*_.VALROUT___V923*/ meltfptr[922])->tabval[15] = - (melt_ptr_t) ( /*_.VALDATA___V928*/ meltfptr[927]); + NULL != ( /*_._VALDATA___V928*/ meltfptr[927])); + ((meltroutine_ptr_t) /*_._VALROUT___V923*/ meltfptr[922])->tabval[15] = + (melt_ptr_t) ( /*_._VALDATA___V928*/ meltfptr[927]); MELT_LOCATION ("warmelt-outobj.melt:6990:/ initchunk"); /*^putroutconst */ @@ -47576,13 +47651,13 @@ meltmod__warmelt_outobj__initialmeltchunk_16 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V923*/ meltfptr[922])) + ( /*_._VALROUT___V923*/ meltfptr[922])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_736__AUTOBOX_NORMAL_RETURN#16", NULL != ( /*_.CLASS_CTYPE_GTY__V182*/ meltfptr[181])); - ((meltroutine_ptr_t) /*_.VALROUT___V923*/ meltfptr[922])->tabval[16] = + ((meltroutine_ptr_t) /*_._VALROUT___V923*/ meltfptr[922])->tabval[16] = (melt_ptr_t) ( /*_.CLASS_CTYPE_GTY__V182*/ meltfptr[181]); MELT_LOCATION ("warmelt-outobj.melt:6990:/ initchunk"); @@ -47591,36 +47666,36 @@ meltmod__warmelt_outobj__initialmeltchunk_16 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V923*/ meltfptr[922])) + ( /*_._VALROUT___V923*/ meltfptr[922])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_736__AUTOBOX_NORMAL_RETURN#17", NULL != ( /*_.CLASS_NAMED__V14*/ meltfptr[13])); - ((meltroutine_ptr_t) /*_.VALROUT___V923*/ meltfptr[922])->tabval[17] = + ((meltroutine_ptr_t) /*_._VALROUT___V923*/ meltfptr[922])->tabval[17] = (melt_ptr_t) ( /*_.CLASS_NAMED__V14*/ meltfptr[13]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V930*/ meltfptr[929])) == + ( /*_._VALDATA___V930*/ meltfptr[929])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V930*/ + ( /*_._VALDATA___V930*/ meltfptr[929])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V930*/ meltfptr[929]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V930*/ meltfptr[929]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V931*/ meltfptr[930]); + /*_._VALSTR___V931*/ meltfptr[930]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V930*/ meltfptr[929]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V930*/ meltfptr[929]); - melt_dbgtrace_written_object ( /*_.VALDATA___V930*/ meltfptr[929], + melt_dbgtrace_written_object ( /*_._VALDATA___V930*/ meltfptr[929], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:6990:/ initchunk"); @@ -47629,217 +47704,217 @@ meltmod__warmelt_outobj__initialmeltchunk_16 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V923*/ meltfptr[922])) + ( /*_._VALROUT___V923*/ meltfptr[922])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_736__AUTOBOX_NORMAL_RETURN#18", - NULL != ( /*_.VALDATA___V930*/ meltfptr[929])); - ((meltroutine_ptr_t) /*_.VALROUT___V923*/ meltfptr[922])->tabval[18] = - (melt_ptr_t) ( /*_.VALDATA___V930*/ meltfptr[929]); + NULL != ( /*_._VALDATA___V930*/ meltfptr[929])); + ((meltroutine_ptr_t) /*_._VALROUT___V923*/ meltfptr[922])->tabval[18] = + (melt_ptr_t) ( /*_._VALDATA___V930*/ meltfptr[929]); MELT_LOCATION ("warmelt-outobj.melt:6990:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V923*/ meltfptr[922]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V923*/ meltfptr[922]); /*putclosurout#127 */ melt_assertmsg ("putclosrout#127 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V932*/ meltfptr[931])) == + ( /*_._VALCLO___V932*/ meltfptr[931])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#127 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V923*/ meltfptr[922])) == + ( /*_._VALROUT___V923*/ meltfptr[922])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V932*/ meltfptr[931])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V923*/ meltfptr[922]); + ((meltclosure_ptr_t) /*_._VALCLO___V932*/ meltfptr[931])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V923*/ meltfptr[922]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V932*/ meltfptr[931]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V932*/ meltfptr[931]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V933*/ meltfptr[932])) == + ( /*_._VALDATA___V933*/ meltfptr[932])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V933*/ + ( /*_._VALDATA___V933*/ meltfptr[932])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V933*/ meltfptr[932]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V933*/ meltfptr[932]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V934*/ meltfptr[933]); + /*_._VALSTR___V934*/ meltfptr[933]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V933*/ meltfptr[932]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V933*/ meltfptr[932]); - melt_dbgtrace_written_object ( /*_.VALDATA___V933*/ meltfptr[932], + melt_dbgtrace_written_object ( /*_._VALDATA___V933*/ meltfptr[932], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V935*/ meltfptr[934])) == + ( /*_._VALDATA___V935*/ meltfptr[934])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V935*/ + ( /*_._VALDATA___V935*/ meltfptr[934])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V935*/ meltfptr[934]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V935*/ meltfptr[934]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V936*/ meltfptr[935]); + /*_._VALSTR___V936*/ meltfptr[935]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V935*/ meltfptr[934]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V935*/ meltfptr[934]); - melt_dbgtrace_written_object ( /*_.VALDATA___V935*/ meltfptr[934], + melt_dbgtrace_written_object ( /*_._VALDATA___V935*/ meltfptr[934], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V937*/ meltfptr[936])) == + ( /*_._VALDATA___V937*/ meltfptr[936])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V937*/ + ( /*_._VALDATA___V937*/ meltfptr[936])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V937*/ meltfptr[936]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V937*/ meltfptr[936]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V938*/ meltfptr[937]); + /*_._VALSTR___V938*/ meltfptr[937]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V937*/ meltfptr[936]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V937*/ meltfptr[936]); - melt_dbgtrace_written_object ( /*_.VALDATA___V937*/ meltfptr[936], + melt_dbgtrace_written_object ( /*_._VALDATA___V937*/ meltfptr[936], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V939*/ meltfptr[938])) == + ( /*_._VALDATA___V939*/ meltfptr[938])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V939*/ + ( /*_._VALDATA___V939*/ meltfptr[938])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V939*/ meltfptr[938]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V939*/ meltfptr[938]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V940*/ meltfptr[939]); + /*_._VALSTR___V940*/ meltfptr[939]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V939*/ meltfptr[938]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V939*/ meltfptr[938]); - melt_dbgtrace_written_object ( /*_.VALDATA___V939*/ meltfptr[938], + melt_dbgtrace_written_object ( /*_._VALDATA___V939*/ meltfptr[938], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V941*/ meltfptr[940])) == + ( /*_._VALDATA___V941*/ meltfptr[940])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V941*/ + ( /*_._VALDATA___V941*/ meltfptr[940])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V941*/ meltfptr[940]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V941*/ meltfptr[940]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V942*/ meltfptr[941]); + /*_._VALSTR___V942*/ meltfptr[941]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V941*/ meltfptr[940]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V941*/ meltfptr[940]); - melt_dbgtrace_written_object ( /*_.VALDATA___V941*/ meltfptr[940], + melt_dbgtrace_written_object ( /*_._VALDATA___V941*/ meltfptr[940], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V943*/ meltfptr[942])) == + ( /*_._VALDATA___V943*/ meltfptr[942])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V943*/ + ( /*_._VALDATA___V943*/ meltfptr[942])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V943*/ meltfptr[942]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V943*/ meltfptr[942]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V944*/ meltfptr[943]); + /*_._VALSTR___V944*/ meltfptr[943]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V943*/ meltfptr[942]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V943*/ meltfptr[942]); - melt_dbgtrace_written_object ( /*_.VALDATA___V943*/ meltfptr[942], + melt_dbgtrace_written_object ( /*_._VALDATA___V943*/ meltfptr[942], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V945*/ meltfptr[944])) == + ( /*_._VALDATA___V945*/ meltfptr[944])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V945*/ + ( /*_._VALDATA___V945*/ meltfptr[944])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V945*/ meltfptr[944]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V945*/ meltfptr[944]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V946*/ meltfptr[945]); + /*_._VALSTR___V946*/ meltfptr[945]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V945*/ meltfptr[944]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V945*/ meltfptr[944]); - melt_dbgtrace_written_object ( /*_.VALDATA___V945*/ meltfptr[944], + melt_dbgtrace_written_object ( /*_._VALDATA___V945*/ meltfptr[944], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V947*/ meltfptr[946])) == + ( /*_._VALDATA___V947*/ meltfptr[946])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V947*/ + ( /*_._VALDATA___V947*/ meltfptr[946])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V947*/ meltfptr[946]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V947*/ meltfptr[946]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V948*/ meltfptr[947]); + /*_._VALSTR___V948*/ meltfptr[947]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V947*/ meltfptr[946]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V947*/ meltfptr[946]); - melt_dbgtrace_written_object ( /*_.VALDATA___V947*/ meltfptr[946], + melt_dbgtrace_written_object ( /*_._VALDATA___V947*/ meltfptr[946], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:7117:/ initchunk"); @@ -47848,13 +47923,13 @@ meltmod__warmelt_outobj__initialmeltchunk_16 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V949*/ meltfptr[948])) + ( /*_._VALROUT___V949*/ meltfptr[948])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_762__TRANSLATE_RUN_MELT_EXPRESSIONS#0", NULL != ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7])); - ((meltroutine_ptr_t) /*_.VALROUT___V949*/ meltfptr[948])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V949*/ meltfptr[948])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7]); MELT_LOCATION ("warmelt-outobj.melt:7117:/ initchunk"); @@ -47863,13 +47938,13 @@ meltmod__warmelt_outobj__initialmeltchunk_16 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V949*/ meltfptr[948])) + ( /*_._VALROUT___V949*/ meltfptr[948])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_762__TRANSLATE_RUN_MELT_EXPRESSIONS#1", NULL != ( /*_.CLASS_ENVIRONMENT__V154*/ meltfptr[153])); - ((meltroutine_ptr_t) /*_.VALROUT___V949*/ meltfptr[948])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V949*/ meltfptr[948])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V154*/ meltfptr[153]); MELT_LOCATION ("warmelt-outobj.melt:7117:/ initchunk"); @@ -47878,13 +47953,13 @@ meltmod__warmelt_outobj__initialmeltchunk_16 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V949*/ meltfptr[948])) + ( /*_._VALROUT___V949*/ meltfptr[948])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_762__TRANSLATE_RUN_MELT_EXPRESSIONS#2", NULL != ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_.VALROUT___V949*/ meltfptr[948])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V949*/ meltfptr[948])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:7117:/ initchunk"); @@ -47893,13 +47968,13 @@ meltmod__warmelt_outobj__initialmeltchunk_16 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V949*/ meltfptr[948])) + ( /*_._VALROUT___V949*/ meltfptr[948])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_762__TRANSLATE_RUN_MELT_EXPRESSIONS#3", NULL != ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7])); - ((meltroutine_ptr_t) /*_.VALROUT___V949*/ meltfptr[948])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V949*/ meltfptr[948])->tabval[3] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7]); MELT_LOCATION ("warmelt-outobj.melt:7117:/ initchunk"); @@ -47908,13 +47983,13 @@ meltmod__warmelt_outobj__initialmeltchunk_16 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V949*/ meltfptr[948])) + ( /*_._VALROUT___V949*/ meltfptr[948])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_762__TRANSLATE_RUN_MELT_EXPRESSIONS#4", NULL != ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_.VALROUT___V949*/ meltfptr[948])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V949*/ meltfptr[948])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:7155:/ initchunk"); @@ -47923,35 +47998,35 @@ meltmod__warmelt_outobj__initialmeltchunk_16 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V950*/ meltfptr[949])) + ( /*_._VALROUT___V950*/ meltfptr[949])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_764__LAMBDA_#0", NULL != ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7])); - ((meltroutine_ptr_t) /*_.VALROUT___V950*/ meltfptr[949])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V950*/ meltfptr[949])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V951*/ meltfptr[950])) == + ( /*_._VALDATA___V951*/ meltfptr[950])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V951*/ + ( /*_._VALDATA___V951*/ meltfptr[950])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V951*/ meltfptr[950]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V951*/ meltfptr[950]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V952*/ meltfptr[951]); + /*_._VALSTR___V952*/ meltfptr[951]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V951*/ meltfptr[950]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V951*/ meltfptr[950]); - melt_dbgtrace_written_object ( /*_.VALDATA___V951*/ meltfptr[950], + melt_dbgtrace_written_object ( /*_._VALDATA___V951*/ meltfptr[950], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:7155:/ initchunk"); @@ -47960,13 +48035,13 @@ meltmod__warmelt_outobj__initialmeltchunk_16 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V950*/ meltfptr[949])) + ( /*_._VALROUT___V950*/ meltfptr[949])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_764__LAMBDA_#1", - NULL != ( /*_.VALDATA___V951*/ meltfptr[950])); - ((meltroutine_ptr_t) /*_.VALROUT___V950*/ meltfptr[949])->tabval[1] = - (melt_ptr_t) ( /*_.VALDATA___V951*/ meltfptr[950]); + NULL != ( /*_._VALDATA___V951*/ meltfptr[950])); + ((meltroutine_ptr_t) /*_._VALROUT___V950*/ meltfptr[949])->tabval[1] = + (melt_ptr_t) ( /*_._VALDATA___V951*/ meltfptr[950]); MELT_LOCATION ("warmelt-outobj.melt:7155:/ initchunk"); /*^putroutconst */ @@ -47974,18 +48049,18 @@ meltmod__warmelt_outobj__initialmeltchunk_16 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V950*/ meltfptr[949])) + ( /*_._VALROUT___V950*/ meltfptr[949])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_764__LAMBDA_#2", NULL != ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_.VALROUT___V950*/ meltfptr[949])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V950*/ meltfptr[949])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:7155:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V950*/ meltfptr[949]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V950*/ meltfptr[949]); MELT_LOCATION ("warmelt-outobj.melt:7117:/ initchunk"); /*^putroutconst */ @@ -47993,14 +48068,14 @@ meltmod__warmelt_outobj__initialmeltchunk_16 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V949*/ meltfptr[948])) + ( /*_._VALROUT___V949*/ meltfptr[948])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_762__TRANSLATE_RUN_MELT_EXPRESSIONS#5", - NULL != ( /*_.VALROUT___V950*/ meltfptr[949])); - ((meltroutine_ptr_t) /*_.VALROUT___V949*/ meltfptr[948])->tabval[5] = - (melt_ptr_t) ( /*_.VALROUT___V950*/ meltfptr[949]); + NULL != ( /*_._VALROUT___V950*/ meltfptr[949])); + ((meltroutine_ptr_t) /*_._VALROUT___V949*/ meltfptr[948])->tabval[5] = + (melt_ptr_t) ( /*_._VALROUT___V950*/ meltfptr[949]); MELT_LOCATION ("warmelt-outobj.melt:7117:/ initchunk"); /*^putroutconst */ @@ -48008,14 +48083,14 @@ meltmod__warmelt_outobj__initialmeltchunk_16 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V949*/ meltfptr[948])) + ( /*_._VALROUT___V949*/ meltfptr[948])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_762__TRANSLATE_RUN_MELT_EXPRESSIONS#6", NULL != ( /*_.CLASS_RUNNING_EXTENSION_MODULE_CONTEXT__V142*/ meltfptr[141])); - ((meltroutine_ptr_t) /*_.VALROUT___V949*/ meltfptr[948])->tabval[6] = + ((meltroutine_ptr_t) /*_._VALROUT___V949*/ meltfptr[948])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_RUNNING_EXTENSION_MODULE_CONTEXT__V142*/ meltfptr[141]); @@ -48025,13 +48100,13 @@ meltmod__warmelt_outobj__initialmeltchunk_16 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V949*/ meltfptr[948])) + ( /*_._VALROUT___V949*/ meltfptr[948])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_762__TRANSLATE_RUN_MELT_EXPRESSIONS#7", NULL != ( /*_.DISCR_MAP_STRINGS__V169*/ meltfptr[168])); - ((meltroutine_ptr_t) /*_.VALROUT___V949*/ meltfptr[948])->tabval[7] = + ((meltroutine_ptr_t) /*_._VALROUT___V949*/ meltfptr[948])->tabval[7] = (melt_ptr_t) ( /*_.DISCR_MAP_STRINGS__V169*/ meltfptr[168]); MELT_LOCATION ("warmelt-outobj.melt:7117:/ initchunk"); @@ -48040,13 +48115,13 @@ meltmod__warmelt_outobj__initialmeltchunk_16 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V949*/ meltfptr[948])) + ( /*_._VALROUT___V949*/ meltfptr[948])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_762__TRANSLATE_RUN_MELT_EXPRESSIONS#8", NULL != ( /*_.DISCR_INTEGER__V53*/ meltfptr[52])); - ((meltroutine_ptr_t) /*_.VALROUT___V949*/ meltfptr[948])->tabval[8] = + ((meltroutine_ptr_t) /*_._VALROUT___V949*/ meltfptr[948])->tabval[8] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V53*/ meltfptr[52]); MELT_LOCATION ("warmelt-outobj.melt:7117:/ initchunk"); @@ -48055,13 +48130,13 @@ meltmod__warmelt_outobj__initialmeltchunk_16 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V949*/ meltfptr[948])) + ( /*_._VALROUT___V949*/ meltfptr[948])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_762__TRANSLATE_RUN_MELT_EXPRESSIONS#9", NULL != ( /*_.DISCR_LIST__V66*/ meltfptr[65])); - ((meltroutine_ptr_t) /*_.VALROUT___V949*/ meltfptr[948])->tabval[9] = + ((meltroutine_ptr_t) /*_._VALROUT___V949*/ meltfptr[948])->tabval[9] = (melt_ptr_t) ( /*_.DISCR_LIST__V66*/ meltfptr[65]); MELT_LOCATION ("warmelt-outobj.melt:7117:/ initchunk"); @@ -48070,13 +48145,13 @@ meltmod__warmelt_outobj__initialmeltchunk_16 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V949*/ meltfptr[948])) + ( /*_._VALROUT___V949*/ meltfptr[948])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_762__TRANSLATE_RUN_MELT_EXPRESSIONS#10", NULL != ( /*_.DISCR_MAP_OBJECTS__V148*/ meltfptr[147])); - ((meltroutine_ptr_t) /*_.VALROUT___V949*/ meltfptr[948])->tabval[10] = + ((meltroutine_ptr_t) /*_._VALROUT___V949*/ meltfptr[948])->tabval[10] = (melt_ptr_t) ( /*_.DISCR_MAP_OBJECTS__V148*/ meltfptr[147]); MELT_LOCATION ("warmelt-outobj.melt:7117:/ initchunk"); @@ -48085,13 +48160,13 @@ meltmod__warmelt_outobj__initialmeltchunk_16 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V949*/ meltfptr[948])) + ( /*_._VALROUT___V949*/ meltfptr[948])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_762__TRANSLATE_RUN_MELT_EXPRESSIONS#11", NULL != ( /*_.CREATE_NORMAL_EXTENDING_CONTEXT__V183*/ meltfptr[182])); - ((meltroutine_ptr_t) /*_.VALROUT___V949*/ meltfptr[948])->tabval[11] = + ((meltroutine_ptr_t) /*_._VALROUT___V949*/ meltfptr[948])->tabval[11] = (melt_ptr_t) ( /*_.CREATE_NORMAL_EXTENDING_CONTEXT__V183*/ meltfptr[182]); MELT_LOCATION ("warmelt-outobj.melt:7117:/ initchunk"); @@ -48100,13 +48175,13 @@ meltmod__warmelt_outobj__initialmeltchunk_16 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V949*/ meltfptr[948])) + ( /*_._VALROUT___V949*/ meltfptr[948])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_762__TRANSLATE_RUN_MELT_EXPRESSIONS#12", NULL != ( /*_.CLASS_SEXPR__V184*/ meltfptr[183])); - ((meltroutine_ptr_t) /*_.VALROUT___V949*/ meltfptr[948])->tabval[12] = + ((meltroutine_ptr_t) /*_._VALROUT___V949*/ meltfptr[948])->tabval[12] = (melt_ptr_t) ( /*_.CLASS_SEXPR__V184*/ meltfptr[183]); MELT_LOCATION ("warmelt-outobj.melt:7117:/ initchunk"); @@ -48115,13 +48190,13 @@ meltmod__warmelt_outobj__initialmeltchunk_16 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V949*/ meltfptr[948])) + ( /*_._VALROUT___V949*/ meltfptr[948])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_762__TRANSLATE_RUN_MELT_EXPRESSIONS#13", NULL != ( /*_.CLASS_SYMBOL__V16*/ meltfptr[15])); - ((meltroutine_ptr_t) /*_.VALROUT___V949*/ meltfptr[948])->tabval[13] = + ((meltroutine_ptr_t) /*_._VALROUT___V949*/ meltfptr[948])->tabval[13] = (melt_ptr_t) ( /*_.CLASS_SYMBOL__V16*/ meltfptr[15]); MELT_LOCATION ("warmelt-outobj.melt:7117:/ initchunk"); @@ -48130,13 +48205,13 @@ meltmod__warmelt_outobj__initialmeltchunk_16 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V949*/ meltfptr[948])) + ( /*_._VALROUT___V949*/ meltfptr[948])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_762__TRANSLATE_RUN_MELT_EXPRESSIONS#14", NULL != ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7])); - ((meltroutine_ptr_t) /*_.VALROUT___V949*/ meltfptr[948])->tabval[14] = + ((meltroutine_ptr_t) /*_._VALROUT___V949*/ meltfptr[948])->tabval[14] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7]); MELT_LOCATION ("warmelt-outobj.melt:7117:/ initchunk"); @@ -48145,13 +48220,13 @@ meltmod__warmelt_outobj__initialmeltchunk_16 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V949*/ meltfptr[948])) + ( /*_._VALROUT___V949*/ meltfptr[948])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_762__TRANSLATE_RUN_MELT_EXPRESSIONS#15", NULL != ( /*_.CLASS_NAMED__V14*/ meltfptr[13])); - ((meltroutine_ptr_t) /*_.VALROUT___V949*/ meltfptr[948])->tabval[15] = + ((meltroutine_ptr_t) /*_._VALROUT___V949*/ meltfptr[948])->tabval[15] = (melt_ptr_t) ( /*_.CLASS_NAMED__V14*/ meltfptr[13]); MELT_LOCATION ("warmelt-outobj.melt:7202:/ initchunk"); @@ -48160,12 +48235,12 @@ meltmod__warmelt_outobj__initialmeltchunk_16 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V953*/ meltfptr[952])) + ( /*_._VALROUT___V953*/ meltfptr[952])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_769__LAMBDA_#0", NULL != ( /*_.CLASS_SEXPR__V184*/ meltfptr[183])); - ((meltroutine_ptr_t) /*_.VALROUT___V953*/ meltfptr[952])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V953*/ meltfptr[952])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_SEXPR__V184*/ meltfptr[183]); MELT_LOCATION ("warmelt-outobj.melt:7202:/ initchunk"); @@ -48174,12 +48249,12 @@ meltmod__warmelt_outobj__initialmeltchunk_16 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V953*/ meltfptr[952])) + ( /*_._VALROUT___V953*/ meltfptr[952])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_769__LAMBDA_#1", NULL != ( /*_.CLASS_SYMBOL__V16*/ meltfptr[15])); - ((meltroutine_ptr_t) /*_.VALROUT___V953*/ meltfptr[952])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V953*/ meltfptr[952])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_SYMBOL__V16*/ meltfptr[15]); MELT_LOCATION ("warmelt-outobj.melt:7202:/ initchunk"); @@ -48188,12 +48263,12 @@ meltmod__warmelt_outobj__initialmeltchunk_16 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V953*/ meltfptr[952])) + ( /*_._VALROUT___V953*/ meltfptr[952])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_769__LAMBDA_#2", NULL != ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7])); - ((meltroutine_ptr_t) /*_.VALROUT___V953*/ meltfptr[952])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V953*/ meltfptr[952])->tabval[2] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7]); MELT_LOCATION ("warmelt-outobj.melt:7202:/ initchunk"); @@ -48202,12 +48277,12 @@ meltmod__warmelt_outobj__initialmeltchunk_16 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V953*/ meltfptr[952])) + ( /*_._VALROUT___V953*/ meltfptr[952])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_769__LAMBDA_#3", NULL != ( /*_.CLASS_NAMED__V14*/ meltfptr[13])); - ((meltroutine_ptr_t) /*_.VALROUT___V953*/ meltfptr[952])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V953*/ meltfptr[952])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_NAMED__V14*/ meltfptr[13]); MELT_LOCATION ("warmelt-outobj.melt:7202:/ initchunk"); @@ -48216,18 +48291,18 @@ meltmod__warmelt_outobj__initialmeltchunk_16 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V953*/ meltfptr[952])) + ( /*_._VALROUT___V953*/ meltfptr[952])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_769__LAMBDA_#4", - NULL != ( /*_.VALSTR___V954*/ meltfptr[953])); - ((meltroutine_ptr_t) /*_.VALROUT___V953*/ meltfptr[952])->tabval[4] = - (melt_ptr_t) ( /*_.VALSTR___V954*/ meltfptr[953]); + NULL != ( /*_._VALSTR___V954*/ meltfptr[953])); + ((meltroutine_ptr_t) /*_._VALROUT___V953*/ meltfptr[952])->tabval[4] = + (melt_ptr_t) ( /*_._VALSTR___V954*/ meltfptr[953]); MELT_LOCATION ("warmelt-outobj.melt:7202:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V953*/ meltfptr[952]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V953*/ meltfptr[952]); MELT_LOCATION ("warmelt-outobj.melt:7117:/ initchunk"); /*^putroutconst */ @@ -48235,14 +48310,14 @@ meltmod__warmelt_outobj__initialmeltchunk_16 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V949*/ meltfptr[948])) + ( /*_._VALROUT___V949*/ meltfptr[948])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_762__TRANSLATE_RUN_MELT_EXPRESSIONS#16", - NULL != ( /*_.VALROUT___V953*/ meltfptr[952])); - ((meltroutine_ptr_t) /*_.VALROUT___V949*/ meltfptr[948])->tabval[16] = - (melt_ptr_t) ( /*_.VALROUT___V953*/ meltfptr[952]); + NULL != ( /*_._VALROUT___V953*/ meltfptr[952])); + ((meltroutine_ptr_t) /*_._VALROUT___V949*/ meltfptr[948])->tabval[16] = + (melt_ptr_t) ( /*_._VALROUT___V953*/ meltfptr[952]); MELT_LOCATION ("warmelt-outobj.melt:7117:/ initchunk"); /*^putroutconst */ @@ -48250,13 +48325,13 @@ meltmod__warmelt_outobj__initialmeltchunk_16 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V949*/ meltfptr[948])) + ( /*_._VALROUT___V949*/ meltfptr[948])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_762__TRANSLATE_RUN_MELT_EXPRESSIONS#17", NULL != ( /*_.CLASS_SEXPR__V184*/ meltfptr[183])); - ((meltroutine_ptr_t) /*_.VALROUT___V949*/ meltfptr[948])->tabval[17] = + ((meltroutine_ptr_t) /*_._VALROUT___V949*/ meltfptr[948])->tabval[17] = (melt_ptr_t) ( /*_.CLASS_SEXPR__V184*/ meltfptr[183]); MELT_LOCATION ("warmelt-outobj.melt:7117:/ initchunk"); @@ -48265,14 +48340,14 @@ meltmod__warmelt_outobj__initialmeltchunk_16 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V949*/ meltfptr[948])) + ( /*_._VALROUT___V949*/ meltfptr[948])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_762__TRANSLATE_RUN_MELT_EXPRESSIONS#18", - NULL != ( /*_.VALSTR___V955*/ meltfptr[954])); - ((meltroutine_ptr_t) /*_.VALROUT___V949*/ meltfptr[948])->tabval[18] = - (melt_ptr_t) ( /*_.VALSTR___V955*/ meltfptr[954]); + NULL != ( /*_._VALSTR___V955*/ meltfptr[954])); + ((meltroutine_ptr_t) /*_._VALROUT___V949*/ meltfptr[948])->tabval[18] = + (melt_ptr_t) ( /*_._VALSTR___V955*/ meltfptr[954]); MELT_LOCATION ("warmelt-outobj.melt:7117:/ initchunk"); /*^putroutconst */ @@ -48280,14 +48355,14 @@ meltmod__warmelt_outobj__initialmeltchunk_16 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V949*/ meltfptr[948])) + ( /*_._VALROUT___V949*/ meltfptr[948])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_762__TRANSLATE_RUN_MELT_EXPRESSIONS#19", - NULL != ( /*_.VALSTR___V956*/ meltfptr[955])); - ((meltroutine_ptr_t) /*_.VALROUT___V949*/ meltfptr[948])->tabval[19] = - (melt_ptr_t) ( /*_.VALSTR___V956*/ meltfptr[955]); + NULL != ( /*_._VALSTR___V956*/ meltfptr[955])); + ((meltroutine_ptr_t) /*_._VALROUT___V949*/ meltfptr[948])->tabval[19] = + (melt_ptr_t) ( /*_._VALSTR___V956*/ meltfptr[955]); MELT_LOCATION ("warmelt-outobj.melt:7117:/ initchunk"); /*^putroutconst */ @@ -48295,13 +48370,13 @@ meltmod__warmelt_outobj__initialmeltchunk_16 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V949*/ meltfptr[948])) + ( /*_._VALROUT___V949*/ meltfptr[948])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_762__TRANSLATE_RUN_MELT_EXPRESSIONS#20", NULL != ( /*_.MACROEXPAND_TOPLEVEL_LIST__V172*/ meltfptr[171])); - ((meltroutine_ptr_t) /*_.VALROUT___V949*/ meltfptr[948])->tabval[20] = + ((meltroutine_ptr_t) /*_._VALROUT___V949*/ meltfptr[948])->tabval[20] = (melt_ptr_t) ( /*_.MACROEXPAND_TOPLEVEL_LIST__V172*/ meltfptr[171]); MELT_LOCATION ("warmelt-outobj.melt:7117:/ initchunk"); @@ -48310,13 +48385,13 @@ meltmod__warmelt_outobj__initialmeltchunk_16 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V949*/ meltfptr[948])) + ( /*_._VALROUT___V949*/ meltfptr[948])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_762__TRANSLATE_RUN_MELT_EXPRESSIONS#21", NULL != ( /*_.MACROEXPAND_1__V173*/ meltfptr[172])); - ((meltroutine_ptr_t) /*_.VALROUT___V949*/ meltfptr[948])->tabval[21] = + ((meltroutine_ptr_t) /*_._VALROUT___V949*/ meltfptr[948])->tabval[21] = (melt_ptr_t) ( /*_.MACROEXPAND_1__V173*/ meltfptr[172]); MELT_LOCATION ("warmelt-outobj.melt:7117:/ initchunk"); @@ -48325,13 +48400,13 @@ meltmod__warmelt_outobj__initialmeltchunk_16 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V949*/ meltfptr[948])) + ( /*_._VALROUT___V949*/ meltfptr[948])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_762__TRANSLATE_RUN_MELT_EXPRESSIONS#22", NULL != ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7])); - ((meltroutine_ptr_t) /*_.VALROUT___V949*/ meltfptr[948])->tabval[22] = + ((meltroutine_ptr_t) /*_._VALROUT___V949*/ meltfptr[948])->tabval[22] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7]); MELT_LOCATION ("warmelt-outobj.melt:7117:/ initchunk"); @@ -48340,13 +48415,13 @@ meltmod__warmelt_outobj__initialmeltchunk_16 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V949*/ meltfptr[948])) + ( /*_._VALROUT___V949*/ meltfptr[948])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_762__TRANSLATE_RUN_MELT_EXPRESSIONS#23", NULL != ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_.VALROUT___V949*/ meltfptr[948])->tabval[23] = + ((meltroutine_ptr_t) /*_._VALROUT___V949*/ meltfptr[948])->tabval[23] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:7117:/ initchunk"); @@ -48355,13 +48430,13 @@ meltmod__warmelt_outobj__initialmeltchunk_16 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V949*/ meltfptr[948])) + ( /*_._VALROUT___V949*/ meltfptr[948])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_762__TRANSLATE_RUN_MELT_EXPRESSIONS#24", NULL != ( /*_.GET_CTYPE__V111*/ meltfptr[110])); - ((meltroutine_ptr_t) /*_.VALROUT___V949*/ meltfptr[948])->tabval[24] = + ((meltroutine_ptr_t) /*_._VALROUT___V949*/ meltfptr[948])->tabval[24] = (melt_ptr_t) ( /*_.GET_CTYPE__V111*/ meltfptr[110]); MELT_LOCATION ("warmelt-outobj.melt:7117:/ initchunk"); @@ -48370,13 +48445,13 @@ meltmod__warmelt_outobj__initialmeltchunk_16 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V949*/ meltfptr[948])) + ( /*_._VALROUT___V949*/ meltfptr[948])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_762__TRANSLATE_RUN_MELT_EXPRESSIONS#25", NULL != ( /*_.CLASS_CTYPE__V29*/ meltfptr[28])); - ((meltroutine_ptr_t) /*_.VALROUT___V949*/ meltfptr[948])->tabval[25] = + ((meltroutine_ptr_t) /*_._VALROUT___V949*/ meltfptr[948])->tabval[25] = (melt_ptr_t) ( /*_.CLASS_CTYPE__V29*/ meltfptr[28]); MELT_LOCATION ("warmelt-outobj.melt:7117:/ initchunk"); @@ -48385,13 +48460,13 @@ meltmod__warmelt_outobj__initialmeltchunk_16 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V949*/ meltfptr[948])) + ( /*_._VALROUT___V949*/ meltfptr[948])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_762__TRANSLATE_RUN_MELT_EXPRESSIONS#26", NULL != ( /*_.CTYPE_VALUE__V32*/ meltfptr[31])); - ((meltroutine_ptr_t) /*_.VALROUT___V949*/ meltfptr[948])->tabval[26] = + ((meltroutine_ptr_t) /*_._VALROUT___V949*/ meltfptr[948])->tabval[26] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V32*/ meltfptr[31]); MELT_LOCATION ("warmelt-outobj.melt:7117:/ initchunk"); @@ -48400,13 +48475,13 @@ meltmod__warmelt_outobj__initialmeltchunk_16 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V949*/ meltfptr[948])) + ( /*_._VALROUT___V949*/ meltfptr[948])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_762__TRANSLATE_RUN_MELT_EXPRESSIONS#27", NULL != ( /*_.CLASS_NREP_RETURN__V178*/ meltfptr[177])); - ((meltroutine_ptr_t) /*_.VALROUT___V949*/ meltfptr[948])->tabval[27] = + ((meltroutine_ptr_t) /*_._VALROUT___V949*/ meltfptr[948])->tabval[27] = (melt_ptr_t) ( /*_.CLASS_NREP_RETURN__V178*/ meltfptr[177]); MELT_LOCATION ("warmelt-outobj.melt:7117:/ initchunk"); @@ -48415,13 +48490,13 @@ meltmod__warmelt_outobj__initialmeltchunk_16 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V949*/ meltfptr[948])) + ( /*_._VALROUT___V949*/ meltfptr[948])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_762__TRANSLATE_RUN_MELT_EXPRESSIONS#28", NULL != ( /*_.CLASS_NAMED__V14*/ meltfptr[13])); - ((meltroutine_ptr_t) /*_.VALROUT___V949*/ meltfptr[948])->tabval[28] = + ((meltroutine_ptr_t) /*_._VALROUT___V949*/ meltfptr[948])->tabval[28] = (melt_ptr_t) ( /*_.CLASS_NAMED__V14*/ meltfptr[13]); MELT_LOCATION ("warmelt-outobj.melt:7117:/ initchunk"); @@ -48429,12 +48504,12 @@ meltmod__warmelt_outobj__initialmeltchunk_16 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V949*/ meltfptr[948])) == + ( /*_._VALROUT___V949*/ meltfptr[948])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V932*/ meltfptr[931]); - ((meltroutine_ptr_t) /*_.VALROUT___V949*/ meltfptr[948])->tabval[29] = - (melt_ptr_t) ( /*_.VALCLO___V932*/ meltfptr[931]); + NULL != /*_._VALCLO___V932*/ meltfptr[931]); + ((meltroutine_ptr_t) /*_._VALROUT___V949*/ meltfptr[948])->tabval[29] = + (melt_ptr_t) ( /*_._VALCLO___V932*/ meltfptr[931]); MELT_LOCATION ("warmelt-outobj.melt:7117:/ initchunk"); /*^putroutconst */ @@ -48442,13 +48517,13 @@ meltmod__warmelt_outobj__initialmeltchunk_16 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V949*/ meltfptr[948])) + ( /*_._VALROUT___V949*/ meltfptr[948])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_762__TRANSLATE_RUN_MELT_EXPRESSIONS#30", NULL != ( /*_.WRAP_NORMAL_LET1__V160*/ meltfptr[159])); - ((meltroutine_ptr_t) /*_.VALROUT___V949*/ meltfptr[948])->tabval[30] = + ((meltroutine_ptr_t) /*_._VALROUT___V949*/ meltfptr[948])->tabval[30] = (melt_ptr_t) ( /*_.WRAP_NORMAL_LET1__V160*/ meltfptr[159]); MELT_LOCATION ("warmelt-outobj.melt:7265:/ initchunk"); @@ -48457,12 +48532,12 @@ meltmod__warmelt_outobj__initialmeltchunk_16 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V957*/ meltfptr[956])) + ( /*_._VALROUT___V957*/ meltfptr[956])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_775__LAMBDA_#0", NULL != ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7])); - ((meltroutine_ptr_t) /*_.VALROUT___V957*/ meltfptr[956])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V957*/ meltfptr[956])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7]); MELT_LOCATION ("warmelt-outobj.melt:7265:/ initchunk"); @@ -48471,12 +48546,12 @@ meltmod__warmelt_outobj__initialmeltchunk_16 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V957*/ meltfptr[956])) + ( /*_._VALROUT___V957*/ meltfptr[956])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_775__LAMBDA_#1", NULL != ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_.VALROUT___V957*/ meltfptr[956])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V957*/ meltfptr[956])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:7265:/ initchunk"); @@ -48485,12 +48560,12 @@ meltmod__warmelt_outobj__initialmeltchunk_16 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V957*/ meltfptr[956])) + ( /*_._VALROUT___V957*/ meltfptr[956])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_775__LAMBDA_#2", NULL != ( /*_.GET_CTYPE__V111*/ meltfptr[110])); - ((meltroutine_ptr_t) /*_.VALROUT___V957*/ meltfptr[956])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V957*/ meltfptr[956])->tabval[2] = (melt_ptr_t) ( /*_.GET_CTYPE__V111*/ meltfptr[110]); MELT_LOCATION ("warmelt-outobj.melt:7265:/ initchunk"); @@ -48499,12 +48574,12 @@ meltmod__warmelt_outobj__initialmeltchunk_16 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V957*/ meltfptr[956])) + ( /*_._VALROUT___V957*/ meltfptr[956])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_775__LAMBDA_#3", NULL != ( /*_.CLASS_CTYPE__V29*/ meltfptr[28])); - ((meltroutine_ptr_t) /*_.VALROUT___V957*/ meltfptr[956])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V957*/ meltfptr[956])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_CTYPE__V29*/ meltfptr[28]); MELT_LOCATION ("warmelt-outobj.melt:7265:/ initchunk"); @@ -48513,12 +48588,12 @@ meltmod__warmelt_outobj__initialmeltchunk_16 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V957*/ meltfptr[956])) + ( /*_._VALROUT___V957*/ meltfptr[956])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_775__LAMBDA_#4", NULL != ( /*_.CTYPE_VALUE__V32*/ meltfptr[31])); - ((meltroutine_ptr_t) /*_.VALROUT___V957*/ meltfptr[956])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V957*/ meltfptr[956])->tabval[4] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V32*/ meltfptr[31]); MELT_LOCATION ("warmelt-outobj.melt:7265:/ initchunk"); @@ -48527,12 +48602,12 @@ meltmod__warmelt_outobj__initialmeltchunk_16 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V957*/ meltfptr[956])) + ( /*_._VALROUT___V957*/ meltfptr[956])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_775__LAMBDA_#5", NULL != ( /*_.CLASS_NREP_RETURN__V178*/ meltfptr[177])); - ((meltroutine_ptr_t) /*_.VALROUT___V957*/ meltfptr[956])->tabval[5] = + ((meltroutine_ptr_t) /*_._VALROUT___V957*/ meltfptr[956])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_NREP_RETURN__V178*/ meltfptr[177]); MELT_LOCATION ("warmelt-outobj.melt:7265:/ initchunk"); @@ -48541,12 +48616,12 @@ meltmod__warmelt_outobj__initialmeltchunk_16 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V957*/ meltfptr[956])) + ( /*_._VALROUT___V957*/ meltfptr[956])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_775__LAMBDA_#6", NULL != ( /*_.CLASS_NAMED__V14*/ meltfptr[13])); - ((meltroutine_ptr_t) /*_.VALROUT___V957*/ meltfptr[956])->tabval[6] = + ((meltroutine_ptr_t) /*_._VALROUT___V957*/ meltfptr[956])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_NAMED__V14*/ meltfptr[13]); MELT_LOCATION ("warmelt-outobj.melt:7265:/ initchunk"); @@ -48554,21 +48629,21 @@ meltmod__warmelt_outobj__initialmeltchunk_16 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V957*/ meltfptr[956])) == + ( /*_._VALROUT___V957*/ meltfptr[956])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V932*/ meltfptr[931]); - ((meltroutine_ptr_t) /*_.VALROUT___V957*/ meltfptr[956])->tabval[7] = - (melt_ptr_t) ( /*_.VALCLO___V932*/ meltfptr[931]); + NULL != /*_._VALCLO___V932*/ meltfptr[931]); + ((meltroutine_ptr_t) /*_._VALROUT___V957*/ meltfptr[956])->tabval[7] = + (melt_ptr_t) ( /*_._VALCLO___V932*/ meltfptr[931]); #undef meltfram__ -} /*end of meltmod__warmelt_outobj__initialmeltchunk_16 */ +} /*end of meltmod__WARMELTmiOUTOBJ__initialmeltchunk_16 */ void -meltmod__warmelt_outobj__initialmeltchunk_17 (meltinitial_frame_t * - meltmeltframptr__, - char meltpredefinited[]) +meltmod__WARMELTmiOUTOBJ__initialmeltchunk_17 (meltinitial_frame_t * + meltmeltframptr__, + char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount @@ -48580,18 +48655,18 @@ meltmod__warmelt_outobj__initialmeltchunk_17 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V957*/ meltfptr[956])) + ( /*_._VALROUT___V957*/ meltfptr[956])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_775__LAMBDA_#8", NULL != ( /*_.WRAP_NORMAL_LET1__V160*/ meltfptr[159])); - ((meltroutine_ptr_t) /*_.VALROUT___V957*/ meltfptr[956])->tabval[8] = + ((meltroutine_ptr_t) /*_._VALROUT___V957*/ meltfptr[956])->tabval[8] = (melt_ptr_t) ( /*_.WRAP_NORMAL_LET1__V160*/ meltfptr[159]); MELT_LOCATION ("warmelt-outobj.melt:7265:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V957*/ meltfptr[956]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V957*/ meltfptr[956]); MELT_LOCATION ("warmelt-outobj.melt:7117:/ initchunk"); /*^putroutconst */ @@ -48599,14 +48674,14 @@ meltmod__warmelt_outobj__initialmeltchunk_17 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V949*/ meltfptr[948])) + ( /*_._VALROUT___V949*/ meltfptr[948])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_762__TRANSLATE_RUN_MELT_EXPRESSIONS#31", - NULL != ( /*_.VALROUT___V957*/ meltfptr[956])); - ((meltroutine_ptr_t) /*_.VALROUT___V949*/ meltfptr[948])->tabval[31] = - (melt_ptr_t) ( /*_.VALROUT___V957*/ meltfptr[956]); + NULL != ( /*_._VALROUT___V957*/ meltfptr[956])); + ((meltroutine_ptr_t) /*_._VALROUT___V949*/ meltfptr[948])->tabval[31] = + (melt_ptr_t) ( /*_._VALROUT___V957*/ meltfptr[956]); MELT_LOCATION ("warmelt-outobj.melt:7117:/ initchunk"); /*^putroutconst */ @@ -48614,14 +48689,14 @@ meltmod__warmelt_outobj__initialmeltchunk_17 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V949*/ meltfptr[948])) + ( /*_._VALROUT___V949*/ meltfptr[948])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_762__TRANSLATE_RUN_MELT_EXPRESSIONS#32", - NULL != ( /*_.VALSTR___V958*/ meltfptr[957])); - ((meltroutine_ptr_t) /*_.VALROUT___V949*/ meltfptr[948])->tabval[32] = - (melt_ptr_t) ( /*_.VALSTR___V958*/ meltfptr[957]); + NULL != ( /*_._VALSTR___V958*/ meltfptr[957])); + ((meltroutine_ptr_t) /*_._VALROUT___V949*/ meltfptr[948])->tabval[32] = + (melt_ptr_t) ( /*_._VALSTR___V958*/ meltfptr[957]); MELT_LOCATION ("warmelt-outobj.melt:7117:/ initchunk"); /*^putroutconst */ @@ -48629,13 +48704,13 @@ meltmod__warmelt_outobj__initialmeltchunk_17 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V949*/ meltfptr[948])) + ( /*_._VALROUT___V949*/ meltfptr[948])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_762__TRANSLATE_RUN_MELT_EXPRESSIONS#33", NULL != ( /*_.DISCR_STRING__V54*/ meltfptr[53])); - ((meltroutine_ptr_t) /*_.VALROUT___V949*/ meltfptr[948])->tabval[33] = + ((meltroutine_ptr_t) /*_._VALROUT___V949*/ meltfptr[948])->tabval[33] = (melt_ptr_t) ( /*_.DISCR_STRING__V54*/ meltfptr[53]); MELT_LOCATION ("warmelt-outobj.melt:7117:/ initchunk"); @@ -48643,12 +48718,12 @@ meltmod__warmelt_outobj__initialmeltchunk_17 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V949*/ meltfptr[948])) == + ( /*_._VALROUT___V949*/ meltfptr[948])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V874*/ meltfptr[873]); - ((meltroutine_ptr_t) /*_.VALROUT___V949*/ meltfptr[948])->tabval[34] = - (melt_ptr_t) ( /*_.VALCLO___V874*/ meltfptr[873]); + NULL != /*_._VALCLO___V874*/ meltfptr[873]); + ((meltroutine_ptr_t) /*_._VALROUT___V949*/ meltfptr[948])->tabval[34] = + (melt_ptr_t) ( /*_._VALCLO___V874*/ meltfptr[873]); MELT_LOCATION ("warmelt-outobj.melt:7117:/ initchunk"); /*^putroutconst */ @@ -48656,13 +48731,13 @@ meltmod__warmelt_outobj__initialmeltchunk_17 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V949*/ meltfptr[948])) + ( /*_._VALROUT___V949*/ meltfptr[948])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_762__TRANSLATE_RUN_MELT_EXPRESSIONS#35", NULL != ( /*_.COMPILE2OBJ_INITEXTENDPROC__V185*/ meltfptr[184])); - ((meltroutine_ptr_t) /*_.VALROUT___V949*/ meltfptr[948])->tabval[35] = + ((meltroutine_ptr_t) /*_._VALROUT___V949*/ meltfptr[948])->tabval[35] = (melt_ptr_t) ( /*_.COMPILE2OBJ_INITEXTENDPROC__V185*/ meltfptr[184]); MELT_LOCATION ("warmelt-outobj.melt:7117:/ initchunk"); @@ -48671,14 +48746,14 @@ meltmod__warmelt_outobj__initialmeltchunk_17 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V949*/ meltfptr[948])) + ( /*_._VALROUT___V949*/ meltfptr[948])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_762__TRANSLATE_RUN_MELT_EXPRESSIONS#36", - NULL != ( /*_.VALSTR___V959*/ meltfptr[958])); - ((meltroutine_ptr_t) /*_.VALROUT___V949*/ meltfptr[948])->tabval[36] = - (melt_ptr_t) ( /*_.VALSTR___V959*/ meltfptr[958]); + NULL != ( /*_._VALSTR___V959*/ meltfptr[958])); + ((meltroutine_ptr_t) /*_._VALROUT___V949*/ meltfptr[948])->tabval[36] = + (melt_ptr_t) ( /*_._VALSTR___V959*/ meltfptr[958]); MELT_LOCATION ("warmelt-outobj.melt:7117:/ initchunk"); /*^putroutconst */ @@ -48686,14 +48761,14 @@ meltmod__warmelt_outobj__initialmeltchunk_17 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V949*/ meltfptr[948])) + ( /*_._VALROUT___V949*/ meltfptr[948])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_762__TRANSLATE_RUN_MELT_EXPRESSIONS#37", - NULL != ( /*_.VALSTR___V960*/ meltfptr[959])); - ((meltroutine_ptr_t) /*_.VALROUT___V949*/ meltfptr[948])->tabval[37] = - (melt_ptr_t) ( /*_.VALSTR___V960*/ meltfptr[959]); + NULL != ( /*_._VALSTR___V960*/ meltfptr[959])); + ((meltroutine_ptr_t) /*_._VALROUT___V949*/ meltfptr[948])->tabval[37] = + (melt_ptr_t) ( /*_._VALSTR___V960*/ meltfptr[959]); MELT_LOCATION ("warmelt-outobj.melt:7117:/ initchunk"); /*^putroutconst */ @@ -48701,13 +48776,13 @@ meltmod__warmelt_outobj__initialmeltchunk_17 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V949*/ meltfptr[948])) + ( /*_._VALROUT___V949*/ meltfptr[948])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_762__TRANSLATE_RUN_MELT_EXPRESSIONS#38", NULL != ( /*_.DISCR_MULTIPLE__V68*/ meltfptr[67])); - ((meltroutine_ptr_t) /*_.VALROUT___V949*/ meltfptr[948])->tabval[38] = + ((meltroutine_ptr_t) /*_._VALROUT___V949*/ meltfptr[948])->tabval[38] = (melt_ptr_t) ( /*_.DISCR_MULTIPLE__V68*/ meltfptr[67]); MELT_LOCATION ("warmelt-outobj.melt:7117:/ initchunk"); @@ -48716,13 +48791,13 @@ meltmod__warmelt_outobj__initialmeltchunk_17 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V949*/ meltfptr[948])) + ( /*_._VALROUT___V949*/ meltfptr[948])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_762__TRANSLATE_RUN_MELT_EXPRESSIONS#39", NULL != ( /*_.CLASS_ANY_MODULE_CONTEXT__V141*/ meltfptr[140])); - ((meltroutine_ptr_t) /*_.VALROUT___V949*/ meltfptr[948])->tabval[39] = + ((meltroutine_ptr_t) /*_._VALROUT___V949*/ meltfptr[948])->tabval[39] = (melt_ptr_t) ( /*_.CLASS_ANY_MODULE_CONTEXT__V141*/ meltfptr[140]); MELT_LOCATION ("warmelt-outobj.melt:7117:/ initchunk"); @@ -48731,125 +48806,125 @@ meltmod__warmelt_outobj__initialmeltchunk_17 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V949*/ meltfptr[948])) + ( /*_._VALROUT___V949*/ meltfptr[948])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_762__TRANSLATE_RUN_MELT_EXPRESSIONS#40", NULL != ( /*_.CLASS_LITERAL_VALUE__V186*/ meltfptr[185])); - ((meltroutine_ptr_t) /*_.VALROUT___V949*/ meltfptr[948])->tabval[40] = + ((meltroutine_ptr_t) /*_._VALROUT___V949*/ meltfptr[948])->tabval[40] = (melt_ptr_t) ( /*_.CLASS_LITERAL_VALUE__V186*/ meltfptr[185]); MELT_LOCATION ("warmelt-outobj.melt:7117:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V949*/ meltfptr[948]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V949*/ meltfptr[948]); /*putclosurout#128 */ melt_assertmsg ("putclosrout#128 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V961*/ meltfptr[960])) == + ( /*_._VALCLO___V961*/ meltfptr[960])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#128 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V949*/ meltfptr[948])) == + ( /*_._VALROUT___V949*/ meltfptr[948])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V961*/ meltfptr[960])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V949*/ meltfptr[948]); + ((meltclosure_ptr_t) /*_._VALCLO___V961*/ meltfptr[960])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V949*/ meltfptr[948]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V961*/ meltfptr[960]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V961*/ meltfptr[960]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V962*/ meltfptr[961])) == + ( /*_._VALDATA___V962*/ meltfptr[961])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V962*/ + ( /*_._VALDATA___V962*/ meltfptr[961])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V962*/ meltfptr[961]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V962*/ meltfptr[961]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V963*/ meltfptr[962]); + /*_._VALSTR___V963*/ meltfptr[962]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V962*/ meltfptr[961]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V962*/ meltfptr[961]); - melt_dbgtrace_written_object ( /*_.VALDATA___V962*/ meltfptr[961], + melt_dbgtrace_written_object ( /*_._VALDATA___V962*/ meltfptr[961], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V964*/ meltfptr[963])) == + ( /*_._VALDATA___V964*/ meltfptr[963])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V964*/ + ( /*_._VALDATA___V964*/ meltfptr[963])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V964*/ meltfptr[963]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V964*/ meltfptr[963]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V965*/ meltfptr[964]); + /*_._VALSTR___V965*/ meltfptr[964]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V964*/ meltfptr[963]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V964*/ meltfptr[963]); - melt_dbgtrace_written_object ( /*_.VALDATA___V964*/ meltfptr[963], + melt_dbgtrace_written_object ( /*_._VALDATA___V964*/ meltfptr[963], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V966*/ meltfptr[965])) == + ( /*_._VALDATA___V966*/ meltfptr[965])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V966*/ + ( /*_._VALDATA___V966*/ meltfptr[965])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V966*/ meltfptr[965]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V966*/ meltfptr[965]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V967*/ meltfptr[966]); + /*_._VALSTR___V967*/ meltfptr[966]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V966*/ meltfptr[965]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V966*/ meltfptr[965]); - melt_dbgtrace_written_object ( /*_.VALDATA___V966*/ meltfptr[965], + melt_dbgtrace_written_object ( /*_._VALDATA___V966*/ meltfptr[965], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V968*/ meltfptr[967])) == + ( /*_._VALDATA___V968*/ meltfptr[967])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V968*/ + ( /*_._VALDATA___V968*/ meltfptr[967])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V968*/ meltfptr[967]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V968*/ meltfptr[967]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V969*/ meltfptr[968]); + /*_._VALSTR___V969*/ meltfptr[968]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V968*/ meltfptr[967]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V968*/ meltfptr[967]); - melt_dbgtrace_written_object ( /*_.VALDATA___V968*/ meltfptr[967], + melt_dbgtrace_written_object ( /*_._VALDATA___V968*/ meltfptr[967], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:7405:/ initchunk"); @@ -48858,13 +48933,13 @@ meltmod__warmelt_outobj__initialmeltchunk_17 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V970*/ meltfptr[969])) + ( /*_._VALROUT___V970*/ meltfptr[969])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_783__READ_MELT_EXPRESSIONS#0", NULL != ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7])); - ((meltroutine_ptr_t) /*_.VALROUT___V970*/ meltfptr[969])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V970*/ meltfptr[969])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7]); MELT_LOCATION ("warmelt-outobj.melt:7405:/ initchunk"); @@ -48873,41 +48948,41 @@ meltmod__warmelt_outobj__initialmeltchunk_17 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V970*/ meltfptr[969])) + ( /*_._VALROUT___V970*/ meltfptr[969])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_783__READ_MELT_EXPRESSIONS#1", NULL != ( /*_.LIST_APPEND2LIST__V187*/ meltfptr[186])); - ((meltroutine_ptr_t) /*_.VALROUT___V970*/ meltfptr[969])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V970*/ meltfptr[969])->tabval[1] = (melt_ptr_t) ( /*_.LIST_APPEND2LIST__V187*/ meltfptr[186]); /*putclosurout#129 */ melt_assertmsg ("putclosrout#129 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V971*/ meltfptr[970])) == + ( /*_._VALCLO___V971*/ meltfptr[970])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#129 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V970*/ meltfptr[969])) == + ( /*_._VALROUT___V970*/ meltfptr[969])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V971*/ meltfptr[970])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V970*/ meltfptr[969]); + ((meltclosure_ptr_t) /*_._VALCLO___V971*/ meltfptr[970])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V970*/ meltfptr[969]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V971*/ meltfptr[970]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V971*/ meltfptr[970]); MELT_LOCATION ("warmelt-outobj.melt:7405:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V970*/ meltfptr[969])) == + ( /*_._VALROUT___V970*/ meltfptr[969])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V971*/ meltfptr[970]); - ((meltroutine_ptr_t) /*_.VALROUT___V970*/ meltfptr[969])->tabval[2] = - (melt_ptr_t) ( /*_.VALCLO___V971*/ meltfptr[970]); + NULL != /*_._VALCLO___V971*/ meltfptr[970]); + ((meltroutine_ptr_t) /*_._VALROUT___V970*/ meltfptr[969])->tabval[2] = + (melt_ptr_t) ( /*_._VALCLO___V971*/ meltfptr[970]); MELT_LOCATION ("warmelt-outobj.melt:7405:/ initchunk"); /*^putroutconst */ @@ -48915,13 +48990,13 @@ meltmod__warmelt_outobj__initialmeltchunk_17 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V970*/ meltfptr[969])) + ( /*_._VALROUT___V970*/ meltfptr[969])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_783__READ_MELT_EXPRESSIONS#3", NULL != ( /*_.CLASS_SYMBOL__V16*/ meltfptr[15])); - ((meltroutine_ptr_t) /*_.VALROUT___V970*/ meltfptr[969])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V970*/ meltfptr[969])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_SYMBOL__V16*/ meltfptr[15]); MELT_LOCATION ("warmelt-outobj.melt:7405:/ initchunk"); @@ -48930,13 +49005,13 @@ meltmod__warmelt_outobj__initialmeltchunk_17 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V970*/ meltfptr[969])) + ( /*_._VALROUT___V970*/ meltfptr[969])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_783__READ_MELT_EXPRESSIONS#4", NULL != ( /*_.CLASS_SEXPR__V184*/ meltfptr[183])); - ((meltroutine_ptr_t) /*_.VALROUT___V970*/ meltfptr[969])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V970*/ meltfptr[969])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_SEXPR__V184*/ meltfptr[183]); MELT_LOCATION ("warmelt-outobj.melt:7405:/ initchunk"); @@ -48945,41 +49020,41 @@ meltmod__warmelt_outobj__initialmeltchunk_17 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V970*/ meltfptr[969])) + ( /*_._VALROUT___V970*/ meltfptr[969])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_783__READ_MELT_EXPRESSIONS#5", NULL != ( /*_.CLASS_NAMED__V14*/ meltfptr[13])); - ((meltroutine_ptr_t) /*_.VALROUT___V970*/ meltfptr[969])->tabval[5] = + ((meltroutine_ptr_t) /*_._VALROUT___V970*/ meltfptr[969])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_NAMED__V14*/ meltfptr[13]); MELT_LOCATION ("warmelt-outobj.melt:7405:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V970*/ meltfptr[969]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V970*/ meltfptr[969]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V972*/ meltfptr[971])) == + ( /*_._VALDATA___V972*/ meltfptr[971])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V972*/ + ( /*_._VALDATA___V972*/ meltfptr[971])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V972*/ meltfptr[971]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V972*/ meltfptr[971]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V973*/ meltfptr[972]); + /*_._VALSTR___V973*/ meltfptr[972]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V972*/ meltfptr[971]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V972*/ meltfptr[971]); - melt_dbgtrace_written_object ( /*_.VALDATA___V972*/ meltfptr[971], + melt_dbgtrace_written_object ( /*_._VALDATA___V972*/ meltfptr[971], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:7443:/ initchunk"); @@ -48988,13 +49063,13 @@ meltmod__warmelt_outobj__initialmeltchunk_17 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V974*/ meltfptr[973])) + ( /*_._VALROUT___V974*/ meltfptr[973])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_787__TRANSLATE_TO_C_MODULE_MELT_SOURCES#0", NULL != ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7])); - ((meltroutine_ptr_t) /*_.VALROUT___V974*/ meltfptr[973])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V974*/ meltfptr[973])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7]); MELT_LOCATION ("warmelt-outobj.melt:7443:/ initchunk"); @@ -49003,13 +49078,13 @@ meltmod__warmelt_outobj__initialmeltchunk_17 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V974*/ meltfptr[973])) + ( /*_._VALROUT___V974*/ meltfptr[973])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_787__TRANSLATE_TO_C_MODULE_MELT_SOURCES#1", NULL != ( /*_.CLASS_ENVIRONMENT__V154*/ meltfptr[153])); - ((meltroutine_ptr_t) /*_.VALROUT___V974*/ meltfptr[973])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V974*/ meltfptr[973])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V154*/ meltfptr[153]); MELT_LOCATION ("warmelt-outobj.melt:7443:/ initchunk"); @@ -49018,13 +49093,13 @@ meltmod__warmelt_outobj__initialmeltchunk_17 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V974*/ meltfptr[973])) + ( /*_._VALROUT___V974*/ meltfptr[973])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_787__TRANSLATE_TO_C_MODULE_MELT_SOURCES#2", NULL != ( /*_.DISCR_LIST__V66*/ meltfptr[65])); - ((meltroutine_ptr_t) /*_.VALROUT___V974*/ meltfptr[973])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V974*/ meltfptr[973])->tabval[2] = (melt_ptr_t) ( /*_.DISCR_LIST__V66*/ meltfptr[65]); MELT_LOCATION ("warmelt-outobj.melt:7443:/ initchunk"); @@ -49032,196 +49107,196 @@ meltmod__warmelt_outobj__initialmeltchunk_17 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V974*/ meltfptr[973])) == + ( /*_._VALROUT___V974*/ meltfptr[973])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V971*/ meltfptr[970]); - ((meltroutine_ptr_t) /*_.VALROUT___V974*/ meltfptr[973])->tabval[3] = - (melt_ptr_t) ( /*_.VALCLO___V971*/ meltfptr[970]); + NULL != /*_._VALCLO___V971*/ meltfptr[970]); + ((meltroutine_ptr_t) /*_._VALROUT___V974*/ meltfptr[973])->tabval[3] = + (melt_ptr_t) ( /*_._VALCLO___V971*/ meltfptr[970]); MELT_LOCATION ("warmelt-outobj.melt:7443:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V974*/ meltfptr[973])) == + ( /*_._VALROUT___V974*/ meltfptr[973])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALCLO___V889*/ meltfptr[888]); - ((meltroutine_ptr_t) /*_.VALROUT___V974*/ meltfptr[973])->tabval[4] = - (melt_ptr_t) ( /*_.VALCLO___V889*/ meltfptr[888]); + NULL != /*_._VALCLO___V889*/ meltfptr[888]); + ((meltroutine_ptr_t) /*_._VALROUT___V974*/ meltfptr[973])->tabval[4] = + (melt_ptr_t) ( /*_._VALCLO___V889*/ meltfptr[888]); MELT_LOCATION ("warmelt-outobj.melt:7443:/ initchunk"); /*^touch */ - /*touch:IROUTVAL_ */ - meltgc_touch ( /*_.VALROUT___V974*/ meltfptr[973]); + /*touch:_IROUTVAL_ */ + meltgc_touch ( /*_._VALROUT___V974*/ meltfptr[973]); /*putclosurout#130 */ melt_assertmsg ("putclosrout#130 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V975*/ meltfptr[974])) == + ( /*_._VALCLO___V975*/ meltfptr[974])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#130 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V974*/ meltfptr[973])) == + ( /*_._VALROUT___V974*/ meltfptr[973])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V975*/ meltfptr[974])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V974*/ meltfptr[973]); + ((meltclosure_ptr_t) /*_._VALCLO___V975*/ meltfptr[974])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V974*/ meltfptr[973]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V975*/ meltfptr[974]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V975*/ meltfptr[974]); /*putclosurout#131 */ melt_assertmsg ("putclosrout#131 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.VALCLO___V977*/ meltfptr[976])) == + ( /*_._VALCLO___V977*/ meltfptr[976])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#131 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_.VALROUT___V976*/ meltfptr[975])) == + ( /*_._VALROUT___V976*/ meltfptr[975])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_.VALCLO___V977*/ meltfptr[976])->rout = - (meltroutine_ptr_t) ( /*_.VALROUT___V976*/ meltfptr[975]); + ((meltclosure_ptr_t) /*_._VALCLO___V977*/ meltfptr[976])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V976*/ meltfptr[975]); - /*touch:DATACLOSURE_ */ - meltgc_touch ( /*_.VALCLO___V977*/ meltfptr[976]); + /*touch:_DATACLOSURE_ */ + meltgc_touch ( /*_._VALCLO___V977*/ meltfptr[976]); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V978*/ meltfptr[977])) == + ( /*_._VALDATA___V978*/ meltfptr[977])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V978*/ + ( /*_._VALDATA___V978*/ meltfptr[977])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V978*/ meltfptr[977]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V978*/ meltfptr[977]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V979*/ meltfptr[978]); + /*_._VALSTR___V979*/ meltfptr[978]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V978*/ meltfptr[977]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V978*/ meltfptr[977]); - melt_dbgtrace_written_object ( /*_.VALDATA___V978*/ meltfptr[977], + melt_dbgtrace_written_object ( /*_._VALDATA___V978*/ meltfptr[977], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V980*/ meltfptr[979])) == + ( /*_._VALDATA___V980*/ meltfptr[979])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V980*/ + ( /*_._VALDATA___V980*/ meltfptr[979])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V980*/ meltfptr[979]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V980*/ meltfptr[979]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V981*/ meltfptr[980]); + /*_._VALSTR___V981*/ meltfptr[980]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V980*/ meltfptr[979]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V980*/ meltfptr[979]); - melt_dbgtrace_written_object ( /*_.VALDATA___V980*/ meltfptr[979], + melt_dbgtrace_written_object ( /*_._VALDATA___V980*/ meltfptr[979], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V982*/ meltfptr[981])) == + ( /*_._VALDATA___V982*/ meltfptr[981])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V982*/ + ( /*_._VALDATA___V982*/ meltfptr[981])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V982*/ meltfptr[981]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V982*/ meltfptr[981]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V983*/ meltfptr[982]); + /*_._VALSTR___V983*/ meltfptr[982]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V982*/ meltfptr[981]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V982*/ meltfptr[981]); - melt_dbgtrace_written_object ( /*_.VALDATA___V982*/ meltfptr[981], + melt_dbgtrace_written_object ( /*_._VALDATA___V982*/ meltfptr[981], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V984*/ meltfptr[983])) == + ( /*_._VALDATA___V984*/ meltfptr[983])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V984*/ + ( /*_._VALDATA___V984*/ meltfptr[983])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V984*/ meltfptr[983]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V984*/ meltfptr[983]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V985*/ meltfptr[984]); + /*_._VALSTR___V985*/ meltfptr[984]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V984*/ meltfptr[983]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V984*/ meltfptr[983]); - melt_dbgtrace_written_object ( /*_.VALDATA___V984*/ meltfptr[983], + melt_dbgtrace_written_object ( /*_._VALDATA___V984*/ meltfptr[983], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V986*/ meltfptr[985])) == + ( /*_._VALDATA___V986*/ meltfptr[985])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V986*/ + ( /*_._VALDATA___V986*/ meltfptr[985])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V986*/ meltfptr[985]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V986*/ meltfptr[985]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V987*/ meltfptr[986]); + /*_._VALSTR___V987*/ meltfptr[986]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V986*/ meltfptr[985]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V986*/ meltfptr[985]); - melt_dbgtrace_written_object ( /*_.VALDATA___V986*/ meltfptr[985], + melt_dbgtrace_written_object ( /*_._VALDATA___V986*/ meltfptr[985], "new static instance"); /*putslot */ melt_assertmsg ("putslot checkobj", melt_magic_discr ((melt_ptr_t) - ( /*_.VALDATA___V988*/ meltfptr[987])) == + ( /*_._VALDATA___V988*/ meltfptr[987])) == MELTOBMAG_OBJECT); melt_assertmsg ("putslot checkoff", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_.VALDATA___V988*/ + ( /*_._VALDATA___V988*/ meltfptr[987])))); - ((meltobject_ptr_t) ( /*_.VALDATA___V988*/ meltfptr[987]))->obj_vartab[1] = + ((meltobject_ptr_t) ( /*_._VALDATA___V988*/ meltfptr[987]))->obj_vartab[1] = (melt_ptr_t) ( - /*_.VALSTR___V989*/ meltfptr[988]); + /*_._VALSTR___V989*/ meltfptr[988]); - /*touch:VALUEDATA_ */ - meltgc_touch ( /*_.VALDATA___V988*/ meltfptr[987]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V988*/ meltfptr[987]); - melt_dbgtrace_written_object ( /*_.VALDATA___V988*/ meltfptr[987], + melt_dbgtrace_written_object ( /*_._VALDATA___V988*/ meltfptr[987], "new static instance"); /**COMMENT: before toplevel body **/ ; @@ -49234,13 +49309,13 @@ meltmod__warmelt_outobj__initialmeltchunk_17 (meltinitial_frame_t * /*^cond */ /*cond */ if ( /*quasi.cur.mod.env.cont cur.mod.env.cont : at very start */ - /*_.CONTENV___V2*/ meltfptr[1]) + /*_._CONTENV___V2*/ meltfptr[1]) /*then */ { /*^cond.then */ /*_.OR___V990*/ meltfptr[989] = /*quasi.cur.mod.env.cont cur.mod.env.cont : at very start */ -/*_.CONTENV___V2*/ meltfptr[1];; +/*_._CONTENV___V2*/ meltfptr[1];; } else { @@ -49253,7 +49328,7 @@ meltmod__warmelt_outobj__initialmeltchunk_17 (meltinitial_frame_t * /*_.MELT_MAKE_FRESH_ENVIRONMENT_REFERENCE__V991*/ meltfptr[990] = /* melt_make_fresh_environment_reference */ melthookproc_HOOK_FRESH_ENVIRONMENT_REFERENCE_MAKER ((melt_ptr_t) - ( /*_.PREVENV___V4*/ meltfptr[3]), "warmelt-outobj") + ( /*_._PREVENV___V4*/ meltfptr[3]), "warmelt-outobj") ;; /*^compute */ /*_.OR___V990*/ meltfptr[989] = @@ -49293,14 +49368,14 @@ meltmod__warmelt_outobj__initialmeltchunk_17 (meltinitial_frame_t * memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = - (melt_ptr_t *) & /*_.VALSTR___V208*/ meltfptr[207]; + (melt_ptr_t *) & /*_._VALSTR___V208*/ meltfptr[207]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_.VALCLO___V203*/ meltfptr[202]; + (melt_ptr_t *) & /*_._VALCLO___V203*/ meltfptr[202]; /*_.REGISTER_OPTION__V992*/ meltfptr[990] = melt_apply ((meltclosure_ptr_t) ( /*_.REGISTER_OPTION__V10*/ meltfptr[9]), - (melt_ptr_t) ( /*_.VALDATA___V206*/ meltfptr[205]), + (melt_ptr_t) ( /*_._VALDATA___V206*/ meltfptr[205]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } @@ -49329,7 +49404,7 @@ meltmod__warmelt_outobj__initialmeltchunk_17 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_DECLINIT__V19*/ meltfptr[18]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_.VALCLO___V225*/ meltfptr[224]; + (melt_ptr_t *) & /*_._VALCLO___V225*/ meltfptr[224]; /*_.INSTALL_METHOD__V993*/ meltfptr[989] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V17*/ meltfptr[16]), @@ -49362,7 +49437,7 @@ meltmod__warmelt_outobj__initialmeltchunk_17 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_.VALCLO___V233*/ meltfptr[232]; + (melt_ptr_t *) & /*_._VALCLO___V233*/ meltfptr[232]; /*_.INSTALL_METHOD__V994*/ meltfptr[990] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V17*/ meltfptr[16]), @@ -49395,7 +49470,7 @@ meltmod__warmelt_outobj__initialmeltchunk_17 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_INITIAL_FILL__V22*/ meltfptr[21]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_.VALCLO___V239*/ meltfptr[238]; + (melt_ptr_t *) & /*_._VALCLO___V239*/ meltfptr[238]; /*_.INSTALL_METHOD__V995*/ meltfptr[989] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V17*/ meltfptr[16]), @@ -49428,7 +49503,7 @@ meltmod__warmelt_outobj__initialmeltchunk_17 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_INITIAL_PREDEF__V23*/ meltfptr[22]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_.VALCLO___V243*/ meltfptr[242]; + (melt_ptr_t *) & /*_._VALCLO___V243*/ meltfptr[242]; /*_.INSTALL_METHOD__V996*/ meltfptr[990] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V17*/ meltfptr[16]), @@ -49461,7 +49536,7 @@ meltmod__warmelt_outobj__initialmeltchunk_17 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_.VALCLO___V251*/ meltfptr[250]; + (melt_ptr_t *) & /*_._VALCLO___V251*/ meltfptr[250]; /*_.INSTALL_METHOD__V997*/ meltfptr[989] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V17*/ meltfptr[16]), @@ -49494,7 +49569,7 @@ meltmod__warmelt_outobj__initialmeltchunk_17 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_.VALCLO___V255*/ meltfptr[254]; + (melt_ptr_t *) & /*_._VALCLO___V255*/ meltfptr[254]; /*_.INSTALL_METHOD__V998*/ meltfptr[990] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V17*/ meltfptr[16]), @@ -49527,7 +49602,7 @@ meltmod__warmelt_outobj__initialmeltchunk_17 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_.VALCLO___V265*/ meltfptr[264]; + (melt_ptr_t *) & /*_._VALCLO___V265*/ meltfptr[264]; /*_.INSTALL_METHOD__V999*/ meltfptr[989] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V17*/ meltfptr[16]), @@ -49561,7 +49636,7 @@ meltmod__warmelt_outobj__initialmeltchunk_17 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_.VALCLO___V275*/ meltfptr[274]; + (melt_ptr_t *) & /*_._VALCLO___V275*/ meltfptr[274]; /*_.INSTALL_METHOD__V1000*/ meltfptr[990] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V17*/ meltfptr[16]), @@ -49594,7 +49669,7 @@ meltmod__warmelt_outobj__initialmeltchunk_17 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_DECLINIT__V19*/ meltfptr[18]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_.VALCLO___V281*/ meltfptr[280]; + (melt_ptr_t *) & /*_._VALCLO___V281*/ meltfptr[280]; /*_.INSTALL_METHOD__V1001*/ meltfptr[989] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V17*/ meltfptr[16]), @@ -49628,7 +49703,7 @@ meltmod__warmelt_outobj__initialmeltchunk_17 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_INITIAL_FILL__V22*/ meltfptr[21]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_.VALCLO___V285*/ meltfptr[284]; + (melt_ptr_t *) & /*_._VALCLO___V285*/ meltfptr[284]; /*_.INSTALL_METHOD__V1002*/ meltfptr[990] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V17*/ meltfptr[16]), @@ -49662,7 +49737,7 @@ meltmod__warmelt_outobj__initialmeltchunk_17 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_INITIAL_PREDEF__V23*/ meltfptr[22]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_.VALCLO___V293*/ meltfptr[292]; + (melt_ptr_t *) & /*_._VALCLO___V293*/ meltfptr[292]; /*_.INSTALL_METHOD__V1003*/ meltfptr[989] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V17*/ meltfptr[16]), @@ -49696,7 +49771,7 @@ meltmod__warmelt_outobj__initialmeltchunk_17 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_INITIAL_PREDEF__V23*/ meltfptr[22]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_.VALCLO___V297*/ meltfptr[296]; + (melt_ptr_t *) & /*_._VALCLO___V297*/ meltfptr[296]; /*_.INSTALL_METHOD__V1004*/ meltfptr[990] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V17*/ meltfptr[16]), @@ -49729,7 +49804,7 @@ meltmod__warmelt_outobj__initialmeltchunk_17 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_DECLINIT__V19*/ meltfptr[18]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_.VALCLO___V303*/ meltfptr[302]; + (melt_ptr_t *) & /*_._VALCLO___V303*/ meltfptr[302]; /*_.INSTALL_METHOD__V1005*/ meltfptr[989] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V17*/ meltfptr[16]), @@ -49763,7 +49838,7 @@ meltmod__warmelt_outobj__initialmeltchunk_17 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_INITIAL_FILL__V22*/ meltfptr[21]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_.VALCLO___V307*/ meltfptr[306]; + (melt_ptr_t *) & /*_._VALCLO___V307*/ meltfptr[306]; /*_.INSTALL_METHOD__V1006*/ meltfptr[990] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V17*/ meltfptr[16]), @@ -49797,7 +49872,7 @@ meltmod__warmelt_outobj__initialmeltchunk_17 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_DECLINIT__V19*/ meltfptr[18]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_.VALCLO___V309*/ meltfptr[308]; + (melt_ptr_t *) & /*_._VALCLO___V309*/ meltfptr[308]; /*_.INSTALL_METHOD__V1007*/ meltfptr[989] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V17*/ meltfptr[16]), @@ -49831,7 +49906,7 @@ meltmod__warmelt_outobj__initialmeltchunk_17 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_INITIAL_FILL__V22*/ meltfptr[21]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_.VALCLO___V313*/ meltfptr[312]; + (melt_ptr_t *) & /*_._VALCLO___V313*/ meltfptr[312]; /*_.INSTALL_METHOD__V1008*/ meltfptr[990] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V17*/ meltfptr[16]), @@ -49865,7 +49940,7 @@ meltmod__warmelt_outobj__initialmeltchunk_17 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_DECLINIT__V19*/ meltfptr[18]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_.VALCLO___V315*/ meltfptr[314]; + (melt_ptr_t *) & /*_._VALCLO___V315*/ meltfptr[314]; /*_.INSTALL_METHOD__V1009*/ meltfptr[989] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V17*/ meltfptr[16]), @@ -49899,7 +49974,7 @@ meltmod__warmelt_outobj__initialmeltchunk_17 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_INITIAL_FILL__V22*/ meltfptr[21]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_.VALCLO___V319*/ meltfptr[318]; + (melt_ptr_t *) & /*_._VALCLO___V319*/ meltfptr[318]; /*_.INSTALL_METHOD__V1010*/ meltfptr[990] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V17*/ meltfptr[16]), @@ -49933,7 +50008,7 @@ meltmod__warmelt_outobj__initialmeltchunk_17 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_DECLINIT__V19*/ meltfptr[18]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_.VALCLO___V325*/ meltfptr[324]; + (melt_ptr_t *) & /*_._VALCLO___V325*/ meltfptr[324]; /*_.INSTALL_METHOD__V1011*/ meltfptr[989] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V17*/ meltfptr[16]), @@ -49966,7 +50041,7 @@ meltmod__warmelt_outobj__initialmeltchunk_17 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_INITIAL_FILL__V22*/ meltfptr[21]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_.VALCLO___V327*/ meltfptr[326]; + (melt_ptr_t *) & /*_._VALCLO___V327*/ meltfptr[326]; /*_.INSTALL_METHOD__V1012*/ meltfptr[990] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V17*/ meltfptr[16]), @@ -49999,7 +50074,7 @@ meltmod__warmelt_outobj__initialmeltchunk_17 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_DECLINIT__V19*/ meltfptr[18]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_.VALCLO___V331*/ meltfptr[330]; + (melt_ptr_t *) & /*_._VALCLO___V331*/ meltfptr[330]; /*_.INSTALL_METHOD__V1013*/ meltfptr[989] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V17*/ meltfptr[16]), @@ -50033,7 +50108,7 @@ meltmod__warmelt_outobj__initialmeltchunk_17 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_INITIAL_FILL__V22*/ meltfptr[21]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_.VALCLO___V335*/ meltfptr[334]; + (melt_ptr_t *) & /*_._VALCLO___V335*/ meltfptr[334]; /*_.INSTALL_METHOD__V1014*/ meltfptr[990] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V17*/ meltfptr[16]), @@ -50067,7 +50142,7 @@ meltmod__warmelt_outobj__initialmeltchunk_17 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_DECLINIT__V19*/ meltfptr[18]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_.VALCLO___V337*/ meltfptr[336]; + (melt_ptr_t *) & /*_._VALCLO___V337*/ meltfptr[336]; /*_.INSTALL_METHOD__V1015*/ meltfptr[989] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V17*/ meltfptr[16]), @@ -50101,7 +50176,7 @@ meltmod__warmelt_outobj__initialmeltchunk_17 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_INITIAL_FILL__V22*/ meltfptr[21]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_.VALCLO___V341*/ meltfptr[340]; + (melt_ptr_t *) & /*_._VALCLO___V341*/ meltfptr[340]; /*_.INSTALL_METHOD__V1016*/ meltfptr[990] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V17*/ meltfptr[16]), @@ -50135,7 +50210,7 @@ meltmod__warmelt_outobj__initialmeltchunk_17 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_DECLINIT__V19*/ meltfptr[18]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_.VALCLO___V343*/ meltfptr[342]; + (melt_ptr_t *) & /*_._VALCLO___V343*/ meltfptr[342]; /*_.INSTALL_METHOD__V1017*/ meltfptr[989] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V17*/ meltfptr[16]), @@ -50168,7 +50243,7 @@ meltmod__warmelt_outobj__initialmeltchunk_17 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_INITIAL_FILL__V22*/ meltfptr[21]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_.VALCLO___V347*/ meltfptr[346]; + (melt_ptr_t *) & /*_._VALCLO___V347*/ meltfptr[346]; /*_.INSTALL_METHOD__V1018*/ meltfptr[990] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V17*/ meltfptr[16]), @@ -50201,7 +50276,7 @@ meltmod__warmelt_outobj__initialmeltchunk_17 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_DECLINIT__V19*/ meltfptr[18]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_.VALCLO___V349*/ meltfptr[348]; + (melt_ptr_t *) & /*_._VALCLO___V349*/ meltfptr[348]; /*_.INSTALL_METHOD__V1019*/ meltfptr[989] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V17*/ meltfptr[16]), @@ -50234,7 +50309,7 @@ meltmod__warmelt_outobj__initialmeltchunk_17 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_INITIAL_FILL__V22*/ meltfptr[21]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_.VALCLO___V353*/ meltfptr[352]; + (melt_ptr_t *) & /*_._VALCLO___V353*/ meltfptr[352]; /*_.INSTALL_METHOD__V1020*/ meltfptr[990] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V17*/ meltfptr[16]), @@ -50267,7 +50342,7 @@ meltmod__warmelt_outobj__initialmeltchunk_17 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_.VALCLO___V355*/ meltfptr[354]; + (melt_ptr_t *) & /*_._VALCLO___V355*/ meltfptr[354]; /*_.INSTALL_METHOD__V1021*/ meltfptr[989] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V17*/ meltfptr[16]), @@ -50301,7 +50376,7 @@ meltmod__warmelt_outobj__initialmeltchunk_17 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_.VALCLO___V359*/ meltfptr[358]; + (melt_ptr_t *) & /*_._VALCLO___V359*/ meltfptr[358]; /*_.INSTALL_METHOD__V1022*/ meltfptr[990] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V17*/ meltfptr[16]), @@ -50335,7 +50410,7 @@ meltmod__warmelt_outobj__initialmeltchunk_17 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_.VALCLO___V363*/ meltfptr[362]; + (melt_ptr_t *) & /*_._VALCLO___V363*/ meltfptr[362]; /*_.INSTALL_METHOD__V1023*/ meltfptr[989] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V17*/ meltfptr[16]), @@ -50368,7 +50443,7 @@ meltmod__warmelt_outobj__initialmeltchunk_17 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_.VALCLO___V401*/ meltfptr[400]; + (melt_ptr_t *) & /*_._VALCLO___V401*/ meltfptr[400]; /*_.INSTALL_METHOD__V1024*/ meltfptr[990] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V17*/ meltfptr[16]), @@ -50402,7 +50477,7 @@ meltmod__warmelt_outobj__initialmeltchunk_17 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_.VALCLO___V416*/ meltfptr[415]; + (melt_ptr_t *) & /*_._VALCLO___V416*/ meltfptr[415]; /*_.INSTALL_METHOD__V1025*/ meltfptr[989] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V17*/ meltfptr[16]), @@ -50436,7 +50511,7 @@ meltmod__warmelt_outobj__initialmeltchunk_17 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_.VALCLO___V434*/ meltfptr[433]; + (melt_ptr_t *) & /*_._VALCLO___V434*/ meltfptr[433]; /*_.INSTALL_METHOD__V1026*/ meltfptr[990] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V17*/ meltfptr[16]), @@ -50470,7 +50545,7 @@ meltmod__warmelt_outobj__initialmeltchunk_17 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_.VALCLO___V437*/ meltfptr[436]; + (melt_ptr_t *) & /*_._VALCLO___V437*/ meltfptr[436]; /*_.INSTALL_METHOD__V1027*/ meltfptr[989] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V17*/ meltfptr[16]), @@ -50501,7 +50576,7 @@ meltmod__warmelt_outobj__initialmeltchunk_17 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_.VALCLO___V439*/ meltfptr[438]; + (melt_ptr_t *) & /*_._VALCLO___V439*/ meltfptr[438]; /*_.INSTALL_METHOD__V1028*/ meltfptr[990] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V17*/ meltfptr[16]), @@ -50534,7 +50609,7 @@ meltmod__warmelt_outobj__initialmeltchunk_17 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_.VALCLO___V445*/ meltfptr[444]; + (melt_ptr_t *) & /*_._VALCLO___V445*/ meltfptr[444]; /*_.INSTALL_METHOD__V1029*/ meltfptr[989] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V17*/ meltfptr[16]), @@ -50568,7 +50643,7 @@ meltmod__warmelt_outobj__initialmeltchunk_17 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_.VALCLO___V449*/ meltfptr[448]; + (melt_ptr_t *) & /*_._VALCLO___V449*/ meltfptr[448]; /*_.INSTALL_METHOD__V1030*/ meltfptr[990] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V17*/ meltfptr[16]), @@ -50601,7 +50676,7 @@ meltmod__warmelt_outobj__initialmeltchunk_17 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_.VALCLO___V451*/ meltfptr[450]; + (melt_ptr_t *) & /*_._VALCLO___V451*/ meltfptr[450]; /*_.INSTALL_METHOD__V1031*/ meltfptr[989] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V17*/ meltfptr[16]), @@ -50635,7 +50710,7 @@ meltmod__warmelt_outobj__initialmeltchunk_17 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_.VALCLO___V455*/ meltfptr[454]; + (melt_ptr_t *) & /*_._VALCLO___V455*/ meltfptr[454]; /*_.INSTALL_METHOD__V1032*/ meltfptr[990] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V17*/ meltfptr[16]), @@ -50669,7 +50744,7 @@ meltmod__warmelt_outobj__initialmeltchunk_17 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_.VALCLO___V459*/ meltfptr[458]; + (melt_ptr_t *) & /*_._VALCLO___V459*/ meltfptr[458]; /*_.INSTALL_METHOD__V1033*/ meltfptr[989] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V17*/ meltfptr[16]), @@ -50703,7 +50778,7 @@ meltmod__warmelt_outobj__initialmeltchunk_17 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_.VALCLO___V463*/ meltfptr[462]; + (melt_ptr_t *) & /*_._VALCLO___V463*/ meltfptr[462]; /*_.INSTALL_METHOD__V1034*/ meltfptr[990] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V17*/ meltfptr[16]), @@ -50736,7 +50811,7 @@ meltmod__warmelt_outobj__initialmeltchunk_17 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_.VALCLO___V467*/ meltfptr[466]; + (melt_ptr_t *) & /*_._VALCLO___V467*/ meltfptr[466]; /*_.INSTALL_METHOD__V1035*/ meltfptr[989] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V17*/ meltfptr[16]), @@ -50769,7 +50844,7 @@ meltmod__warmelt_outobj__initialmeltchunk_17 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_.VALCLO___V471*/ meltfptr[470]; + (melt_ptr_t *) & /*_._VALCLO___V471*/ meltfptr[470]; /*_.INSTALL_METHOD__V1036*/ meltfptr[990] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V17*/ meltfptr[16]), @@ -50802,7 +50877,7 @@ meltmod__warmelt_outobj__initialmeltchunk_17 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_.VALCLO___V475*/ meltfptr[474]; + (melt_ptr_t *) & /*_._VALCLO___V475*/ meltfptr[474]; /*_.INSTALL_METHOD__V1037*/ meltfptr[989] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V17*/ meltfptr[16]), @@ -50835,7 +50910,7 @@ meltmod__warmelt_outobj__initialmeltchunk_17 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_.VALCLO___V483*/ meltfptr[482]; + (melt_ptr_t *) & /*_._VALCLO___V483*/ meltfptr[482]; /*_.INSTALL_METHOD__V1038*/ meltfptr[990] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V17*/ meltfptr[16]), @@ -50869,7 +50944,7 @@ meltmod__warmelt_outobj__initialmeltchunk_17 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_.VALCLO___V487*/ meltfptr[486]; + (melt_ptr_t *) & /*_._VALCLO___V487*/ meltfptr[486]; /*_.INSTALL_METHOD__V1039*/ meltfptr[989] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V17*/ meltfptr[16]), @@ -50902,7 +50977,7 @@ meltmod__warmelt_outobj__initialmeltchunk_17 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_.VALCLO___V491*/ meltfptr[490]; + (melt_ptr_t *) & /*_._VALCLO___V491*/ meltfptr[490]; /*_.INSTALL_METHOD__V1040*/ meltfptr[990] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V17*/ meltfptr[16]), @@ -50935,7 +51010,7 @@ meltmod__warmelt_outobj__initialmeltchunk_17 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_.VALCLO___V495*/ meltfptr[494]; + (melt_ptr_t *) & /*_._VALCLO___V495*/ meltfptr[494]; /*_.INSTALL_METHOD__V1041*/ meltfptr[989] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V17*/ meltfptr[16]), @@ -50969,7 +51044,7 @@ meltmod__warmelt_outobj__initialmeltchunk_17 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_.VALCLO___V499*/ meltfptr[498]; + (melt_ptr_t *) & /*_._VALCLO___V499*/ meltfptr[498]; /*_.INSTALL_METHOD__V1042*/ meltfptr[990] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V17*/ meltfptr[16]), @@ -51003,7 +51078,7 @@ meltmod__warmelt_outobj__initialmeltchunk_17 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_.VALCLO___V505*/ meltfptr[504]; + (melt_ptr_t *) & /*_._VALCLO___V505*/ meltfptr[504]; /*_.INSTALL_METHOD__V1043*/ meltfptr[989] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V17*/ meltfptr[16]), @@ -51037,7 +51112,7 @@ meltmod__warmelt_outobj__initialmeltchunk_17 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_.VALCLO___V511*/ meltfptr[510]; + (melt_ptr_t *) & /*_._VALCLO___V511*/ meltfptr[510]; /*_.INSTALL_METHOD__V1044*/ meltfptr[990] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V17*/ meltfptr[16]), @@ -51071,7 +51146,7 @@ meltmod__warmelt_outobj__initialmeltchunk_17 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_.VALCLO___V515*/ meltfptr[514]; + (melt_ptr_t *) & /*_._VALCLO___V515*/ meltfptr[514]; /*_.INSTALL_METHOD__V1045*/ meltfptr[989] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V17*/ meltfptr[16]), @@ -51105,7 +51180,7 @@ meltmod__warmelt_outobj__initialmeltchunk_17 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_.VALCLO___V523*/ meltfptr[522]; + (melt_ptr_t *) & /*_._VALCLO___V523*/ meltfptr[522]; /*_.INSTALL_METHOD__V1046*/ meltfptr[990] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V17*/ meltfptr[16]), @@ -51139,7 +51214,7 @@ meltmod__warmelt_outobj__initialmeltchunk_17 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_.VALCLO___V531*/ meltfptr[530]; + (melt_ptr_t *) & /*_._VALCLO___V531*/ meltfptr[530]; /*_.INSTALL_METHOD__V1047*/ meltfptr[989] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V17*/ meltfptr[16]), @@ -51173,7 +51248,7 @@ meltmod__warmelt_outobj__initialmeltchunk_17 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_.VALCLO___V539*/ meltfptr[538]; + (melt_ptr_t *) & /*_._VALCLO___V539*/ meltfptr[538]; /*_.INSTALL_METHOD__V1048*/ meltfptr[990] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V17*/ meltfptr[16]), @@ -51206,7 +51281,7 @@ meltmod__warmelt_outobj__initialmeltchunk_17 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_.VALCLO___V543*/ meltfptr[542]; + (melt_ptr_t *) & /*_._VALCLO___V543*/ meltfptr[542]; /*_.INSTALL_METHOD__V1049*/ meltfptr[989] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V17*/ meltfptr[16]), @@ -51239,7 +51314,7 @@ meltmod__warmelt_outobj__initialmeltchunk_17 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_.VALCLO___V547*/ meltfptr[546]; + (melt_ptr_t *) & /*_._VALCLO___V547*/ meltfptr[546]; /*_.INSTALL_METHOD__V1050*/ meltfptr[990] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V17*/ meltfptr[16]), @@ -51256,12 +51331,12 @@ meltmod__warmelt_outobj__initialmeltchunk_17 (meltinitial_frame_t * #undef meltfram__ -} /*end of meltmod__warmelt_outobj__initialmeltchunk_17 */ +} /*end of meltmod__WARMELTmiOUTOBJ__initialmeltchunk_17 */ void -meltmod__warmelt_outobj__initialmeltchunk_18 (meltinitial_frame_t * - meltmeltframptr__, - char meltpredefinited[]) +meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * + meltmeltframptr__, + char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount @@ -51285,7 +51360,7 @@ meltmod__warmelt_outobj__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_.VALCLO___V554*/ meltfptr[553]; + (melt_ptr_t *) & /*_._VALCLO___V554*/ meltfptr[553]; /*_.INSTALL_METHOD__V1051*/ meltfptr[989] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V17*/ meltfptr[16]), @@ -51318,7 +51393,7 @@ meltmod__warmelt_outobj__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_.VALCLO___V560*/ meltfptr[559]; + (melt_ptr_t *) & /*_._VALCLO___V560*/ meltfptr[559]; /*_.INSTALL_METHOD__V1052*/ meltfptr[990] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V17*/ meltfptr[16]), @@ -51351,7 +51426,7 @@ meltmod__warmelt_outobj__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_.VALCLO___V564*/ meltfptr[563]; + (melt_ptr_t *) & /*_._VALCLO___V564*/ meltfptr[563]; /*_.INSTALL_METHOD__V1053*/ meltfptr[989] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V17*/ meltfptr[16]), @@ -51384,7 +51459,7 @@ meltmod__warmelt_outobj__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_.VALCLO___V568*/ meltfptr[567]; + (melt_ptr_t *) & /*_._VALCLO___V568*/ meltfptr[567]; /*_.INSTALL_METHOD__V1054*/ meltfptr[990] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V17*/ meltfptr[16]), @@ -51418,7 +51493,7 @@ meltmod__warmelt_outobj__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_.VALCLO___V574*/ meltfptr[573]; + (melt_ptr_t *) & /*_._VALCLO___V574*/ meltfptr[573]; /*_.INSTALL_METHOD__V1055*/ meltfptr[989] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V17*/ meltfptr[16]), @@ -51452,7 +51527,7 @@ meltmod__warmelt_outobj__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_.VALCLO___V580*/ meltfptr[579]; + (melt_ptr_t *) & /*_._VALCLO___V580*/ meltfptr[579]; /*_.INSTALL_METHOD__V1056*/ meltfptr[990] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V17*/ meltfptr[16]), @@ -51486,7 +51561,7 @@ meltmod__warmelt_outobj__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_.VALCLO___V584*/ meltfptr[583]; + (melt_ptr_t *) & /*_._VALCLO___V584*/ meltfptr[583]; /*_.INSTALL_METHOD__V1057*/ meltfptr[989] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V17*/ meltfptr[16]), @@ -51520,7 +51595,7 @@ meltmod__warmelt_outobj__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_.VALCLO___V590*/ meltfptr[589]; + (melt_ptr_t *) & /*_._VALCLO___V590*/ meltfptr[589]; /*_.INSTALL_METHOD__V1058*/ meltfptr[990] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V17*/ meltfptr[16]), @@ -51553,7 +51628,7 @@ meltmod__warmelt_outobj__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_.VALCLO___V597*/ meltfptr[596]; + (melt_ptr_t *) & /*_._VALCLO___V597*/ meltfptr[596]; /*_.INSTALL_METHOD__V1059*/ meltfptr[989] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V17*/ meltfptr[16]), @@ -51586,7 +51661,7 @@ meltmod__warmelt_outobj__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_.VALCLO___V606*/ meltfptr[605]; + (melt_ptr_t *) & /*_._VALCLO___V606*/ meltfptr[605]; /*_.INSTALL_METHOD__V1060*/ meltfptr[990] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V17*/ meltfptr[16]), @@ -51620,7 +51695,7 @@ meltmod__warmelt_outobj__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_.VALCLO___V615*/ meltfptr[614]; + (melt_ptr_t *) & /*_._VALCLO___V615*/ meltfptr[614]; /*_.INSTALL_METHOD__V1061*/ meltfptr[989] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V17*/ meltfptr[16]), @@ -51654,7 +51729,7 @@ meltmod__warmelt_outobj__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_.VALCLO___V619*/ meltfptr[618]; + (melt_ptr_t *) & /*_._VALCLO___V619*/ meltfptr[618]; /*_.INSTALL_METHOD__V1062*/ meltfptr[990] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V17*/ meltfptr[16]), @@ -51687,7 +51762,7 @@ meltmod__warmelt_outobj__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_.VALCLO___V623*/ meltfptr[622]; + (melt_ptr_t *) & /*_._VALCLO___V623*/ meltfptr[622]; /*_.INSTALL_METHOD__V1063*/ meltfptr[989] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V17*/ meltfptr[16]), @@ -51721,7 +51796,7 @@ meltmod__warmelt_outobj__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_.VALCLO___V628*/ meltfptr[627]; + (melt_ptr_t *) & /*_._VALCLO___V628*/ meltfptr[627]; /*_.INSTALL_METHOD__V1064*/ meltfptr[990] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V17*/ meltfptr[16]), @@ -51755,7 +51830,7 @@ meltmod__warmelt_outobj__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_.VALCLO___V632*/ meltfptr[631]; + (melt_ptr_t *) & /*_._VALCLO___V632*/ meltfptr[631]; /*_.INSTALL_METHOD__V1065*/ meltfptr[989] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V17*/ meltfptr[16]), @@ -51788,7 +51863,7 @@ meltmod__warmelt_outobj__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_.VALCLO___V636*/ meltfptr[635]; + (melt_ptr_t *) & /*_._VALCLO___V636*/ meltfptr[635]; /*_.INSTALL_METHOD__V1066*/ meltfptr[990] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V17*/ meltfptr[16]), @@ -51822,7 +51897,7 @@ meltmod__warmelt_outobj__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_.VALCLO___V640*/ meltfptr[639]; + (melt_ptr_t *) & /*_._VALCLO___V640*/ meltfptr[639]; /*_.INSTALL_METHOD__V1067*/ meltfptr[989] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V17*/ meltfptr[16]), @@ -51856,7 +51931,7 @@ meltmod__warmelt_outobj__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_.VALCLO___V648*/ meltfptr[647]; + (melt_ptr_t *) & /*_._VALCLO___V648*/ meltfptr[647]; /*_.INSTALL_METHOD__V1068*/ meltfptr[990] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V17*/ meltfptr[16]), @@ -51890,7 +51965,7 @@ meltmod__warmelt_outobj__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_.VALCLO___V654*/ meltfptr[653]; + (melt_ptr_t *) & /*_._VALCLO___V654*/ meltfptr[653]; /*_.INSTALL_METHOD__V1069*/ meltfptr[989] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V17*/ meltfptr[16]), @@ -51924,7 +51999,7 @@ meltmod__warmelt_outobj__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_.VALCLO___V658*/ meltfptr[657]; + (melt_ptr_t *) & /*_._VALCLO___V658*/ meltfptr[657]; /*_.INSTALL_METHOD__V1070*/ meltfptr[990] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V17*/ meltfptr[16]), @@ -51958,7 +52033,7 @@ meltmod__warmelt_outobj__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_.VALCLO___V663*/ meltfptr[662]; + (melt_ptr_t *) & /*_._VALCLO___V663*/ meltfptr[662]; /*_.INSTALL_METHOD__V1071*/ meltfptr[989] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V17*/ meltfptr[16]), @@ -51992,7 +52067,7 @@ meltmod__warmelt_outobj__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_.VALCLO___V669*/ meltfptr[668]; + (melt_ptr_t *) & /*_._VALCLO___V669*/ meltfptr[668]; /*_.INSTALL_METHOD__V1072*/ meltfptr[990] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V17*/ meltfptr[16]), @@ -52026,7 +52101,7 @@ meltmod__warmelt_outobj__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_.VALCLO___V673*/ meltfptr[672]; + (melt_ptr_t *) & /*_._VALCLO___V673*/ meltfptr[672]; /*_.INSTALL_METHOD__V1073*/ meltfptr[989] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V17*/ meltfptr[16]), @@ -52060,7 +52135,7 @@ meltmod__warmelt_outobj__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_.VALCLO___V677*/ meltfptr[676]; + (melt_ptr_t *) & /*_._VALCLO___V677*/ meltfptr[676]; /*_.INSTALL_METHOD__V1074*/ meltfptr[990] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V17*/ meltfptr[16]), @@ -52094,7 +52169,7 @@ meltmod__warmelt_outobj__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_.VALCLO___V681*/ meltfptr[680]; + (melt_ptr_t *) & /*_._VALCLO___V681*/ meltfptr[680]; /*_.INSTALL_METHOD__V1075*/ meltfptr[989] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V17*/ meltfptr[16]), @@ -52128,7 +52203,7 @@ meltmod__warmelt_outobj__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_.VALCLO___V685*/ meltfptr[684]; + (melt_ptr_t *) & /*_._VALCLO___V685*/ meltfptr[684]; /*_.INSTALL_METHOD__V1076*/ meltfptr[990] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V17*/ meltfptr[16]), @@ -52162,7 +52237,7 @@ meltmod__warmelt_outobj__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_.VALCLO___V689*/ meltfptr[688]; + (melt_ptr_t *) & /*_._VALCLO___V689*/ meltfptr[688]; /*_.INSTALL_METHOD__V1077*/ meltfptr[989] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V17*/ meltfptr[16]), @@ -52196,7 +52271,7 @@ meltmod__warmelt_outobj__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_.VALCLO___V693*/ meltfptr[692]; + (melt_ptr_t *) & /*_._VALCLO___V693*/ meltfptr[692]; /*_.INSTALL_METHOD__V1078*/ meltfptr[990] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V17*/ meltfptr[16]), @@ -52230,7 +52305,7 @@ meltmod__warmelt_outobj__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_.VALCLO___V699*/ meltfptr[698]; + (melt_ptr_t *) & /*_._VALCLO___V699*/ meltfptr[698]; /*_.INSTALL_METHOD__V1079*/ meltfptr[989] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V17*/ meltfptr[16]), @@ -52264,7 +52339,7 @@ meltmod__warmelt_outobj__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_.VALCLO___V703*/ meltfptr[702]; + (melt_ptr_t *) & /*_._VALCLO___V703*/ meltfptr[702]; /*_.INSTALL_METHOD__V1080*/ meltfptr[990] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V17*/ meltfptr[16]), @@ -52298,7 +52373,7 @@ meltmod__warmelt_outobj__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_.VALCLO___V707*/ meltfptr[706]; + (melt_ptr_t *) & /*_._VALCLO___V707*/ meltfptr[706]; /*_.INSTALL_METHOD__V1081*/ meltfptr[989] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V17*/ meltfptr[16]), @@ -52331,7 +52406,7 @@ meltmod__warmelt_outobj__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_.VALCLO___V711*/ meltfptr[710]; + (melt_ptr_t *) & /*_._VALCLO___V711*/ meltfptr[710]; /*_.INSTALL_METHOD__V1082*/ meltfptr[990] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V17*/ meltfptr[16]), @@ -52365,7 +52440,7 @@ meltmod__warmelt_outobj__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_.VALCLO___V715*/ meltfptr[714]; + (melt_ptr_t *) & /*_._VALCLO___V715*/ meltfptr[714]; /*_.INSTALL_METHOD__V1083*/ meltfptr[989] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V17*/ meltfptr[16]), @@ -52399,7 +52474,7 @@ meltmod__warmelt_outobj__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_.VALCLO___V717*/ meltfptr[716]; + (melt_ptr_t *) & /*_._VALCLO___V717*/ meltfptr[716]; /*_.INSTALL_METHOD__V1084*/ meltfptr[990] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V17*/ meltfptr[16]), @@ -52432,7 +52507,7 @@ meltmod__warmelt_outobj__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_.VALCLO___V719*/ meltfptr[718]; + (melt_ptr_t *) & /*_._VALCLO___V719*/ meltfptr[718]; /*_.INSTALL_METHOD__V1085*/ meltfptr[989] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V17*/ meltfptr[16]), @@ -52465,7 +52540,7 @@ meltmod__warmelt_outobj__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V21*/ meltfptr[20]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_.VALCLO___V721*/ meltfptr[720]; + (melt_ptr_t *) & /*_._VALCLO___V721*/ meltfptr[720]; /*_.INSTALL_METHOD__V1086*/ meltfptr[990] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V17*/ meltfptr[16]), @@ -52496,10 +52571,10 @@ meltmod__warmelt_outobj__initialmeltchunk_18 (meltinitial_frame_t * memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = - (melt_ptr_t *) & /*_.VALDATA___V809*/ meltfptr[808]; + (melt_ptr_t *) & /*_._VALDATA___V809*/ meltfptr[808]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_.VALCLO___V812*/ meltfptr[811]; + (melt_ptr_t *) & /*_._VALCLO___V812*/ meltfptr[811]; /*_.INSTALL_METHOD__V1087*/ meltfptr[989] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V17*/ meltfptr[16]), @@ -52530,10 +52605,10 @@ meltmod__warmelt_outobj__initialmeltchunk_18 (meltinitial_frame_t * memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = - (melt_ptr_t *) & /*_.VALDATA___V809*/ meltfptr[808]; + (melt_ptr_t *) & /*_._VALDATA___V809*/ meltfptr[808]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_.VALCLO___V822*/ meltfptr[821]; + (melt_ptr_t *) & /*_._VALCLO___V822*/ meltfptr[821]; /*_.INSTALL_METHOD__V1088*/ meltfptr[990] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V17*/ meltfptr[16]), @@ -52563,10 +52638,10 @@ meltmod__warmelt_outobj__initialmeltchunk_18 (meltinitial_frame_t * memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = - (melt_ptr_t *) & /*_.VALDATA___V809*/ meltfptr[808]; + (melt_ptr_t *) & /*_._VALDATA___V809*/ meltfptr[808]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_.VALCLO___V830*/ meltfptr[829]; + (melt_ptr_t *) & /*_._VALCLO___V830*/ meltfptr[829]; /*_.INSTALL_METHOD__V1089*/ meltfptr[989] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V17*/ meltfptr[16]), @@ -52596,10 +52671,10 @@ meltmod__warmelt_outobj__initialmeltchunk_18 (meltinitial_frame_t * memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = - (melt_ptr_t *) & /*_.VALDATA___V809*/ meltfptr[808]; + (melt_ptr_t *) & /*_._VALDATA___V809*/ meltfptr[808]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_.VALCLO___V836*/ meltfptr[835]; + (melt_ptr_t *) & /*_._VALCLO___V836*/ meltfptr[835]; /*_.INSTALL_METHOD__V1090*/ meltfptr[990] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V17*/ meltfptr[16]), @@ -52626,7 +52701,7 @@ meltmod__warmelt_outobj__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (INITIAL_SYSTEM_DATA)))) /*=obj*/ ; melt_object_get_field (slot, obj, 4, "SYSDATA_VALUE_EXPORTER"); - /*_.VALUEXPORTER___V1091*/ meltfptr[989] = slot; + /*_._VALUEXPORTER___V1091*/ meltfptr[989] = slot; }; ; /*^apply */ @@ -52636,14 +52711,14 @@ meltmod__warmelt_outobj__initialmeltchunk_18 (meltinitial_frame_t * memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = - (melt_ptr_t *) & /*_.VALDATA___V809*/ meltfptr[808]; + (melt_ptr_t *) & /*_._VALDATA___V809*/ meltfptr[808]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : SYNTAX_TEST_GENERATOR */ -/*_.CONTENV___V2*/ meltfptr[1]; +/*_._CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) - ( /*_.VALUEXPORTER___V1091*/ meltfptr[989]), - (melt_ptr_t) ( /*_.VALDATA___V789*/ meltfptr[788]), + ( /*_._VALUEXPORTER___V1091*/ meltfptr[989]), + (melt_ptr_t) ( /*_._VALDATA___V789*/ meltfptr[788]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } @@ -52655,14 +52730,14 @@ meltmod__warmelt_outobj__initialmeltchunk_18 (meltinitial_frame_t * memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = - (melt_ptr_t *) & /*_.VALCLO___V889*/ meltfptr[888]; + (melt_ptr_t *) & /*_._VALCLO___V889*/ meltfptr[888]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : COMPILE_LIST_SEXPR */ -/*_.CONTENV___V2*/ meltfptr[1]; +/*_._CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) - ( /*_.VALUEXPORTER___V1091*/ meltfptr[989]), - (melt_ptr_t) ( /*_.VALDATA___V978*/ meltfptr[977]), + ( /*_._VALUEXPORTER___V1091*/ meltfptr[989]), + (melt_ptr_t) ( /*_._VALDATA___V978*/ meltfptr[977]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } @@ -52674,14 +52749,14 @@ meltmod__warmelt_outobj__initialmeltchunk_18 (meltinitial_frame_t * memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = - (melt_ptr_t *) & /*_.VALCLO___V977*/ meltfptr[976]; + (melt_ptr_t *) & /*_._VALCLO___V977*/ meltfptr[976]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : GENERATE_GPLV3PLUS_COPYRIGHT_NOTICE_C_COMMENT */ -/*_.CONTENV___V2*/ meltfptr[1]; +/*_._CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) - ( /*_.VALUEXPORTER___V1091*/ meltfptr[989]), - (melt_ptr_t) ( /*_.VALDATA___V980*/ meltfptr[979]), + ( /*_._VALUEXPORTER___V1091*/ meltfptr[989]), + (melt_ptr_t) ( /*_._VALDATA___V980*/ meltfptr[979]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } @@ -52693,14 +52768,14 @@ meltmod__warmelt_outobj__initialmeltchunk_18 (meltinitial_frame_t * memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = - (melt_ptr_t *) & /*_.VALCLO___V195*/ meltfptr[194]; + (melt_ptr_t *) & /*_._VALCLO___V195*/ meltfptr[194]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : GET_CODE_BUFFER_LIMIT */ -/*_.CONTENV___V2*/ meltfptr[1]; +/*_._CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) - ( /*_.VALUEXPORTER___V1091*/ meltfptr[989]), - (melt_ptr_t) ( /*_.VALDATA___V982*/ meltfptr[981]), + ( /*_._VALUEXPORTER___V1091*/ meltfptr[989]), + (melt_ptr_t) ( /*_._VALDATA___V982*/ meltfptr[981]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } @@ -52712,14 +52787,14 @@ meltmod__warmelt_outobj__initialmeltchunk_18 (meltinitial_frame_t * memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = - (melt_ptr_t *) & /*_.VALCLO___V197*/ meltfptr[196]; + (melt_ptr_t *) & /*_._VALCLO___V197*/ meltfptr[196]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : PUT_CODE_BUFFER_LIMIT */ -/*_.CONTENV___V2*/ meltfptr[1]; +/*_._CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) - ( /*_.VALUEXPORTER___V1091*/ meltfptr[989]), - (melt_ptr_t) ( /*_.VALDATA___V984*/ meltfptr[983]), + ( /*_._VALUEXPORTER___V1091*/ meltfptr[989]), + (melt_ptr_t) ( /*_._VALDATA___V984*/ meltfptr[983]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } @@ -52731,14 +52806,14 @@ meltmod__warmelt_outobj__initialmeltchunk_18 (meltinitial_frame_t * memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = - (melt_ptr_t *) & /*_.VALCLO___V975*/ meltfptr[974]; + (melt_ptr_t *) & /*_._VALCLO___V975*/ meltfptr[974]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : TRANSLATE_TO_C_MODULE_MELT_SOURCES */ -/*_.CONTENV___V2*/ meltfptr[1]; +/*_._CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) - ( /*_.VALUEXPORTER___V1091*/ meltfptr[989]), - (melt_ptr_t) ( /*_.VALDATA___V986*/ meltfptr[985]), + ( /*_._VALUEXPORTER___V1091*/ meltfptr[989]), + (melt_ptr_t) ( /*_._VALDATA___V986*/ meltfptr[985]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } @@ -52750,14 +52825,14 @@ meltmod__warmelt_outobj__initialmeltchunk_18 (meltinitial_frame_t * memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = - (melt_ptr_t *) & /*_.VALCLO___V961*/ meltfptr[960]; + (melt_ptr_t *) & /*_._VALCLO___V961*/ meltfptr[960]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : TRANSLATE_RUN_MELT_EXPRESSIONS */ -/*_.CONTENV___V2*/ meltfptr[1]; +/*_._CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) - ( /*_.VALUEXPORTER___V1091*/ meltfptr[989]), - (melt_ptr_t) ( /*_.VALDATA___V988*/ meltfptr[987]), + ( /*_._VALUEXPORTER___V1091*/ meltfptr[989]), + (melt_ptr_t) ( /*_._VALDATA___V988*/ meltfptr[987]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } @@ -52765,7 +52840,7 @@ meltmod__warmelt_outobj__initialmeltchunk_18 (meltinitial_frame_t * /*epilog */ /*^clear */ - /*clear *//*_.VALUEXPORTER___V1091*/ meltfptr[989] = 0; + /*clear *//*_._VALUEXPORTER___V1091*/ meltfptr[989] = 0; } MELT_LOCATION ("warmelt-outobj.melt:7556:/ initchunk"); @@ -52780,7 +52855,7 @@ meltmod__warmelt_outobj__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (INITIAL_SYSTEM_DATA)))) /*=obj*/ ; melt_object_get_field (slot, obj, 4, "SYSDATA_VALUE_EXPORTER"); - /*_.VALUEXPORTER___V1092*/ meltfptr[990] = slot; + /*_._VALUEXPORTER___V1092*/ meltfptr[990] = slot; }; ; /*^apply */ @@ -52790,14 +52865,14 @@ meltmod__warmelt_outobj__initialmeltchunk_18 (meltinitial_frame_t * memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = - (melt_ptr_t *) & /*_.VALDATA___V734*/ meltfptr[733]; + (melt_ptr_t *) & /*_._VALDATA___V734*/ meltfptr[733]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : CLASS_SECONDARY_C_FILE */ -/*_.CONTENV___V2*/ meltfptr[1]; +/*_._CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) - ( /*_.VALUEXPORTER___V1092*/ meltfptr[990]), - (melt_ptr_t) ( /*_.VALDATA___V732*/ meltfptr[731]), + ( /*_._VALUEXPORTER___V1092*/ meltfptr[990]), + (melt_ptr_t) ( /*_._VALDATA___V732*/ meltfptr[731]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } @@ -52809,14 +52884,14 @@ meltmod__warmelt_outobj__initialmeltchunk_18 (meltinitial_frame_t * memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = - (melt_ptr_t *) & /*_.VALDATA___V737*/ meltfptr[736]; + (melt_ptr_t *) & /*_._VALDATA___V737*/ meltfptr[736]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : SECFIL_MODNAM */ -/*_.CONTENV___V2*/ meltfptr[1]; +/*_._CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) - ( /*_.VALUEXPORTER___V1092*/ meltfptr[990]), - (melt_ptr_t) ( /*_.VALDATA___V746*/ meltfptr[745]), + ( /*_._VALUEXPORTER___V1092*/ meltfptr[990]), + (melt_ptr_t) ( /*_._VALDATA___V746*/ meltfptr[745]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } @@ -52828,14 +52903,14 @@ meltmod__warmelt_outobj__initialmeltchunk_18 (meltinitial_frame_t * memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = - (melt_ptr_t *) & /*_.VALDATA___V739*/ meltfptr[738]; + (melt_ptr_t *) & /*_._VALDATA___V739*/ meltfptr[738]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : SECFIL_PATH */ -/*_.CONTENV___V2*/ meltfptr[1]; +/*_._CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) - ( /*_.VALUEXPORTER___V1092*/ meltfptr[990]), - (melt_ptr_t) ( /*_.VALDATA___V748*/ meltfptr[747]), + ( /*_._VALUEXPORTER___V1092*/ meltfptr[990]), + (melt_ptr_t) ( /*_._VALDATA___V748*/ meltfptr[747]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } @@ -52847,14 +52922,14 @@ meltmod__warmelt_outobj__initialmeltchunk_18 (meltinitial_frame_t * memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = - (melt_ptr_t *) & /*_.VALDATA___V741*/ meltfptr[740]; + (melt_ptr_t *) & /*_._VALDATA___V741*/ meltfptr[740]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : SECFIL_DECLBUF */ -/*_.CONTENV___V2*/ meltfptr[1]; +/*_._CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) - ( /*_.VALUEXPORTER___V1092*/ meltfptr[990]), - (melt_ptr_t) ( /*_.VALDATA___V750*/ meltfptr[749]), + ( /*_._VALUEXPORTER___V1092*/ meltfptr[990]), + (melt_ptr_t) ( /*_._VALDATA___V750*/ meltfptr[749]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } @@ -52866,14 +52941,14 @@ meltmod__warmelt_outobj__initialmeltchunk_18 (meltinitial_frame_t * memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = - (melt_ptr_t *) & /*_.VALDATA___V743*/ meltfptr[742]; + (melt_ptr_t *) & /*_._VALDATA___V743*/ meltfptr[742]; /*^apply.arg */ argtab[1].meltbp_aptr = (melt_ptr_t *) & /*quasi.cur.mod.env.cont norm.exp.val : SECFIL_IMPLBUF */ -/*_.CONTENV___V2*/ meltfptr[1]; +/*_._CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t) - ( /*_.VALUEXPORTER___V1092*/ meltfptr[990]), - (melt_ptr_t) ( /*_.VALDATA___V752*/ meltfptr[751]), + ( /*_._VALUEXPORTER___V1092*/ meltfptr[990]), + (melt_ptr_t) ( /*_._VALDATA___V752*/ meltfptr[751]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } @@ -52881,14 +52956,14 @@ meltmod__warmelt_outobj__initialmeltchunk_18 (meltinitial_frame_t * /*epilog */ /*^clear */ - /*clear *//*_.VALUEXPORTER___V1092*/ meltfptr[990] = 0; + /*clear *//*_._VALUEXPORTER___V1092*/ meltfptr[990] = 0; } /**COMMENT: after toplevel body **/ ; /**COMMENT: compute boxloc again **/ ; - /*cond */ if ( /*_.CONTENV___V2*/ meltfptr[1]) /*then */ + /*cond */ if ( /*_._CONTENV___V2*/ meltfptr[1]) /*then */ { } else @@ -52897,13 +52972,13 @@ meltmod__warmelt_outobj__initialmeltchunk_18 (meltinitial_frame_t * /*^compute */ /* compile2obj_initproc emitted initialization of environment reference for warmelt-outobj */ - if ( /*_.PREVENV___V4*/ meltfptr[3]) + if ( /*_._PREVENV___V4*/ meltfptr[3]) { if (!melt_flag_bootstrapping) warning (0, "MELT is creating a fresh environment reference for warmelt-outobj"); - /*_.CONTENV___V2*/ meltfptr[1] = melthookproc_HOOK_FRESH_ENVIRONMENT_REFERENCE_MAKER - ((melt_ptr_t) /*_.PREVENV___V4*/ meltfptr[3], "warmelt-outobj"); + /*_._CONTENV___V2*/ meltfptr[1] = melthookproc_HOOK_FRESH_ENVIRONMENT_REFERENCE_MAKER + ((melt_ptr_t) /*_._PREVENV___V4*/ meltfptr[3], "warmelt-outobj"); } else /* no prevenv */ { @@ -52919,421 +52994,421 @@ meltmod__warmelt_outobj__initialmeltchunk_18 (meltinitial_frame_t * /*internsym:BUFFER_LIMIT_CONT */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V188*/ meltfptr[187])); + ( /*_._VALDATA___V188*/ meltfptr[187])); /*internsym:CLASS_REFERENCE */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V190*/ meltfptr[189])); + ( /*_._VALDATA___V190*/ meltfptr[189])); /*internsym:MELT_DEBUG_FUN */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V198*/ meltfptr[197])); + ( /*_._VALDATA___V198*/ meltfptr[197])); /*internsym:DISCR_CONSTANT_INTEGER */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V200*/ meltfptr[199])); + ( /*_._VALDATA___V200*/ meltfptr[199])); /*internsym:REGISTER_OPTION */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V204*/ meltfptr[203])); + ( /*_._VALDATA___V204*/ meltfptr[203])); /*internsym:CODE_BUFFER_LIMIT */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V206*/ meltfptr[205])); + ( /*_._VALDATA___V206*/ meltfptr[205])); /*internsym:CLASS_NORMAL_MODULE_VARIABLE_BINDING */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V212*/ meltfptr[211])); + ( /*_._VALDATA___V212*/ meltfptr[211])); /*internsym:CLASS_ANY_BINDING */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V214*/ meltfptr[213])); + ( /*_._VALDATA___V214*/ meltfptr[213])); /*internsym:CLASS_CLONED_SYMBOL */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V216*/ meltfptr[215])); + ( /*_._VALDATA___V216*/ meltfptr[215])); /*internsym:CLASS_NAMED */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V218*/ meltfptr[217])); + ( /*_._VALDATA___V218*/ meltfptr[217])); /*internsym:ADD2OUT */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V220*/ meltfptr[219])); + ( /*_._VALDATA___V220*/ meltfptr[219])); /*internsym:CLASS_SYMBOL */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V222*/ meltfptr[221])); + ( /*_._VALDATA___V222*/ meltfptr[221])); /*internsym:INSTALL_METHOD */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V226*/ meltfptr[225])); + ( /*_._VALDATA___V226*/ meltfptr[225])); /*internsym:CLASS_ROOT */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V228*/ meltfptr[227])); + ( /*_._VALDATA___V228*/ meltfptr[227])); /*internsym:OUTPUT_C_DECLINIT */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V230*/ meltfptr[229])); + ( /*_._VALDATA___V230*/ meltfptr[229])); /*internsym:CLASS_OBJINITELEM */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V234*/ meltfptr[233])); + ( /*_._VALDATA___V234*/ meltfptr[233])); /*internsym:OUTPUT_C_CODE */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V236*/ meltfptr[235])); + ( /*_._VALDATA___V236*/ meltfptr[235])); /*internsym:OUTPUT_C_INITIAL_FILL */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V240*/ meltfptr[239])); + ( /*_._VALDATA___V240*/ meltfptr[239])); /*internsym:OUTPUT_C_INITIAL_PREDEF */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V244*/ meltfptr[243])); + ( /*_._VALDATA___V244*/ meltfptr[243])); /*internsym:OBPREDEF */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V248*/ meltfptr[247])); + ( /*_._VALDATA___V248*/ meltfptr[247])); /*internsym:CLASS_OBJPREDEF */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V252*/ meltfptr[251])); + ( /*_._VALDATA___V252*/ meltfptr[251])); /*internsym:CLASS_OBJNIL */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V256*/ meltfptr[255])); + ( /*_._VALDATA___V256*/ meltfptr[255])); /*internsym:CLASS_OBJEXPANDPUREVAL */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V266*/ meltfptr[265])); + ( /*_._VALDATA___V266*/ meltfptr[265])); /*internsym:CLASS_OBJVALUE */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V268*/ meltfptr[267])); + ( /*_._VALDATA___V268*/ meltfptr[267])); /*internsym:CLASS_CTYPE */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V270*/ meltfptr[269])); + ( /*_._VALDATA___V270*/ meltfptr[269])); /*internsym:CTYPE_VOID */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V272*/ meltfptr[271])); + ( /*_._VALDATA___V272*/ meltfptr[271])); /*internsym:CLASS_OBJHOOKNTH */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V276*/ meltfptr[275])); + ( /*_._VALDATA___V276*/ meltfptr[275])); /*internsym:CTYPE_VALUE */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V278*/ meltfptr[277])); + ( /*_._VALDATA___V278*/ meltfptr[277])); /*internsym:CLASS_OBJINITOBJECT */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V282*/ meltfptr[281])); + ( /*_._VALDATA___V282*/ meltfptr[281])); /*internsym:CLASS_NREP_DATAINSTANCE */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V286*/ meltfptr[285])); + ( /*_._VALDATA___V286*/ meltfptr[285])); /*internsym:CLASS_CLASS */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V288*/ meltfptr[287])); + ( /*_._VALDATA___V288*/ meltfptr[287])); /*internsym:CLASS_OBJINITUNIQUEOBJECT */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V290*/ meltfptr[289])); + ( /*_._VALDATA___V290*/ meltfptr[289])); /*internsym:CLASS_NREP_NIL */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V294*/ meltfptr[293])); + ( /*_._VALDATA___V294*/ meltfptr[293])); /*internsym:CLASS_OBJINITHOOK */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V298*/ meltfptr[297])); + ( /*_._VALDATA___V298*/ meltfptr[297])); /*internsym:CLASS_NREP */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V300*/ meltfptr[299])); + ( /*_._VALDATA___V300*/ meltfptr[299])); /*internsym:CLASS_OBJINITMULTIPLE */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V304*/ meltfptr[303])); + ( /*_._VALDATA___V304*/ meltfptr[303])); /*internsym:CLASS_OBJINITCLOSURE */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V310*/ meltfptr[309])); + ( /*_._VALDATA___V310*/ meltfptr[309])); /*internsym:CLASS_OBJINITROUTINE */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V316*/ meltfptr[315])); + ( /*_._VALDATA___V316*/ meltfptr[315])); /*internsym:CLASS_NREP_DATAROUTINE */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V320*/ meltfptr[319])); + ( /*_._VALDATA___V320*/ meltfptr[319])); /*internsym:CLASS_NREP_ROUTPROC */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V322*/ meltfptr[321])); + ( /*_._VALDATA___V322*/ meltfptr[321])); /*internsym:CLASS_NREP_HOOKPROC */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V328*/ meltfptr[327])); + ( /*_._VALDATA___V328*/ meltfptr[327])); /*internsym:CLASS_OBJINITSTRING */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V332*/ meltfptr[331])); + ( /*_._VALDATA___V332*/ meltfptr[331])); /*internsym:CLASS_OBJINITBOXINTEGER */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V338*/ meltfptr[337])); + ( /*_._VALDATA___V338*/ meltfptr[337])); /*internsym:CLASS_OBJINITPAIR */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V344*/ meltfptr[343])); + ( /*_._VALDATA___V344*/ meltfptr[343])); /*internsym:CLASS_OBJINITLIST */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V350*/ meltfptr[349])); + ( /*_._VALDATA___V350*/ meltfptr[349])); /*internsym:DISCR_ANY_RECEIVER */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V356*/ meltfptr[355])); + ( /*_._VALDATA___V356*/ meltfptr[355])); /*internsym:DISCR_NULL_RECEIVER */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V360*/ meltfptr[359])); + ( /*_._VALDATA___V360*/ meltfptr[359])); /*internsym:DISPLAY_DEBUG_MESSAGE */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V364*/ meltfptr[363])); + ( /*_._VALDATA___V364*/ meltfptr[363])); /*internsym:PREVLOC_CONTAINER */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V366*/ meltfptr[365])); + ( /*_._VALDATA___V366*/ meltfptr[365])); /*internsym:PREVIMPLBUF_CONTAINER */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V368*/ meltfptr[367])); + ( /*_._VALDATA___V368*/ meltfptr[367])); /*internsym:DISCR_INTEGER */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V372*/ meltfptr[371])); + ( /*_._VALDATA___V372*/ meltfptr[371])); /*internsym:DISCR_STRING */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V374*/ meltfptr[373])); + ( /*_._VALDATA___V374*/ meltfptr[373])); /*internsym:CLASS_INITIAL_EXTENSION_ROUTINEOBJ */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V379*/ meltfptr[378])); + ( /*_._VALDATA___V379*/ meltfptr[378])); /*internsym:CLASS_INITIALROUTINEOBJ */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V381*/ meltfptr[380])); + ( /*_._VALDATA___V381*/ meltfptr[380])); /*internsym:LIST_EVERY */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V383*/ meltfptr[382])); + ( /*_._VALDATA___V383*/ meltfptr[382])); /*internsym:CLASS_OBJLOCV */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V385*/ meltfptr[384])); + ( /*_._VALDATA___V385*/ meltfptr[384])); /*internsym:CLASS_ROUTINEOBJ */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V390*/ meltfptr[389])); + ( /*_._VALDATA___V390*/ meltfptr[389])); /*internsym:CLASS_PROCROUTINEOBJ */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V392*/ meltfptr[391])); + ( /*_._VALDATA___V392*/ meltfptr[391])); /*internsym:CLASS_HOOKROUTINEOBJ */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V396*/ meltfptr[395])); + ( /*_._VALDATA___V396*/ meltfptr[395])); /*internsym:VARIADIC_INDEX_IDSTR */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V402*/ meltfptr[401])); + ( /*_._VALDATA___V402*/ meltfptr[401])); /*internsym:VARIADIC_LENGTH_IDSTR */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V404*/ meltfptr[403])); + ( /*_._VALDATA___V404*/ meltfptr[403])); /*internsym:CLASS_OBJPUREVALUE */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V406*/ meltfptr[405])); + ( /*_._VALDATA___V406*/ meltfptr[405])); /*internsym:CLASS_INITIAL_MODULE_ROUTINEOBJ */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V417*/ meltfptr[416])); + ( /*_._VALDATA___V417*/ meltfptr[416])); /*internsym:DISCR_LIST */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V419*/ meltfptr[418])); + ( /*_._VALDATA___V419*/ meltfptr[418])); /*internsym:LIST_TO_MULTIPLE */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V421*/ meltfptr[420])); + ( /*_._VALDATA___V421*/ meltfptr[420])); /*internsym:DISCR_MULTIPLE */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V423*/ meltfptr[422])); + ( /*_._VALDATA___V423*/ meltfptr[422])); /*internsym:DISCR_STRBUF */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V425*/ meltfptr[424])); + ( /*_._VALDATA___V425*/ meltfptr[424])); /*internsym:CLASS_OBJINSTR */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V427*/ meltfptr[426])); + ( /*_._VALDATA___V427*/ meltfptr[426])); /*internsym:CLASS_OBJCFORMAL */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V431*/ meltfptr[430])); + ( /*_._VALDATA___V431*/ meltfptr[430])); /*internsym:CLASS_OBJGETARG */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V440*/ meltfptr[439])); + ( /*_._VALDATA___V440*/ meltfptr[439])); /*internsym:CLASS_FORMAL_BINDING */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V442*/ meltfptr[441])); + ( /*_._VALDATA___V442*/ meltfptr[441])); /*internsym:CLASS_OBJGETARGREST */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V446*/ meltfptr[445])); + ( /*_._VALDATA___V446*/ meltfptr[445])); /*internsym:CLASS_OBJFETCHMODVAR */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V452*/ meltfptr[451])); + ( /*_._VALDATA___V452*/ meltfptr[451])); /*internsym:CLASS_OBJPUTMODVAR */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V456*/ meltfptr[455])); + ( /*_._VALDATA___V456*/ meltfptr[455])); /*internsym:CLASS_OBJPUTOUTARG */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V460*/ meltfptr[459])); + ( /*_._VALDATA___V460*/ meltfptr[459])); /*internsym:CTYPE_LONG */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V464*/ meltfptr[463])); + ( /*_._VALDATA___V464*/ meltfptr[463])); /*internsym:CLASS_OBJCLOCCV */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V468*/ meltfptr[467])); + ( /*_._VALDATA___V468*/ meltfptr[467])); /*internsym:CLASS_OBJCLOHOOKV */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V472*/ meltfptr[471])); + ( /*_._VALDATA___V472*/ meltfptr[471])); /*internsym:CLASS_OBJCONSTV */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V476*/ meltfptr[475])); + ( /*_._VALDATA___V476*/ meltfptr[475])); /*internsym:CLASS_OBJPLAINBLOCK */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V480*/ meltfptr[479])); + ( /*_._VALDATA___V480*/ meltfptr[479])); /*internsym:CLASS_OBJCHECKSIGNAL */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V484*/ meltfptr[483])); + ( /*_._VALDATA___V484*/ meltfptr[483])); /*internsym:CLASS_OBJANYBLOCK */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V488*/ meltfptr[487])); + ( /*_._VALDATA___V488*/ meltfptr[487])); #undef meltfram__ -} /*end of meltmod__warmelt_outobj__initialmeltchunk_18 */ +} /*end of meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 */ void -meltmod__warmelt_outobj__initialmeltchunk_19 (meltinitial_frame_t * - meltmeltframptr__, - char meltpredefinited[]) +meltmod__WARMELTmiOUTOBJ__initialmeltchunk_19 (meltinitial_frame_t * + meltmeltframptr__, + char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount @@ -53342,651 +53417,651 @@ meltmod__warmelt_outobj__initialmeltchunk_19 (meltinitial_frame_t * /*internsym:CLASS_OBJFLAG*/ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V492*/ meltfptr[491])); + ( /*_._VALDATA___V492*/ meltfptr[491])); /*internsym:CLASS_OBJMATCHFLAGBLOCK */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V496*/ meltfptr[495])); + ( /*_._VALDATA___V496*/ meltfptr[495])); /*internsym:CLASS_OBJMULTIALLOCBLOCK */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V500*/ meltfptr[499])); + ( /*_._VALDATA___V500*/ meltfptr[499])); /*internsym:DISCR_VERBATIM_STRING */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V502*/ meltfptr[501])); + ( /*_._VALDATA___V502*/ meltfptr[501])); /*internsym:CLASS_OBJCITERBLOCK */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V506*/ meltfptr[505])); + ( /*_._VALDATA___V506*/ meltfptr[505])); /*internsym:CLASS_CITERATOR */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V508*/ meltfptr[507])); + ( /*_._VALDATA___V508*/ meltfptr[507])); /*internsym:CLASS_OBJCOMMENTINSTR */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V512*/ meltfptr[511])); + ( /*_._VALDATA___V512*/ meltfptr[511])); /*internsym:CLASS_OBJCOMMENTEDBLOCK */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V516*/ meltfptr[515])); + ( /*_._VALDATA___V516*/ meltfptr[515])); /*internsym:LABELCOUNTREF */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V518*/ meltfptr[517])); + ( /*_._VALDATA___V518*/ meltfptr[517])); /*internsym:CLASS_OBJLABELINSTR */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V524*/ meltfptr[523])); + ( /*_._VALDATA___V524*/ meltfptr[523])); /*internsym:SET_CONTENT */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V526*/ meltfptr[525])); + ( /*_._VALDATA___V526*/ meltfptr[525])); /*internsym:STRING4OUT */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V528*/ meltfptr[527])); + ( /*_._VALDATA___V528*/ meltfptr[527])); /*internsym:CLASS_OBJGOTOINSTR */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V532*/ meltfptr[531])); + ( /*_._VALDATA___V532*/ meltfptr[531])); /*internsym:CLASS_OBJLOOP */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V540*/ meltfptr[539])); + ( /*_._VALDATA___V540*/ meltfptr[539])); /*internsym:CLASS_OBJEXIT */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V544*/ meltfptr[543])); + ( /*_._VALDATA___V544*/ meltfptr[543])); /*internsym:CLASS_OBJAGAIN */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V548*/ meltfptr[547])); + ( /*_._VALDATA___V548*/ meltfptr[547])); /*internsym:CLASS_OBJCOMPUTE */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V555*/ meltfptr[554])); + ( /*_._VALDATA___V555*/ meltfptr[554])); /*internsym:MULTIPLE_EVERY */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V557*/ meltfptr[556])); + ( /*_._VALDATA___V557*/ meltfptr[556])); /*internsym:CLASS_OBJCOND */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V561*/ meltfptr[560])); + ( /*_._VALDATA___V561*/ meltfptr[560])); /*internsym:CLASS_OBJCPPIF */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V565*/ meltfptr[564])); + ( /*_._VALDATA___V565*/ meltfptr[564])); /*internsym:CLASS_OBJINTERNSYMBOL */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V569*/ meltfptr[568])); + ( /*_._VALDATA___V569*/ meltfptr[568])); /*internsym:CLASS_NREP_DATASYMBOL */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V571*/ meltfptr[570])); + ( /*_._VALDATA___V571*/ meltfptr[570])); /*internsym:CLASS_OBJINTERNKEYWORD */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V575*/ meltfptr[574])); + ( /*_._VALDATA___V575*/ meltfptr[574])); /*internsym:CLASS_NREP_DATAKEYWORD */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V577*/ meltfptr[576])); + ( /*_._VALDATA___V577*/ meltfptr[576])); /*internsym:CLASS_OBJGETNAMEDSYMBOL */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V581*/ meltfptr[580])); + ( /*_._VALDATA___V581*/ meltfptr[580])); /*internsym:CLASS_OBJGETNAMEDKEYWORD */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V585*/ meltfptr[584])); + ( /*_._VALDATA___V585*/ meltfptr[584])); /*internsym:CLASS_OBJAPPLY */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V591*/ meltfptr[590])); + ( /*_._VALDATA___V591*/ meltfptr[590])); /*internsym:GET_CTYPE */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V593*/ meltfptr[592])); + ( /*_._VALDATA___V593*/ meltfptr[592])); /*internsym:CLASS_OBJMSEND */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V598*/ meltfptr[597])); + ( /*_._VALDATA___V598*/ meltfptr[597])); /*internsym:CLASS_OBJMULTIAPPLY */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V607*/ meltfptr[606])); + ( /*_._VALDATA___V607*/ meltfptr[606])); /*internsym:CLASS_OBJMULTIMSEND */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V616*/ meltfptr[615])); + ( /*_._VALDATA___V616*/ meltfptr[615])); /*internsym:CLASS_OBJCLEAR */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V620*/ meltfptr[619])); + ( /*_._VALDATA___V620*/ meltfptr[619])); /*internsym:CLASS_OBJRAWALLOCOBJ */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V624*/ meltfptr[623])); + ( /*_._VALDATA___V624*/ meltfptr[623])); /*internsym:CLASS_OBJNEWCLOSURE */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V629*/ meltfptr[628])); + ( /*_._VALDATA___V629*/ meltfptr[628])); /*internsym:CLASS_OBJTOUCH */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V633*/ meltfptr[632])); + ( /*_._VALDATA___V633*/ meltfptr[632])); /*internsym:CLASS_OBJDBGTRACEWRITEOBJ */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V637*/ meltfptr[636])); + ( /*_._VALDATA___V637*/ meltfptr[636])); /*internsym:CLASS_OBJPUTUPLE */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V641*/ meltfptr[640])); + ( /*_._VALDATA___V641*/ meltfptr[640])); /*internsym:OBJPUTPAIRHEAD_COUNTER */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V643*/ meltfptr[642])); + ( /*_._VALDATA___V643*/ meltfptr[642])); /*internsym:CLASS_OBJPUTPAIR */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V649*/ meltfptr[648])); + ( /*_._VALDATA___V649*/ meltfptr[648])); /*internsym:CLASS_OBJPUTPAIRHEAD */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V651*/ meltfptr[650])); + ( /*_._VALDATA___V651*/ meltfptr[650])); /*internsym:CLASS_OBJPUTPAIRTAIL */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V655*/ meltfptr[654])); + ( /*_._VALDATA___V655*/ meltfptr[654])); /*internsym:CLASS_OBJPUTLIST */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V659*/ meltfptr[658])); + ( /*_._VALDATA___V659*/ meltfptr[658])); /*internsym:CLASS_OBJGETSLOT */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V664*/ meltfptr[663])); + ( /*_._VALDATA___V664*/ meltfptr[663])); /*internsym:CLASS_FIELD */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V666*/ meltfptr[665])); + ( /*_._VALDATA___V666*/ meltfptr[665])); /*internsym:CLASS_OBJPUTSLOT */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V670*/ meltfptr[669])); + ( /*_._VALDATA___V670*/ meltfptr[669])); /*internsym:CLASS_OBJPUTCLOSUROUT */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V674*/ meltfptr[673])); + ( /*_._VALDATA___V674*/ meltfptr[673])); /*internsym:CLASS_OBJPUTCLOSEDV */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V678*/ meltfptr[677])); + ( /*_._VALDATA___V678*/ meltfptr[677])); /*internsym:CLASS_OBJPUTCLOSEDNOTNULLV */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V682*/ meltfptr[681])); + ( /*_._VALDATA___V682*/ meltfptr[681])); /*internsym:CLASS_OBJPUTROUTCONST */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V686*/ meltfptr[685])); + ( /*_._VALDATA___V686*/ meltfptr[685])); /*internsym:CLASS_OBJPUTROUTCONSTNOTNULL */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V690*/ meltfptr[689])); + ( /*_._VALDATA___V690*/ meltfptr[689])); /*internsym:CLASS_OBJPUTHOOKCONST */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V694*/ meltfptr[693])); + ( /*_._VALDATA___V694*/ meltfptr[693])); /*internsym:CLASS_NREP_BOUND_DATA */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V696*/ meltfptr[695])); + ( /*_._VALDATA___V696*/ meltfptr[695])); /*internsym:CLASS_OBJPUTHOOKDATA */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V700*/ meltfptr[699])); + ( /*_._VALDATA___V700*/ meltfptr[699])); /*internsym:CLASS_OBJPUTXTRARESULT */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V704*/ meltfptr[703])); + ( /*_._VALDATA___V704*/ meltfptr[703])); /*internsym:CLASS_OBJEXPV */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V708*/ meltfptr[707])); + ( /*_._VALDATA___V708*/ meltfptr[707])); /*internsym:CLASS_OBJLOCATEDEXPV */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V712*/ meltfptr[711])); + ( /*_._VALDATA___V712*/ meltfptr[711])); /*internsym:CLASS_OBJFINALRETURN */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V722*/ meltfptr[721])); + ( /*_._VALDATA___V722*/ meltfptr[721])); /*internsym:COMPARE_NAMED_ALPHA */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V726*/ meltfptr[725])); + ( /*_._VALDATA___V726*/ meltfptr[725])); /*internsym:CLASS_ANY_MODULE_CONTEXT */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V730*/ meltfptr[729])); + ( /*_._VALDATA___V730*/ meltfptr[729])); /*internsym:CLASS_SECONDARY_C_FILE */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V732*/ meltfptr[731])); + ( /*_._VALDATA___V732*/ meltfptr[731])); /*internsym:SECFIL_MODNAM */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V746*/ meltfptr[745])); + ( /*_._VALDATA___V746*/ meltfptr[745])); /*internsym:SECFIL_PATH */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V748*/ meltfptr[747])); + ( /*_._VALDATA___V748*/ meltfptr[747])); /*internsym:SECFIL_DECLBUF */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V750*/ meltfptr[749])); + ( /*_._VALDATA___V750*/ meltfptr[749])); /*internsym:SECFIL_IMPLBUF */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V752*/ meltfptr[751])); + ( /*_._VALDATA___V752*/ meltfptr[751])); /*internsym:GENERATED_C_FILENAME */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V754*/ meltfptr[753])); + ( /*_._VALDATA___V754*/ meltfptr[753])); /*internsym:DISCR */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V759*/ meltfptr[758])); + ( /*_._VALDATA___V759*/ meltfptr[758])); /*internsym:BASE */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V762*/ meltfptr[761])); + ( /*_._VALDATA___V762*/ meltfptr[761])); /*internsym:DIR */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V765*/ meltfptr[764])); + ( /*_._VALDATA___V765*/ meltfptr[764])); /*internsym:NUM */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V768*/ meltfptr[767])); + ( /*_._VALDATA___V768*/ meltfptr[767])); /*internsym:CLASS_RUNNING_EXTENSION_MODULE_CONTEXT */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V787*/ meltfptr[786])); + ( /*_._VALDATA___V787*/ meltfptr[786])); /*internsym:SYNTAX_TEST_GENERATOR */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V789*/ meltfptr[788])); + ( /*_._VALDATA___V789*/ meltfptr[788])); /*internsym:CLASS_SELECTOR */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V791*/ meltfptr[790])); + ( /*_._VALDATA___V791*/ meltfptr[790])); /*internsym:RECV */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V793*/ meltfptr[792])); + ( /*_._VALDATA___V793*/ meltfptr[792])); /*internsym:GENDEV */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V796*/ meltfptr[795])); + ( /*_._VALDATA___V796*/ meltfptr[795])); /*internsym:SBUF */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V799*/ meltfptr[798])); + ( /*_._VALDATA___V799*/ meltfptr[798])); /*internsym:MODCTX */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V802*/ meltfptr[801])); + ( /*_._VALDATA___V802*/ meltfptr[801])); /*internsym:IX */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V805*/ meltfptr[804])); + ( /*_._VALDATA___V805*/ meltfptr[804])); /*internsym:CLASS_LOCATED */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V813*/ meltfptr[812])); + ( /*_._VALDATA___V813*/ meltfptr[812])); /*internsym:CLASS_SOURCE_GENERATOR_DEVICE */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V815*/ meltfptr[814])); + ( /*_._VALDATA___V815*/ meltfptr[814])); /*internsym:CLASS_PRIMITIVE */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V823*/ meltfptr[822])); + ( /*_._VALDATA___V823*/ meltfptr[822])); /*internsym:CLASS_SOURCE_DEFPRIMITIVE */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V825*/ meltfptr[824])); + ( /*_._VALDATA___V825*/ meltfptr[824])); /*internsym:DISCR_MAP_OBJECTS */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V827*/ meltfptr[826])); + ( /*_._VALDATA___V827*/ meltfptr[826])); /*internsym:CLASS_SOURCE_DEFCITERATOR */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V831*/ meltfptr[830])); + ( /*_._VALDATA___V831*/ meltfptr[830])); /*internsym:CLASS_CMATCHER */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V837*/ meltfptr[836])); + ( /*_._VALDATA___V837*/ meltfptr[836])); /*internsym:CLASS_ANY_MATCHER */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V839*/ meltfptr[838])); + ( /*_._VALDATA___V839*/ meltfptr[838])); /*internsym:CLASS_SOURCE_DEFCMATCHER */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V841*/ meltfptr[840])); + ( /*_._VALDATA___V841*/ meltfptr[840])); /*internsym:CLASS_NORMALIZATION_CONTEXT */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V848*/ meltfptr[847])); + ( /*_._VALDATA___V848*/ meltfptr[847])); /*internsym:CLASS_ENVIRONMENT */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V850*/ meltfptr[849])); + ( /*_._VALDATA___V850*/ meltfptr[849])); /*internsym:CLASS_SOURCE */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V852*/ meltfptr[851])); + ( /*_._VALDATA___V852*/ meltfptr[851])); /*internsym:CLASS_SOURCE_UPDATE_CURRENT_MODULE_ENVIRONMENT_REFERENCE */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V854*/ meltfptr[853])); + ( /*_._VALDATA___V854*/ meltfptr[853])); /*internsym:CLASS_SOURCE_COMMENT */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V856*/ meltfptr[855])); + ( /*_._VALDATA___V856*/ meltfptr[855])); /*internsym:NORMAL_EXP */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V858*/ meltfptr[857])); + ( /*_._VALDATA___V858*/ meltfptr[857])); /*internsym:CLASS_NREP_ANYPROC */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V860*/ meltfptr[859])); + ( /*_._VALDATA___V860*/ meltfptr[859])); /*internsym:WRAP_NORMAL_LET1 */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V862*/ meltfptr[861])); + ( /*_._VALDATA___V862*/ meltfptr[861])); /*internsym:CLASS_NREP_INITPROC */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V864*/ meltfptr[863])); + ( /*_._VALDATA___V864*/ meltfptr[863])); /*internsym:CLASS_NREP_DATAHOOK */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V868*/ meltfptr[867])); + ( /*_._VALDATA___V868*/ meltfptr[867])); /*internsym:COMPILE2OBJ_HOOK */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V875*/ meltfptr[874])); + ( /*_._VALDATA___V875*/ meltfptr[874])); /*internsym:COMPILE2OBJ_PROCEDURE */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V877*/ meltfptr[876])); + ( /*_._VALDATA___V877*/ meltfptr[876])); /*internsym:CLASS_SOURCE_CHEADER */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V879*/ meltfptr[878])); + ( /*_._VALDATA___V879*/ meltfptr[878])); /*internsym:CLASS_SOURCE_CODE_STRING */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V881*/ meltfptr[880])); + ( /*_._VALDATA___V881*/ meltfptr[880])); /*internsym:CLASS_SOURCE_CIMPLEMENT */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V883*/ meltfptr[882])); + ( /*_._VALDATA___V883*/ meltfptr[882])); /*internsym:CLASS_MODULE_CONTEXT */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V890*/ meltfptr[889])); + ( /*_._VALDATA___V890*/ meltfptr[889])); /*internsym:DISCR_MAP_STRINGS */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V892*/ meltfptr[891])); + ( /*_._VALDATA___V892*/ meltfptr[891])); /*internsym:CREATE_NORMCONTEXT */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V894*/ meltfptr[893])); + ( /*_._VALDATA___V894*/ meltfptr[893])); /*internsym:INITIAL_ENVIRONMENT */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V896*/ meltfptr[895])); + ( /*_._VALDATA___V896*/ meltfptr[895])); /*internsym:MACROEXPAND_TOPLEVEL_LIST */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V898*/ meltfptr[897])); + ( /*_._VALDATA___V898*/ meltfptr[897])); /*internsym:MACROEXPAND_1 */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V900*/ meltfptr[899])); + ( /*_._VALDATA___V900*/ meltfptr[899])); /*internsym:COMPILE2OBJ_INITPROC */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V902*/ meltfptr[901])); + ( /*_._VALDATA___V902*/ meltfptr[901])); /*internsym:MELT_RUN_EXTENSION */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V904*/ meltfptr[903])); + ( /*_._VALDATA___V904*/ meltfptr[903])); /*internsym:BASENAME */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V909*/ meltfptr[908])); + ( /*_._VALDATA___V909*/ meltfptr[908])); /*internsym:ENV */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V912*/ meltfptr[911])); + ( /*_._VALDATA___V912*/ meltfptr[911])); /*internsym:LITVAL */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V915*/ meltfptr[914])); + ( /*_._VALDATA___V915*/ meltfptr[914])); /*internsym:CLONE_SYMBOL */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V933*/ meltfptr[932])); + ( /*_._VALDATA___V933*/ meltfptr[932])); /*internsym:RETAUTOBOXVAL */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V924*/ meltfptr[923])); + ( /*_._VALDATA___V924*/ meltfptr[923])); /*internsym:CLASS_NORMAL_LET_BINDING */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V935*/ meltfptr[934])); + ( /*_._VALDATA___V935*/ meltfptr[934])); /*internsym:CLASS_NREP_LOCSYMOCC */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V937*/ meltfptr[936])); + ( /*_._VALDATA___V937*/ meltfptr[936])); /*internsym:CLASS_NREP_RETURN */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V939*/ meltfptr[938])); + ( /*_._VALDATA___V939*/ meltfptr[938])); /*internsym:CLASS_NREP_CHUNK */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V941*/ meltfptr[940])); + ( /*_._VALDATA___V941*/ meltfptr[940])); /*internsym:AUTOBOXLONG */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V926*/ meltfptr[925])); + ( /*_._VALDATA___V926*/ meltfptr[925])); /*internsym:CLASS_LET_BINDING */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V943*/ meltfptr[942])); + ( /*_._VALDATA___V943*/ meltfptr[942])); /*internsym:CTYPE_CSTRING */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V945*/ meltfptr[944])); + ( /*_._VALDATA___V945*/ meltfptr[944])); /*internsym:AUTOBOXSTRING */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V928*/ meltfptr[927])); + ( /*_._VALDATA___V928*/ meltfptr[927])); /*internsym:CLASS_CTYPE_GTY */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V947*/ meltfptr[946])); + ( /*_._VALDATA___V947*/ meltfptr[946])); /*internsym:AUTOBOXGTY */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V930*/ meltfptr[929])); + ( /*_._VALDATA___V930*/ meltfptr[929])); /*internkeyw:TRUE */ (void) melthookproc_HOOK_INTERN_KEYWORD ((melt_ptr_t) - ( /*_.VALDATA___V951*/ meltfptr[950])); + ( /*_._VALDATA___V951*/ meltfptr[950])); /*internsym:CREATE_NORMAL_EXTENDING_CONTEXT */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V962*/ meltfptr[961])); + ( /*_._VALDATA___V962*/ meltfptr[961])); /*internsym:CLASS_SEXPR */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V964*/ meltfptr[963])); + ( /*_._VALDATA___V964*/ meltfptr[963])); /*internsym:COMPILE2OBJ_INITEXTENDPROC */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V966*/ meltfptr[965])); + ( /*_._VALDATA___V966*/ meltfptr[965])); #undef meltfram__ -} /*end of meltmod__warmelt_outobj__initialmeltchunk_19 */ +} /*end of meltmod__WARMELTmiOUTOBJ__initialmeltchunk_19 */ void -meltmod__warmelt_outobj__initialmeltchunk_20 (meltinitial_frame_t * - meltmeltframptr__, - char meltpredefinited[]) +meltmod__WARMELTmiOUTOBJ__initialmeltchunk_20 (meltinitial_frame_t * + meltmeltframptr__, + char meltpredefinited[]) { #define meltfram__ (*meltmeltframptr__) #undef meltcallcount @@ -53995,81 +54070,82 @@ meltmod__warmelt_outobj__initialmeltchunk_20 (meltinitial_frame_t * /*internsym:CLASS_LITERAL_VALUE*/ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V968*/ meltfptr[967])); + ( /*_._VALDATA___V968*/ meltfptr[967])); /*internsym:LIST_APPEND2LIST */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V972*/ meltfptr[971])); + ( /*_._VALDATA___V972*/ meltfptr[971])); /*internsym:COMPILE_LIST_SEXPR */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V978*/ meltfptr[977])); + ( /*_._VALDATA___V978*/ meltfptr[977])); /*internsym:GENERATE_GPLV3PLUS_COPYRIGHT_NOTICE_C_COMMENT */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V980*/ meltfptr[979])); + ( /*_._VALDATA___V980*/ meltfptr[979])); /*internsym:GET_CODE_BUFFER_LIMIT */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V982*/ meltfptr[981])); + ( /*_._VALDATA___V982*/ meltfptr[981])); /*internsym:PUT_CODE_BUFFER_LIMIT */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V984*/ meltfptr[983])); + ( /*_._VALDATA___V984*/ meltfptr[983])); /*internsym:TRANSLATE_TO_C_MODULE_MELT_SOURCES */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V986*/ meltfptr[985])); + ( /*_._VALDATA___V986*/ meltfptr[985])); /*internsym:TRANSLATE_RUN_MELT_EXPRESSIONS */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_.VALDATA___V988*/ meltfptr[987])); + ( /*_._VALDATA___V988*/ meltfptr[987])); /**COMMENT: set retinit from boxloc **/ ; - /*_.RETINIT___V1*/ meltfptr[0] = + /*_._RETINIT___V1*/ meltfptr[0] = /* finalsetretinit */ - melt_reference_value ((melt_ptr_t) ( /*_.CONTENV___V2*/ meltfptr[1])); + melt_reference_value ((melt_ptr_t) ( /*_._CONTENV___V2*/ meltfptr[1])); /**COMMENT: end the initproc **/ ; #undef meltfram__ -} /*end of meltmod__warmelt_outobj__initialmeltchunk_20 */ +} /*end of meltmod__WARMELTmiOUTOBJ__initialmeltchunk_20 */ void -meltmod__warmelt_outobj__forward_or_mark_module_start_frame (struct - melt_callframe_st - *fp, int marking) +meltmod__WARMELTmiOUTOBJ__forward_or_mark_module_start_frame (struct + melt_callframe_st + *fp, + int marking) { int meltix = 0; struct melt_initial_frame_st *meltframptr_ = (struct melt_initial_frame_st *) fp; melt_assertmsg ("check module frame", - meltframptr_->mcfr_nbvar == /*minihash */ -10); + meltframptr_->mcfr_nbvar == /*minihash */ -3862); if (!marking && melt_is_forwarding) { dbgprintf - ("forward_or_mark_module_start_frame_warmelt_outobj forwarding %d pointers in frame %p", + ("forward_or_mark_module_start_frame_WARMELTmiOUTOBJ forwarding %d pointers in frame %p", 1092, (void *) meltframptr_); for (meltix = 0; meltix < 1092; meltix++) MELT_FORWARDED (meltframptr_->mcfr_varptr[meltix]); return; } /*end forwarding */ dbgprintf - ("forward_or_mark_module_start_frame_warmelt_outobj marking in frame %p", + ("forward_or_mark_module_start_frame_WARMELTmiOUTOBJ marking in frame %p", (void *) meltframptr_); for (meltix = 0; meltix < 1092; meltix++) if (meltframptr_->mcfr_varptr[meltix]) gt_ggc_mx_melt_un (meltframptr_->mcfr_varptr[meltix]); -} /* end meltmod__warmelt_outobj__forward_or_mark_module_start_frame */ +} /* end meltmod__WARMELTmiOUTOBJ__forward_or_mark_module_start_frame */ |