diff options
author | bstarynk <bstarynk@138bc75d-0d04-0410-961f-82ee72b054a4> | 2013-06-14 18:54:09 +0000 |
---|---|---|
committer | bstarynk <bstarynk@138bc75d-0d04-0410-961f-82ee72b054a4> | 2013-06-14 18:54:09 +0000 |
commit | 31c3201fb62fb811d541297e77efa9a1f8cb926e (patch) | |
tree | 08422a5be8e8aa6927eb6be552794d066f2c7589 /gcc/melt/generated/warmelt-outobj.c | |
parent | 62e800f727dddfc616b20d38d0db8a933a1a1576 (diff) | |
download | gcc-31c3201fb62fb811d541297e77efa9a1f8cb926e.tar.gz |
2013-06-14 Basile Starynkevitch <basile@starynkevitch.net>
{{Regenerate}}
* melt/generated/warmelt-base+01.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+03.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@200104 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/melt/generated/warmelt-outobj.c')
-rw-r--r-- | gcc/melt/generated/warmelt-outobj.c | 27950 |
1 files changed, 13995 insertions, 13955 deletions
diff --git a/gcc/melt/generated/warmelt-outobj.c b/gcc/melt/generated/warmelt-outobj.c index c971f8b5eb6..9c43e2b8168 100644 --- a/gcc/melt/generated/warmelt-outobj.c +++ b/gcc/melt/generated/warmelt-outobj.c @@ -141,14 +141,12 @@ meltrout_4_WARMELTmiOUTOBJ_OUT_ENUMIX_MODVARBIND (meltclosure_ptr_t melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_5_WARMELTmiOUTOBJ_LAMBDA_cl1 (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 (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_); @@ -770,14 +768,12 @@ meltrout_41_WARMELTmiOUTOBJ_OUTPUT_CURFRAME_DECLSTRUCT (meltclosure_ptr_t melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_42_WARMELTmiOUTOBJ_LAMBDA_cl2 (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 (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_); @@ -797,14 +793,12 @@ meltrout_43_WARMELTmiOUTOBJ_OUTPUCOD_MARKER (meltclosure_ptr_t meltclosp_, melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_44_WARMELTmiOUTOBJ_LAMBDA_cl3 (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 (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_); @@ -847,14 +841,12 @@ meltrout_46_WARMELTmiOUTOBJ_OUTPUCOD_PROCROUTINE (meltclosure_ptr_t melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_47_WARMELTmiOUTOBJ_LAMBDA_cl4 (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 (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_); @@ -917,14 +909,12 @@ meltrout_50_WARMELTmiOUTOBJ_OUTPUCOD_INITIALMODULEROUTINE (meltclosure_ptr_t melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_51_WARMELTmiOUTOBJ_LAMBDA_cl5 (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 (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_); @@ -974,14 +964,12 @@ union meltparam_un *meltxrestab_); melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_55_WARMELTmiOUTOBJ_LAMBDA_cl6 (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_55_WARMELTmiOUTOBJ (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_); @@ -1366,27 +1354,23 @@ meltrout_78_WARMELTmiOUTOBJ_OUTPUCOD_OBJLOOP (meltclosure_ptr_t meltclosp_, melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_79_WARMELTmiOUTOBJ_LAMBDA_cl7 (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_79_WARMELTmiOUTOBJ (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_WARMELTmiOUTOBJ_LAMBDA_cl8 (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_80_WARMELTmiOUTOBJ (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_); @@ -1437,40 +1421,34 @@ meltrout_83_WARMELTmiOUTOBJ_OUTPUCOD_OBJCOMPUTE (meltclosure_ptr_t meltclosp_, melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_84_WARMELTmiOUTOBJ_LAMBDA_cl9 (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_84_WARMELTmiOUTOBJ (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_WARMELTmiOUTOBJ_LAMBDA_cl10 (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_85_WARMELTmiOUTOBJ (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_WARMELTmiOUTOBJ_LAMBDA_cl11 (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_86_WARMELTmiOUTOBJ (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_); @@ -1597,27 +1575,23 @@ meltrout_93_WARMELTmiOUTOBJ_OUTPUCOD_OBJAPPLY (meltclosure_ptr_t meltclosp_, melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_94_WARMELTmiOUTOBJ_LAMBDA_cl12 (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_94_WARMELTmiOUTOBJ (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_95_WARMELTmiOUTOBJ_LAMBDA_cl13 (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_95_WARMELTmiOUTOBJ (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_); @@ -1638,14 +1612,12 @@ meltrout_96_WARMELTmiOUTOBJ_OUTPUCOD_OBJMSEND (meltclosure_ptr_t meltclosp_, melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_97_WARMELTmiOUTOBJ_LAMBDA_cl14 (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 (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_); @@ -1667,66 +1639,56 @@ meltrout_98_WARMELTmiOUTOBJ_OUTPUCOD_OBJMULTIAPPLY (meltclosure_ptr_t melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_99_WARMELTmiOUTOBJ_LAMBDA_cl15 (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_99_WARMELTmiOUTOBJ (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_100_WARMELTmiOUTOBJ_LAMBDA_cl16 (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 (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_101_WARMELTmiOUTOBJ_LAMBDA_cl17 (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 (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_102_WARMELTmiOUTOBJ_LAMBDA_cl18 (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 (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_WARMELTmiOUTOBJ_LAMBDA_cl19 (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 (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_); @@ -1751,66 +1713,56 @@ meltrout_104_WARMELTmiOUTOBJ_OUTPUCOD_OBJMULTIMSEND (meltclosure_ptr_t melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_105_WARMELTmiOUTOBJ_LAMBDA_cl20 (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 (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_WARMELTmiOUTOBJ_LAMBDA_cl21 (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 (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_WARMELTmiOUTOBJ_LAMBDA_cl22 (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 (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_WARMELTmiOUTOBJ_LAMBDA_cl23 (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 (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_cl24 (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_109_WARMELTmiOUTOBJ (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_); @@ -1869,14 +1821,12 @@ meltrout_112_WARMELTmiOUTOBJ_OUTPUCOD_OBJNEWCLOSURE (meltclosure_ptr_t melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_113_WARMELTmiOUTOBJ_LAMBDA_cl25 (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 (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_); @@ -2002,14 +1952,12 @@ meltrout_120_WARMELTmiOUTOBJ_OUTPUCOD_OBJGETSLOT (meltclosure_ptr_t melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_121_WARMELTmiOUTOBJ_LAMBDA_cl26 (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_121_WARMELTmiOUTOBJ (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_); @@ -2522,14 +2470,12 @@ meltrout_150_WARMELTmiOUTOBJ_TRANSLATE_MACROEXPANDED_LIST (meltclosure_ptr_t melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_151_WARMELTmiOUTOBJ_LAMBDA_cl27 (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_151_WARMELTmiOUTOBJ (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_); @@ -2566,14 +2512,12 @@ meltrout_153_WARMELTmiOUTOBJ_COMPILE_LIST_SEXPR (meltclosure_ptr_t meltclosp_, melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_154_WARMELTmiOUTOBJ_LAMBDA_cl28 (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 (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_); @@ -2616,40 +2560,34 @@ meltrout_156_WARMELTmiOUTOBJ_TRANSLATE_RUN_MELT_EXPRESSIONS (meltclosure_ptr_t melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_157_WARMELTmiOUTOBJ_LAMBDA_cl29 (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 (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_WARMELTmiOUTOBJ_LAMBDA_cl30 (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 (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_WARMELTmiOUTOBJ_LAMBDA_cl31 (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 (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_); @@ -3763,7 +3701,7 @@ meltlab_endgetargs:; /*^newclosure */ - /*newclosure *//*_.LAMBDA___V11*/ meltfptr[10] = + /*newclosure *//*_.__V11*/ meltfptr[10] = (melt_ptr_t) meltgc_new_closure ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))), @@ -3774,16 +3712,16 @@ meltlab_endgetargs:; /*putclosv */ melt_assertmsg ("putclosv checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_.LAMBDA___V11*/ meltfptr[10])) == + ( /*_.__V11*/ meltfptr[10])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosv checkoff", 0 >= 0 && 0 < melt_closure_size ((melt_ptr_t) - ( /*_.LAMBDA___V11*/ meltfptr[10]))); - ((meltclosure_ptr_t) /*_.LAMBDA___V11*/ meltfptr[10])->tabval[0] = + ( /*_.__V11*/ meltfptr[10]))); + ((meltclosure_ptr_t) /*_.__V11*/ meltfptr[10])->tabval[0] = (melt_ptr_t) ( /*_.OUT__V2*/ meltfptr[1]); ; - /*_.OUTNAM__V10*/ meltfptr[9] = /*_.LAMBDA___V11*/ meltfptr[10];; + /*_.OUTNAM__V10*/ meltfptr[9] = /*_.__V11*/ meltfptr[10];; MELT_CHECK_SIGNAL (); ; @@ -4317,16 +4255,14 @@ meltlabend_rout: melt_ptr_t MELT_MODULE_VISIBILITY -meltrout_5_WARMELTmiOUTOBJ_LAMBDA_cl1 (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 (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_WARMELTmiOUTOBJ_LAMBDA_cl1_melt = + long current_blocklevel_signals_meltrout_5_WARMELTmiOUTOBJ_melt = melt_blocklevel_signals; #if MELT_HAVE_DEBUG @@ -4339,7 +4275,7 @@ meltrout_5_WARMELTmiOUTOBJ_LAMBDA_cl1 (meltclosure_ptr_t meltclosp_, #define meltcallcount 0L #endif - struct meltframe_meltrout_5_WARMELTmiOUTOBJ_LAMBDA_cl1_st + struct meltframe_meltrout_5_WARMELTmiOUTOBJ_st { int mcfr_nbvar; #if MELT_HAVE_DEBUG @@ -4361,14 +4297,13 @@ meltrout_5_WARMELTmiOUTOBJ_LAMBDA_cl1 (meltclosure_ptr_t meltclosp_, } *meltframptr_ = 0, meltfram__; /*declfrastruct */ #define meltframe meltfram__ - /*meltrout_5_WARMELTmiOUTOBJ_LAMBDA_cl1 is not initial declstructinit */ + /*meltrout_5_WARMELTmiOUTOBJ is not initial declstructinit */ if (MELT_UNLIKELY (meltxargdescr_ == MELTPAR_MARKGGC)) { /*mark for ggc */ int meltix; meltframptr_ = - (struct meltframe_meltrout_5_WARMELTmiOUTOBJ_LAMBDA_cl1_st *) - meltfirstargp_; - /* use arguments meltrout_5_WARMELTmiOUTOBJ_LAMBDA_cl1 output_curframe_declstruct_init */ + (struct meltframe_meltrout_5_WARMELTmiOUTOBJ_st *) meltfirstargp_; + /* use arguments meltrout_5_WARMELTmiOUTOBJ output_curframe_declstruct_init */ (void) meltclosp_; (void) meltfirstargp_; (void) meltxargdescr_; @@ -4383,12 +4318,12 @@ meltrout_5_WARMELTmiOUTOBJ_LAMBDA_cl1 (meltclosure_ptr_t meltclosp_, return NULL; } /*end markggc */ ; memset (&meltfram__, 0, sizeof (meltfram__)); -/* declstructinit plain routine meltrout_5_WARMELTmiOUTOBJ_LAMBDA_cl1 nbval 2*/ +/* declstructinit plain routine meltrout_5_WARMELTmiOUTOBJ nbval 2*/ meltfram__.mcfr_nbvar = 2 /*nbval */ ; meltfram__.mcfr_clos = meltclosp_; meltfram__.mcfr_prev = (struct melt_callframe_st *) melt_topframe; melt_topframe = (struct melt_callframe_st *) &meltfram__; - melt_trace_start ("LAMBDA_cl1", meltcallcount); + melt_trace_start ("**", meltcallcount); /*getargs*/ /*getarg#0 */ @@ -4416,17 +4351,17 @@ meltlab_endgetargs:; ; goto meltlabend_rout; meltlabend_rout: - melt_trace_end ("LAMBDA_cl1", meltcallcount); + melt_trace_end ("**", meltcallcount); MELT_TRACE_EXIT_LOCATION (); melt_blocklevel_signals = - current_blocklevel_signals_meltrout_5_WARMELTmiOUTOBJ_LAMBDA_cl1_melt; + current_blocklevel_signals_meltrout_5_WARMELTmiOUTOBJ_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_WARMELTmiOUTOBJ_LAMBDA_cl1 */ +} /*end meltrout_5_WARMELTmiOUTOBJ */ @@ -6213,8 +6148,8 @@ struct melt_initial_frame_st struct melt_callframe_st *mcfr_prev; #undef MELTFRAM_NBVARPTR #undef MELTFRAM_NBVARNUM -#define MELTFRAM_NBVARPTR 1108 - melt_ptr_t mcfr_varptr[1108]; +#define MELTFRAM_NBVARPTR 1111 + melt_ptr_t mcfr_varptr[1111]; /*no varnum*/ #define MELTFRAM_NBVARNUM /*none*/0 /*others*/ @@ -6371,8 +6306,8 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, struct MELT_CLOSURE_STRUCT (0) dclo_134__OUTDECLINIT_OBJINITHOOK; struct MELT_ROUTINE_STRUCT (6) drout_135__OUTCINITFILL_OBJINITHOOK; struct MELT_CLOSURE_STRUCT (0) dclo_136__OUTCINITFILL_OBJINITHOOK; - struct MELT_OBJECT_STRUCT (3) dsym_137__CLASS_NREP_HOOKPROC; - struct MELT_STRING_STRUCT (19) dstr_138__CLASS_NREP_HOOKPROC; + struct MELT_OBJECT_STRUCT (3) dsym_137__CLASS_NREP_CLOSPROC; + struct MELT_STRING_STRUCT (19) dstr_138__CLASS_NREP_CLOSPROC; struct MELT_ROUTINE_STRUCT (0) drout_139__OUTDECLINIT_OBJINITSTRING; struct MELT_CLOSURE_STRUCT (0) dclo_140__OUTDECLINIT_OBJINITSTRING; struct MELT_OBJECT_STRUCT (3) dsym_141__CLASS_OBJINITSTRING; @@ -6483,594 +6418,596 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, struct MELT_STRING_STRUCT (14) dstr_243__CLASS_OBJINSTR; struct MELT_ROUTINE_STRUCT (9) drout_244__OUTPUT_CENTRALDECL_HOOKROUTINE; struct MELT_CLOSURE_STRUCT (0) dclo_245__OUTPUT_CENTRALDECL_HOOKROUTINE; - struct MELT_OBJECT_STRUCT (3) dsym_246__CLASS_OBJCFORMAL; - struct MELT_STRING_STRUCT (16) dstr_247__CLASS_OBJCFORMAL; - struct MELT_ROUTINE_STRUCT (16) drout_248__OUTPUCOD_HOOKROUTINE; - struct MELT_CLOSURE_STRUCT (0) dclo_249__OUTPUCOD_HOOKROUTINE; + struct MELT_OBJECT_STRUCT (3) dsym_246__CLASS_NREP_HOOKPROC; + struct MELT_STRING_STRUCT (19) dstr_247__CLASS_NREP_HOOKPROC; + struct MELT_OBJECT_STRUCT (3) dsym_248__CLASS_OBJCFORMAL; + struct MELT_STRING_STRUCT (16) dstr_249__CLASS_OBJCFORMAL; + struct MELT_ROUTINE_STRUCT (16) drout_250__OUTPUCOD_HOOKROUTINE; + struct MELT_CLOSURE_STRUCT (0) dclo_251__OUTPUCOD_HOOKROUTINE; struct MELT_ROUTINE_STRUCT (19) - drout_250__OUTPUCOD_INITIALEXTENSIONROUTINE; - struct MELT_CLOSURE_STRUCT (0) dclo_251__OUTPUCOD_INITIALEXTENSIONROUTINE; - struct MELT_ROUTINE_STRUCT (1) drout_252__LAMBDA_; - struct MELT_ROUTINE_STRUCT (9) drout_253__OUTPUCOD_GETARG; - struct MELT_CLOSURE_STRUCT (0) dclo_254__OUTPUCOD_GETARG; - struct MELT_OBJECT_STRUCT (3) dsym_255__CLASS_OBJGETARG; - struct MELT_STRING_STRUCT (15) dstr_256__CLASS_OBJGETARG; - struct MELT_OBJECT_STRUCT (3) dsym_257__CLASS_FORMAL_BINDING; - struct MELT_STRING_STRUCT (20) dstr_258__CLASS_FORMAL_BINDING; - struct MELT_ROUTINE_STRUCT (11) drout_259__OUTPUCOD_GETARGREST; - struct MELT_CLOSURE_STRUCT (0) dclo_260__OUTPUCOD_GETARGREST; - struct MELT_OBJECT_STRUCT (3) dsym_261__CLASS_OBJGETARGREST; - struct MELT_STRING_STRUCT (19) dstr_262__CLASS_OBJGETARGREST; - struct MELT_ROUTINE_STRUCT (2) drout_263__OUTPUCOD_OBJCFORMAL; - struct MELT_CLOSURE_STRUCT (0) dclo_264__OUTPUCOD_OBJCFORMAL; - struct MELT_ROUTINE_STRUCT (5) drout_265__OUTPUCOD_OBJFETCHMODVAR; - struct MELT_CLOSURE_STRUCT (0) dclo_266__OUTPUCOD_OBJFETCHMODVAR; - struct MELT_OBJECT_STRUCT (3) dsym_267__CLASS_OBJFETCHMODVAR; - struct MELT_STRING_STRUCT (20) dstr_268__CLASS_OBJFETCHMODVAR; - struct MELT_ROUTINE_STRUCT (8) drout_269__OUTPUCOD_OBJPUTMODVAR; - struct MELT_CLOSURE_STRUCT (0) dclo_270__OUTPUCOD_OBJPUTMODVAR; - struct MELT_OBJECT_STRUCT (3) dsym_271__CLASS_OBJPUTMODVAR; - struct MELT_STRING_STRUCT (18) dstr_272__CLASS_OBJPUTMODVAR; - struct MELT_ROUTINE_STRUCT (8) drout_273__OUTPUCOD_OBJPUTOUTARG; - struct MELT_CLOSURE_STRUCT (0) dclo_274__OUTPUCOD_OBJPUTOUTARG; - struct MELT_OBJECT_STRUCT (3) dsym_275__CLASS_OBJPUTOUTARG; - struct MELT_STRING_STRUCT (18) dstr_276__CLASS_OBJPUTOUTARG; - struct MELT_ROUTINE_STRUCT (5) drout_277__OUTPUCOD_OBJLOCV; - struct MELT_CLOSURE_STRUCT (0) dclo_278__OUTPUCOD_OBJLOCV; - struct MELT_OBJECT_STRUCT (3) dsym_279__CTYPE_LONG; - struct MELT_STRING_STRUCT (10) dstr_280__CTYPE_LONG; - struct MELT_ROUTINE_STRUCT (4) drout_281__OUTPUCOD_OBJCLOCCV; - struct MELT_CLOSURE_STRUCT (0) dclo_282__OUTPUCOD_OBJCLOCCV; - struct MELT_OBJECT_STRUCT (3) dsym_283__CLASS_OBJCLOCCV; - struct MELT_STRING_STRUCT (15) dstr_284__CLASS_OBJCLOCCV; - struct MELT_ROUTINE_STRUCT (5) drout_285__OUTPUCOD_OBJCLOHOOKV; - struct MELT_CLOSURE_STRUCT (0) dclo_286__OUTPUCOD_OBJCLOHOOKV; - struct MELT_OBJECT_STRUCT (3) dsym_287__CLASS_OBJCLOHOOKV; - struct MELT_STRING_STRUCT (17) dstr_288__CLASS_OBJCLOHOOKV; - struct MELT_ROUTINE_STRUCT (4) drout_289__OUTPUCOD_OBJCONSTV; - struct MELT_CLOSURE_STRUCT (0) dclo_290__OUTPUCOD_OBJCONSTV; - struct MELT_OBJECT_STRUCT (3) dsym_291__CLASS_OBJCONSTV; - struct MELT_STRING_STRUCT (15) dstr_292__CLASS_OBJCONSTV; - struct MELT_ROUTINE_STRUCT (7) drout_293__OUTPUT_CODE_INSTRUCTIONS_LIST; - struct MELT_CLOSURE_STRUCT (0) dclo_294__OUTPUT_CODE_INSTRUCTIONS_LIST; - struct MELT_OBJECT_STRUCT (3) dsym_295__CLASS_OBJPLAINBLOCK; - struct MELT_STRING_STRUCT (19) dstr_296__CLASS_OBJPLAINBLOCK; - struct MELT_ROUTINE_STRUCT (3) drout_297__OUTPUCOD_OBJCHECKSIGNAL; - struct MELT_CLOSURE_STRUCT (0) dclo_298__OUTPUCOD_OBJCHECKSIGNAL; - struct MELT_OBJECT_STRUCT (3) dsym_299__CLASS_OBJCHECKSIGNAL; - struct MELT_STRING_STRUCT (20) dstr_300__CLASS_OBJCHECKSIGNAL; - struct MELT_ROUTINE_STRUCT (6) drout_301__OUTPUCOD_OBJANYBLOCK; - struct MELT_CLOSURE_STRUCT (0) dclo_302__OUTPUCOD_OBJANYBLOCK; - struct MELT_OBJECT_STRUCT (3) dsym_303__CLASS_OBJANYBLOCK; - struct MELT_STRING_STRUCT (17) dstr_304__CLASS_OBJANYBLOCK; - struct MELT_ROUTINE_STRUCT (3) drout_305__OUTPUCOD_OBJFLAG; - struct MELT_CLOSURE_STRUCT (0) dclo_306__OUTPUCOD_OBJFLAG; - struct MELT_OBJECT_STRUCT (3) dsym_307__CLASS_OBJFLAG; - struct MELT_STRING_STRUCT (13) dstr_308__CLASS_OBJFLAG; - struct MELT_ROUTINE_STRUCT (8) drout_309__OUTPUCOD_OBJMATCHFLAGBLOCK; - struct MELT_CLOSURE_STRUCT (0) dclo_310__OUTPUCOD_OBJMATCHFLAGBLOCK; - struct MELT_OBJECT_STRUCT (3) dsym_311__CLASS_OBJMATCHFLAGBLOCK; - struct MELT_STRING_STRUCT (23) dstr_312__CLASS_OBJMATCHFLAGBLOCK; - struct MELT_ROUTINE_STRUCT (11) drout_313__OUTPUCOD_OBJMULTIALLOCBLOCK; - struct MELT_CLOSURE_STRUCT (0) dclo_314__OUTPUCOD_OBJMULTIALLOCBLOCK; - struct MELT_OBJECT_STRUCT (3) dsym_315__CLASS_OBJMULTIALLOCBLOCK; - struct MELT_STRING_STRUCT (24) dstr_316__CLASS_OBJMULTIALLOCBLOCK; - struct MELT_OBJECT_STRUCT (3) dsym_317__DISCR_VERBATIM_STRING; - struct MELT_STRING_STRUCT (21) dstr_318__DISCR_VERBATIM_STRING; - struct MELT_ROUTINE_STRUCT (8) drout_319__OUTPUCOD_OBJCITERBLOCK; - struct MELT_CLOSURE_STRUCT (0) dclo_320__OUTPUCOD_OBJCITERBLOCK; - struct MELT_OBJECT_STRUCT (3) dsym_321__CLASS_OBJCITERBLOCK; - struct MELT_STRING_STRUCT (19) dstr_322__CLASS_OBJCITERBLOCK; - struct MELT_OBJECT_STRUCT (3) dsym_323__CLASS_CITERATOR; - struct MELT_STRING_STRUCT (15) dstr_324__CLASS_CITERATOR; - struct MELT_ROUTINE_STRUCT (6) drout_325__OUTPUCOD_OBJCOMMENTINSTR; - struct MELT_CLOSURE_STRUCT (0) dclo_326__OUTPUCOD_OBJCOMMENTINSTR; - struct MELT_OBJECT_STRUCT (3) dsym_327__CLASS_OBJCOMMENTINSTR; - struct MELT_STRING_STRUCT (21) dstr_328__CLASS_OBJCOMMENTINSTR; - struct MELT_ROUTINE_STRUCT (8) drout_329__OUTPUCOD_OBJCOMMENTEDBLOCK; - struct MELT_CLOSURE_STRUCT (0) dclo_330__OUTPUCOD_OBJCOMMENTEDBLOCK; - struct MELT_OBJECT_STRUCT (3) dsym_331__CLASS_OBJCOMMENTEDBLOCK; - struct MELT_STRING_STRUCT (23) dstr_332__CLASS_OBJCOMMENTEDBLOCK; - struct MELT_OBJECT_STRUCT (3) dsym_333__LABELCOUNTREF; - struct MELT_STRING_STRUCT (13) dstr_334__LABELCOUNTREF; - struct MELT_OBJECT_STRUCT (1) dobj_335__LABELCOUNTREF; - struct meltint_st dint_336__; - struct MELT_ROUTINE_STRUCT (10) drout_337__OUTPUCOD_OBJLABELINSTR; - struct MELT_CLOSURE_STRUCT (0) dclo_338__OUTPUCOD_OBJLABELINSTR; - struct MELT_OBJECT_STRUCT (3) dsym_339__CLASS_OBJLABELINSTR; - struct MELT_STRING_STRUCT (19) dstr_340__CLASS_OBJLABELINSTR; - struct MELT_OBJECT_STRUCT (3) dsym_341__SET_CONTENT; - struct MELT_STRING_STRUCT (11) dstr_342__SET_CONTENT; - struct MELT_OBJECT_STRUCT (3) dsym_343__STRING4OUT; - struct MELT_STRING_STRUCT (10) dstr_344__STRING4OUT; - struct MELT_ROUTINE_STRUCT (4) drout_345__OUTPUCOD_OBJGOTOINSTR; - struct MELT_CLOSURE_STRUCT (0) dclo_346__OUTPUCOD_OBJGOTOINSTR; - struct MELT_OBJECT_STRUCT (3) dsym_347__CLASS_OBJGOTOINSTR; - struct MELT_STRING_STRUCT (18) dstr_348__CLASS_OBJGOTOINSTR; - struct MELT_ROUTINE_STRUCT (3) drout_349__ADD2SBUF_CLONSYM; - struct MELT_CLOSURE_STRUCT (0) dclo_350__ADD2SBUF_CLONSYM; - struct MELT_ROUTINE_STRUCT (16) drout_351__OUTPUCOD_OBJLOOP; - struct MELT_CLOSURE_STRUCT (0) dclo_352__OUTPUCOD_OBJLOOP; - struct MELT_OBJECT_STRUCT (3) dsym_353__CLASS_OBJLOOP; - struct MELT_STRING_STRUCT (13) dstr_354__CLASS_OBJLOOP; - struct MELT_ROUTINE_STRUCT (2) drout_355__LAMBDA_; - struct MELT_ROUTINE_STRUCT (4) drout_356__LAMBDA_; - struct MELT_ROUTINE_STRUCT (6) drout_357__OUTPUCOD_OBJEXIT; - struct MELT_CLOSURE_STRUCT (0) dclo_358__OUTPUCOD_OBJEXIT; - struct MELT_OBJECT_STRUCT (3) dsym_359__CLASS_OBJEXIT; - struct MELT_STRING_STRUCT (13) dstr_360__CLASS_OBJEXIT; - struct MELT_ROUTINE_STRUCT (6) drout_361__OUTPUCOD_OBJAGAIN; - struct MELT_CLOSURE_STRUCT (0) dclo_362__OUTPUCOD_OBJAGAIN; - struct MELT_OBJECT_STRUCT (3) dsym_363__CLASS_OBJAGAIN; - struct MELT_STRING_STRUCT (14) dstr_364__CLASS_OBJAGAIN; - struct MELT_ROUTINE_STRUCT (18) drout_365__OUTPUCOD_OBJCOMPUTE; - struct MELT_CLOSURE_STRUCT (0) dclo_366__OUTPUCOD_OBJCOMPUTE; - struct MELT_OBJECT_STRUCT (3) dsym_367__CLASS_OBJCOMPUTE; - struct MELT_STRING_STRUCT (16) dstr_368__CLASS_OBJCOMPUTE; - struct MELT_ROUTINE_STRUCT (1) drout_369__LAMBDA_; - struct MELT_ROUTINE_STRUCT (3) drout_370__LAMBDA_; - struct MELT_OBJECT_STRUCT (3) dsym_371__MULTIPLE_EVERY; - struct MELT_STRING_STRUCT (14) dstr_372__MULTIPLE_EVERY; - struct MELT_ROUTINE_STRUCT (3) drout_373__LAMBDA_; - struct MELT_ROUTINE_STRUCT (6) drout_374__OUTPUCOD_OBJCOND; - struct MELT_CLOSURE_STRUCT (0) dclo_375__OUTPUCOD_OBJCOND; - struct MELT_OBJECT_STRUCT (3) dsym_376__CLASS_OBJCOND; - struct MELT_STRING_STRUCT (13) dstr_377__CLASS_OBJCOND; - struct MELT_ROUTINE_STRUCT (6) drout_378__OUTPUCOD_OBJCPPIF; - struct MELT_CLOSURE_STRUCT (0) dclo_379__OUTPUCOD_OBJCPPIF; - struct MELT_OBJECT_STRUCT (3) dsym_380__CLASS_OBJCPPIF; - struct MELT_STRING_STRUCT (14) dstr_381__CLASS_OBJCPPIF; - struct MELT_ROUTINE_STRUCT (7) drout_382__OUTPUCOD_OBJINTERNSYMBOL; - struct MELT_CLOSURE_STRUCT (0) dclo_383__OUTPUCOD_OBJINTERNSYMBOL; - struct MELT_OBJECT_STRUCT (3) dsym_384__CLASS_OBJINTERNSYMBOL; - struct MELT_STRING_STRUCT (21) dstr_385__CLASS_OBJINTERNSYMBOL; - struct MELT_OBJECT_STRUCT (3) dsym_386__CLASS_NREP_DATASYMBOL; - struct MELT_STRING_STRUCT (21) dstr_387__CLASS_NREP_DATASYMBOL; - struct MELT_ROUTINE_STRUCT (6) drout_388__OUTPUCOD_OBJINTERNKEYWORD; - struct MELT_CLOSURE_STRUCT (0) dclo_389__OUTPUCOD_OBJINTERNKEYWORD; - struct MELT_OBJECT_STRUCT (3) dsym_390__CLASS_OBJINTERNKEYWORD; - struct MELT_STRING_STRUCT (22) dstr_391__CLASS_OBJINTERNKEYWORD; - struct MELT_OBJECT_STRUCT (3) dsym_392__CLASS_NREP_DATAKEYWORD; - struct MELT_STRING_STRUCT (22) dstr_393__CLASS_NREP_DATAKEYWORD; - struct MELT_ROUTINE_STRUCT (8) drout_394__OUTPUCOD_OBJGETNAMEDSYMBOL; - struct MELT_CLOSURE_STRUCT (0) dclo_395__OUTPUCOD_OBJGETNAMEDSYMBOL; - struct MELT_OBJECT_STRUCT (3) dsym_396__CLASS_OBJGETNAMEDSYMBOL; - struct MELT_STRING_STRUCT (23) dstr_397__CLASS_OBJGETNAMEDSYMBOL; - struct MELT_ROUTINE_STRUCT (7) drout_398__OUTPUCOD_OBJGETNAMEDKEYWORD; - struct MELT_CLOSURE_STRUCT (0) dclo_399__OUTPUCOD_OBJGETNAMEDKEYWORD; - struct MELT_OBJECT_STRUCT (3) dsym_400__CLASS_OBJGETNAMEDKEYWORD; - struct MELT_STRING_STRUCT (24) dstr_401__CLASS_OBJGETNAMEDKEYWORD; - struct MELT_ROUTINE_STRUCT (18) drout_402__OUTPUCOD_OBJAPPLY; - struct MELT_CLOSURE_STRUCT (0) dclo_403__OUTPUCOD_OBJAPPLY; - struct MELT_OBJECT_STRUCT (3) dsym_404__CLASS_OBJAPPLY; - struct MELT_STRING_STRUCT (14) dstr_405__CLASS_OBJAPPLY; - struct MELT_OBJECT_STRUCT (3) dsym_406__GET_CTYPE; - struct MELT_STRING_STRUCT (9) dstr_407__GET_CTYPE; - struct MELT_ROUTINE_STRUCT (3) drout_408__LAMBDA_; - struct MELT_ROUTINE_STRUCT (0) drout_409__LAMBDA_; - struct MELT_ROUTINE_STRUCT (13) drout_410__OUTPUCOD_OBJMSEND; - struct MELT_CLOSURE_STRUCT (0) dclo_411__OUTPUCOD_OBJMSEND; - struct MELT_OBJECT_STRUCT (3) dsym_412__CLASS_OBJMSEND; - struct MELT_STRING_STRUCT (14) dstr_413__CLASS_OBJMSEND; - struct MELT_ROUTINE_STRUCT (0) drout_414__LAMBDA_; - struct MELT_ROUTINE_STRUCT (24) drout_415__OUTPUCOD_OBJMULTIAPPLY; - struct MELT_CLOSURE_STRUCT (0) dclo_416__OUTPUCOD_OBJMULTIAPPLY; - struct MELT_OBJECT_STRUCT (3) dsym_417__CLASS_OBJMULTIAPPLY; - struct MELT_STRING_STRUCT (19) dstr_418__CLASS_OBJMULTIAPPLY; - struct MELT_ROUTINE_STRUCT (1) drout_419__LAMBDA_; - struct MELT_ROUTINE_STRUCT (5) drout_420__LAMBDA_; + drout_252__OUTPUCOD_INITIALEXTENSIONROUTINE; + struct MELT_CLOSURE_STRUCT (0) dclo_253__OUTPUCOD_INITIALEXTENSIONROUTINE; + struct MELT_ROUTINE_STRUCT (1) drout_254__LAMBDA_; + struct MELT_ROUTINE_STRUCT (9) drout_255__OUTPUCOD_GETARG; + struct MELT_CLOSURE_STRUCT (0) dclo_256__OUTPUCOD_GETARG; + struct MELT_OBJECT_STRUCT (3) dsym_257__CLASS_OBJGETARG; + struct MELT_STRING_STRUCT (15) dstr_258__CLASS_OBJGETARG; + struct MELT_OBJECT_STRUCT (3) dsym_259__CLASS_FORMAL_BINDING; + struct MELT_STRING_STRUCT (20) dstr_260__CLASS_FORMAL_BINDING; + struct MELT_ROUTINE_STRUCT (11) drout_261__OUTPUCOD_GETARGREST; + struct MELT_CLOSURE_STRUCT (0) dclo_262__OUTPUCOD_GETARGREST; + struct MELT_OBJECT_STRUCT (3) dsym_263__CLASS_OBJGETARGREST; + struct MELT_STRING_STRUCT (19) dstr_264__CLASS_OBJGETARGREST; + struct MELT_ROUTINE_STRUCT (2) drout_265__OUTPUCOD_OBJCFORMAL; + struct MELT_CLOSURE_STRUCT (0) dclo_266__OUTPUCOD_OBJCFORMAL; + struct MELT_ROUTINE_STRUCT (5) drout_267__OUTPUCOD_OBJFETCHMODVAR; + struct MELT_CLOSURE_STRUCT (0) dclo_268__OUTPUCOD_OBJFETCHMODVAR; + struct MELT_OBJECT_STRUCT (3) dsym_269__CLASS_OBJFETCHMODVAR; + struct MELT_STRING_STRUCT (20) dstr_270__CLASS_OBJFETCHMODVAR; + struct MELT_ROUTINE_STRUCT (8) drout_271__OUTPUCOD_OBJPUTMODVAR; + struct MELT_CLOSURE_STRUCT (0) dclo_272__OUTPUCOD_OBJPUTMODVAR; + struct MELT_OBJECT_STRUCT (3) dsym_273__CLASS_OBJPUTMODVAR; + struct MELT_STRING_STRUCT (18) dstr_274__CLASS_OBJPUTMODVAR; + struct MELT_ROUTINE_STRUCT (8) drout_275__OUTPUCOD_OBJPUTOUTARG; + struct MELT_CLOSURE_STRUCT (0) dclo_276__OUTPUCOD_OBJPUTOUTARG; + struct MELT_OBJECT_STRUCT (3) dsym_277__CLASS_OBJPUTOUTARG; + struct MELT_STRING_STRUCT (18) dstr_278__CLASS_OBJPUTOUTARG; + struct MELT_ROUTINE_STRUCT (5) drout_279__OUTPUCOD_OBJLOCV; + struct MELT_CLOSURE_STRUCT (0) dclo_280__OUTPUCOD_OBJLOCV; + struct MELT_OBJECT_STRUCT (3) dsym_281__CTYPE_LONG; + struct MELT_STRING_STRUCT (10) dstr_282__CTYPE_LONG; + struct MELT_ROUTINE_STRUCT (4) drout_283__OUTPUCOD_OBJCLOCCV; + struct MELT_CLOSURE_STRUCT (0) dclo_284__OUTPUCOD_OBJCLOCCV; + struct MELT_OBJECT_STRUCT (3) dsym_285__CLASS_OBJCLOCCV; + struct MELT_STRING_STRUCT (15) dstr_286__CLASS_OBJCLOCCV; + struct MELT_ROUTINE_STRUCT (5) drout_287__OUTPUCOD_OBJCLOHOOKV; + struct MELT_CLOSURE_STRUCT (0) dclo_288__OUTPUCOD_OBJCLOHOOKV; + struct MELT_OBJECT_STRUCT (3) dsym_289__CLASS_OBJCLOHOOKV; + struct MELT_STRING_STRUCT (17) dstr_290__CLASS_OBJCLOHOOKV; + struct MELT_ROUTINE_STRUCT (4) drout_291__OUTPUCOD_OBJCONSTV; + struct MELT_CLOSURE_STRUCT (0) dclo_292__OUTPUCOD_OBJCONSTV; + struct MELT_OBJECT_STRUCT (3) dsym_293__CLASS_OBJCONSTV; + struct MELT_STRING_STRUCT (15) dstr_294__CLASS_OBJCONSTV; + struct MELT_ROUTINE_STRUCT (7) drout_295__OUTPUT_CODE_INSTRUCTIONS_LIST; + struct MELT_CLOSURE_STRUCT (0) dclo_296__OUTPUT_CODE_INSTRUCTIONS_LIST; + struct MELT_OBJECT_STRUCT (3) dsym_297__CLASS_OBJPLAINBLOCK; + struct MELT_STRING_STRUCT (19) dstr_298__CLASS_OBJPLAINBLOCK; + struct MELT_ROUTINE_STRUCT (3) drout_299__OUTPUCOD_OBJCHECKSIGNAL; + struct MELT_CLOSURE_STRUCT (0) dclo_300__OUTPUCOD_OBJCHECKSIGNAL; + struct MELT_OBJECT_STRUCT (3) dsym_301__CLASS_OBJCHECKSIGNAL; + struct MELT_STRING_STRUCT (20) dstr_302__CLASS_OBJCHECKSIGNAL; + struct MELT_ROUTINE_STRUCT (6) drout_303__OUTPUCOD_OBJANYBLOCK; + struct MELT_CLOSURE_STRUCT (0) dclo_304__OUTPUCOD_OBJANYBLOCK; + struct MELT_OBJECT_STRUCT (3) dsym_305__CLASS_OBJANYBLOCK; + struct MELT_STRING_STRUCT (17) dstr_306__CLASS_OBJANYBLOCK; + struct MELT_ROUTINE_STRUCT (3) drout_307__OUTPUCOD_OBJFLAG; + struct MELT_CLOSURE_STRUCT (0) dclo_308__OUTPUCOD_OBJFLAG; + struct MELT_OBJECT_STRUCT (3) dsym_309__CLASS_OBJFLAG; + struct MELT_STRING_STRUCT (13) dstr_310__CLASS_OBJFLAG; + struct MELT_ROUTINE_STRUCT (8) drout_311__OUTPUCOD_OBJMATCHFLAGBLOCK; + struct MELT_CLOSURE_STRUCT (0) dclo_312__OUTPUCOD_OBJMATCHFLAGBLOCK; + struct MELT_OBJECT_STRUCT (3) dsym_313__CLASS_OBJMATCHFLAGBLOCK; + struct MELT_STRING_STRUCT (23) dstr_314__CLASS_OBJMATCHFLAGBLOCK; + struct MELT_ROUTINE_STRUCT (11) drout_315__OUTPUCOD_OBJMULTIALLOCBLOCK; + struct MELT_CLOSURE_STRUCT (0) dclo_316__OUTPUCOD_OBJMULTIALLOCBLOCK; + struct MELT_OBJECT_STRUCT (3) dsym_317__CLASS_OBJMULTIALLOCBLOCK; + struct MELT_STRING_STRUCT (24) dstr_318__CLASS_OBJMULTIALLOCBLOCK; + struct MELT_OBJECT_STRUCT (3) dsym_319__DISCR_VERBATIM_STRING; + struct MELT_STRING_STRUCT (21) dstr_320__DISCR_VERBATIM_STRING; + struct MELT_ROUTINE_STRUCT (8) drout_321__OUTPUCOD_OBJCITERBLOCK; + struct MELT_CLOSURE_STRUCT (0) dclo_322__OUTPUCOD_OBJCITERBLOCK; + struct MELT_OBJECT_STRUCT (3) dsym_323__CLASS_OBJCITERBLOCK; + struct MELT_STRING_STRUCT (19) dstr_324__CLASS_OBJCITERBLOCK; + struct MELT_OBJECT_STRUCT (3) dsym_325__CLASS_CITERATOR; + struct MELT_STRING_STRUCT (15) dstr_326__CLASS_CITERATOR; + struct MELT_ROUTINE_STRUCT (6) drout_327__OUTPUCOD_OBJCOMMENTINSTR; + struct MELT_CLOSURE_STRUCT (0) dclo_328__OUTPUCOD_OBJCOMMENTINSTR; + struct MELT_OBJECT_STRUCT (3) dsym_329__CLASS_OBJCOMMENTINSTR; + struct MELT_STRING_STRUCT (21) dstr_330__CLASS_OBJCOMMENTINSTR; + struct MELT_ROUTINE_STRUCT (8) drout_331__OUTPUCOD_OBJCOMMENTEDBLOCK; + struct MELT_CLOSURE_STRUCT (0) dclo_332__OUTPUCOD_OBJCOMMENTEDBLOCK; + struct MELT_OBJECT_STRUCT (3) dsym_333__CLASS_OBJCOMMENTEDBLOCK; + struct MELT_STRING_STRUCT (23) dstr_334__CLASS_OBJCOMMENTEDBLOCK; + struct MELT_OBJECT_STRUCT (3) dsym_335__LABELCOUNTREF; + struct MELT_STRING_STRUCT (13) dstr_336__LABELCOUNTREF; + struct MELT_OBJECT_STRUCT (1) dobj_337__LABELCOUNTREF; + struct meltint_st dint_338__; + struct MELT_ROUTINE_STRUCT (10) drout_339__OUTPUCOD_OBJLABELINSTR; + struct MELT_CLOSURE_STRUCT (0) dclo_340__OUTPUCOD_OBJLABELINSTR; + struct MELT_OBJECT_STRUCT (3) dsym_341__CLASS_OBJLABELINSTR; + struct MELT_STRING_STRUCT (19) dstr_342__CLASS_OBJLABELINSTR; + struct MELT_OBJECT_STRUCT (3) dsym_343__SET_CONTENT; + struct MELT_STRING_STRUCT (11) dstr_344__SET_CONTENT; + struct MELT_OBJECT_STRUCT (3) dsym_345__STRING4OUT; + struct MELT_STRING_STRUCT (10) dstr_346__STRING4OUT; + struct MELT_ROUTINE_STRUCT (4) drout_347__OUTPUCOD_OBJGOTOINSTR; + struct MELT_CLOSURE_STRUCT (0) dclo_348__OUTPUCOD_OBJGOTOINSTR; + struct MELT_OBJECT_STRUCT (3) dsym_349__CLASS_OBJGOTOINSTR; + struct MELT_STRING_STRUCT (18) dstr_350__CLASS_OBJGOTOINSTR; + struct MELT_ROUTINE_STRUCT (3) drout_351__ADD2SBUF_CLONSYM; + struct MELT_CLOSURE_STRUCT (0) dclo_352__ADD2SBUF_CLONSYM; + struct MELT_ROUTINE_STRUCT (16) drout_353__OUTPUCOD_OBJLOOP; + struct MELT_CLOSURE_STRUCT (0) dclo_354__OUTPUCOD_OBJLOOP; + struct MELT_OBJECT_STRUCT (3) dsym_355__CLASS_OBJLOOP; + struct MELT_STRING_STRUCT (13) dstr_356__CLASS_OBJLOOP; + struct MELT_ROUTINE_STRUCT (2) drout_357__LAMBDA_; + struct MELT_ROUTINE_STRUCT (4) drout_358__LAMBDA_; + struct MELT_ROUTINE_STRUCT (6) drout_359__OUTPUCOD_OBJEXIT; + struct MELT_CLOSURE_STRUCT (0) dclo_360__OUTPUCOD_OBJEXIT; + struct MELT_OBJECT_STRUCT (3) dsym_361__CLASS_OBJEXIT; + struct MELT_STRING_STRUCT (13) dstr_362__CLASS_OBJEXIT; + struct MELT_ROUTINE_STRUCT (6) drout_363__OUTPUCOD_OBJAGAIN; + struct MELT_CLOSURE_STRUCT (0) dclo_364__OUTPUCOD_OBJAGAIN; + struct MELT_OBJECT_STRUCT (3) dsym_365__CLASS_OBJAGAIN; + struct MELT_STRING_STRUCT (14) dstr_366__CLASS_OBJAGAIN; + struct MELT_ROUTINE_STRUCT (18) drout_367__OUTPUCOD_OBJCOMPUTE; + struct MELT_CLOSURE_STRUCT (0) dclo_368__OUTPUCOD_OBJCOMPUTE; + struct MELT_OBJECT_STRUCT (3) dsym_369__CLASS_OBJCOMPUTE; + struct MELT_STRING_STRUCT (16) dstr_370__CLASS_OBJCOMPUTE; + struct MELT_ROUTINE_STRUCT (1) drout_371__LAMBDA_; + struct MELT_ROUTINE_STRUCT (3) drout_372__LAMBDA_; + struct MELT_OBJECT_STRUCT (3) dsym_373__MULTIPLE_EVERY; + struct MELT_STRING_STRUCT (14) dstr_374__MULTIPLE_EVERY; + struct MELT_ROUTINE_STRUCT (3) drout_375__LAMBDA_; + struct MELT_ROUTINE_STRUCT (6) drout_376__OUTPUCOD_OBJCOND; + struct MELT_CLOSURE_STRUCT (0) dclo_377__OUTPUCOD_OBJCOND; + struct MELT_OBJECT_STRUCT (3) dsym_378__CLASS_OBJCOND; + struct MELT_STRING_STRUCT (13) dstr_379__CLASS_OBJCOND; + struct MELT_ROUTINE_STRUCT (6) drout_380__OUTPUCOD_OBJCPPIF; + struct MELT_CLOSURE_STRUCT (0) dclo_381__OUTPUCOD_OBJCPPIF; + struct MELT_OBJECT_STRUCT (3) dsym_382__CLASS_OBJCPPIF; + struct MELT_STRING_STRUCT (14) dstr_383__CLASS_OBJCPPIF; + struct MELT_ROUTINE_STRUCT (7) drout_384__OUTPUCOD_OBJINTERNSYMBOL; + struct MELT_CLOSURE_STRUCT (0) dclo_385__OUTPUCOD_OBJINTERNSYMBOL; + struct MELT_OBJECT_STRUCT (3) dsym_386__CLASS_OBJINTERNSYMBOL; + struct MELT_STRING_STRUCT (21) dstr_387__CLASS_OBJINTERNSYMBOL; + struct MELT_OBJECT_STRUCT (3) dsym_388__CLASS_NREP_DATASYMBOL; + struct MELT_STRING_STRUCT (21) dstr_389__CLASS_NREP_DATASYMBOL; + struct MELT_ROUTINE_STRUCT (6) drout_390__OUTPUCOD_OBJINTERNKEYWORD; + struct MELT_CLOSURE_STRUCT (0) dclo_391__OUTPUCOD_OBJINTERNKEYWORD; + struct MELT_OBJECT_STRUCT (3) dsym_392__CLASS_OBJINTERNKEYWORD; + struct MELT_STRING_STRUCT (22) dstr_393__CLASS_OBJINTERNKEYWORD; + struct MELT_OBJECT_STRUCT (3) dsym_394__CLASS_NREP_DATAKEYWORD; + struct MELT_STRING_STRUCT (22) dstr_395__CLASS_NREP_DATAKEYWORD; + struct MELT_ROUTINE_STRUCT (8) drout_396__OUTPUCOD_OBJGETNAMEDSYMBOL; + struct MELT_CLOSURE_STRUCT (0) dclo_397__OUTPUCOD_OBJGETNAMEDSYMBOL; + struct MELT_OBJECT_STRUCT (3) dsym_398__CLASS_OBJGETNAMEDSYMBOL; + struct MELT_STRING_STRUCT (23) dstr_399__CLASS_OBJGETNAMEDSYMBOL; + struct MELT_ROUTINE_STRUCT (7) drout_400__OUTPUCOD_OBJGETNAMEDKEYWORD; + struct MELT_CLOSURE_STRUCT (0) dclo_401__OUTPUCOD_OBJGETNAMEDKEYWORD; + struct MELT_OBJECT_STRUCT (3) dsym_402__CLASS_OBJGETNAMEDKEYWORD; + struct MELT_STRING_STRUCT (24) dstr_403__CLASS_OBJGETNAMEDKEYWORD; + struct MELT_ROUTINE_STRUCT (18) drout_404__OUTPUCOD_OBJAPPLY; + struct MELT_CLOSURE_STRUCT (0) dclo_405__OUTPUCOD_OBJAPPLY; + struct MELT_OBJECT_STRUCT (3) dsym_406__CLASS_OBJAPPLY; + struct MELT_STRING_STRUCT (14) dstr_407__CLASS_OBJAPPLY; + struct MELT_OBJECT_STRUCT (3) dsym_408__GET_CTYPE; + struct MELT_STRING_STRUCT (9) dstr_409__GET_CTYPE; + struct MELT_ROUTINE_STRUCT (3) drout_410__LAMBDA_; + struct MELT_ROUTINE_STRUCT (0) drout_411__LAMBDA_; + struct MELT_ROUTINE_STRUCT (13) drout_412__OUTPUCOD_OBJMSEND; + struct MELT_CLOSURE_STRUCT (0) dclo_413__OUTPUCOD_OBJMSEND; + struct MELT_OBJECT_STRUCT (3) dsym_414__CLASS_OBJMSEND; + struct MELT_STRING_STRUCT (14) dstr_415__CLASS_OBJMSEND; + struct MELT_ROUTINE_STRUCT (0) drout_416__LAMBDA_; + struct MELT_ROUTINE_STRUCT (24) drout_417__OUTPUCOD_OBJMULTIAPPLY; + struct MELT_CLOSURE_STRUCT (0) dclo_418__OUTPUCOD_OBJMULTIAPPLY; + struct MELT_OBJECT_STRUCT (3) dsym_419__CLASS_OBJMULTIAPPLY; + struct MELT_STRING_STRUCT (19) dstr_420__CLASS_OBJMULTIAPPLY; struct MELT_ROUTINE_STRUCT (1) drout_421__LAMBDA_; - struct MELT_ROUTINE_STRUCT (0) drout_422__LAMBDA_; - struct MELT_ROUTINE_STRUCT (0) drout_423__LAMBDA_; - struct MELT_ROUTINE_STRUCT (24) drout_424__OUTPUCOD_OBJMULTIMSEND; - struct MELT_CLOSURE_STRUCT (0) dclo_425__OUTPUCOD_OBJMULTIMSEND; - struct MELT_OBJECT_STRUCT (3) dsym_426__CLASS_OBJMULTIMSEND; - struct MELT_STRING_STRUCT (19) dstr_427__CLASS_OBJMULTIMSEND; - struct MELT_ROUTINE_STRUCT (1) drout_428__LAMBDA_; - struct MELT_ROUTINE_STRUCT (5) drout_429__LAMBDA_; + struct MELT_ROUTINE_STRUCT (5) drout_422__LAMBDA_; + struct MELT_ROUTINE_STRUCT (1) drout_423__LAMBDA_; + struct MELT_ROUTINE_STRUCT (0) drout_424__LAMBDA_; + struct MELT_ROUTINE_STRUCT (0) drout_425__LAMBDA_; + struct MELT_ROUTINE_STRUCT (24) drout_426__OUTPUCOD_OBJMULTIMSEND; + struct MELT_CLOSURE_STRUCT (0) dclo_427__OUTPUCOD_OBJMULTIMSEND; + struct MELT_OBJECT_STRUCT (3) dsym_428__CLASS_OBJMULTIMSEND; + struct MELT_STRING_STRUCT (19) dstr_429__CLASS_OBJMULTIMSEND; struct MELT_ROUTINE_STRUCT (1) drout_430__LAMBDA_; - struct MELT_ROUTINE_STRUCT (0) drout_431__LAMBDA_; - struct MELT_ROUTINE_STRUCT (0) drout_432__LAMBDA_; - struct MELT_ROUTINE_STRUCT (5) drout_433__OUTPUCOD_OBJCLEAR; - struct MELT_CLOSURE_STRUCT (0) dclo_434__OUTPUCOD_OBJCLEAR; - struct MELT_OBJECT_STRUCT (3) dsym_435__CLASS_OBJCLEAR; - struct MELT_STRING_STRUCT (14) dstr_436__CLASS_OBJCLEAR; - struct MELT_ROUTINE_STRUCT (7) drout_437__OUTPUCOD_OBJRAWALLOCOBJ; - struct MELT_CLOSURE_STRUCT (0) dclo_438__OUTPUCOD_OBJRAWALLOCOBJ; - struct MELT_OBJECT_STRUCT (3) dsym_439__CLASS_OBJRAWALLOCOBJ; - struct MELT_STRING_STRUCT (20) dstr_440__CLASS_OBJRAWALLOCOBJ; - struct MELT_ROUTINE_STRUCT (11) drout_441__OUTPUCOD_OBJNEWCLOSURE; - struct MELT_CLOSURE_STRUCT (0) dclo_442__OUTPUCOD_OBJNEWCLOSURE; - struct MELT_OBJECT_STRUCT (3) dsym_443__CLASS_OBJNEWCLOSURE; - struct MELT_STRING_STRUCT (19) dstr_444__CLASS_OBJNEWCLOSURE; - struct MELT_ROUTINE_STRUCT (3) drout_445__LAMBDA_; - struct MELT_ROUTINE_STRUCT (3) drout_446__OUTPUCOD_OBJTOUCH; - struct MELT_CLOSURE_STRUCT (0) dclo_447__OUTPUCOD_OBJTOUCH; - struct MELT_OBJECT_STRUCT (3) dsym_448__CLASS_OBJTOUCH; - struct MELT_STRING_STRUCT (14) dstr_449__CLASS_OBJTOUCH; - struct MELT_ROUTINE_STRUCT (3) drout_450__OUTPUCOD_DBGTRACEWRITEOBJ; - struct MELT_CLOSURE_STRUCT (0) dclo_451__OUTPUCOD_DBGTRACEWRITEOBJ; - struct MELT_OBJECT_STRUCT (3) dsym_452__CLASS_OBJDBGTRACEWRITEOBJ; - struct MELT_STRING_STRUCT (25) dstr_453__CLASS_OBJDBGTRACEWRITEOB; - struct MELT_ROUTINE_STRUCT (6) drout_454__OUTPUCOD_OBJPUTUPLE; - struct MELT_CLOSURE_STRUCT (0) dclo_455__OUTPUCOD_OBJPUTUPLE; - struct MELT_OBJECT_STRUCT (3) dsym_456__CLASS_OBJPUTUPLE; - struct MELT_STRING_STRUCT (16) dstr_457__CLASS_OBJPUTUPLE; - struct MELT_OBJECT_STRUCT (3) dsym_458__OBJPUTPAIRHEAD_COUNTER; - struct MELT_STRING_STRUCT (22) dstr_459__OBJPUTPAIRHEAD_COUNTER; - struct MELT_OBJECT_STRUCT (1) dobj_460__OBJPUTPAIRHEAD_COUNTER; - struct meltint_st dint_461__; - struct MELT_ROUTINE_STRUCT (7) drout_462__OUTPUCOD_OBJPUTPAIRHEAD; - struct MELT_CLOSURE_STRUCT (0) dclo_463__OUTPUCOD_OBJPUTPAIRHEAD; - struct MELT_OBJECT_STRUCT (3) dsym_464__CLASS_OBJPUTPAIR; - struct MELT_STRING_STRUCT (16) dstr_465__CLASS_OBJPUTPAIR; - struct MELT_OBJECT_STRUCT (3) dsym_466__CLASS_OBJPUTPAIRHEAD; - struct MELT_STRING_STRUCT (20) dstr_467__CLASS_OBJPUTPAIRHEAD; - struct MELT_ROUTINE_STRUCT (6) drout_468__OUTPUCOD_OBJPUTPAIRTAIL; - struct MELT_CLOSURE_STRUCT (0) dclo_469__OUTPUCOD_OBJPUTPAIRTAIL; - struct MELT_OBJECT_STRUCT (3) dsym_470__CLASS_OBJPUTPAIRTAIL; - struct MELT_STRING_STRUCT (20) dstr_471__CLASS_OBJPUTPAIRTAIL; - struct MELT_ROUTINE_STRUCT (5) drout_472__OUTPUCOD_OBJPUTLIST; - struct MELT_CLOSURE_STRUCT (0) dclo_473__OUTPUCOD_OBJPUTLIST; - struct MELT_OBJECT_STRUCT (3) dsym_474__CLASS_OBJPUTLIST; - struct MELT_STRING_STRUCT (16) dstr_475__CLASS_OBJPUTLIST; - struct MELT_ROUTINE_STRUCT (12) drout_476__OUTPUCOD_OBJGETSLOT; - struct MELT_CLOSURE_STRUCT (0) dclo_477__OUTPUCOD_OBJGETSLOT; - struct MELT_OBJECT_STRUCT (3) dsym_478__CLASS_OBJGETSLOT; - struct MELT_STRING_STRUCT (16) dstr_479__CLASS_OBJGETSLOT; - struct MELT_OBJECT_STRUCT (3) dsym_480__CLASS_FIELD; - struct MELT_STRING_STRUCT (11) dstr_481__CLASS_FIELD; - struct MELT_ROUTINE_STRUCT (3) drout_482__LAMBDA_; - struct MELT_ROUTINE_STRUCT (13) drout_483__OUTPUCOD_OBJPUTSLOT; - struct MELT_CLOSURE_STRUCT (0) dclo_484__OUTPUCOD_OBJPUTSLOT; - struct MELT_OBJECT_STRUCT (3) dsym_485__CLASS_OBJPUTSLOT; - struct MELT_STRING_STRUCT (16) dstr_486__CLASS_OBJPUTSLOT; - struct MELT_ROUTINE_STRUCT (5) drout_487__OUTPUCOD_OBJPUTCLOSUROUT; - struct MELT_CLOSURE_STRUCT (0) dclo_488__OUTPUCOD_OBJPUTCLOSUROUT; - struct MELT_OBJECT_STRUCT (3) dsym_489__CLASS_OBJPUTCLOSUROUT; - struct MELT_STRING_STRUCT (21) dstr_490__CLASS_OBJPUTCLOSUROUT; - struct MELT_ROUTINE_STRUCT (5) drout_491__OUTPUCOD_OBJPUTCLOSEDV; - struct MELT_CLOSURE_STRUCT (0) dclo_492__OUTPUCOD_OBJPUTCLOSEDV; - struct MELT_OBJECT_STRUCT (3) dsym_493__CLASS_OBJPUTCLOSEDV; - struct MELT_STRING_STRUCT (19) dstr_494__CLASS_OBJPUTCLOSEDV; - struct MELT_ROUTINE_STRUCT (5) drout_495__OUTPUCOD_OBJPUTCLOSEDNOTNULLV; - struct MELT_CLOSURE_STRUCT (0) dclo_496__OUTPUCOD_OBJPUTCLOSEDNOTNULLV; - struct MELT_OBJECT_STRUCT (3) dsym_497__CLASS_OBJPUTCLOSEDNOTNULLV; - struct MELT_STRING_STRUCT (26) dstr_498__CLASS_OBJPUTCLOSEDNOTNUL; - struct MELT_ROUTINE_STRUCT (6) drout_499__OUTPUCOD_OBJPUTROUTCONST; - struct MELT_CLOSURE_STRUCT (0) dclo_500__OUTPUCOD_OBJPUTROUTCONST; - struct MELT_OBJECT_STRUCT (3) dsym_501__CLASS_OBJPUTROUTCONST; - struct MELT_STRING_STRUCT (21) dstr_502__CLASS_OBJPUTROUTCONST; - struct MELT_ROUTINE_STRUCT (5) drout_503__OUTPUCOD_OBJPUTROUTCONSTNOTNULL; - struct MELT_CLOSURE_STRUCT (0) dclo_504__OUTPUCOD_OBJPUTROUTCONSTNOTNULL; - struct MELT_OBJECT_STRUCT (3) dsym_505__CLASS_OBJPUTROUTCONSTNOTNULL; - struct MELT_STRING_STRUCT (28) dstr_506__CLASS_OBJPUTROUTCONSTNOT; - struct MELT_ROUTINE_STRUCT (8) drout_507__OUTPUCOD_OBJPUTHOOKCONST; - struct MELT_CLOSURE_STRUCT (0) dclo_508__OUTPUCOD_OBJPUTHOOKCONST; - struct MELT_OBJECT_STRUCT (3) dsym_509__CLASS_OBJPUTHOOKCONST; - struct MELT_STRING_STRUCT (21) dstr_510__CLASS_OBJPUTHOOKCONST; - struct MELT_OBJECT_STRUCT (3) dsym_511__CLASS_NREP_BOUND_DATA; - struct MELT_STRING_STRUCT (21) dstr_512__CLASS_NREP_BOUND_DATA; - struct MELT_ROUTINE_STRUCT (9) drout_513__OUTPUCOD_OBJPUTHOOKDATA; - struct MELT_CLOSURE_STRUCT (0) dclo_514__OUTPUCOD_OBJPUTHOOKDATA; - struct MELT_OBJECT_STRUCT (3) dsym_515__CLASS_OBJPUTHOOKDATA; - struct MELT_STRING_STRUCT (20) dstr_516__CLASS_OBJPUTHOOKDATA; - struct MELT_ROUTINE_STRUCT (10) drout_517__OUTPUCOD_OBJPUTXTRARESULT; - struct MELT_CLOSURE_STRUCT (0) dclo_518__OUTPUCOD_OBJPUTXTRARESULT; - struct MELT_OBJECT_STRUCT (3) dsym_519__CLASS_OBJPUTXTRARESULT; - struct MELT_STRING_STRUCT (22) dstr_520__CLASS_OBJPUTXTRARESULT; - struct MELT_ROUTINE_STRUCT (5) drout_521__OUTPUCOD_OBJEXPV; - struct MELT_CLOSURE_STRUCT (0) dclo_522__OUTPUCOD_OBJEXPV; - struct MELT_OBJECT_STRUCT (3) dsym_523__CLASS_OBJEXPV; - struct MELT_STRING_STRUCT (13) dstr_524__CLASS_OBJEXPV; - struct MELT_ROUTINE_STRUCT (8) drout_525__OUTPUCOD_OBJLOCATEDEXPV; - struct MELT_CLOSURE_STRUCT (0) dclo_526__OUTPUCOD_OBJLOCATEDEXPV; - struct MELT_OBJECT_STRUCT (3) dsym_527__CLASS_OBJLOCATEDEXPV; - struct MELT_STRING_STRUCT (20) dstr_528__CLASS_OBJLOCATEDEXPV; - struct MELT_ROUTINE_STRUCT (3) drout_529__OUTPUCOD_VERBATIMSTRING; - struct MELT_CLOSURE_STRUCT (0) dclo_530__OUTPUCOD_VERBATIMSTRING; - struct MELT_ROUTINE_STRUCT (3) drout_531__OUTPUCOD_STRING; - struct MELT_CLOSURE_STRUCT (0) dclo_532__OUTPUCOD_STRING; - struct MELT_ROUTINE_STRUCT (0) drout_533__OUTPUCOD_INTEGER; - struct MELT_CLOSURE_STRUCT (0) dclo_534__OUTPUCOD_INTEGER; - struct MELT_ROUTINE_STRUCT (4) drout_535__OUTPUCOD_FINALRETURN; - struct MELT_CLOSURE_STRUCT (0) dclo_536__OUTPUCOD_FINALRETURN; - struct MELT_OBJECT_STRUCT (3) dsym_537__CLASS_OBJFINALRETURN; - struct MELT_STRING_STRUCT (20) dstr_538__CLASS_OBJFINALRETURN; - struct MELT_ROUTINE_STRUCT (5) drout_539__SORTED_NAMED_DICT_TUPLE; - struct MELT_CLOSURE_STRUCT (0) dclo_540__SORTED_NAMED_DICT_TUPLE; - struct MELT_OBJECT_STRUCT (3) dsym_541__COMPARE_NAMED_ALPHA; - struct MELT_STRING_STRUCT (19) dstr_542__COMPARE_NAMED_ALPHA; - struct MELT_ROUTINE_STRUCT (7) drout_543__OUTPUT_EXPORTED_OFFSETS; - struct MELT_CLOSURE_STRUCT (0) dclo_544__OUTPUT_EXPORTED_OFFSETS; - struct MELT_OBJECT_STRUCT (3) dsym_545__CLASS_ANY_MODULE_CONTEXT; - struct MELT_STRING_STRUCT (24) dstr_546__CLASS_ANY_MODULE_CONTEXT; - struct MELT_OBJECT_STRUCT (3) dsym_547__CLASS_SECONDARY_C_FILE; - struct MELT_STRING_STRUCT (22) dstr_548__CLASS_SECONDARY_C_FILE; - struct MELT_OBJECT_STRUCT (8) dobj_549__CLASS_SECONDARY_C_FILE; + struct MELT_ROUTINE_STRUCT (5) drout_431__LAMBDA_; + struct MELT_ROUTINE_STRUCT (1) drout_432__LAMBDA_; + struct MELT_ROUTINE_STRUCT (0) drout_433__LAMBDA_; + struct MELT_ROUTINE_STRUCT (0) drout_434__LAMBDA_; + struct MELT_ROUTINE_STRUCT (5) drout_435__OUTPUCOD_OBJCLEAR; + struct MELT_CLOSURE_STRUCT (0) dclo_436__OUTPUCOD_OBJCLEAR; + struct MELT_OBJECT_STRUCT (3) dsym_437__CLASS_OBJCLEAR; + struct MELT_STRING_STRUCT (14) dstr_438__CLASS_OBJCLEAR; + struct MELT_ROUTINE_STRUCT (7) drout_439__OUTPUCOD_OBJRAWALLOCOBJ; + struct MELT_CLOSURE_STRUCT (0) dclo_440__OUTPUCOD_OBJRAWALLOCOBJ; + struct MELT_OBJECT_STRUCT (3) dsym_441__CLASS_OBJRAWALLOCOBJ; + struct MELT_STRING_STRUCT (20) dstr_442__CLASS_OBJRAWALLOCOBJ; + struct MELT_ROUTINE_STRUCT (11) drout_443__OUTPUCOD_OBJNEWCLOSURE; + struct MELT_CLOSURE_STRUCT (0) dclo_444__OUTPUCOD_OBJNEWCLOSURE; + struct MELT_OBJECT_STRUCT (3) dsym_445__CLASS_OBJNEWCLOSURE; + struct MELT_STRING_STRUCT (19) dstr_446__CLASS_OBJNEWCLOSURE; + struct MELT_ROUTINE_STRUCT (3) drout_447__LAMBDA_; + struct MELT_ROUTINE_STRUCT (3) drout_448__OUTPUCOD_OBJTOUCH; + struct MELT_CLOSURE_STRUCT (0) dclo_449__OUTPUCOD_OBJTOUCH; + struct MELT_OBJECT_STRUCT (3) dsym_450__CLASS_OBJTOUCH; + struct MELT_STRING_STRUCT (14) dstr_451__CLASS_OBJTOUCH; + struct MELT_ROUTINE_STRUCT (3) drout_452__OUTPUCOD_DBGTRACEWRITEOBJ; + struct MELT_CLOSURE_STRUCT (0) dclo_453__OUTPUCOD_DBGTRACEWRITEOBJ; + struct MELT_OBJECT_STRUCT (3) dsym_454__CLASS_OBJDBGTRACEWRITEOBJ; + struct MELT_STRING_STRUCT (25) dstr_455__CLASS_OBJDBGTRACEWRITEOB; + struct MELT_ROUTINE_STRUCT (6) drout_456__OUTPUCOD_OBJPUTUPLE; + struct MELT_CLOSURE_STRUCT (0) dclo_457__OUTPUCOD_OBJPUTUPLE; + struct MELT_OBJECT_STRUCT (3) dsym_458__CLASS_OBJPUTUPLE; + struct MELT_STRING_STRUCT (16) dstr_459__CLASS_OBJPUTUPLE; + struct MELT_OBJECT_STRUCT (3) dsym_460__OBJPUTPAIRHEAD_COUNTER; + struct MELT_STRING_STRUCT (22) dstr_461__OBJPUTPAIRHEAD_COUNTER; + struct MELT_OBJECT_STRUCT (1) dobj_462__OBJPUTPAIRHEAD_COUNTER; + struct meltint_st dint_463__; + struct MELT_ROUTINE_STRUCT (7) drout_464__OUTPUCOD_OBJPUTPAIRHEAD; + struct MELT_CLOSURE_STRUCT (0) dclo_465__OUTPUCOD_OBJPUTPAIRHEAD; + struct MELT_OBJECT_STRUCT (3) dsym_466__CLASS_OBJPUTPAIR; + struct MELT_STRING_STRUCT (16) dstr_467__CLASS_OBJPUTPAIR; + struct MELT_OBJECT_STRUCT (3) dsym_468__CLASS_OBJPUTPAIRHEAD; + struct MELT_STRING_STRUCT (20) dstr_469__CLASS_OBJPUTPAIRHEAD; + struct MELT_ROUTINE_STRUCT (6) drout_470__OUTPUCOD_OBJPUTPAIRTAIL; + struct MELT_CLOSURE_STRUCT (0) dclo_471__OUTPUCOD_OBJPUTPAIRTAIL; + struct MELT_OBJECT_STRUCT (3) dsym_472__CLASS_OBJPUTPAIRTAIL; + struct MELT_STRING_STRUCT (20) dstr_473__CLASS_OBJPUTPAIRTAIL; + struct MELT_ROUTINE_STRUCT (5) drout_474__OUTPUCOD_OBJPUTLIST; + struct MELT_CLOSURE_STRUCT (0) dclo_475__OUTPUCOD_OBJPUTLIST; + struct MELT_OBJECT_STRUCT (3) dsym_476__CLASS_OBJPUTLIST; + struct MELT_STRING_STRUCT (16) dstr_477__CLASS_OBJPUTLIST; + struct MELT_ROUTINE_STRUCT (12) drout_478__OUTPUCOD_OBJGETSLOT; + struct MELT_CLOSURE_STRUCT (0) dclo_479__OUTPUCOD_OBJGETSLOT; + struct MELT_OBJECT_STRUCT (3) dsym_480__CLASS_OBJGETSLOT; + struct MELT_STRING_STRUCT (16) dstr_481__CLASS_OBJGETSLOT; + struct MELT_OBJECT_STRUCT (3) dsym_482__CLASS_FIELD; + struct MELT_STRING_STRUCT (11) dstr_483__CLASS_FIELD; + struct MELT_ROUTINE_STRUCT (3) drout_484__LAMBDA_; + struct MELT_ROUTINE_STRUCT (13) drout_485__OUTPUCOD_OBJPUTSLOT; + struct MELT_CLOSURE_STRUCT (0) dclo_486__OUTPUCOD_OBJPUTSLOT; + struct MELT_OBJECT_STRUCT (3) dsym_487__CLASS_OBJPUTSLOT; + struct MELT_STRING_STRUCT (16) dstr_488__CLASS_OBJPUTSLOT; + struct MELT_ROUTINE_STRUCT (5) drout_489__OUTPUCOD_OBJPUTCLOSUROUT; + struct MELT_CLOSURE_STRUCT (0) dclo_490__OUTPUCOD_OBJPUTCLOSUROUT; + struct MELT_OBJECT_STRUCT (3) dsym_491__CLASS_OBJPUTCLOSUROUT; + struct MELT_STRING_STRUCT (21) dstr_492__CLASS_OBJPUTCLOSUROUT; + struct MELT_ROUTINE_STRUCT (5) drout_493__OUTPUCOD_OBJPUTCLOSEDV; + struct MELT_CLOSURE_STRUCT (0) dclo_494__OUTPUCOD_OBJPUTCLOSEDV; + struct MELT_OBJECT_STRUCT (3) dsym_495__CLASS_OBJPUTCLOSEDV; + struct MELT_STRING_STRUCT (19) dstr_496__CLASS_OBJPUTCLOSEDV; + struct MELT_ROUTINE_STRUCT (5) drout_497__OUTPUCOD_OBJPUTCLOSEDNOTNULLV; + struct MELT_CLOSURE_STRUCT (0) dclo_498__OUTPUCOD_OBJPUTCLOSEDNOTNULLV; + struct MELT_OBJECT_STRUCT (3) dsym_499__CLASS_OBJPUTCLOSEDNOTNULLV; + struct MELT_STRING_STRUCT (26) dstr_500__CLASS_OBJPUTCLOSEDNOTNUL; + struct MELT_ROUTINE_STRUCT (6) drout_501__OUTPUCOD_OBJPUTROUTCONST; + struct MELT_CLOSURE_STRUCT (0) dclo_502__OUTPUCOD_OBJPUTROUTCONST; + struct MELT_OBJECT_STRUCT (3) dsym_503__CLASS_OBJPUTROUTCONST; + struct MELT_STRING_STRUCT (21) dstr_504__CLASS_OBJPUTROUTCONST; + struct MELT_ROUTINE_STRUCT (5) drout_505__OUTPUCOD_OBJPUTROUTCONSTNOTNULL; + struct MELT_CLOSURE_STRUCT (0) dclo_506__OUTPUCOD_OBJPUTROUTCONSTNOTNULL; + struct MELT_OBJECT_STRUCT (3) dsym_507__CLASS_OBJPUTROUTCONSTNOTNULL; + struct MELT_STRING_STRUCT (28) dstr_508__CLASS_OBJPUTROUTCONSTNOT; + struct MELT_ROUTINE_STRUCT (8) drout_509__OUTPUCOD_OBJPUTHOOKCONST; + struct MELT_CLOSURE_STRUCT (0) dclo_510__OUTPUCOD_OBJPUTHOOKCONST; + struct MELT_OBJECT_STRUCT (3) dsym_511__CLASS_OBJPUTHOOKCONST; + struct MELT_STRING_STRUCT (21) dstr_512__CLASS_OBJPUTHOOKCONST; + struct MELT_OBJECT_STRUCT (3) dsym_513__CLASS_NREP_BOUND_DATA; + struct MELT_STRING_STRUCT (21) dstr_514__CLASS_NREP_BOUND_DATA; + struct MELT_ROUTINE_STRUCT (9) drout_515__OUTPUCOD_OBJPUTHOOKDATA; + struct MELT_CLOSURE_STRUCT (0) dclo_516__OUTPUCOD_OBJPUTHOOKDATA; + struct MELT_OBJECT_STRUCT (3) dsym_517__CLASS_OBJPUTHOOKDATA; + struct MELT_STRING_STRUCT (20) dstr_518__CLASS_OBJPUTHOOKDATA; + struct MELT_ROUTINE_STRUCT (10) drout_519__OUTPUCOD_OBJPUTXTRARESULT; + struct MELT_CLOSURE_STRUCT (0) dclo_520__OUTPUCOD_OBJPUTXTRARESULT; + struct MELT_OBJECT_STRUCT (3) dsym_521__CLASS_OBJPUTXTRARESULT; + struct MELT_STRING_STRUCT (22) dstr_522__CLASS_OBJPUTXTRARESULT; + struct MELT_ROUTINE_STRUCT (5) drout_523__OUTPUCOD_OBJEXPV; + struct MELT_CLOSURE_STRUCT (0) dclo_524__OUTPUCOD_OBJEXPV; + struct MELT_OBJECT_STRUCT (3) dsym_525__CLASS_OBJEXPV; + struct MELT_STRING_STRUCT (13) dstr_526__CLASS_OBJEXPV; + struct MELT_ROUTINE_STRUCT (8) drout_527__OUTPUCOD_OBJLOCATEDEXPV; + struct MELT_CLOSURE_STRUCT (0) dclo_528__OUTPUCOD_OBJLOCATEDEXPV; + struct MELT_OBJECT_STRUCT (3) dsym_529__CLASS_OBJLOCATEDEXPV; + struct MELT_STRING_STRUCT (20) dstr_530__CLASS_OBJLOCATEDEXPV; + struct MELT_ROUTINE_STRUCT (3) drout_531__OUTPUCOD_VERBATIMSTRING; + struct MELT_CLOSURE_STRUCT (0) dclo_532__OUTPUCOD_VERBATIMSTRING; + struct MELT_ROUTINE_STRUCT (3) drout_533__OUTPUCOD_STRING; + struct MELT_CLOSURE_STRUCT (0) dclo_534__OUTPUCOD_STRING; + struct MELT_ROUTINE_STRUCT (0) drout_535__OUTPUCOD_INTEGER; + struct MELT_CLOSURE_STRUCT (0) dclo_536__OUTPUCOD_INTEGER; + struct MELT_ROUTINE_STRUCT (4) drout_537__OUTPUCOD_FINALRETURN; + struct MELT_CLOSURE_STRUCT (0) dclo_538__OUTPUCOD_FINALRETURN; + struct MELT_OBJECT_STRUCT (3) dsym_539__CLASS_OBJFINALRETURN; + struct MELT_STRING_STRUCT (20) dstr_540__CLASS_OBJFINALRETURN; + struct MELT_ROUTINE_STRUCT (5) drout_541__SORTED_NAMED_DICT_TUPLE; + struct MELT_CLOSURE_STRUCT (0) dclo_542__SORTED_NAMED_DICT_TUPLE; + struct MELT_OBJECT_STRUCT (3) dsym_543__COMPARE_NAMED_ALPHA; + struct MELT_STRING_STRUCT (19) dstr_544__COMPARE_NAMED_ALPHA; + struct MELT_ROUTINE_STRUCT (7) drout_545__OUTPUT_EXPORTED_OFFSETS; + struct MELT_CLOSURE_STRUCT (0) dclo_546__OUTPUT_EXPORTED_OFFSETS; + struct MELT_OBJECT_STRUCT (3) dsym_547__CLASS_ANY_MODULE_CONTEXT; + struct MELT_STRING_STRUCT (24) dstr_548__CLASS_ANY_MODULE_CONTEXT; + struct MELT_OBJECT_STRUCT (3) dsym_549__CLASS_SECONDARY_C_FILE; struct MELT_STRING_STRUCT (22) dstr_550__CLASS_SECONDARY_C_FILE; - struct MELT_MULTIPLE_STRUCT (1) dtup_551_syCLASS_SECONDARY_C_FILE; - struct MELT_MULTIPLE_STRUCT (4) dtup_552_syCLASS_SECONDARY_C_FILE; - struct MELT_OBJECT_STRUCT (3) dsym_553__SECFIL_MODNAM; - struct MELT_STRING_STRUCT (13) dstr_554__SECFIL_MODNAM; - struct MELT_OBJECT_STRUCT (4) dobj_555__SECFIL_MODNAM; + struct MELT_OBJECT_STRUCT (8) dobj_551__CLASS_SECONDARY_C_FILE; + struct MELT_STRING_STRUCT (22) dstr_552__CLASS_SECONDARY_C_FILE; + struct MELT_MULTIPLE_STRUCT (1) dtup_553_syCLASS_SECONDARY_C_FILE; + struct MELT_MULTIPLE_STRUCT (4) dtup_554_syCLASS_SECONDARY_C_FILE; + struct MELT_OBJECT_STRUCT (3) dsym_555__SECFIL_MODNAM; struct MELT_STRING_STRUCT (13) dstr_556__SECFIL_MODNAM; - struct MELT_OBJECT_STRUCT (3) dsym_557__SECFIL_PATH; - struct MELT_STRING_STRUCT (11) dstr_558__SECFIL_PATH; - struct MELT_OBJECT_STRUCT (4) dobj_559__SECFIL_PATH; + struct MELT_OBJECT_STRUCT (4) dobj_557__SECFIL_MODNAM; + struct MELT_STRING_STRUCT (13) dstr_558__SECFIL_MODNAM; + struct MELT_OBJECT_STRUCT (3) dsym_559__SECFIL_PATH; struct MELT_STRING_STRUCT (11) dstr_560__SECFIL_PATH; - struct MELT_OBJECT_STRUCT (3) dsym_561__SECFIL_DECLBUF; - struct MELT_STRING_STRUCT (14) dstr_562__SECFIL_DECLBUF; - struct MELT_OBJECT_STRUCT (4) dobj_563__SECFIL_DECLBUF; + struct MELT_OBJECT_STRUCT (4) dobj_561__SECFIL_PATH; + struct MELT_STRING_STRUCT (11) dstr_562__SECFIL_PATH; + struct MELT_OBJECT_STRUCT (3) dsym_563__SECFIL_DECLBUF; struct MELT_STRING_STRUCT (14) dstr_564__SECFIL_DECLBUF; - struct MELT_OBJECT_STRUCT (3) dsym_565__SECFIL_IMPLBUF; - struct MELT_STRING_STRUCT (14) dstr_566__SECFIL_IMPLBUF; - struct MELT_OBJECT_STRUCT (4) dobj_567__SECFIL_IMPLBUF; + struct MELT_OBJECT_STRUCT (4) dobj_565__SECFIL_DECLBUF; + struct MELT_STRING_STRUCT (14) dstr_566__SECFIL_DECLBUF; + struct MELT_OBJECT_STRUCT (3) dsym_567__SECFIL_IMPLBUF; struct MELT_STRING_STRUCT (14) dstr_568__SECFIL_IMPLBUF; - struct MELT_OBJECT_STRUCT (3) dsym_569__GENERATED_C_FILENAME; - struct MELT_STRING_STRUCT (20) dstr_570__GENERATED_C_FILENAME; - struct MELT_OBJECT_STRUCT (5) dobj_571__GENERATED_C_FILENAME; - struct MELT_MULTIPLE_STRUCT (9) dtup_572_syGENERATED_C_FILENAME; - struct MELT_MULTIPLE_STRUCT (4) dtup_573_syGENERATED_C_FILENAME; - struct MELT_OBJECT_STRUCT (3) dsym_574__DISCR; - struct MELT_STRING_STRUCT (5) dstr_575__DISCR; - struct MELT_OBJECT_STRUCT (2) dobj_576; - struct MELT_OBJECT_STRUCT (3) dsym_577__BASE; - struct MELT_STRING_STRUCT (4) dstr_578__BASE; - struct MELT_OBJECT_STRUCT (2) dobj_579; - struct MELT_OBJECT_STRUCT (3) dsym_580__DIR; - struct MELT_STRING_STRUCT (3) dstr_581__DIR; - struct MELT_OBJECT_STRUCT (2) dobj_582; - struct MELT_OBJECT_STRUCT (3) dsym_583__NUM; - struct MELT_STRING_STRUCT (3) dstr_584__NUM; - struct MELT_OBJECT_STRUCT (2) dobj_585; - struct MELT_STRING_STRUCT (93) dstr_586__meltgc_new_string_genera; - struct MELT_STRING_STRUCT (39) dstr_587__melt_string_str; - struct MELT_STRING_STRUCT (34) dstr_588__melt_string_str_mel; - struct MELT_STRING_STRUCT (12) dstr_589__; - struct MELT_STRING_STRUCT (2) dstr_590__; - struct MELT_STRING_STRUCT (20) dstr_591__GENERATED_C_FILENAME; - struct MELT_ROUTINE_STRUCT (4) drout_592__NTH_SECUNDARY_FILE; - struct MELT_CLOSURE_STRUCT (0) dclo_593__NTH_SECUNDARY_FILE; - struct MELT_ROUTINE_STRUCT (17) drout_594__OUTPUT_MELT_DESCRIPTOR; - struct MELT_CLOSURE_STRUCT (0) dclo_595__OUTPUT_MELT_DESCRIPTOR; + struct MELT_OBJECT_STRUCT (4) dobj_569__SECFIL_IMPLBUF; + struct MELT_STRING_STRUCT (14) dstr_570__SECFIL_IMPLBUF; + struct MELT_OBJECT_STRUCT (3) dsym_571__GENERATED_C_FILENAME; + struct MELT_STRING_STRUCT (20) dstr_572__GENERATED_C_FILENAME; + struct MELT_OBJECT_STRUCT (5) dobj_573__GENERATED_C_FILENAME; + struct MELT_MULTIPLE_STRUCT (9) dtup_574_syGENERATED_C_FILENAME; + struct MELT_MULTIPLE_STRUCT (4) dtup_575_syGENERATED_C_FILENAME; + struct MELT_OBJECT_STRUCT (3) dsym_576__DISCR; + struct MELT_STRING_STRUCT (5) dstr_577__DISCR; + struct MELT_OBJECT_STRUCT (2) dobj_578; + struct MELT_OBJECT_STRUCT (3) dsym_579__BASE; + struct MELT_STRING_STRUCT (4) dstr_580__BASE; + struct MELT_OBJECT_STRUCT (2) dobj_581; + struct MELT_OBJECT_STRUCT (3) dsym_582__DIR; + struct MELT_STRING_STRUCT (3) dstr_583__DIR; + struct MELT_OBJECT_STRUCT (2) dobj_584; + struct MELT_OBJECT_STRUCT (3) dsym_585__NUM; + struct MELT_STRING_STRUCT (3) dstr_586__NUM; + struct MELT_OBJECT_STRUCT (2) dobj_587; + struct MELT_STRING_STRUCT (93) dstr_588__meltgc_new_string_genera; + struct MELT_STRING_STRUCT (39) dstr_589__melt_string_str; + struct MELT_STRING_STRUCT (34) dstr_590__melt_string_str_mel; + struct MELT_STRING_STRUCT (12) dstr_591__; + struct MELT_STRING_STRUCT (2) dstr_592__; + struct MELT_STRING_STRUCT (20) dstr_593__GENERATED_C_FILENAME; + struct MELT_ROUTINE_STRUCT (4) drout_594__NTH_SECUNDARY_FILE; + struct MELT_CLOSURE_STRUCT (0) dclo_595__NTH_SECUNDARY_FILE; + struct MELT_ROUTINE_STRUCT (17) drout_596__OUTPUT_MELT_DESCRIPTOR; + struct MELT_CLOSURE_STRUCT (0) dclo_597__OUTPUT_MELT_DESCRIPTOR; struct MELT_OBJECT_STRUCT (3) - dsym_596__CLASS_RUNNING_EXTENSION_MODULE_CONTEXT; - struct MELT_STRING_STRUCT (38) dstr_597__CLASS_RUNNING_EXTENSION_; - struct MELT_STRING_STRUCT (9) dstr_598__runextend; - struct MELT_STRING_STRUCT (9) dstr_599__optimized; - struct MELT_STRING_STRUCT (12) dstr_600__quicklybuilt; + dsym_598__CLASS_RUNNING_EXTENSION_MODULE_CONTEXT; + struct MELT_STRING_STRUCT (38) dstr_599__CLASS_RUNNING_EXTENSION_; + struct MELT_STRING_STRUCT (9) dstr_600__runextend; struct MELT_STRING_STRUCT (9) dstr_601__optimized; - struct MELT_STRING_STRUCT (7) dstr_602__dynamic; - struct MELT_STRING_STRUCT (11) dstr_603__debugnoline; - struct MELT_OBJECT_STRUCT (3) dsym_604__SYNTAX_TEST_GENERATOR; - struct MELT_STRING_STRUCT (21) dstr_605__SYNTAX_TEST_GENERATOR; - struct MELT_OBJECT_STRUCT (3) dsym_606__CLASS_SELECTOR; - struct MELT_STRING_STRUCT (14) dstr_607__CLASS_SELECTOR; - struct MELT_OBJECT_STRUCT (3) dsym_608__RECV; - struct MELT_STRING_STRUCT (4) dstr_609__RECV; - struct MELT_OBJECT_STRUCT (2) dobj_610; - struct MELT_OBJECT_STRUCT (3) dsym_611__GENDEV; - struct MELT_STRING_STRUCT (6) dstr_612__GENDEV; - struct MELT_OBJECT_STRUCT (2) dobj_613; - struct MELT_OBJECT_STRUCT (3) dsym_614__SBUF; - struct MELT_STRING_STRUCT (4) dstr_615__SBUF; - struct MELT_OBJECT_STRUCT (2) dobj_616; - struct MELT_OBJECT_STRUCT (3) dsym_617__MODCTX; - struct MELT_STRING_STRUCT (6) dstr_618__MODCTX; - struct MELT_OBJECT_STRUCT (2) dobj_619; - struct MELT_OBJECT_STRUCT (3) dsym_620__IX; - struct MELT_STRING_STRUCT (2) dstr_621__IX; - struct MELT_OBJECT_STRUCT (2) dobj_622; - struct MELT_MULTIPLE_STRUCT (5) dtup_623_sySYNTAX_TEST_GENERATOR; - struct MELT_OBJECT_STRUCT (4) dobj_624__SYNTAX_TEST_GENERATOR; - struct MELT_STRING_STRUCT (21) dstr_625__SYNTAX_TEST_GENERATOR; - struct MELT_ROUTINE_STRUCT (5) drout_626__SYNTESTGEN_ANY; - struct MELT_CLOSURE_STRUCT (0) dclo_627__SYNTESTGEN_ANY; - struct MELT_OBJECT_STRUCT (3) dsym_628__CLASS_LOCATED; - struct MELT_STRING_STRUCT (13) dstr_629__CLASS_LOCATED; - struct MELT_OBJECT_STRUCT (3) dsym_630__CLASS_SOURCE_GENERATOR_DEVICE; - struct MELT_STRING_STRUCT (29) dstr_631__CLASS_SOURCE_GENERATOR_D; - struct MELT_ROUTINE_STRUCT (8) drout_632__SUBSTITUTE_FORMALS_FOR_SYNTEST; - struct MELT_CLOSURE_STRUCT (0) dclo_633__SUBSTITUTE_FORMALS_FOR_SYNTEST; - struct MELT_ROUTINE_STRUCT (3) drout_634__EXPAND_TUPLE_FOR_SYNTEST; - struct MELT_CLOSURE_STRUCT (0) dclo_635__EXPAND_TUPLE_FOR_SYNTEST; - struct MELT_ROUTINE_STRUCT (14) drout_636__SYNTESTGEN_PRIMITIVE; - struct MELT_CLOSURE_STRUCT (0) dclo_637__SYNTESTGEN_PRIMITIVE; - struct MELT_OBJECT_STRUCT (3) dsym_638__CLASS_PRIMITIVE; - struct MELT_STRING_STRUCT (15) dstr_639__CLASS_PRIMITIVE; - struct MELT_OBJECT_STRUCT (3) dsym_640__CLASS_SOURCE_DEFPRIMITIVE; - struct MELT_STRING_STRUCT (25) dstr_641__CLASS_SOURCE_DEFPRIMITIV; - struct MELT_OBJECT_STRUCT (3) dsym_642__DISCR_MAP_OBJECTS; - struct MELT_STRING_STRUCT (17) dstr_643__DISCR_MAP_OBJECTS; - struct MELT_ROUTINE_STRUCT (15) drout_644__SYNTESTGEN_CITERATOR; - struct MELT_CLOSURE_STRUCT (0) dclo_645__SYNTESTGEN_CITERATOR; - struct MELT_OBJECT_STRUCT (3) dsym_646__CLASS_SOURCE_DEFCITERATOR; - struct MELT_STRING_STRUCT (25) dstr_647__CLASS_SOURCE_DEFCITERATO; - struct MELT_ROUTINE_STRUCT (18) drout_648__SYNTESTGEN_CMATCHER; - struct MELT_CLOSURE_STRUCT (0) dclo_649__SYNTESTGEN_CMATCHER; - struct MELT_OBJECT_STRUCT (3) dsym_650__CLASS_CMATCHER; - struct MELT_STRING_STRUCT (14) dstr_651__CLASS_CMATCHER; - struct MELT_OBJECT_STRUCT (3) dsym_652__CLASS_ANY_MATCHER; - struct MELT_STRING_STRUCT (17) dstr_653__CLASS_ANY_MATCHER; - struct MELT_OBJECT_STRUCT (3) dsym_654__CLASS_SOURCE_DEFCMATCHER; - struct MELT_STRING_STRUCT (24) dstr_655__CLASS_SOURCE_DEFCMATCHER; - struct MELT_STRING_STRUCT (17) dstr_656__cmatcher_oper_; - struct MELT_STRING_STRUCT (3) dstr_657__; - struct MELT_ROUTINE_STRUCT (7) drout_658__EMIT_SYNTAX_TESTING_ROUTINE; - struct MELT_CLOSURE_STRUCT (0) dclo_659__EMIT_SYNTAX_TESTING_ROUTINE; - struct MELT_ROUTINE_STRUCT (14) drout_660__NORMALIZE_MACROEXPANDED_LIST; - struct MELT_CLOSURE_STRUCT (0) dclo_661__NORMALIZE_MACROEXPANDED_LIST; - struct MELT_OBJECT_STRUCT (3) dsym_662__CLASS_NORMALIZATION_CONTEXT; - struct MELT_STRING_STRUCT (27) dstr_663__CLASS_NORMALIZATION_CONT; - struct MELT_OBJECT_STRUCT (3) dsym_664__CLASS_ENVIRONMENT; - struct MELT_STRING_STRUCT (17) dstr_665__CLASS_ENVIRONMENT; - struct MELT_OBJECT_STRUCT (3) dsym_666__CLASS_SOURCE; - struct MELT_STRING_STRUCT (12) dstr_667__CLASS_SOURCE; + struct MELT_STRING_STRUCT (12) dstr_602__quicklybuilt; + struct MELT_STRING_STRUCT (9) dstr_603__optimized; + struct MELT_STRING_STRUCT (7) dstr_604__dynamic; + struct MELT_STRING_STRUCT (11) dstr_605__debugnoline; + struct MELT_OBJECT_STRUCT (3) dsym_606__SYNTAX_TEST_GENERATOR; + struct MELT_STRING_STRUCT (21) dstr_607__SYNTAX_TEST_GENERATOR; + struct MELT_OBJECT_STRUCT (3) dsym_608__CLASS_SELECTOR; + struct MELT_STRING_STRUCT (14) dstr_609__CLASS_SELECTOR; + struct MELT_OBJECT_STRUCT (3) dsym_610__RECV; + struct MELT_STRING_STRUCT (4) dstr_611__RECV; + struct MELT_OBJECT_STRUCT (2) dobj_612; + struct MELT_OBJECT_STRUCT (3) dsym_613__GENDEV; + struct MELT_STRING_STRUCT (6) dstr_614__GENDEV; + struct MELT_OBJECT_STRUCT (2) dobj_615; + struct MELT_OBJECT_STRUCT (3) dsym_616__SBUF; + struct MELT_STRING_STRUCT (4) dstr_617__SBUF; + struct MELT_OBJECT_STRUCT (2) dobj_618; + struct MELT_OBJECT_STRUCT (3) dsym_619__MODCTX; + struct MELT_STRING_STRUCT (6) dstr_620__MODCTX; + struct MELT_OBJECT_STRUCT (2) dobj_621; + struct MELT_OBJECT_STRUCT (3) dsym_622__IX; + struct MELT_STRING_STRUCT (2) dstr_623__IX; + struct MELT_OBJECT_STRUCT (2) dobj_624; + struct MELT_MULTIPLE_STRUCT (5) dtup_625_sySYNTAX_TEST_GENERATOR; + struct MELT_OBJECT_STRUCT (4) dobj_626__SYNTAX_TEST_GENERATOR; + struct MELT_STRING_STRUCT (21) dstr_627__SYNTAX_TEST_GENERATOR; + struct MELT_ROUTINE_STRUCT (5) drout_628__SYNTESTGEN_ANY; + struct MELT_CLOSURE_STRUCT (0) dclo_629__SYNTESTGEN_ANY; + struct MELT_OBJECT_STRUCT (3) dsym_630__CLASS_LOCATED; + struct MELT_STRING_STRUCT (13) dstr_631__CLASS_LOCATED; + struct MELT_OBJECT_STRUCT (3) dsym_632__CLASS_SOURCE_GENERATOR_DEVICE; + struct MELT_STRING_STRUCT (29) dstr_633__CLASS_SOURCE_GENERATOR_D; + struct MELT_ROUTINE_STRUCT (8) drout_634__SUBSTITUTE_FORMALS_FOR_SYNTEST; + struct MELT_CLOSURE_STRUCT (0) dclo_635__SUBSTITUTE_FORMALS_FOR_SYNTEST; + struct MELT_ROUTINE_STRUCT (3) drout_636__EXPAND_TUPLE_FOR_SYNTEST; + struct MELT_CLOSURE_STRUCT (0) dclo_637__EXPAND_TUPLE_FOR_SYNTEST; + struct MELT_ROUTINE_STRUCT (14) drout_638__SYNTESTGEN_PRIMITIVE; + struct MELT_CLOSURE_STRUCT (0) dclo_639__SYNTESTGEN_PRIMITIVE; + struct MELT_OBJECT_STRUCT (3) dsym_640__CLASS_PRIMITIVE; + struct MELT_STRING_STRUCT (15) dstr_641__CLASS_PRIMITIVE; + struct MELT_OBJECT_STRUCT (3) dsym_642__CLASS_SOURCE_DEFPRIMITIVE; + struct MELT_STRING_STRUCT (25) dstr_643__CLASS_SOURCE_DEFPRIMITIV; + struct MELT_OBJECT_STRUCT (3) dsym_644__DISCR_MAP_OBJECTS; + struct MELT_STRING_STRUCT (17) dstr_645__DISCR_MAP_OBJECTS; + struct MELT_ROUTINE_STRUCT (15) drout_646__SYNTESTGEN_CITERATOR; + struct MELT_CLOSURE_STRUCT (0) dclo_647__SYNTESTGEN_CITERATOR; + struct MELT_OBJECT_STRUCT (3) dsym_648__CLASS_SOURCE_DEFCITERATOR; + struct MELT_STRING_STRUCT (25) dstr_649__CLASS_SOURCE_DEFCITERATO; + struct MELT_ROUTINE_STRUCT (18) drout_650__SYNTESTGEN_CMATCHER; + struct MELT_CLOSURE_STRUCT (0) dclo_651__SYNTESTGEN_CMATCHER; + struct MELT_OBJECT_STRUCT (3) dsym_652__CLASS_CMATCHER; + struct MELT_STRING_STRUCT (14) dstr_653__CLASS_CMATCHER; + struct MELT_OBJECT_STRUCT (3) dsym_654__CLASS_ANY_MATCHER; + struct MELT_STRING_STRUCT (17) dstr_655__CLASS_ANY_MATCHER; + struct MELT_OBJECT_STRUCT (3) dsym_656__CLASS_SOURCE_DEFCMATCHER; + struct MELT_STRING_STRUCT (24) dstr_657__CLASS_SOURCE_DEFCMATCHER; + struct MELT_STRING_STRUCT (17) dstr_658__cmatcher_oper_; + struct MELT_STRING_STRUCT (3) dstr_659__; + struct MELT_ROUTINE_STRUCT (7) drout_660__EMIT_SYNTAX_TESTING_ROUTINE; + struct MELT_CLOSURE_STRUCT (0) dclo_661__EMIT_SYNTAX_TESTING_ROUTINE; + struct MELT_ROUTINE_STRUCT (14) drout_662__NORMALIZE_MACROEXPANDED_LIST; + struct MELT_CLOSURE_STRUCT (0) dclo_663__NORMALIZE_MACROEXPANDED_LIST; + struct MELT_OBJECT_STRUCT (3) dsym_664__CLASS_NORMALIZATION_CONTEXT; + struct MELT_STRING_STRUCT (27) dstr_665__CLASS_NORMALIZATION_CONT; + struct MELT_OBJECT_STRUCT (3) dsym_666__CLASS_ENVIRONMENT; + struct MELT_STRING_STRUCT (17) dstr_667__CLASS_ENVIRONMENT; + struct MELT_OBJECT_STRUCT (3) dsym_668__CLASS_SOURCE; + struct MELT_STRING_STRUCT (12) dstr_669__CLASS_SOURCE; struct MELT_OBJECT_STRUCT (3) - dsym_668__CLASS_SOURCE_UPDATE_CURRENT_MODULE_ENVIRONMENT_REFERENCE; - struct MELT_STRING_STRUCT (56) dstr_669__CLASS_SOURCE_UPDATE_CURR; - struct MELT_STRING_STRUCT (13) dstr_670__at_very_start; - struct MELT_OBJECT_STRUCT (3) dsym_671__CLASS_SOURCE_COMMENT; - struct MELT_STRING_STRUCT (20) dstr_672__CLASS_SOURCE_COMMENT; - struct MELT_OBJECT_STRUCT (3) dsym_673__NORMAL_EXP; - struct MELT_STRING_STRUCT (10) dstr_674__NORMAL_EXP; - struct MELT_OBJECT_STRUCT (3) dsym_675__CLASS_NREP_ANYPROC; - struct MELT_STRING_STRUCT (18) dstr_676__CLASS_NREP_ANYPROC; - struct MELT_OBJECT_STRUCT (3) dsym_677__WRAP_NORMAL_LET1; - struct MELT_STRING_STRUCT (16) dstr_678__WRAP_NORMAL_LET1; - struct MELT_OBJECT_STRUCT (3) dsym_679__CLASS_NREP_INITPROC; - struct MELT_STRING_STRUCT (19) dstr_680__CLASS_NREP_INITPROC; - struct MELT_ROUTINE_STRUCT (11) drout_681__OUTPUT_HOOKS_WITH_MODVAR; - struct MELT_CLOSURE_STRUCT (0) dclo_682__OUTPUT_HOOKS_WITH_MODVAR; - struct MELT_OBJECT_STRUCT (3) dsym_683__CLASS_NREP_DATAHOOK; - struct MELT_STRING_STRUCT (19) dstr_684__CLASS_NREP_DATAHOOK; - struct MELT_ROUTINE_STRUCT (52) drout_685__TRANSLATE_MACROEXPANDED_LIST; - struct MELT_CLOSURE_STRUCT (0) dclo_686__TRANSLATE_MACROEXPANDED_LIST; - struct MELT_STRING_STRUCT (43) dstr_687__MELT_translation_failed_; - struct MELT_OBJECT_STRUCT (3) dsym_688__COMPILE2OBJ_HOOK; - struct MELT_STRING_STRUCT (16) dstr_689__COMPILE2OBJ_HOOK; - struct MELT_OBJECT_STRUCT (3) dsym_690__COMPILE2OBJ_PROCEDURE; - struct MELT_STRING_STRUCT (21) dstr_691__COMPILE2OBJ_PROCEDURE; - struct MELT_STRING_STRUCT (40) dstr_692__MELT_translation_failed_; - struct MELT_ROUTINE_STRUCT (2) drout_693__LAMBDA_; - struct MELT_OBJECT_STRUCT (3) dsym_694__NORMAL_IMPORT; - struct MELT_STRING_STRUCT (13) dstr_695__NORMAL_IMPORT; - struct MELT_OBJECT_STRUCT (3) dsym_696__CLASS_HOOK_DESCRIPTOR; - struct MELT_STRING_STRUCT (21) dstr_697__CLASS_HOOK_DESCRIPTOR; - struct MELT_OBJECT_STRUCT (3) dsym_698__SYMBOL_CNAME; - struct MELT_STRING_STRUCT (12) dstr_699__SYMBOL_CNAME; - struct MELT_OBJECT_STRUCT (3) dsym_700__CLASS_SOURCE_CHEADER; - struct MELT_STRING_STRUCT (20) dstr_701__CLASS_SOURCE_CHEADER; - struct MELT_OBJECT_STRUCT (3) dsym_702__CLASS_SOURCE_CODE_STRING; - struct MELT_STRING_STRUCT (24) dstr_703__CLASS_SOURCE_CODE_STRING; - struct MELT_OBJECT_STRUCT (3) dsym_704__CLASS_SOURCE_CIMPLEMENT; - struct MELT_STRING_STRUCT (23) dstr_705__CLASS_SOURCE_CIMPLEMENT; - struct MELT_STRING_STRUCT (45) dstr_706__MELT_translation_failed_; - struct MELT_ROUTINE_STRUCT (0) drout_707__FATAL_COMPILE_ERROR; - struct MELT_CLOSURE_STRUCT (0) dclo_708__FATAL_COMPILE_ERROR; - struct MELT_ROUTINE_STRUCT (16) drout_709__COMPILE_LIST_SEXPR; - struct MELT_CLOSURE_STRUCT (0) dclo_710__COMPILE_LIST_SEXPR; - struct MELT_OBJECT_STRUCT (3) dsym_711__CLASS_MODULE_CONTEXT; - struct MELT_STRING_STRUCT (20) dstr_712__CLASS_MODULE_CONTEXT; - struct MELT_OBJECT_STRUCT (3) dsym_713__DISCR_MAP_STRINGS; - struct MELT_STRING_STRUCT (17) dstr_714__DISCR_MAP_STRINGS; - struct MELT_ROUTINE_STRUCT (1) drout_715__LAMBDA_; - struct MELT_OBJECT_STRUCT (3) dsym_716__CREATE_NORMCONTEXT; - struct MELT_STRING_STRUCT (18) dstr_717__CREATE_NORMCONTEXT; - struct MELT_OBJECT_STRUCT (3) dsym_718__INITIAL_ENVIRONMENT; - struct MELT_STRING_STRUCT (19) dstr_719__INITIAL_ENVIRONMENT; - struct MELT_OBJECT_STRUCT (3) dsym_720__MACROEXPAND_TOPLEVEL_LIST; - struct MELT_STRING_STRUCT (25) dstr_721__MACROEXPAND_TOPLEVEL_LIS; - struct MELT_OBJECT_STRUCT (3) dsym_722__MACROEXPAND_1; - struct MELT_STRING_STRUCT (13) dstr_723__MACROEXPAND_1; - struct MELT_OBJECT_STRUCT (3) dsym_724__COMPILE2OBJ_INITPROC; - struct MELT_STRING_STRUCT (20) dstr_725__COMPILE2OBJ_INITPROC; - struct MELT_OBJECT_STRUCT (3) dsym_726__MELT_RUN_EXTENSION; - struct MELT_STRING_STRUCT (18) dstr_727__MELT_RUN_EXTENSION; - struct MELT_OBJECT_STRUCT (5) dobj_728__MELT_RUN_EXTENSION; - struct MELT_MULTIPLE_STRUCT (7) dtup_729_syMELT_RUN_EXTENSION; - struct MELT_MULTIPLE_STRUCT (3) dtup_730_syMELT_RUN_EXTENSION; - struct MELT_OBJECT_STRUCT (3) dsym_731__BASENAME; - struct MELT_STRING_STRUCT (8) dstr_732__BASENAME; - struct MELT_OBJECT_STRUCT (2) dobj_733; - struct MELT_OBJECT_STRUCT (3) dsym_734__ENV; - struct MELT_STRING_STRUCT (3) dstr_735__ENV; - struct MELT_OBJECT_STRUCT (2) dobj_736; - struct MELT_OBJECT_STRUCT (3) dsym_737__LITVAL; - struct MELT_STRING_STRUCT (6) dstr_738__LITVAL; - struct MELT_OBJECT_STRUCT (2) dobj_739; - struct MELT_STRING_STRUCT (69) dstr_740__melt_run_extension_; - struct MELT_STRING_STRUCT (22) dstr_741__melt_ptr_t_; - struct MELT_STRING_STRUCT (22) dstr_742__melt_ptr_t_; - struct MELT_STRING_STRUCT (2) dstr_743__; - struct MELT_STRING_STRUCT (18) dstr_744__MELT_RUN_EXTENSION; - struct MELT_ROUTINE_STRUCT (19) drout_745__AUTOBOX_NORMAL_RETURN; - struct MELT_CLOSURE_STRUCT (0) dclo_746__AUTOBOX_NORMAL_RETURN; - struct MELT_OBJECT_STRUCT (3) dsym_747__CLONE_SYMBOL; - struct MELT_STRING_STRUCT (12) dstr_748__CLONE_SYMBOL; - struct MELT_OBJECT_STRUCT (3) dsym_749__RETAUTOBOXVAL; - struct MELT_STRING_STRUCT (13) dstr_750__RETAUTOBOXVAL; - struct MELT_OBJECT_STRUCT (3) dsym_751__CLASS_NORMAL_LET_BINDING; - struct MELT_STRING_STRUCT (24) dstr_752__CLASS_NORMAL_LET_BINDING; - struct MELT_OBJECT_STRUCT (3) dsym_753__CLASS_NREP_LOCSYMOCC; - struct MELT_STRING_STRUCT (20) dstr_754__CLASS_NREP_LOCSYMOCC; - struct MELT_OBJECT_STRUCT (3) dsym_755__CLASS_NREP_RETURN; - struct MELT_STRING_STRUCT (17) dstr_756__CLASS_NREP_RETURN; - struct MELT_OBJECT_STRUCT (3) dsym_757__CLASS_NREP_CHUNK; - struct MELT_STRING_STRUCT (16) dstr_758__CLASS_NREP_CHUNK; - struct MELT_OBJECT_STRUCT (3) dsym_759__AUTOBOXLONG; - struct MELT_STRING_STRUCT (11) dstr_760__AUTOBOXLONG; - struct MELT_OBJECT_STRUCT (3) dsym_761__CLASS_LET_BINDING; - struct MELT_STRING_STRUCT (17) dstr_762__CLASS_LET_BINDING; - struct MELT_OBJECT_STRUCT (3) dsym_763__CTYPE_CSTRING; - struct MELT_STRING_STRUCT (13) dstr_764__CTYPE_CSTRING; - struct MELT_OBJECT_STRUCT (3) dsym_765__AUTOBOXSTRING; - struct MELT_STRING_STRUCT (13) dstr_766__AUTOBOXSTRING; - struct MELT_OBJECT_STRUCT (3) dsym_767__CLASS_CTYPE_GTY; - struct MELT_STRING_STRUCT (15) dstr_768__CLASS_CTYPE_GTY; - struct MELT_OBJECT_STRUCT (3) dsym_769__AUTOBOXGTY; - struct MELT_STRING_STRUCT (10) dstr_770__AUTOBOXGTY; - struct MELT_ROUTINE_STRUCT (41) drout_771__TRANSLATE_RUN_MELT_EXPRESSIONS; - struct MELT_CLOSURE_STRUCT (0) dclo_772__TRANSLATE_RUN_MELT_EXPRESSIONS; - struct MELT_ROUTINE_STRUCT (3) drout_773__LAMBDA_; - struct MELT_OBJECT_STRUCT (3) dsym_774__TRUE; - struct MELT_STRING_STRUCT (4) dstr_775__TRUE; - struct MELT_OBJECT_STRUCT (3) dsym_776__CREATE_NORMAL_EXTENDING_CONTEXT; - struct MELT_STRING_STRUCT (31) dstr_777__CREATE_NORMAL_EXTENDING_; - struct MELT_ROUTINE_STRUCT (5) drout_778__LAMBDA_; - struct MELT_OBJECT_STRUCT (3) dsym_779__CLASS_SEXPR; - struct MELT_STRING_STRUCT (11) dstr_780__CLASS_SEXPR; - struct MELT_STRING_STRUCT (14) dstr_781__Bad_expression; - struct MELT_STRING_STRUCT (14) dstr_782__No_expressions; - struct MELT_STRING_STRUCT (27) dstr_783__runtime_invalid_expressi; - struct MELT_ROUTINE_STRUCT (9) drout_784__LAMBDA_; - struct MELT_STRING_STRUCT (29) dstr_785__runtime_macroexpansion_f; - struct MELT_OBJECT_STRUCT (3) dsym_786__COMPILE2OBJ_INITEXTENDPROC; - struct MELT_STRING_STRUCT (26) dstr_787__COMPILE2OBJ_INITEXTENDPR; - struct MELT_STRING_STRUCT (34) dstr_788__runtime_translation_to_c; - struct MELT_STRING_STRUCT (9) dstr_789__runextend; - struct MELT_OBJECT_STRUCT (3) dsym_790__CLASS_LITERAL_VALUE; - struct MELT_STRING_STRUCT (19) dstr_791__CLASS_LITERAL_VALUE; - struct MELT_ROUTINE_STRUCT (6) drout_792__READ_MELT_EXPRESSIONS; - struct MELT_CLOSURE_STRUCT (0) dclo_793__READ_MELT_EXPRESSIONS; - struct MELT_OBJECT_STRUCT (3) dsym_794__LIST_APPEND2LIST; - struct MELT_STRING_STRUCT (16) dstr_795__LIST_APPEND2LIST; + dsym_670__CLASS_SOURCE_UPDATE_CURRENT_MODULE_ENVIRONMENT_REFERENCE; + struct MELT_STRING_STRUCT (56) dstr_671__CLASS_SOURCE_UPDATE_CURR; + struct MELT_STRING_STRUCT (13) dstr_672__at_very_start; + struct MELT_OBJECT_STRUCT (3) dsym_673__CLASS_SOURCE_COMMENT; + struct MELT_STRING_STRUCT (20) dstr_674__CLASS_SOURCE_COMMENT; + struct MELT_OBJECT_STRUCT (3) dsym_675__NORMAL_EXP; + struct MELT_STRING_STRUCT (10) dstr_676__NORMAL_EXP; + struct MELT_OBJECT_STRUCT (3) dsym_677__CLASS_NREP_ANYPROC; + struct MELT_STRING_STRUCT (18) dstr_678__CLASS_NREP_ANYPROC; + struct MELT_OBJECT_STRUCT (3) dsym_679__WRAP_NORMAL_LET1; + struct MELT_STRING_STRUCT (16) dstr_680__WRAP_NORMAL_LET1; + struct MELT_OBJECT_STRUCT (3) dsym_681__CLASS_NREP_INITPROC; + struct MELT_STRING_STRUCT (19) dstr_682__CLASS_NREP_INITPROC; + struct MELT_ROUTINE_STRUCT (12) drout_683__OUTPUT_HOOKS_WITH_MODVAR; + struct MELT_CLOSURE_STRUCT (0) dclo_684__OUTPUT_HOOKS_WITH_MODVAR; + struct MELT_OBJECT_STRUCT (3) dsym_685__CLASS_NREP_DATAHOOK; + struct MELT_STRING_STRUCT (19) dstr_686__CLASS_NREP_DATAHOOK; + struct MELT_ROUTINE_STRUCT (52) drout_687__TRANSLATE_MACROEXPANDED_LIST; + struct MELT_CLOSURE_STRUCT (0) dclo_688__TRANSLATE_MACROEXPANDED_LIST; + struct MELT_STRING_STRUCT (43) dstr_689__MELT_translation_failed_; + struct MELT_OBJECT_STRUCT (3) dsym_690__COMPILE2OBJ_HOOK; + struct MELT_STRING_STRUCT (16) dstr_691__COMPILE2OBJ_HOOK; + struct MELT_OBJECT_STRUCT (3) dsym_692__COMPILE2OBJ_PROCEDURE; + struct MELT_STRING_STRUCT (21) dstr_693__COMPILE2OBJ_PROCEDURE; + struct MELT_STRING_STRUCT (40) dstr_694__MELT_translation_failed_; + struct MELT_ROUTINE_STRUCT (2) drout_695__LAMBDA_; + struct MELT_OBJECT_STRUCT (3) dsym_696__NORMAL_IMPORT; + struct MELT_STRING_STRUCT (13) dstr_697__NORMAL_IMPORT; + struct MELT_OBJECT_STRUCT (3) dsym_698__CLASS_HOOK_DESCRIPTOR; + struct MELT_STRING_STRUCT (21) dstr_699__CLASS_HOOK_DESCRIPTOR; + struct MELT_OBJECT_STRUCT (3) dsym_700__SYMBOL_CNAME; + struct MELT_STRING_STRUCT (12) dstr_701__SYMBOL_CNAME; + struct MELT_OBJECT_STRUCT (3) dsym_702__CLASS_SOURCE_CHEADER; + struct MELT_STRING_STRUCT (20) dstr_703__CLASS_SOURCE_CHEADER; + struct MELT_OBJECT_STRUCT (3) dsym_704__CLASS_SOURCE_CODE_STRING; + struct MELT_STRING_STRUCT (24) dstr_705__CLASS_SOURCE_CODE_STRING; + struct MELT_OBJECT_STRUCT (3) dsym_706__CLASS_SOURCE_CIMPLEMENT; + struct MELT_STRING_STRUCT (23) dstr_707__CLASS_SOURCE_CIMPLEMENT; + struct MELT_STRING_STRUCT (45) dstr_708__MELT_translation_failed_; + struct MELT_ROUTINE_STRUCT (0) drout_709__FATAL_COMPILE_ERROR; + struct MELT_CLOSURE_STRUCT (0) dclo_710__FATAL_COMPILE_ERROR; + struct MELT_ROUTINE_STRUCT (16) drout_711__COMPILE_LIST_SEXPR; + struct MELT_CLOSURE_STRUCT (0) dclo_712__COMPILE_LIST_SEXPR; + struct MELT_OBJECT_STRUCT (3) dsym_713__CLASS_MODULE_CONTEXT; + struct MELT_STRING_STRUCT (20) dstr_714__CLASS_MODULE_CONTEXT; + struct MELT_OBJECT_STRUCT (3) dsym_715__DISCR_MAP_STRINGS; + struct MELT_STRING_STRUCT (17) dstr_716__DISCR_MAP_STRINGS; + struct MELT_ROUTINE_STRUCT (1) drout_717__LAMBDA_; + struct MELT_OBJECT_STRUCT (3) dsym_718__CREATE_NORMCONTEXT; + struct MELT_STRING_STRUCT (18) dstr_719__CREATE_NORMCONTEXT; + struct MELT_OBJECT_STRUCT (3) dsym_720__INITIAL_ENVIRONMENT; + struct MELT_STRING_STRUCT (19) dstr_721__INITIAL_ENVIRONMENT; + struct MELT_OBJECT_STRUCT (3) dsym_722__MACROEXPAND_TOPLEVEL_LIST; + struct MELT_STRING_STRUCT (25) dstr_723__MACROEXPAND_TOPLEVEL_LIS; + struct MELT_OBJECT_STRUCT (3) dsym_724__MACROEXPAND_1; + struct MELT_STRING_STRUCT (13) dstr_725__MACROEXPAND_1; + struct MELT_OBJECT_STRUCT (3) dsym_726__COMPILE2OBJ_INITPROC; + struct MELT_STRING_STRUCT (20) dstr_727__COMPILE2OBJ_INITPROC; + struct MELT_OBJECT_STRUCT (3) dsym_728__MELT_RUN_EXTENSION; + struct MELT_STRING_STRUCT (18) dstr_729__MELT_RUN_EXTENSION; + struct MELT_OBJECT_STRUCT (5) dobj_730__MELT_RUN_EXTENSION; + struct MELT_MULTIPLE_STRUCT (7) dtup_731_syMELT_RUN_EXTENSION; + struct MELT_MULTIPLE_STRUCT (3) dtup_732_syMELT_RUN_EXTENSION; + struct MELT_OBJECT_STRUCT (3) dsym_733__BASENAME; + struct MELT_STRING_STRUCT (8) dstr_734__BASENAME; + struct MELT_OBJECT_STRUCT (2) dobj_735; + struct MELT_OBJECT_STRUCT (3) dsym_736__ENV; + struct MELT_STRING_STRUCT (3) dstr_737__ENV; + struct MELT_OBJECT_STRUCT (2) dobj_738; + struct MELT_OBJECT_STRUCT (3) dsym_739__LITVAL; + struct MELT_STRING_STRUCT (6) dstr_740__LITVAL; + struct MELT_OBJECT_STRUCT (2) dobj_741; + struct MELT_STRING_STRUCT (69) dstr_742__melt_run_extension_; + struct MELT_STRING_STRUCT (22) dstr_743__melt_ptr_t_; + struct MELT_STRING_STRUCT (22) dstr_744__melt_ptr_t_; + struct MELT_STRING_STRUCT (2) dstr_745__; + struct MELT_STRING_STRUCT (18) dstr_746__MELT_RUN_EXTENSION; + struct MELT_ROUTINE_STRUCT (19) drout_747__AUTOBOX_NORMAL_RETURN; + struct MELT_CLOSURE_STRUCT (0) dclo_748__AUTOBOX_NORMAL_RETURN; + struct MELT_OBJECT_STRUCT (3) dsym_749__CLONE_SYMBOL; + struct MELT_STRING_STRUCT (12) dstr_750__CLONE_SYMBOL; + struct MELT_OBJECT_STRUCT (3) dsym_751__RETAUTOBOXVAL; + struct MELT_STRING_STRUCT (13) dstr_752__RETAUTOBOXVAL; + struct MELT_OBJECT_STRUCT (3) dsym_753__CLASS_NORMAL_LET_BINDING; + struct MELT_STRING_STRUCT (24) dstr_754__CLASS_NORMAL_LET_BINDING; + struct MELT_OBJECT_STRUCT (3) dsym_755__CLASS_NREP_LOCSYMOCC; + struct MELT_STRING_STRUCT (20) dstr_756__CLASS_NREP_LOCSYMOCC; + struct MELT_OBJECT_STRUCT (3) dsym_757__CLASS_NREP_RETURN; + struct MELT_STRING_STRUCT (17) dstr_758__CLASS_NREP_RETURN; + struct MELT_OBJECT_STRUCT (3) dsym_759__CLASS_NREP_CHUNK; + struct MELT_STRING_STRUCT (16) dstr_760__CLASS_NREP_CHUNK; + struct MELT_OBJECT_STRUCT (3) dsym_761__AUTOBOXLONG; + struct MELT_STRING_STRUCT (11) dstr_762__AUTOBOXLONG; + struct MELT_OBJECT_STRUCT (3) dsym_763__CLASS_LET_BINDING; + struct MELT_STRING_STRUCT (17) dstr_764__CLASS_LET_BINDING; + struct MELT_OBJECT_STRUCT (3) dsym_765__CTYPE_CSTRING; + struct MELT_STRING_STRUCT (13) dstr_766__CTYPE_CSTRING; + struct MELT_OBJECT_STRUCT (3) dsym_767__AUTOBOXSTRING; + struct MELT_STRING_STRUCT (13) dstr_768__AUTOBOXSTRING; + struct MELT_OBJECT_STRUCT (3) dsym_769__CLASS_CTYPE_GTY; + struct MELT_STRING_STRUCT (15) dstr_770__CLASS_CTYPE_GTY; + struct MELT_OBJECT_STRUCT (3) dsym_771__AUTOBOXGTY; + struct MELT_STRING_STRUCT (10) dstr_772__AUTOBOXGTY; + struct MELT_ROUTINE_STRUCT (41) drout_773__TRANSLATE_RUN_MELT_EXPRESSIONS; + struct MELT_CLOSURE_STRUCT (0) dclo_774__TRANSLATE_RUN_MELT_EXPRESSIONS; + struct MELT_ROUTINE_STRUCT (3) drout_775__LAMBDA_; + struct MELT_OBJECT_STRUCT (3) dsym_776__TRUE; + struct MELT_STRING_STRUCT (4) dstr_777__TRUE; + struct MELT_OBJECT_STRUCT (3) dsym_778__CREATE_NORMAL_EXTENDING_CONTEXT; + struct MELT_STRING_STRUCT (31) dstr_779__CREATE_NORMAL_EXTENDING_; + struct MELT_ROUTINE_STRUCT (5) drout_780__LAMBDA_; + struct MELT_OBJECT_STRUCT (3) dsym_781__CLASS_SEXPR; + struct MELT_STRING_STRUCT (11) dstr_782__CLASS_SEXPR; + struct MELT_STRING_STRUCT (14) dstr_783__Bad_expression; + struct MELT_STRING_STRUCT (14) dstr_784__No_expressions; + struct MELT_STRING_STRUCT (27) dstr_785__runtime_invalid_expressi; + struct MELT_ROUTINE_STRUCT (9) drout_786__LAMBDA_; + struct MELT_STRING_STRUCT (29) dstr_787__runtime_macroexpansion_f; + struct MELT_OBJECT_STRUCT (3) dsym_788__COMPILE2OBJ_INITEXTENDPROC; + struct MELT_STRING_STRUCT (26) dstr_789__COMPILE2OBJ_INITEXTENDPR; + struct MELT_STRING_STRUCT (34) dstr_790__runtime_translation_to_c; + struct MELT_STRING_STRUCT (9) dstr_791__runextend; + struct MELT_OBJECT_STRUCT (3) dsym_792__CLASS_LITERAL_VALUE; + struct MELT_STRING_STRUCT (19) dstr_793__CLASS_LITERAL_VALUE; + struct MELT_ROUTINE_STRUCT (6) drout_794__READ_MELT_EXPRESSIONS; + struct MELT_CLOSURE_STRUCT (0) dclo_795__READ_MELT_EXPRESSIONS; + struct MELT_OBJECT_STRUCT (3) dsym_796__LIST_APPEND2LIST; + struct MELT_STRING_STRUCT (16) dstr_797__LIST_APPEND2LIST; struct MELT_ROUTINE_STRUCT (5) - drout_796__TRANSLATE_TO_C_MODULE_MELT_SOURCES; + drout_798__TRANSLATE_TO_C_MODULE_MELT_SOURCES; struct MELT_CLOSURE_STRUCT (0) - dclo_797__TRANSLATE_TO_C_MODULE_MELT_SOURCES; - struct MELT_ROUTINE_STRUCT (6) drout_798__EVAL; - struct MELT_CLOSURE_STRUCT (0) dclo_799__EVAL; - struct MELT_OBJECT_STRUCT (3) dsym_800__MULTIPLE_TO_LIST; - struct MELT_STRING_STRUCT (16) dstr_801__MULTIPLE_TO_LIST; + dclo_799__TRANSLATE_TO_C_MODULE_MELT_SOURCES; + struct MELT_ROUTINE_STRUCT (6) drout_800__EVAL; + struct MELT_CLOSURE_STRUCT (0) dclo_801__EVAL; + struct MELT_OBJECT_STRUCT (3) dsym_802__MULTIPLE_TO_LIST; + struct MELT_STRING_STRUCT (16) dstr_803__MULTIPLE_TO_LIST; struct MELT_ROUTINE_STRUCT (0) - drout_802__GENERATE_GPLV3PLUS_COPYRIGHT_NOTICE_C_COMMENT; + drout_804__GENERATE_GPLV3PLUS_COPYRIGHT_NOTICE_C_COMMENT; struct MELT_CLOSURE_STRUCT (0) - dclo_803__GENERATE_GPLV3PLUS_COPYRIGHT_NOTICE_C_COMMENT; - struct MELT_OBJECT_STRUCT (3) dsym_804__COMPILE_LIST_SEXPR; - struct MELT_STRING_STRUCT (18) dstr_805__COMPILE_LIST_SEXPR; - struct MELT_OBJECT_STRUCT (3) dsym_806__EVAL; - struct MELT_STRING_STRUCT (4) dstr_807__EVAL; + dclo_805__GENERATE_GPLV3PLUS_COPYRIGHT_NOTICE_C_COMMENT; + struct MELT_OBJECT_STRUCT (3) dsym_806__COMPILE_LIST_SEXPR; + struct MELT_STRING_STRUCT (18) dstr_807__COMPILE_LIST_SEXPR; + struct MELT_OBJECT_STRUCT (3) dsym_808__EVAL; + struct MELT_STRING_STRUCT (4) dstr_809__EVAL; struct MELT_OBJECT_STRUCT (3) - dsym_808__GENERATE_GPLV3PLUS_COPYRIGHT_NOTICE_C_COMMENT; - struct MELT_STRING_STRUCT (45) dstr_809__GENERATE_GPLV3PLUS_COPYR; - struct MELT_OBJECT_STRUCT (3) dsym_810__GET_CODE_BUFFER_LIMIT; - struct MELT_STRING_STRUCT (21) dstr_811__GET_CODE_BUFFER_LIMIT; - struct MELT_OBJECT_STRUCT (3) dsym_812__PUT_CODE_BUFFER_LIMIT; - struct MELT_STRING_STRUCT (21) dstr_813__PUT_CODE_BUFFER_LIMIT; - struct MELT_OBJECT_STRUCT (3) dsym_814__TRANSLATE_RUN_MELT_EXPRESSIONS; - struct MELT_STRING_STRUCT (30) dstr_815__TRANSLATE_RUN_MELT_EXPRE; + dsym_810__GENERATE_GPLV3PLUS_COPYRIGHT_NOTICE_C_COMMENT; + struct MELT_STRING_STRUCT (45) dstr_811__GENERATE_GPLV3PLUS_COPYR; + struct MELT_OBJECT_STRUCT (3) dsym_812__GET_CODE_BUFFER_LIMIT; + struct MELT_STRING_STRUCT (21) dstr_813__GET_CODE_BUFFER_LIMIT; + struct MELT_OBJECT_STRUCT (3) dsym_814__PUT_CODE_BUFFER_LIMIT; + struct MELT_STRING_STRUCT (21) dstr_815__PUT_CODE_BUFFER_LIMIT; + struct MELT_OBJECT_STRUCT (3) dsym_816__TRANSLATE_RUN_MELT_EXPRESSIONS; + struct MELT_STRING_STRUCT (30) dstr_817__TRANSLATE_RUN_MELT_EXPRE; struct MELT_OBJECT_STRUCT (3) - dsym_816__TRANSLATE_TO_C_MODULE_MELT_SOURCES; - struct MELT_STRING_STRUCT (34) dstr_817__TRANSLATE_TO_C_MODULE_ME; + dsym_818__TRANSLATE_TO_C_MODULE_MELT_SOURCES; + struct MELT_STRING_STRUCT (34) dstr_819__TRANSLATE_TO_C_MODULE_ME; long spare_; } *meltcdat = NULL; 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 */ -2938); + iniframp__->mcfr_nbvar == /*minihash */ -761); /*curframe_cdat_fill */ meltcdat = (struct meltcdata_st *) meltgc_allocate (sizeof (*meltcdat), 0); melt_prohibit_garbcoll = TRUE; @@ -7079,8 +7016,8 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*iniobj dsym_1__HOOK_FRESH_ENVIRONMENT_REFERENCE_MAKER*/ - /*uniqueobj*/ if (! /*_._VALDATA___V191*/ meltfptr[190]) -/*_._VALDATA___V191*/ meltfptr[190] = + /*uniqueobj*/ if (! /*_._VALDATA___V192*/ meltfptr[191]) +/*_._VALDATA___V192*/ meltfptr[191] = (melt_ptr_t) & meltcdat->dsym_1__HOOK_FRESH_ENVIRONMENT_REFERENCE_MAKER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg @@ -7101,7 +7038,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*inistring dstr_2__HOOK_FRESH_ENVIRONMENT_R*/ - /*_._VALSTR___V192*/ meltfptr[191] = + /*_._VALSTR___V193*/ meltfptr[192] = (melt_ptr_t) & meltcdat->dstr_2__HOOK_FRESH_ENVIRONMENT_R; meltcdat->dstr_2__HOOK_FRESH_ENVIRONMENT_R.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -7115,8 +7052,8 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*iniobj dsym_3__BUFFER_LIMIT_CONT*/ - /*uniqueobj*/ if (! /*_._VALDATA___V193*/ meltfptr[192]) -/*_._VALDATA___V193*/ meltfptr[192] = + /*uniqueobj*/ if (! /*_._VALDATA___V194*/ meltfptr[193]) +/*_._VALDATA___V194*/ meltfptr[193] = (melt_ptr_t) & meltcdat->dsym_3__BUFFER_LIMIT_CONT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_3__BUFFER_LIMIT_CONT", @@ -7136,7 +7073,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*inistring dstr_4__BUFFER_LIMIT_CONT*/ - /*_._VALSTR___V194*/ meltfptr[193] = + /*_._VALSTR___V195*/ meltfptr[194] = (melt_ptr_t) & meltcdat->dstr_4__BUFFER_LIMIT_CONT; meltcdat->dstr_4__BUFFER_LIMIT_CONT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -7149,8 +7086,8 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*iniobj dsym_5__CLASS_REFERENCE*/ - /*uniqueobj*/ if (! /*_._VALDATA___V195*/ meltfptr[194]) -/*_._VALDATA___V195*/ meltfptr[194] = + /*uniqueobj*/ if (! /*_._VALDATA___V196*/ meltfptr[195]) +/*_._VALDATA___V196*/ meltfptr[195] = (melt_ptr_t) & meltcdat->dsym_5__CLASS_REFERENCE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_5__CLASS_REFERENCE", @@ -7170,7 +7107,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*inistring dstr_6__CLASS_REFERENCE*/ - /*_._VALSTR___V196*/ meltfptr[195] = + /*_._VALSTR___V197*/ meltfptr[196] = (melt_ptr_t) & meltcdat->dstr_6__CLASS_REFERENCE; meltcdat->dstr_6__CLASS_REFERENCE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -7184,7 +7121,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, MELT_LOCATION ("warmelt-outobj.melt:37:/ iniobj"); /*iniobj dobj_7__BUFFER_LIMIT_CONT*/ -/*_._VALDATA___V197*/ meltfptr[196] = +/*_._VALDATA___V198*/ meltfptr[197] = (melt_ptr_t) & meltcdat->dobj_7__BUFFER_LIMIT_CONT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_7__BUFFER_LIMIT_CONT", @@ -7198,18 +7135,18 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); meltcdat->dobj_7__BUFFER_LIMIT_CONT.meltobj_class = (meltobject_ptr_t) ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5]); - meltcdat->dobj_7__BUFFER_LIMIT_CONT.obj_hash = 533563100; + meltcdat->dobj_7__BUFFER_LIMIT_CONT.obj_hash = 550320940; meltcdat->dobj_7__BUFFER_LIMIT_CONT.obj_len = 1; /*iniboxint dint_8__ */ - /*_._VALBXINT___V198*/ meltfptr[197] = (melt_ptr_t) & meltcdat->dint_8__; + /*_._VALBXINT___V199*/ meltfptr[198] = (melt_ptr_t) & meltcdat->dint_8__; meltcdat->dint_8__.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CONSTANT_INTEGER)))); meltcdat->dint_8__.val = 33554432; /*inirout drout_9__GET_CODE_BUFFER_LIMIT */ - /*_._VALROUT___V199*/ meltfptr[198] = + /*_._VALROUT___V200*/ meltfptr[199] = (melt_ptr_t) & meltcdat->drout_9__GET_CODE_BUFFER_LIMIT; meltcdat->drout_9__GET_CODE_BUFFER_LIMIT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -7221,14 +7158,14 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, meltrout_1_WARMELTmiOUTOBJ_GET_CODE_BUFFER_LIMIT); /*iniclos dclo_10__GET_CODE_BUFFER_LIMIT */ - /*_._VALCLO___V200*/ meltfptr[199] = + /*_._VALCLO___V201*/ meltfptr[200] = (melt_ptr_t) & meltcdat->dclo_10__GET_CODE_BUFFER_LIMIT; meltcdat->dclo_10__GET_CODE_BUFFER_LIMIT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); meltcdat->dclo_10__GET_CODE_BUFFER_LIMIT.nbval = 0; /*inirout drout_11__PUT_CODE_BUFFER_LIMIT */ - /*_._VALROUT___V201*/ meltfptr[200] = + /*_._VALROUT___V202*/ meltfptr[201] = (melt_ptr_t) & meltcdat->drout_11__PUT_CODE_BUFFER_LIMIT; meltcdat->drout_11__PUT_CODE_BUFFER_LIMIT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -7240,7 +7177,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, meltrout_2_WARMELTmiOUTOBJ_PUT_CODE_BUFFER_LIMIT); /*iniclos dclo_12__PUT_CODE_BUFFER_LIMIT */ - /*_._VALCLO___V202*/ meltfptr[201] = + /*_._VALCLO___V203*/ meltfptr[202] = (melt_ptr_t) & meltcdat->dclo_12__PUT_CODE_BUFFER_LIMIT; meltcdat->dclo_12__PUT_CODE_BUFFER_LIMIT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -7248,8 +7185,8 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*iniobj dsym_13__MELT_DEBUG_FUN*/ - /*uniqueobj*/ if (! /*_._VALDATA___V203*/ meltfptr[202]) -/*_._VALDATA___V203*/ meltfptr[202] = + /*uniqueobj*/ if (! /*_._VALDATA___V204*/ meltfptr[203]) +/*_._VALDATA___V204*/ meltfptr[203] = (melt_ptr_t) & meltcdat->dsym_13__MELT_DEBUG_FUN; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_13__MELT_DEBUG_FUN", @@ -7269,7 +7206,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*inistring dstr_14__MELT_DEBUG_FUN*/ - /*_._VALSTR___V204*/ meltfptr[203] = + /*_._VALSTR___V205*/ meltfptr[204] = (melt_ptr_t) & meltcdat->dstr_14__MELT_DEBUG_FUN; meltcdat->dstr_14__MELT_DEBUG_FUN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -7282,8 +7219,8 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*iniobj dsym_15__DISCR_CONSTANT_INTEGER*/ - /*uniqueobj*/ if (! /*_._VALDATA___V205*/ meltfptr[204]) -/*_._VALDATA___V205*/ meltfptr[204] = + /*uniqueobj*/ if (! /*_._VALDATA___V206*/ meltfptr[205]) +/*_._VALDATA___V206*/ meltfptr[205] = (melt_ptr_t) & meltcdat->dsym_15__DISCR_CONSTANT_INTEGER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg @@ -7303,7 +7240,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*inistring dstr_16__DISCR_CONSTANT_INTEGER*/ - /*_._VALSTR___V206*/ meltfptr[205] = + /*_._VALSTR___V207*/ meltfptr[206] = (melt_ptr_t) & meltcdat->dstr_16__DISCR_CONSTANT_INTEGER; meltcdat->dstr_16__DISCR_CONSTANT_INTEGER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -7316,7 +7253,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, meltcdat->dstr_16__DISCR_CONSTANT_INTEGER.slen = 22; /*inirout drout_17__CODE_BUFFER_LIMIT_OPTSET */ - /*_._VALROUT___V207*/ meltfptr[206] = + /*_._VALROUT___V208*/ meltfptr[207] = (melt_ptr_t) & meltcdat->drout_17__CODE_BUFFER_LIMIT_OPTSET; meltcdat->drout_17__CODE_BUFFER_LIMIT_OPTSET.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -7328,7 +7265,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, meltrout_3_WARMELTmiOUTOBJ_CODE_BUFFER_LIMIT_OPTSET); /*iniclos dclo_18__CODE_BUFFER_LIMIT_OPTSET */ - /*_._VALCLO___V208*/ meltfptr[207] = + /*_._VALCLO___V209*/ meltfptr[208] = (melt_ptr_t) & meltcdat->dclo_18__CODE_BUFFER_LIMIT_OPTSET; meltcdat->dclo_18__CODE_BUFFER_LIMIT_OPTSET.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -7336,8 +7273,8 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*iniobj dsym_19__REGISTER_OPTION*/ - /*uniqueobj*/ if (! /*_._VALDATA___V209*/ meltfptr[208]) -/*_._VALDATA___V209*/ meltfptr[208] = + /*uniqueobj*/ if (! /*_._VALDATA___V210*/ meltfptr[209]) +/*_._VALDATA___V210*/ meltfptr[209] = (melt_ptr_t) & meltcdat->dsym_19__REGISTER_OPTION; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_19__REGISTER_OPTION", @@ -7357,7 +7294,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*inistring dstr_20__REGISTER_OPTION*/ - /*_._VALSTR___V210*/ meltfptr[209] = + /*_._VALSTR___V211*/ meltfptr[210] = (melt_ptr_t) & meltcdat->dstr_20__REGISTER_OPTION; meltcdat->dstr_20__REGISTER_OPTION.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -7370,8 +7307,8 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*iniobj dsym_21__CODE_BUFFER_LIMIT*/ - /*uniqueobj*/ if (! /*_._VALDATA___V211*/ meltfptr[210]) -/*_._VALDATA___V211*/ meltfptr[210] = + /*uniqueobj*/ if (! /*_._VALDATA___V212*/ meltfptr[211]) +/*_._VALDATA___V212*/ meltfptr[211] = (melt_ptr_t) & meltcdat->dsym_21__CODE_BUFFER_LIMIT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_21__CODE_BUFFER_LIMIT", @@ -7391,7 +7328,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*inistring dstr_22__CODE_BUFFER_LIMIT*/ - /*_._VALSTR___V212*/ meltfptr[211] = + /*_._VALSTR___V213*/ meltfptr[212] = (melt_ptr_t) & meltcdat->dstr_22__CODE_BUFFER_LIMIT; meltcdat->dstr_22__CODE_BUFFER_LIMIT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -7404,7 +7341,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*inistring dstr_23__set_limit_in_kilobytes_f*/ - /*_._VALSTR___V213*/ meltfptr[212] = + /*_._VALSTR___V214*/ meltfptr[213] = (melt_ptr_t) & meltcdat->dstr_23__set_limit_in_kilobytes_f; meltcdat->dstr_23__set_limit_in_kilobytes_f.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -7418,7 +7355,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, meltcdat->dstr_23__set_limit_in_kilobytes_f.slen = 57; /*inirout drout_24__OUT_ENUMIX_MODVARBIND */ - /*_._VALROUT___V214*/ meltfptr[213] = + /*_._VALROUT___V215*/ meltfptr[214] = (melt_ptr_t) & meltcdat->drout_24__OUT_ENUMIX_MODVARBIND; meltcdat->drout_24__OUT_ENUMIX_MODVARBIND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -7430,7 +7367,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, meltrout_4_WARMELTmiOUTOBJ_OUT_ENUMIX_MODVARBIND); /*iniclos dclo_25__OUT_ENUMIX_MODVARBIND */ - /*_._VALCLO___V216*/ meltfptr[215] = + /*_._VALCLO___V217*/ meltfptr[216] = (melt_ptr_t) & meltcdat->dclo_25__OUT_ENUMIX_MODVARBIND; meltcdat->dclo_25__OUT_ENUMIX_MODVARBIND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -7438,8 +7375,8 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*iniobj dsym_26__CLASS_NORMAL_MODULE_VARIABLE_BINDING*/ - /*uniqueobj*/ if (! /*_._VALDATA___V217*/ meltfptr[216]) -/*_._VALDATA___V217*/ meltfptr[216] = + /*uniqueobj*/ if (! /*_._VALDATA___V218*/ meltfptr[217]) +/*_._VALDATA___V218*/ meltfptr[217] = (melt_ptr_t) & meltcdat->dsym_26__CLASS_NORMAL_MODULE_VARIABLE_BINDING; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg @@ -7460,7 +7397,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*inistring dstr_27__CLASS_NORMAL_MODULE_VARI*/ - /*_._VALSTR___V218*/ meltfptr[217] = + /*_._VALSTR___V219*/ meltfptr[218] = (melt_ptr_t) & meltcdat->dstr_27__CLASS_NORMAL_MODULE_VARI; meltcdat->dstr_27__CLASS_NORMAL_MODULE_VARI.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -7474,8 +7411,8 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*iniobj dsym_28__CLASS_ANY_BINDING*/ - /*uniqueobj*/ if (! /*_._VALDATA___V219*/ meltfptr[218]) -/*_._VALDATA___V219*/ meltfptr[218] = + /*uniqueobj*/ if (! /*_._VALDATA___V220*/ meltfptr[219]) +/*_._VALDATA___V220*/ meltfptr[219] = (melt_ptr_t) & meltcdat->dsym_28__CLASS_ANY_BINDING; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_28__CLASS_ANY_BINDING", @@ -7495,7 +7432,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*inistring dstr_29__CLASS_ANY_BINDING*/ - /*_._VALSTR___V220*/ meltfptr[219] = + /*_._VALSTR___V221*/ meltfptr[220] = (melt_ptr_t) & meltcdat->dstr_29__CLASS_ANY_BINDING; meltcdat->dstr_29__CLASS_ANY_BINDING.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -7507,7 +7444,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, meltcdat->dstr_29__CLASS_ANY_BINDING.slen = 17; /*inirout drout_30__LAMBDA_ */ - /*_._VALROUT___V215*/ meltfptr[214] = + /*_._VALROUT___V216*/ meltfptr[215] = (melt_ptr_t) & meltcdat->drout_30__LAMBDA_; meltcdat->drout_30__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -7515,12 +7452,12 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, "LAMBDA_ @warmelt-outobj.melt:89", MELT_ROUTDESCR_LEN - 1); meltcdat->drout_30__LAMBDA_.nbval = 0; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_30__LAMBDA_, - meltrout_5_WARMELTmiOUTOBJ_LAMBDA_cl1); + meltrout_5_WARMELTmiOUTOBJ); /*iniobj dsym_31__CLASS_CLONED_SYMBOL*/ - /*uniqueobj*/ if (! /*_._VALDATA___V221*/ meltfptr[220]) -/*_._VALDATA___V221*/ meltfptr[220] = + /*uniqueobj*/ if (! /*_._VALDATA___V222*/ meltfptr[221]) +/*_._VALDATA___V222*/ meltfptr[221] = (melt_ptr_t) & meltcdat->dsym_31__CLASS_CLONED_SYMBOL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_31__CLASS_CLONED_SYMBOL", @@ -7540,7 +7477,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*inistring dstr_32__CLASS_CLONED_SYMBOL*/ - /*_._VALSTR___V222*/ meltfptr[221] = + /*_._VALSTR___V223*/ meltfptr[222] = (melt_ptr_t) & meltcdat->dstr_32__CLASS_CLONED_SYMBOL; meltcdat->dstr_32__CLASS_CLONED_SYMBOL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -7554,8 +7491,8 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*iniobj dsym_33__CLASS_NAMED*/ - /*uniqueobj*/ if (! /*_._VALDATA___V223*/ meltfptr[222]) -/*_._VALDATA___V223*/ meltfptr[222] = + /*uniqueobj*/ if (! /*_._VALDATA___V224*/ meltfptr[223]) +/*_._VALDATA___V224*/ meltfptr[223] = (melt_ptr_t) & meltcdat->dsym_33__CLASS_NAMED; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_33__CLASS_NAMED", @@ -7575,7 +7512,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*inistring dstr_34__CLASS_NAMED*/ - /*_._VALSTR___V224*/ meltfptr[223] = + /*_._VALSTR___V225*/ meltfptr[224] = (melt_ptr_t) & meltcdat->dstr_34__CLASS_NAMED; meltcdat->dstr_34__CLASS_NAMED.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -7588,8 +7525,8 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*iniobj dsym_35__ADD2OUT*/ - /*uniqueobj*/ if (! /*_._VALDATA___V225*/ meltfptr[224]) -/*_._VALDATA___V225*/ meltfptr[224] = + /*uniqueobj*/ if (! /*_._VALDATA___V226*/ meltfptr[225]) +/*_._VALDATA___V226*/ meltfptr[225] = (melt_ptr_t) & meltcdat->dsym_35__ADD2OUT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_35__ADD2OUT", @@ -7609,7 +7546,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*inistring dstr_36__ADD2OUT*/ - /*_._VALSTR___V226*/ meltfptr[225] = + /*_._VALSTR___V227*/ meltfptr[226] = (melt_ptr_t) & meltcdat->dstr_36__ADD2OUT; meltcdat->dstr_36__ADD2OUT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -7620,8 +7557,8 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*iniobj dsym_37__CLASS_SYMBOL*/ - /*uniqueobj*/ if (! /*_._VALDATA___V227*/ meltfptr[226]) -/*_._VALDATA___V227*/ meltfptr[226] = + /*uniqueobj*/ if (! /*_._VALDATA___V228*/ meltfptr[227]) +/*_._VALDATA___V228*/ meltfptr[227] = (melt_ptr_t) & meltcdat->dsym_37__CLASS_SYMBOL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_37__CLASS_SYMBOL", @@ -7641,7 +7578,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*inistring dstr_38__CLASS_SYMBOL*/ - /*_._VALSTR___V228*/ meltfptr[227] = + /*_._VALSTR___V229*/ meltfptr[228] = (melt_ptr_t) & meltcdat->dstr_38__CLASS_SYMBOL; meltcdat->dstr_38__CLASS_SYMBOL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -7653,7 +7590,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, meltcdat->dstr_38__CLASS_SYMBOL.slen = 12; /*inirout drout_39__OUTDECLINIT_ROOT */ - /*_._VALROUT___V229*/ meltfptr[228] = + /*_._VALROUT___V230*/ meltfptr[229] = (melt_ptr_t) & meltcdat->drout_39__OUTDECLINIT_ROOT; meltcdat->drout_39__OUTDECLINIT_ROOT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -7665,7 +7602,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, meltrout_6_WARMELTmiOUTOBJ_OUTDECLINIT_ROOT); /*iniclos dclo_40__OUTDECLINIT_ROOT */ - /*_._VALCLO___V230*/ meltfptr[229] = + /*_._VALCLO___V231*/ meltfptr[230] = (melt_ptr_t) & meltcdat->dclo_40__OUTDECLINIT_ROOT; meltcdat->dclo_40__OUTDECLINIT_ROOT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -7673,8 +7610,8 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*iniobj dsym_41__INSTALL_METHOD*/ - /*uniqueobj*/ if (! /*_._VALDATA___V231*/ meltfptr[230]) -/*_._VALDATA___V231*/ meltfptr[230] = + /*uniqueobj*/ if (! /*_._VALDATA___V232*/ meltfptr[231]) +/*_._VALDATA___V232*/ meltfptr[231] = (melt_ptr_t) & meltcdat->dsym_41__INSTALL_METHOD; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_41__INSTALL_METHOD", @@ -7694,7 +7631,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*inistring dstr_42__INSTALL_METHOD*/ - /*_._VALSTR___V232*/ meltfptr[231] = + /*_._VALSTR___V233*/ meltfptr[232] = (melt_ptr_t) & meltcdat->dstr_42__INSTALL_METHOD; meltcdat->dstr_42__INSTALL_METHOD.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -7707,8 +7644,8 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*iniobj dsym_43__CLASS_ROOT*/ - /*uniqueobj*/ if (! /*_._VALDATA___V233*/ meltfptr[232]) -/*_._VALDATA___V233*/ meltfptr[232] = + /*uniqueobj*/ if (! /*_._VALDATA___V234*/ meltfptr[233]) +/*_._VALDATA___V234*/ meltfptr[233] = (melt_ptr_t) & meltcdat->dsym_43__CLASS_ROOT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_43__CLASS_ROOT", @@ -7728,7 +7665,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*inistring dstr_44__CLASS_ROOT*/ - /*_._VALSTR___V234*/ meltfptr[233] = + /*_._VALSTR___V235*/ meltfptr[234] = (melt_ptr_t) & meltcdat->dstr_44__CLASS_ROOT; meltcdat->dstr_44__CLASS_ROOT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -7741,8 +7678,8 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*iniobj dsym_45__OUTPUT_C_DECLINIT*/ - /*uniqueobj*/ if (! /*_._VALDATA___V235*/ meltfptr[234]) -/*_._VALDATA___V235*/ meltfptr[234] = + /*uniqueobj*/ if (! /*_._VALDATA___V236*/ meltfptr[235]) +/*_._VALDATA___V236*/ meltfptr[235] = (melt_ptr_t) & meltcdat->dsym_45__OUTPUT_C_DECLINIT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_45__OUTPUT_C_DECLINIT", @@ -7762,7 +7699,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*inistring dstr_46__OUTPUT_C_DECLINIT*/ - /*_._VALSTR___V236*/ meltfptr[235] = + /*_._VALSTR___V237*/ meltfptr[236] = (melt_ptr_t) & meltcdat->dstr_46__OUTPUT_C_DECLINIT; meltcdat->dstr_46__OUTPUT_C_DECLINIT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -7774,7 +7711,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, meltcdat->dstr_46__OUTPUT_C_DECLINIT.slen = 17; /*inirout drout_47__OUTPUCOD_OBJINIELEM */ - /*_._VALROUT___V237*/ meltfptr[236] = + /*_._VALROUT___V238*/ meltfptr[237] = (melt_ptr_t) & meltcdat->drout_47__OUTPUCOD_OBJINIELEM; meltcdat->drout_47__OUTPUCOD_OBJINIELEM.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -7786,7 +7723,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, meltrout_7_WARMELTmiOUTOBJ_OUTPUCOD_OBJINIELEM); /*iniclos dclo_48__OUTPUCOD_OBJINIELEM */ - /*_._VALCLO___V238*/ meltfptr[237] = + /*_._VALCLO___V239*/ meltfptr[238] = (melt_ptr_t) & meltcdat->dclo_48__OUTPUCOD_OBJINIELEM; meltcdat->dclo_48__OUTPUCOD_OBJINIELEM.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -7794,8 +7731,8 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*iniobj dsym_49__CLASS_OBJINITELEM*/ - /*uniqueobj*/ if (! /*_._VALDATA___V239*/ meltfptr[238]) -/*_._VALDATA___V239*/ meltfptr[238] = + /*uniqueobj*/ if (! /*_._VALDATA___V240*/ meltfptr[239]) +/*_._VALDATA___V240*/ meltfptr[239] = (melt_ptr_t) & meltcdat->dsym_49__CLASS_OBJINITELEM; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_49__CLASS_OBJINITELEM", @@ -7815,7 +7752,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*inistring dstr_50__CLASS_OBJINITELEM*/ - /*_._VALSTR___V240*/ meltfptr[239] = + /*_._VALSTR___V241*/ meltfptr[240] = (melt_ptr_t) & meltcdat->dstr_50__CLASS_OBJINITELEM; meltcdat->dstr_50__CLASS_OBJINITELEM.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -7828,8 +7765,8 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*iniobj dsym_51__OUTPUT_C_CODE*/ - /*uniqueobj*/ if (! /*_._VALDATA___V241*/ meltfptr[240]) -/*_._VALDATA___V241*/ meltfptr[240] = + /*uniqueobj*/ if (! /*_._VALDATA___V242*/ meltfptr[241]) +/*_._VALDATA___V242*/ meltfptr[241] = (melt_ptr_t) & meltcdat->dsym_51__OUTPUT_C_CODE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_51__OUTPUT_C_CODE", @@ -7849,7 +7786,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*inistring dstr_52__OUTPUT_C_CODE*/ - /*_._VALSTR___V242*/ meltfptr[241] = + /*_._VALSTR___V243*/ meltfptr[242] = (melt_ptr_t) & meltcdat->dstr_52__OUTPUT_C_CODE; meltcdat->dstr_52__OUTPUT_C_CODE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -7861,7 +7798,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, meltcdat->dstr_52__OUTPUT_C_CODE.slen = 13; /*inirout drout_53__OUTCINITFILL_ROOT */ - /*_._VALROUT___V243*/ meltfptr[242] = + /*_._VALROUT___V244*/ meltfptr[243] = (melt_ptr_t) & meltcdat->drout_53__OUTCINITFILL_ROOT; meltcdat->drout_53__OUTCINITFILL_ROOT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -7873,7 +7810,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, meltrout_8_WARMELTmiOUTOBJ_OUTCINITFILL_ROOT); /*iniclos dclo_54__OUTCINITFILL_ROOT */ - /*_._VALCLO___V244*/ meltfptr[243] = + /*_._VALCLO___V245*/ meltfptr[244] = (melt_ptr_t) & meltcdat->dclo_54__OUTCINITFILL_ROOT; meltcdat->dclo_54__OUTCINITFILL_ROOT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -7881,8 +7818,8 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*iniobj dsym_55__OUTPUT_C_INITIAL_FILL*/ - /*uniqueobj*/ if (! /*_._VALDATA___V245*/ meltfptr[244]) -/*_._VALDATA___V245*/ meltfptr[244] = + /*uniqueobj*/ if (! /*_._VALDATA___V246*/ meltfptr[245]) +/*_._VALDATA___V246*/ meltfptr[245] = (melt_ptr_t) & meltcdat->dsym_55__OUTPUT_C_INITIAL_FILL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_55__OUTPUT_C_INITIAL_FILL", @@ -7902,7 +7839,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*inistring dstr_56__OUTPUT_C_INITIAL_FILL*/ - /*_._VALSTR___V246*/ meltfptr[245] = + /*_._VALSTR___V247*/ meltfptr[246] = (melt_ptr_t) & meltcdat->dstr_56__OUTPUT_C_INITIAL_FILL; meltcdat->dstr_56__OUTPUT_C_INITIAL_FILL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -7915,7 +7852,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, meltcdat->dstr_56__OUTPUT_C_INITIAL_FILL.slen = 21; /*inirout drout_57__OUTCINITPREDEF_ROOT */ - /*_._VALROUT___V247*/ meltfptr[246] = + /*_._VALROUT___V248*/ meltfptr[247] = (melt_ptr_t) & meltcdat->drout_57__OUTCINITPREDEF_ROOT; meltcdat->drout_57__OUTCINITPREDEF_ROOT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -7927,7 +7864,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, meltrout_9_WARMELTmiOUTOBJ_OUTCINITPREDEF_ROOT); /*iniclos dclo_58__OUTCINITPREDEF_ROOT */ - /*_._VALCLO___V248*/ meltfptr[247] = + /*_._VALCLO___V249*/ meltfptr[248] = (melt_ptr_t) & meltcdat->dclo_58__OUTCINITPREDEF_ROOT; meltcdat->dclo_58__OUTCINITPREDEF_ROOT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -7935,8 +7872,8 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*iniobj dsym_59__OUTPUT_C_INITIAL_PREDEF*/ - /*uniqueobj*/ if (! /*_._VALDATA___V249*/ meltfptr[248]) -/*_._VALDATA___V249*/ meltfptr[248] = + /*uniqueobj*/ if (! /*_._VALDATA___V250*/ meltfptr[249]) +/*_._VALDATA___V250*/ meltfptr[249] = (melt_ptr_t) & meltcdat->dsym_59__OUTPUT_C_INITIAL_PREDEF; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg @@ -7956,7 +7893,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*inistring dstr_60__OUTPUT_C_INITIAL_PREDEF*/ - /*_._VALSTR___V250*/ meltfptr[249] = + /*_._VALSTR___V251*/ meltfptr[250] = (melt_ptr_t) & meltcdat->dstr_60__OUTPUT_C_INITIAL_PREDEF; meltcdat->dstr_60__OUTPUT_C_INITIAL_PREDEF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -7969,7 +7906,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, meltcdat->dstr_60__OUTPUT_C_INITIAL_PREDEF.slen = 23; /*inirout drout_61__OUTPUT_PREDEF */ - /*_._VALROUT___V251*/ meltfptr[250] = + /*_._VALROUT___V252*/ meltfptr[251] = (melt_ptr_t) & meltcdat->drout_61__OUTPUT_PREDEF; meltcdat->drout_61__OUTPUT_PREDEF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -7980,7 +7917,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, meltrout_10_WARMELTmiOUTOBJ_OUTPUT_PREDEF); /*iniclos dclo_62__OUTPUT_PREDEF */ - /*_._VALCLO___V252*/ meltfptr[251] = + /*_._VALCLO___V253*/ meltfptr[252] = (melt_ptr_t) & meltcdat->dclo_62__OUTPUT_PREDEF; meltcdat->dclo_62__OUTPUT_PREDEF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -7988,8 +7925,8 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*iniobj dsym_63__OBPREDEF*/ - /*uniqueobj*/ if (! /*_._VALDATA___V253*/ meltfptr[252]) -/*_._VALDATA___V253*/ meltfptr[252] = + /*uniqueobj*/ if (! /*_._VALDATA___V254*/ meltfptr[253]) +/*_._VALDATA___V254*/ meltfptr[253] = (melt_ptr_t) & meltcdat->dsym_63__OBPREDEF; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_63__OBPREDEF", @@ -8009,7 +7946,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*inistring dstr_64__OBPREDEF*/ - /*_._VALSTR___V254*/ meltfptr[253] = + /*_._VALSTR___V255*/ meltfptr[254] = (melt_ptr_t) & meltcdat->dstr_64__OBPREDEF; meltcdat->dstr_64__OBPREDEF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -8019,7 +7956,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, meltcdat->dstr_64__OBPREDEF.slen = 8; /*inirout drout_65__OUTPUCOD_PREDEF */ - /*_._VALROUT___V255*/ meltfptr[254] = + /*_._VALROUT___V256*/ meltfptr[255] = (melt_ptr_t) & meltcdat->drout_65__OUTPUCOD_PREDEF; meltcdat->drout_65__OUTPUCOD_PREDEF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -8031,7 +7968,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, meltrout_11_WARMELTmiOUTOBJ_OUTPUCOD_PREDEF); /*iniclos dclo_66__OUTPUCOD_PREDEF */ - /*_._VALCLO___V256*/ meltfptr[255] = + /*_._VALCLO___V257*/ meltfptr[256] = (melt_ptr_t) & meltcdat->dclo_66__OUTPUCOD_PREDEF; meltcdat->dclo_66__OUTPUCOD_PREDEF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -8039,8 +7976,8 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*iniobj dsym_67__CLASS_OBJPREDEF*/ - /*uniqueobj*/ if (! /*_._VALDATA___V257*/ meltfptr[256]) -/*_._VALDATA___V257*/ meltfptr[256] = + /*uniqueobj*/ if (! /*_._VALDATA___V258*/ meltfptr[257]) +/*_._VALDATA___V258*/ meltfptr[257] = (melt_ptr_t) & meltcdat->dsym_67__CLASS_OBJPREDEF; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_67__CLASS_OBJPREDEF", @@ -8060,7 +7997,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*inistring dstr_68__CLASS_OBJPREDEF*/ - /*_._VALSTR___V258*/ meltfptr[257] = + /*_._VALSTR___V259*/ meltfptr[258] = (melt_ptr_t) & meltcdat->dstr_68__CLASS_OBJPREDEF; meltcdat->dstr_68__CLASS_OBJPREDEF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -8072,7 +8009,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, meltcdat->dstr_68__CLASS_OBJPREDEF.slen = 15; /*inirout drout_69__OUTPUCOD_NIL */ - /*_._VALROUT___V259*/ meltfptr[258] = + /*_._VALROUT___V260*/ meltfptr[259] = (melt_ptr_t) & meltcdat->drout_69__OUTPUCOD_NIL; meltcdat->drout_69__OUTPUCOD_NIL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -8083,7 +8020,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, meltrout_12_WARMELTmiOUTOBJ_OUTPUCOD_NIL); /*iniclos dclo_70__OUTPUCOD_NIL */ - /*_._VALCLO___V260*/ meltfptr[259] = + /*_._VALCLO___V261*/ meltfptr[260] = (melt_ptr_t) & meltcdat->dclo_70__OUTPUCOD_NIL; meltcdat->dclo_70__OUTPUCOD_NIL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -8091,8 +8028,8 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*iniobj dsym_71__CLASS_OBJNIL*/ - /*uniqueobj*/ if (! /*_._VALDATA___V261*/ meltfptr[260]) -/*_._VALDATA___V261*/ meltfptr[260] = + /*uniqueobj*/ if (! /*_._VALDATA___V262*/ meltfptr[261]) +/*_._VALDATA___V262*/ meltfptr[261] = (melt_ptr_t) & meltcdat->dsym_71__CLASS_OBJNIL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_71__CLASS_OBJNIL", @@ -8112,7 +8049,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*inistring dstr_72__CLASS_OBJNIL*/ - /*_._VALSTR___V262*/ meltfptr[261] = + /*_._VALSTR___V263*/ meltfptr[262] = (melt_ptr_t) & meltcdat->dstr_72__CLASS_OBJNIL; meltcdat->dstr_72__CLASS_OBJNIL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -8124,7 +8061,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, meltcdat->dstr_72__CLASS_OBJNIL.slen = 12; /*inirout drout_73__OUTPUCOD_OBJEXPANDPUREVAL */ - /*_._VALROUT___V263*/ meltfptr[262] = + /*_._VALROUT___V264*/ meltfptr[263] = (melt_ptr_t) & meltcdat->drout_73__OUTPUCOD_OBJEXPANDPUREVAL; meltcdat->drout_73__OUTPUCOD_OBJEXPANDPUREVAL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -8136,7 +8073,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, meltrout_13_WARMELTmiOUTOBJ_OUTPUCOD_OBJEXPANDPUREVAL); /*iniclos dclo_74__OUTPUCOD_OBJEXPANDPUREVAL */ - /*_._VALCLO___V270*/ meltfptr[269] = + /*_._VALCLO___V271*/ meltfptr[270] = (melt_ptr_t) & meltcdat->dclo_74__OUTPUCOD_OBJEXPANDPUREVAL; meltcdat->dclo_74__OUTPUCOD_OBJEXPANDPUREVAL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -8144,8 +8081,8 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*iniobj dsym_75__CLASS_OBJEXPANDPUREVAL*/ - /*uniqueobj*/ if (! /*_._VALDATA___V271*/ meltfptr[270]) -/*_._VALDATA___V271*/ meltfptr[270] = + /*uniqueobj*/ if (! /*_._VALDATA___V272*/ meltfptr[271]) +/*_._VALDATA___V272*/ meltfptr[271] = (melt_ptr_t) & meltcdat->dsym_75__CLASS_OBJEXPANDPUREVAL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg @@ -8165,7 +8102,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*inistring dstr_76__CLASS_OBJEXPANDPUREVAL*/ - /*_._VALSTR___V272*/ meltfptr[271] = + /*_._VALSTR___V273*/ meltfptr[272] = (melt_ptr_t) & meltcdat->dstr_76__CLASS_OBJEXPANDPUREVAL; meltcdat->dstr_76__CLASS_OBJEXPANDPUREVAL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -8179,8 +8116,8 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*iniobj dsym_77__CLASS_OBJVALUE*/ - /*uniqueobj*/ if (! /*_._VALDATA___V273*/ meltfptr[272]) -/*_._VALDATA___V273*/ meltfptr[272] = + /*uniqueobj*/ if (! /*_._VALDATA___V274*/ meltfptr[273]) +/*_._VALDATA___V274*/ meltfptr[273] = (melt_ptr_t) & meltcdat->dsym_77__CLASS_OBJVALUE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_77__CLASS_OBJVALUE", @@ -8200,7 +8137,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*inistring dstr_78__CLASS_OBJVALUE*/ - /*_._VALSTR___V274*/ meltfptr[273] = + /*_._VALSTR___V275*/ meltfptr[274] = (melt_ptr_t) & meltcdat->dstr_78__CLASS_OBJVALUE; meltcdat->dstr_78__CLASS_OBJVALUE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -8213,8 +8150,8 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*iniobj dsym_79__CLASS_CTYPE*/ - /*uniqueobj*/ if (! /*_._VALDATA___V275*/ meltfptr[274]) -/*_._VALDATA___V275*/ meltfptr[274] = + /*uniqueobj*/ if (! /*_._VALDATA___V276*/ meltfptr[275]) +/*_._VALDATA___V276*/ meltfptr[275] = (melt_ptr_t) & meltcdat->dsym_79__CLASS_CTYPE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_79__CLASS_CTYPE", @@ -8234,7 +8171,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*inistring dstr_80__CLASS_CTYPE*/ - /*_._VALSTR___V276*/ meltfptr[275] = + /*_._VALSTR___V277*/ meltfptr[276] = (melt_ptr_t) & meltcdat->dstr_80__CLASS_CTYPE; meltcdat->dstr_80__CLASS_CTYPE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -8247,8 +8184,8 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*iniobj dsym_81__CTYPE_VOID*/ - /*uniqueobj*/ if (! /*_._VALDATA___V277*/ meltfptr[276]) -/*_._VALDATA___V277*/ meltfptr[276] = + /*uniqueobj*/ if (! /*_._VALDATA___V278*/ meltfptr[277]) +/*_._VALDATA___V278*/ meltfptr[277] = (melt_ptr_t) & meltcdat->dsym_81__CTYPE_VOID; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_81__CTYPE_VOID", @@ -8268,7 +8205,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*inistring dstr_82__CTYPE_VOID*/ - /*_._VALSTR___V278*/ meltfptr[277] = + /*_._VALSTR___V279*/ meltfptr[278] = (melt_ptr_t) & meltcdat->dstr_82__CTYPE_VOID; meltcdat->dstr_82__CTYPE_VOID.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -8280,7 +8217,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, meltcdat->dstr_82__CTYPE_VOID.slen = 10; /*inirout drout_83__OUTPUCOD_OBJHOOKNTH */ - /*_._VALROUT___V279*/ meltfptr[278] = + /*_._VALROUT___V280*/ meltfptr[279] = (melt_ptr_t) & meltcdat->drout_83__OUTPUCOD_OBJHOOKNTH; meltcdat->drout_83__OUTPUCOD_OBJHOOKNTH.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -8292,7 +8229,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, meltrout_14_WARMELTmiOUTOBJ_OUTPUCOD_OBJHOOKNTH); /*iniclos dclo_84__OUTPUCOD_OBJHOOKNTH */ - /*_._VALCLO___V280*/ meltfptr[279] = + /*_._VALCLO___V281*/ meltfptr[280] = (melt_ptr_t) & meltcdat->dclo_84__OUTPUCOD_OBJHOOKNTH; meltcdat->dclo_84__OUTPUCOD_OBJHOOKNTH.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -8300,8 +8237,8 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*iniobj dsym_85__CLASS_OBJHOOKNTH*/ - /*uniqueobj*/ if (! /*_._VALDATA___V281*/ meltfptr[280]) -/*_._VALDATA___V281*/ meltfptr[280] = + /*uniqueobj*/ if (! /*_._VALDATA___V282*/ meltfptr[281]) +/*_._VALDATA___V282*/ meltfptr[281] = (melt_ptr_t) & meltcdat->dsym_85__CLASS_OBJHOOKNTH; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_85__CLASS_OBJHOOKNTH", @@ -8321,7 +8258,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*inistring dstr_86__CLASS_OBJHOOKNTH*/ - /*_._VALSTR___V282*/ meltfptr[281] = + /*_._VALSTR___V283*/ meltfptr[282] = (melt_ptr_t) & meltcdat->dstr_86__CLASS_OBJHOOKNTH; meltcdat->dstr_86__CLASS_OBJHOOKNTH.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -8334,8 +8271,8 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*iniobj dsym_87__CTYPE_VALUE*/ - /*uniqueobj*/ if (! /*_._VALDATA___V283*/ meltfptr[282]) -/*_._VALDATA___V283*/ meltfptr[282] = + /*uniqueobj*/ if (! /*_._VALDATA___V284*/ meltfptr[283]) +/*_._VALDATA___V284*/ meltfptr[283] = (melt_ptr_t) & meltcdat->dsym_87__CTYPE_VALUE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_87__CTYPE_VALUE", @@ -8355,7 +8292,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*inistring dstr_88__CTYPE_VALUE*/ - /*_._VALSTR___V284*/ meltfptr[283] = + /*_._VALSTR___V285*/ meltfptr[284] = (melt_ptr_t) & meltcdat->dstr_88__CTYPE_VALUE; meltcdat->dstr_88__CTYPE_VALUE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -8367,7 +8304,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, meltcdat->dstr_88__CTYPE_VALUE.slen = 11; /*inirout drout_89__OUTDECLINIT_OBJINITOBJECT */ - /*_._VALROUT___V285*/ meltfptr[284] = + /*_._VALROUT___V286*/ meltfptr[285] = (melt_ptr_t) & meltcdat->drout_89__OUTDECLINIT_OBJINITOBJECT; meltcdat->drout_89__OUTDECLINIT_OBJINITOBJECT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -8379,7 +8316,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, meltrout_15_WARMELTmiOUTOBJ_OUTDECLINIT_OBJINITOBJECT); /*iniclos dclo_90__OUTDECLINIT_OBJINITOBJECT */ - /*_._VALCLO___V286*/ meltfptr[285] = + /*_._VALCLO___V287*/ meltfptr[286] = (melt_ptr_t) & meltcdat->dclo_90__OUTDECLINIT_OBJINITOBJECT; meltcdat->dclo_90__OUTDECLINIT_OBJINITOBJECT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -8387,8 +8324,8 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*iniobj dsym_91__CLASS_OBJINITOBJECT*/ - /*uniqueobj*/ if (! /*_._VALDATA___V287*/ meltfptr[286]) -/*_._VALDATA___V287*/ meltfptr[286] = + /*uniqueobj*/ if (! /*_._VALDATA___V288*/ meltfptr[287]) +/*_._VALDATA___V288*/ meltfptr[287] = (melt_ptr_t) & meltcdat->dsym_91__CLASS_OBJINITOBJECT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_91__CLASS_OBJINITOBJECT", @@ -8408,7 +8345,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*inistring dstr_92__CLASS_OBJINITOBJECT*/ - /*_._VALSTR___V288*/ meltfptr[287] = + /*_._VALSTR___V289*/ meltfptr[288] = (melt_ptr_t) & meltcdat->dstr_92__CLASS_OBJINITOBJECT; meltcdat->dstr_92__CLASS_OBJINITOBJECT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -8421,7 +8358,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, meltcdat->dstr_92__CLASS_OBJINITOBJECT.slen = 19; /*inirout drout_93__OUTCINITFILL_OBJINITOBJECT */ - /*_._VALROUT___V289*/ meltfptr[288] = + /*_._VALROUT___V290*/ meltfptr[289] = (melt_ptr_t) & meltcdat->drout_93__OUTCINITFILL_OBJINITOBJECT; meltcdat->drout_93__OUTCINITFILL_OBJINITOBJECT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -8433,7 +8370,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, meltrout_16_WARMELTmiOUTOBJ_OUTCINITFILL_OBJINITOBJECT); /*iniclos dclo_94__OUTCINITFILL_OBJINITOBJECT */ - /*_._VALCLO___V290*/ meltfptr[289] = + /*_._VALCLO___V291*/ meltfptr[290] = (melt_ptr_t) & meltcdat->dclo_94__OUTCINITFILL_OBJINITOBJECT; meltcdat->dclo_94__OUTCINITFILL_OBJINITOBJECT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -8441,8 +8378,8 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*iniobj dsym_95__CLASS_NREP_DATAINSTANCE*/ - /*uniqueobj*/ if (! /*_._VALDATA___V291*/ meltfptr[290]) -/*_._VALDATA___V291*/ meltfptr[290] = + /*uniqueobj*/ if (! /*_._VALDATA___V292*/ meltfptr[291]) +/*_._VALDATA___V292*/ meltfptr[291] = (melt_ptr_t) & meltcdat->dsym_95__CLASS_NREP_DATAINSTANCE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg @@ -8462,7 +8399,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*inistring dstr_96__CLASS_NREP_DATAINSTANCE*/ - /*_._VALSTR___V292*/ meltfptr[291] = + /*_._VALSTR___V293*/ meltfptr[292] = (melt_ptr_t) & meltcdat->dstr_96__CLASS_NREP_DATAINSTANCE; meltcdat->dstr_96__CLASS_NREP_DATAINSTANCE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -8476,8 +8413,8 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*iniobj dsym_97__CLASS_CLASS*/ - /*uniqueobj*/ if (! /*_._VALDATA___V293*/ meltfptr[292]) -/*_._VALDATA___V293*/ meltfptr[292] = + /*uniqueobj*/ if (! /*_._VALDATA___V294*/ meltfptr[293]) +/*_._VALDATA___V294*/ meltfptr[293] = (melt_ptr_t) & meltcdat->dsym_97__CLASS_CLASS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_97__CLASS_CLASS", @@ -8497,7 +8434,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*inistring dstr_98__CLASS_CLASS*/ - /*_._VALSTR___V294*/ meltfptr[293] = + /*_._VALSTR___V295*/ meltfptr[294] = (melt_ptr_t) & meltcdat->dstr_98__CLASS_CLASS; meltcdat->dstr_98__CLASS_CLASS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -8510,8 +8447,8 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*iniobj dsym_99__CLASS_OBJINITUNIQUEOBJECT*/ - /*uniqueobj*/ if (! /*_._VALDATA___V295*/ meltfptr[294]) -/*_._VALDATA___V295*/ meltfptr[294] = + /*uniqueobj*/ if (! /*_._VALDATA___V296*/ meltfptr[295]) +/*_._VALDATA___V296*/ meltfptr[295] = (melt_ptr_t) & meltcdat->dsym_99__CLASS_OBJINITUNIQUEOBJECT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg @@ -8531,7 +8468,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*inistring dstr_100__CLASS_OBJINITUNIQUEOBJEC*/ - /*_._VALSTR___V296*/ meltfptr[295] = + /*_._VALSTR___V297*/ meltfptr[296] = (melt_ptr_t) & meltcdat->dstr_100__CLASS_OBJINITUNIQUEOBJEC; meltcdat->dstr_100__CLASS_OBJINITUNIQUEOBJEC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -8544,7 +8481,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, meltcdat->dstr_100__CLASS_OBJINITUNIQUEOBJEC.slen = 25; /*inirout drout_101__OUTCINITPREDEF_OBJINITOBJECT */ - /*_._VALROUT___V297*/ meltfptr[296] = + /*_._VALROUT___V298*/ meltfptr[297] = (melt_ptr_t) & meltcdat->drout_101__OUTCINITPREDEF_OBJINITOBJECT; meltcdat->drout_101__OUTCINITPREDEF_OBJINITOBJECT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -8557,7 +8494,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, meltrout_17_WARMELTmiOUTOBJ_OUTCINITPREDEF_OBJINITOBJECT); /*iniclos dclo_102__OUTCINITPREDEF_OBJINITOBJECT */ - /*_._VALCLO___V298*/ meltfptr[297] = + /*_._VALCLO___V299*/ meltfptr[298] = (melt_ptr_t) & meltcdat->dclo_102__OUTCINITPREDEF_OBJINITOBJECT; meltcdat->dclo_102__OUTCINITPREDEF_OBJINITOBJECT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -8565,8 +8502,8 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*iniobj dsym_103__CLASS_NREP_NIL*/ - /*uniqueobj*/ if (! /*_._VALDATA___V299*/ meltfptr[298]) -/*_._VALDATA___V299*/ meltfptr[298] = + /*uniqueobj*/ if (! /*_._VALDATA___V300*/ meltfptr[299]) +/*_._VALDATA___V300*/ meltfptr[299] = (melt_ptr_t) & meltcdat->dsym_103__CLASS_NREP_NIL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_103__CLASS_NREP_NIL", @@ -8586,7 +8523,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*inistring dstr_104__CLASS_NREP_NIL*/ - /*_._VALSTR___V300*/ meltfptr[299] = + /*_._VALSTR___V301*/ meltfptr[300] = (melt_ptr_t) & meltcdat->dstr_104__CLASS_NREP_NIL; meltcdat->dstr_104__CLASS_NREP_NIL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -8598,7 +8535,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, meltcdat->dstr_104__CLASS_NREP_NIL.slen = 14; /*inirout drout_105__OUTCINITPREDEF_OBJINITHOOK */ - /*_._VALROUT___V301*/ meltfptr[300] = + /*_._VALROUT___V302*/ meltfptr[301] = (melt_ptr_t) & meltcdat->drout_105__OUTCINITPREDEF_OBJINITHOOK; meltcdat->drout_105__OUTCINITPREDEF_OBJINITHOOK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -8610,7 +8547,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, meltrout_18_WARMELTmiOUTOBJ_OUTCINITPREDEF_OBJINITHOOK); /*iniclos dclo_106__OUTCINITPREDEF_OBJINITHOOK */ - /*_._VALCLO___V302*/ meltfptr[301] = + /*_._VALCLO___V303*/ meltfptr[302] = (melt_ptr_t) & meltcdat->dclo_106__OUTCINITPREDEF_OBJINITHOOK; meltcdat->dclo_106__OUTCINITPREDEF_OBJINITHOOK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -8618,8 +8555,8 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*iniobj dsym_107__CLASS_OBJINITHOOK*/ - /*uniqueobj*/ if (! /*_._VALDATA___V303*/ meltfptr[302]) -/*_._VALDATA___V303*/ meltfptr[302] = + /*uniqueobj*/ if (! /*_._VALDATA___V304*/ meltfptr[303]) +/*_._VALDATA___V304*/ meltfptr[303] = (melt_ptr_t) & meltcdat->dsym_107__CLASS_OBJINITHOOK; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_107__CLASS_OBJINITHOOK", @@ -8639,7 +8576,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*inistring dstr_108__CLASS_OBJINITHOOK*/ - /*_._VALSTR___V304*/ meltfptr[303] = + /*_._VALSTR___V305*/ meltfptr[304] = (melt_ptr_t) & meltcdat->dstr_108__CLASS_OBJINITHOOK; meltcdat->dstr_108__CLASS_OBJINITHOOK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -8652,8 +8589,8 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*iniobj dsym_109__CLASS_NREP*/ - /*uniqueobj*/ if (! /*_._VALDATA___V305*/ meltfptr[304]) -/*_._VALDATA___V305*/ meltfptr[304] = + /*uniqueobj*/ if (! /*_._VALDATA___V306*/ meltfptr[305]) +/*_._VALDATA___V306*/ meltfptr[305] = (melt_ptr_t) & meltcdat->dsym_109__CLASS_NREP; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_109__CLASS_NREP", @@ -8673,7 +8610,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*inistring dstr_110__CLASS_NREP*/ - /*_._VALSTR___V306*/ meltfptr[305] = + /*_._VALSTR___V307*/ meltfptr[306] = (melt_ptr_t) & meltcdat->dstr_110__CLASS_NREP; meltcdat->dstr_110__CLASS_NREP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -8685,7 +8622,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, meltcdat->dstr_110__CLASS_NREP.slen = 10; /*inirout drout_111__OUTDECLINIT_OBJINITMULTIPLE */ - /*_._VALROUT___V307*/ meltfptr[306] = + /*_._VALROUT___V308*/ meltfptr[307] = (melt_ptr_t) & meltcdat->drout_111__OUTDECLINIT_OBJINITMULTIPLE; meltcdat->drout_111__OUTDECLINIT_OBJINITMULTIPLE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -8698,7 +8635,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, meltrout_19_WARMELTmiOUTOBJ_OUTDECLINIT_OBJINITMULTIPLE); /*iniclos dclo_112__OUTDECLINIT_OBJINITMULTIPLE */ - /*_._VALCLO___V308*/ meltfptr[307] = + /*_._VALCLO___V309*/ meltfptr[308] = (melt_ptr_t) & meltcdat->dclo_112__OUTDECLINIT_OBJINITMULTIPLE; meltcdat->dclo_112__OUTDECLINIT_OBJINITMULTIPLE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -8706,8 +8643,8 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*iniobj dsym_113__CLASS_OBJINITMULTIPLE*/ - /*uniqueobj*/ if (! /*_._VALDATA___V309*/ meltfptr[308]) -/*_._VALDATA___V309*/ meltfptr[308] = + /*uniqueobj*/ if (! /*_._VALDATA___V310*/ meltfptr[309]) +/*_._VALDATA___V310*/ meltfptr[309] = (melt_ptr_t) & meltcdat->dsym_113__CLASS_OBJINITMULTIPLE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg @@ -8727,7 +8664,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*inistring dstr_114__CLASS_OBJINITMULTIPLE*/ - /*_._VALSTR___V310*/ meltfptr[309] = + /*_._VALSTR___V311*/ meltfptr[310] = (melt_ptr_t) & meltcdat->dstr_114__CLASS_OBJINITMULTIPLE; meltcdat->dstr_114__CLASS_OBJINITMULTIPLE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -8740,7 +8677,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, meltcdat->dstr_114__CLASS_OBJINITMULTIPLE.slen = 21; /*inirout drout_115__OUTCINITFILL_OBJINITMULTIPLE */ - /*_._VALROUT___V311*/ meltfptr[310] = + /*_._VALROUT___V312*/ meltfptr[311] = (melt_ptr_t) & meltcdat->drout_115__OUTCINITFILL_OBJINITMULTIPLE; meltcdat->drout_115__OUTCINITFILL_OBJINITMULTIPLE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -8753,14 +8690,14 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, meltrout_20_WARMELTmiOUTOBJ_OUTCINITFILL_OBJINITMULTIPLE); /*iniclos dclo_116__OUTCINITFILL_OBJINITMULTIPLE */ - /*_._VALCLO___V312*/ meltfptr[311] = + /*_._VALCLO___V313*/ meltfptr[312] = (melt_ptr_t) & meltcdat->dclo_116__OUTCINITFILL_OBJINITMULTIPLE; meltcdat->dclo_116__OUTCINITFILL_OBJINITMULTIPLE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); meltcdat->dclo_116__OUTCINITFILL_OBJINITMULTIPLE.nbval = 0; /*inirout drout_117__OUTDECLINIT_OBJINITCLOSURE */ - /*_._VALROUT___V313*/ meltfptr[312] = + /*_._VALROUT___V314*/ meltfptr[313] = (melt_ptr_t) & meltcdat->drout_117__OUTDECLINIT_OBJINITCLOSURE; meltcdat->drout_117__OUTDECLINIT_OBJINITCLOSURE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -8772,7 +8709,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, meltrout_21_WARMELTmiOUTOBJ_OUTDECLINIT_OBJINITCLOSURE); /*iniclos dclo_118__OUTDECLINIT_OBJINITCLOSURE */ - /*_._VALCLO___V314*/ meltfptr[313] = + /*_._VALCLO___V315*/ meltfptr[314] = (melt_ptr_t) & meltcdat->dclo_118__OUTDECLINIT_OBJINITCLOSURE; meltcdat->dclo_118__OUTDECLINIT_OBJINITCLOSURE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -8780,8 +8717,8 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*iniobj dsym_119__CLASS_OBJINITCLOSURE*/ - /*uniqueobj*/ if (! /*_._VALDATA___V315*/ meltfptr[314]) -/*_._VALDATA___V315*/ meltfptr[314] = + /*uniqueobj*/ if (! /*_._VALDATA___V316*/ meltfptr[315]) +/*_._VALDATA___V316*/ meltfptr[315] = (melt_ptr_t) & meltcdat->dsym_119__CLASS_OBJINITCLOSURE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_119__CLASS_OBJINITCLOSURE", @@ -8801,7 +8738,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*inistring dstr_120__CLASS_OBJINITCLOSURE*/ - /*_._VALSTR___V316*/ meltfptr[315] = + /*_._VALSTR___V317*/ meltfptr[316] = (melt_ptr_t) & meltcdat->dstr_120__CLASS_OBJINITCLOSURE; meltcdat->dstr_120__CLASS_OBJINITCLOSURE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -8814,7 +8751,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, meltcdat->dstr_120__CLASS_OBJINITCLOSURE.slen = 20; /*inirout drout_121__OUTCINITFILL_OBJINITCLOSURE */ - /*_._VALROUT___V317*/ meltfptr[316] = + /*_._VALROUT___V318*/ meltfptr[317] = (melt_ptr_t) & meltcdat->drout_121__OUTCINITFILL_OBJINITCLOSURE; meltcdat->drout_121__OUTCINITFILL_OBJINITCLOSURE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -8827,14 +8764,14 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, meltrout_22_WARMELTmiOUTOBJ_OUTCINITFILL_OBJINITCLOSURE); /*iniclos dclo_122__OUTCINITFILL_OBJINITCLOSURE */ - /*_._VALCLO___V318*/ meltfptr[317] = + /*_._VALCLO___V319*/ meltfptr[318] = (melt_ptr_t) & meltcdat->dclo_122__OUTCINITFILL_OBJINITCLOSURE; meltcdat->dclo_122__OUTCINITFILL_OBJINITCLOSURE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); meltcdat->dclo_122__OUTCINITFILL_OBJINITCLOSURE.nbval = 0; /*inirout drout_123__OUTDECLINIT_OBJINITROUTINE */ - /*_._VALROUT___V319*/ meltfptr[318] = + /*_._VALROUT___V320*/ meltfptr[319] = (melt_ptr_t) & meltcdat->drout_123__OUTDECLINIT_OBJINITROUTINE; meltcdat->drout_123__OUTDECLINIT_OBJINITROUTINE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -8846,7 +8783,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, meltrout_23_WARMELTmiOUTOBJ_OUTDECLINIT_OBJINITROUTINE); /*iniclos dclo_124__OUTDECLINIT_OBJINITROUTINE */ - /*_._VALCLO___V320*/ meltfptr[319] = + /*_._VALCLO___V321*/ meltfptr[320] = (melt_ptr_t) & meltcdat->dclo_124__OUTDECLINIT_OBJINITROUTINE; meltcdat->dclo_124__OUTDECLINIT_OBJINITROUTINE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -8854,8 +8791,8 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*iniobj dsym_125__CLASS_OBJINITROUTINE*/ - /*uniqueobj*/ if (! /*_._VALDATA___V321*/ meltfptr[320]) -/*_._VALDATA___V321*/ meltfptr[320] = + /*uniqueobj*/ if (! /*_._VALDATA___V322*/ meltfptr[321]) +/*_._VALDATA___V322*/ meltfptr[321] = (melt_ptr_t) & meltcdat->dsym_125__CLASS_OBJINITROUTINE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_125__CLASS_OBJINITROUTINE", @@ -8875,7 +8812,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*inistring dstr_126__CLASS_OBJINITROUTINE*/ - /*_._VALSTR___V322*/ meltfptr[321] = + /*_._VALSTR___V323*/ meltfptr[322] = (melt_ptr_t) & meltcdat->dstr_126__CLASS_OBJINITROUTINE; meltcdat->dstr_126__CLASS_OBJINITROUTINE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -8888,7 +8825,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, meltcdat->dstr_126__CLASS_OBJINITROUTINE.slen = 20; /*inirout drout_127__OUTCINITFILL_OBJINITROUTINE */ - /*_._VALROUT___V323*/ meltfptr[322] = + /*_._VALROUT___V324*/ meltfptr[323] = (melt_ptr_t) & meltcdat->drout_127__OUTCINITFILL_OBJINITROUTINE; meltcdat->drout_127__OUTCINITFILL_OBJINITROUTINE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -8901,7 +8838,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, meltrout_24_WARMELTmiOUTOBJ_OUTCINITFILL_OBJINITROUTINE); /*iniclos dclo_128__OUTCINITFILL_OBJINITROUTINE */ - /*_._VALCLO___V324*/ meltfptr[323] = + /*_._VALCLO___V325*/ meltfptr[324] = (melt_ptr_t) & meltcdat->dclo_128__OUTCINITFILL_OBJINITROUTINE; meltcdat->dclo_128__OUTCINITFILL_OBJINITROUTINE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -8909,8 +8846,8 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*iniobj dsym_129__CLASS_NREP_DATAROUTINE*/ - /*uniqueobj*/ if (! /*_._VALDATA___V325*/ meltfptr[324]) -/*_._VALDATA___V325*/ meltfptr[324] = + /*uniqueobj*/ if (! /*_._VALDATA___V326*/ meltfptr[325]) +/*_._VALDATA___V326*/ meltfptr[325] = (melt_ptr_t) & meltcdat->dsym_129__CLASS_NREP_DATAROUTINE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg @@ -8930,7 +8867,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*inistring dstr_130__CLASS_NREP_DATAROUTINE*/ - /*_._VALSTR___V326*/ meltfptr[325] = + /*_._VALSTR___V327*/ meltfptr[326] = (melt_ptr_t) & meltcdat->dstr_130__CLASS_NREP_DATAROUTINE; meltcdat->dstr_130__CLASS_NREP_DATAROUTINE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -8944,8 +8881,8 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*iniobj dsym_131__CLASS_NREP_ROUTPROC*/ - /*uniqueobj*/ if (! /*_._VALDATA___V327*/ meltfptr[326]) -/*_._VALDATA___V327*/ meltfptr[326] = + /*uniqueobj*/ if (! /*_._VALDATA___V328*/ meltfptr[327]) +/*_._VALDATA___V328*/ meltfptr[327] = (melt_ptr_t) & meltcdat->dsym_131__CLASS_NREP_ROUTPROC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_131__CLASS_NREP_ROUTPROC", @@ -8965,7 +8902,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*inistring dstr_132__CLASS_NREP_ROUTPROC*/ - /*_._VALSTR___V328*/ meltfptr[327] = + /*_._VALSTR___V329*/ meltfptr[328] = (melt_ptr_t) & meltcdat->dstr_132__CLASS_NREP_ROUTPROC; meltcdat->dstr_132__CLASS_NREP_ROUTPROC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -8978,7 +8915,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, meltcdat->dstr_132__CLASS_NREP_ROUTPROC.slen = 19; /*inirout drout_133__OUTDECLINIT_OBJINITHOOK */ - /*_._VALROUT___V329*/ meltfptr[328] = + /*_._VALROUT___V330*/ meltfptr[329] = (melt_ptr_t) & meltcdat->drout_133__OUTDECLINIT_OBJINITHOOK; meltcdat->drout_133__OUTDECLINIT_OBJINITHOOK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -8990,14 +8927,14 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, meltrout_25_WARMELTmiOUTOBJ_OUTDECLINIT_OBJINITHOOK); /*iniclos dclo_134__OUTDECLINIT_OBJINITHOOK */ - /*_._VALCLO___V330*/ meltfptr[329] = + /*_._VALCLO___V331*/ meltfptr[330] = (melt_ptr_t) & meltcdat->dclo_134__OUTDECLINIT_OBJINITHOOK; meltcdat->dclo_134__OUTDECLINIT_OBJINITHOOK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); meltcdat->dclo_134__OUTDECLINIT_OBJINITHOOK.nbval = 0; /*inirout drout_135__OUTCINITFILL_OBJINITHOOK */ - /*_._VALROUT___V331*/ meltfptr[330] = + /*_._VALROUT___V332*/ meltfptr[331] = (melt_ptr_t) & meltcdat->drout_135__OUTCINITFILL_OBJINITHOOK; meltcdat->drout_135__OUTCINITFILL_OBJINITHOOK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -9009,49 +8946,49 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, meltrout_26_WARMELTmiOUTOBJ_OUTCINITFILL_OBJINITHOOK); /*iniclos dclo_136__OUTCINITFILL_OBJINITHOOK */ - /*_._VALCLO___V332*/ meltfptr[331] = + /*_._VALCLO___V333*/ meltfptr[332] = (melt_ptr_t) & meltcdat->dclo_136__OUTCINITFILL_OBJINITHOOK; meltcdat->dclo_136__OUTCINITFILL_OBJINITHOOK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); meltcdat->dclo_136__OUTCINITFILL_OBJINITHOOK.nbval = 0; -/*iniobj dsym_137__CLASS_NREP_HOOKPROC*/ - /*uniqueobj*/ if (! /*_._VALDATA___V333*/ meltfptr[332]) -/*_._VALDATA___V333*/ meltfptr[332] = - (melt_ptr_t) & meltcdat->dsym_137__CLASS_NREP_HOOKPROC; +/*iniobj dsym_137__CLASS_NREP_CLOSPROC*/ + /*uniqueobj*/ if (! /*_._VALDATA___V334*/ meltfptr[333]) +/*_._VALDATA___V334*/ meltfptr[333] = + (melt_ptr_t) & meltcdat->dsym_137__CLASS_NREP_CLOSPROC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_137__CLASS_NREP_HOOKPROC", + melt_assertmsg ("iniobj check.discr isobj dsym_137__CLASS_NREP_CLOSPROC", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr objmagic dsym_137__CLASS_NREP_HOOKPROC", + ("iniobj check.discr objmagic dsym_137__CLASS_NREP_CLOSPROC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_137__CLASS_NREP_HOOKPROC.meltobj_class = + meltcdat->dsym_137__CLASS_NREP_CLOSPROC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_137__CLASS_NREP_HOOKPROC.obj_hash = 999315103; - meltcdat->dsym_137__CLASS_NREP_HOOKPROC.obj_len = 3; + meltcdat->dsym_137__CLASS_NREP_CLOSPROC.obj_hash = 932387045; + meltcdat->dsym_137__CLASS_NREP_CLOSPROC.obj_len = 3; -/*inistring dstr_138__CLASS_NREP_HOOKPROC*/ - /*_._VALSTR___V334*/ meltfptr[333] = - (melt_ptr_t) & meltcdat->dstr_138__CLASS_NREP_HOOKPROC; - meltcdat->dstr_138__CLASS_NREP_HOOKPROC.discr = +/*inistring dstr_138__CLASS_NREP_CLOSPROC*/ + /*_._VALSTR___V335*/ meltfptr[334] = + (melt_ptr_t) & meltcdat->dstr_138__CLASS_NREP_CLOSPROC; + meltcdat->dstr_138__CLASS_NREP_CLOSPROC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_138__CLASS_NREP_HOOKPROC.val, - "CLASS_NREP_HOOKPROC", + /*small inistring */ strncpy (meltcdat->dstr_138__CLASS_NREP_CLOSPROC.val, + "CLASS_NREP_CLOSPROC", sizeof (meltcdat-> - dstr_138__CLASS_NREP_HOOKPROC.val) - + dstr_138__CLASS_NREP_CLOSPROC.val) - 1); - meltcdat->dstr_138__CLASS_NREP_HOOKPROC.val[19] = (char) 0; - meltcdat->dstr_138__CLASS_NREP_HOOKPROC.slen = 19; + meltcdat->dstr_138__CLASS_NREP_CLOSPROC.val[19] = (char) 0; + meltcdat->dstr_138__CLASS_NREP_CLOSPROC.slen = 19; /*inirout drout_139__OUTDECLINIT_OBJINITSTRING */ - /*_._VALROUT___V335*/ meltfptr[334] = + /*_._VALROUT___V336*/ meltfptr[335] = (melt_ptr_t) & meltcdat->drout_139__OUTDECLINIT_OBJINITSTRING; meltcdat->drout_139__OUTDECLINIT_OBJINITSTRING.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -9063,7 +9000,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, meltrout_27_WARMELTmiOUTOBJ_OUTDECLINIT_OBJINITSTRING); /*iniclos dclo_140__OUTDECLINIT_OBJINITSTRING */ - /*_._VALCLO___V336*/ meltfptr[335] = + /*_._VALCLO___V337*/ meltfptr[336] = (melt_ptr_t) & meltcdat->dclo_140__OUTDECLINIT_OBJINITSTRING; meltcdat->dclo_140__OUTDECLINIT_OBJINITSTRING.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -9071,8 +9008,8 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*iniobj dsym_141__CLASS_OBJINITSTRING*/ - /*uniqueobj*/ if (! /*_._VALDATA___V337*/ meltfptr[336]) -/*_._VALDATA___V337*/ meltfptr[336] = + /*uniqueobj*/ if (! /*_._VALDATA___V338*/ meltfptr[337]) +/*_._VALDATA___V338*/ meltfptr[337] = (melt_ptr_t) & meltcdat->dsym_141__CLASS_OBJINITSTRING; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_141__CLASS_OBJINITSTRING", @@ -9092,7 +9029,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*inistring dstr_142__CLASS_OBJINITSTRING*/ - /*_._VALSTR___V338*/ meltfptr[337] = + /*_._VALSTR___V339*/ meltfptr[338] = (melt_ptr_t) & meltcdat->dstr_142__CLASS_OBJINITSTRING; meltcdat->dstr_142__CLASS_OBJINITSTRING.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -9105,7 +9042,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, meltcdat->dstr_142__CLASS_OBJINITSTRING.slen = 19; /*inirout drout_143__OUTCINITFILL_OBJINITSTRING */ - /*_._VALROUT___V339*/ meltfptr[338] = + /*_._VALROUT___V340*/ meltfptr[339] = (melt_ptr_t) & meltcdat->drout_143__OUTCINITFILL_OBJINITSTRING; meltcdat->drout_143__OUTCINITFILL_OBJINITSTRING.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -9117,14 +9054,14 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, meltrout_28_WARMELTmiOUTOBJ_OUTCINITFILL_OBJINITSTRING); /*iniclos dclo_144__OUTCINITFILL_OBJINITSTRING */ - /*_._VALCLO___V340*/ meltfptr[339] = + /*_._VALCLO___V341*/ meltfptr[340] = (melt_ptr_t) & meltcdat->dclo_144__OUTCINITFILL_OBJINITSTRING; meltcdat->dclo_144__OUTCINITFILL_OBJINITSTRING.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); meltcdat->dclo_144__OUTCINITFILL_OBJINITSTRING.nbval = 0; /*inirout drout_145__OUTDECLINIT_OBJINITBOXEDINTEGER */ - /*_._VALROUT___V341*/ meltfptr[340] = + /*_._VALROUT___V342*/ meltfptr[341] = (melt_ptr_t) & meltcdat->drout_145__OUTDECLINIT_OBJINITBOXEDINTEGER; meltcdat->drout_145__OUTDECLINIT_OBJINITBOXEDINTEGER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -9137,7 +9074,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, meltrout_29_WARMELTmiOUTOBJ_OUTDECLINIT_OBJINITBOXEDINTEGER); /*iniclos dclo_146__OUTDECLINIT_OBJINITBOXEDINTEGER */ - /*_._VALCLO___V342*/ meltfptr[341] = + /*_._VALCLO___V343*/ meltfptr[342] = (melt_ptr_t) & meltcdat->dclo_146__OUTDECLINIT_OBJINITBOXEDINTEGER; meltcdat->dclo_146__OUTDECLINIT_OBJINITBOXEDINTEGER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -9145,8 +9082,8 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*iniobj dsym_147__CLASS_OBJINITBOXINTEGER*/ - /*uniqueobj*/ if (! /*_._VALDATA___V343*/ meltfptr[342]) -/*_._VALDATA___V343*/ meltfptr[342] = + /*uniqueobj*/ if (! /*_._VALDATA___V344*/ meltfptr[343]) +/*_._VALDATA___V344*/ meltfptr[343] = (melt_ptr_t) & meltcdat->dsym_147__CLASS_OBJINITBOXINTEGER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg @@ -9166,7 +9103,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*inistring dstr_148__CLASS_OBJINITBOXINTEGER*/ - /*_._VALSTR___V344*/ meltfptr[343] = + /*_._VALSTR___V345*/ meltfptr[344] = (melt_ptr_t) & meltcdat->dstr_148__CLASS_OBJINITBOXINTEGER; meltcdat->dstr_148__CLASS_OBJINITBOXINTEGER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -9179,7 +9116,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, meltcdat->dstr_148__CLASS_OBJINITBOXINTEGER.slen = 23; /*inirout drout_149__OUTCINITFILL_OBJINITBOXEDINTEGER */ - /*_._VALROUT___V345*/ meltfptr[344] = + /*_._VALROUT___V346*/ meltfptr[345] = (melt_ptr_t) & meltcdat->drout_149__OUTCINITFILL_OBJINITBOXEDINTEGER; meltcdat->drout_149__OUTCINITFILL_OBJINITBOXEDINTEGER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -9192,14 +9129,14 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, meltrout_30_WARMELTmiOUTOBJ_OUTCINITFILL_OBJINITBOXEDINTEGER); /*iniclos dclo_150__OUTCINITFILL_OBJINITBOXEDINTEGER */ - /*_._VALCLO___V346*/ meltfptr[345] = + /*_._VALCLO___V347*/ meltfptr[346] = (melt_ptr_t) & meltcdat->dclo_150__OUTCINITFILL_OBJINITBOXEDINTEGER; meltcdat->dclo_150__OUTCINITFILL_OBJINITBOXEDINTEGER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); meltcdat->dclo_150__OUTCINITFILL_OBJINITBOXEDINTEGER.nbval = 0; /*inirout drout_151__OUTDECLINIT_OBJINITPAIR */ - /*_._VALROUT___V347*/ meltfptr[346] = + /*_._VALROUT___V348*/ meltfptr[347] = (melt_ptr_t) & meltcdat->drout_151__OUTDECLINIT_OBJINITPAIR; meltcdat->drout_151__OUTDECLINIT_OBJINITPAIR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -9211,7 +9148,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, meltrout_31_WARMELTmiOUTOBJ_OUTDECLINIT_OBJINITPAIR); /*iniclos dclo_152__OUTDECLINIT_OBJINITPAIR */ - /*_._VALCLO___V348*/ meltfptr[347] = + /*_._VALCLO___V349*/ meltfptr[348] = (melt_ptr_t) & meltcdat->dclo_152__OUTDECLINIT_OBJINITPAIR; meltcdat->dclo_152__OUTDECLINIT_OBJINITPAIR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -9219,8 +9156,8 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*iniobj dsym_153__CLASS_OBJINITPAIR*/ - /*uniqueobj*/ if (! /*_._VALDATA___V349*/ meltfptr[348]) -/*_._VALDATA___V349*/ meltfptr[348] = + /*uniqueobj*/ if (! /*_._VALDATA___V350*/ meltfptr[349]) +/*_._VALDATA___V350*/ meltfptr[349] = (melt_ptr_t) & meltcdat->dsym_153__CLASS_OBJINITPAIR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_153__CLASS_OBJINITPAIR", @@ -9240,7 +9177,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*inistring dstr_154__CLASS_OBJINITPAIR*/ - /*_._VALSTR___V350*/ meltfptr[349] = + /*_._VALSTR___V351*/ meltfptr[350] = (melt_ptr_t) & meltcdat->dstr_154__CLASS_OBJINITPAIR; meltcdat->dstr_154__CLASS_OBJINITPAIR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -9252,7 +9189,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, meltcdat->dstr_154__CLASS_OBJINITPAIR.slen = 17; /*inirout drout_155__OUTCINITFILL_OBJINITPAIR */ - /*_._VALROUT___V351*/ meltfptr[350] = + /*_._VALROUT___V352*/ meltfptr[351] = (melt_ptr_t) & meltcdat->drout_155__OUTCINITFILL_OBJINITPAIR; meltcdat->drout_155__OUTCINITFILL_OBJINITPAIR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -9264,14 +9201,14 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, meltrout_32_WARMELTmiOUTOBJ_OUTCINITFILL_OBJINITPAIR); /*iniclos dclo_156__OUTCINITFILL_OBJINITPAIR */ - /*_._VALCLO___V352*/ meltfptr[351] = + /*_._VALCLO___V353*/ meltfptr[352] = (melt_ptr_t) & meltcdat->dclo_156__OUTCINITFILL_OBJINITPAIR; meltcdat->dclo_156__OUTCINITFILL_OBJINITPAIR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); meltcdat->dclo_156__OUTCINITFILL_OBJINITPAIR.nbval = 0; /*inirout drout_157__OUTDECLINIT_OBJINITLIST */ - /*_._VALROUT___V353*/ meltfptr[352] = + /*_._VALROUT___V354*/ meltfptr[353] = (melt_ptr_t) & meltcdat->drout_157__OUTDECLINIT_OBJINITLIST; meltcdat->drout_157__OUTDECLINIT_OBJINITLIST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -9283,7 +9220,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, meltrout_33_WARMELTmiOUTOBJ_OUTDECLINIT_OBJINITLIST); /*iniclos dclo_158__OUTDECLINIT_OBJINITLIST */ - /*_._VALCLO___V354*/ meltfptr[353] = + /*_._VALCLO___V355*/ meltfptr[354] = (melt_ptr_t) & meltcdat->dclo_158__OUTDECLINIT_OBJINITLIST; meltcdat->dclo_158__OUTDECLINIT_OBJINITLIST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -9291,8 +9228,8 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*iniobj dsym_159__CLASS_OBJINITLIST*/ - /*uniqueobj*/ if (! /*_._VALDATA___V355*/ meltfptr[354]) -/*_._VALDATA___V355*/ meltfptr[354] = + /*uniqueobj*/ if (! /*_._VALDATA___V356*/ meltfptr[355]) +/*_._VALDATA___V356*/ meltfptr[355] = (melt_ptr_t) & meltcdat->dsym_159__CLASS_OBJINITLIST; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_159__CLASS_OBJINITLIST", @@ -9312,7 +9249,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*inistring dstr_160__CLASS_OBJINITLIST*/ - /*_._VALSTR___V356*/ meltfptr[355] = + /*_._VALSTR___V357*/ meltfptr[356] = (melt_ptr_t) & meltcdat->dstr_160__CLASS_OBJINITLIST; meltcdat->dstr_160__CLASS_OBJINITLIST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -9324,7 +9261,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, meltcdat->dstr_160__CLASS_OBJINITLIST.slen = 17; /*inirout drout_161__OUTCINITFILL_OBJINITLIST */ - /*_._VALROUT___V357*/ meltfptr[356] = + /*_._VALROUT___V358*/ meltfptr[357] = (melt_ptr_t) & meltcdat->drout_161__OUTCINITFILL_OBJINITLIST; meltcdat->drout_161__OUTCINITFILL_OBJINITLIST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -9336,14 +9273,14 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, meltrout_34_WARMELTmiOUTOBJ_OUTCINITFILL_OBJINITLIST); /*iniclos dclo_162__OUTCINITFILL_OBJINITLIST */ - /*_._VALCLO___V358*/ meltfptr[357] = + /*_._VALCLO___V359*/ meltfptr[358] = (melt_ptr_t) & meltcdat->dclo_162__OUTCINITFILL_OBJINITLIST; meltcdat->dclo_162__OUTCINITFILL_OBJINITLIST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); meltcdat->dclo_162__OUTCINITFILL_OBJINITLIST.nbval = 0; /*inirout drout_163__OUTPUCOD_ANYDISCR */ - /*_._VALROUT___V359*/ meltfptr[358] = + /*_._VALROUT___V360*/ meltfptr[359] = (melt_ptr_t) & meltcdat->drout_163__OUTPUCOD_ANYDISCR; meltcdat->drout_163__OUTPUCOD_ANYDISCR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -9355,7 +9292,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, meltrout_35_WARMELTmiOUTOBJ_OUTPUCOD_ANYDISCR); /*iniclos dclo_164__OUTPUCOD_ANYDISCR */ - /*_._VALCLO___V360*/ meltfptr[359] = + /*_._VALCLO___V361*/ meltfptr[360] = (melt_ptr_t) & meltcdat->dclo_164__OUTPUCOD_ANYDISCR; meltcdat->dclo_164__OUTPUCOD_ANYDISCR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -9363,8 +9300,8 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*iniobj dsym_165__DISCR_ANY_RECEIVER*/ - /*uniqueobj*/ if (! /*_._VALDATA___V361*/ meltfptr[360]) -/*_._VALDATA___V361*/ meltfptr[360] = + /*uniqueobj*/ if (! /*_._VALDATA___V362*/ meltfptr[361]) +/*_._VALDATA___V362*/ meltfptr[361] = (melt_ptr_t) & meltcdat->dsym_165__DISCR_ANY_RECEIVER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_165__DISCR_ANY_RECEIVER", @@ -9384,7 +9321,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*inistring dstr_166__DISCR_ANY_RECEIVER*/ - /*_._VALSTR___V362*/ meltfptr[361] = + /*_._VALSTR___V363*/ meltfptr[362] = (melt_ptr_t) & meltcdat->dstr_166__DISCR_ANY_RECEIVER; meltcdat->dstr_166__DISCR_ANY_RECEIVER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -9397,7 +9334,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, meltcdat->dstr_166__DISCR_ANY_RECEIVER.slen = 18; /*inirout drout_167__OUTPUCOD_NULL */ - /*_._VALROUT___V363*/ meltfptr[362] = + /*_._VALROUT___V364*/ meltfptr[363] = (melt_ptr_t) & meltcdat->drout_167__OUTPUCOD_NULL; meltcdat->drout_167__OUTPUCOD_NULL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -9408,7 +9345,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, meltrout_36_WARMELTmiOUTOBJ_OUTPUCOD_NULL); /*iniclos dclo_168__OUTPUCOD_NULL */ - /*_._VALCLO___V364*/ meltfptr[363] = + /*_._VALCLO___V365*/ meltfptr[364] = (melt_ptr_t) & meltcdat->dclo_168__OUTPUCOD_NULL; meltcdat->dclo_168__OUTPUCOD_NULL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -9416,8 +9353,8 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*iniobj dsym_169__DISCR_NULL_RECEIVER*/ - /*uniqueobj*/ if (! /*_._VALDATA___V365*/ meltfptr[364]) -/*_._VALDATA___V365*/ meltfptr[364] = + /*uniqueobj*/ if (! /*_._VALDATA___V366*/ meltfptr[365]) +/*_._VALDATA___V366*/ meltfptr[365] = (melt_ptr_t) & meltcdat->dsym_169__DISCR_NULL_RECEIVER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_169__DISCR_NULL_RECEIVER", @@ -9437,7 +9374,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*inistring dstr_170__DISCR_NULL_RECEIVER*/ - /*_._VALSTR___V366*/ meltfptr[365] = + /*_._VALSTR___V367*/ meltfptr[366] = (melt_ptr_t) & meltcdat->dstr_170__DISCR_NULL_RECEIVER; meltcdat->dstr_170__DISCR_NULL_RECEIVER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -9450,7 +9387,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, meltcdat->dstr_170__DISCR_NULL_RECEIVER.slen = 19; /*inirout drout_171__OUTPUCOD_CATCHALL_ROOT */ - /*_._VALROUT___V367*/ meltfptr[366] = + /*_._VALROUT___V368*/ meltfptr[367] = (melt_ptr_t) & meltcdat->drout_171__OUTPUCOD_CATCHALL_ROOT; meltcdat->drout_171__OUTPUCOD_CATCHALL_ROOT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -9462,7 +9399,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, meltrout_37_WARMELTmiOUTOBJ_OUTPUCOD_CATCHALL_ROOT); /*iniclos dclo_172__OUTPUCOD_CATCHALL_ROOT */ - /*_._VALCLO___V368*/ meltfptr[367] = + /*_._VALCLO___V369*/ meltfptr[368] = (melt_ptr_t) & meltcdat->dclo_172__OUTPUCOD_CATCHALL_ROOT; meltcdat->dclo_172__OUTPUCOD_CATCHALL_ROOT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -9470,8 +9407,8 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*iniobj dsym_173__DISPLAY_DEBUG_MESSAGE*/ - /*uniqueobj*/ if (! /*_._VALDATA___V369*/ meltfptr[368]) -/*_._VALDATA___V369*/ meltfptr[368] = + /*uniqueobj*/ if (! /*_._VALDATA___V370*/ meltfptr[369]) +/*_._VALDATA___V370*/ meltfptr[369] = (melt_ptr_t) & meltcdat->dsym_173__DISPLAY_DEBUG_MESSAGE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg @@ -9491,7 +9428,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*inistring dstr_174__DISPLAY_DEBUG_MESSAGE*/ - /*_._VALSTR___V370*/ meltfptr[369] = + /*_._VALSTR___V371*/ meltfptr[370] = (melt_ptr_t) & meltcdat->dstr_174__DISPLAY_DEBUG_MESSAGE; meltcdat->dstr_174__DISPLAY_DEBUG_MESSAGE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -9504,7 +9441,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, meltcdat->dstr_174__DISPLAY_DEBUG_MESSAGE.slen = 21; /*inirout drout_175__OUTPUT_RAW_LOCATION */ - /*_._VALROUT___V269*/ meltfptr[268] = + /*_._VALROUT___V270*/ meltfptr[269] = (melt_ptr_t) & meltcdat->drout_175__OUTPUT_RAW_LOCATION; meltcdat->drout_175__OUTPUT_RAW_LOCATION.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -9516,7 +9453,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, meltrout_38_WARMELTmiOUTOBJ_OUTPUT_RAW_LOCATION); /*iniclos dclo_176__OUTPUT_RAW_LOCATION */ - /*_._VALCLO___V268*/ meltfptr[267] = + /*_._VALCLO___V269*/ meltfptr[268] = (melt_ptr_t) & meltcdat->dclo_176__OUTPUT_RAW_LOCATION; meltcdat->dclo_176__OUTPUT_RAW_LOCATION.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -9524,8 +9461,8 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*iniobj dsym_177__PREVLOC_CONTAINER*/ - /*uniqueobj*/ if (! /*_._VALDATA___V371*/ meltfptr[370]) -/*_._VALDATA___V371*/ meltfptr[370] = + /*uniqueobj*/ if (! /*_._VALDATA___V372*/ meltfptr[371]) +/*_._VALDATA___V372*/ meltfptr[371] = (melt_ptr_t) & meltcdat->dsym_177__PREVLOC_CONTAINER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_177__PREVLOC_CONTAINER", @@ -9545,7 +9482,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*inistring dstr_178__PREVLOC_CONTAINER*/ - /*_._VALSTR___V372*/ meltfptr[371] = + /*_._VALSTR___V373*/ meltfptr[372] = (melt_ptr_t) & meltcdat->dstr_178__PREVLOC_CONTAINER; meltcdat->dstr_178__PREVLOC_CONTAINER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -9559,7 +9496,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, MELT_LOCATION ("warmelt-outobj.melt:1373:/ iniobj"); /*iniobj dobj_179__PREVLOC_CONTAINER*/ -/*_._VALDATA___V266*/ meltfptr[265] = +/*_._VALDATA___V267*/ meltfptr[266] = (melt_ptr_t) & meltcdat->dobj_179__PREVLOC_CONTAINER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dobj_179__PREVLOC_CONTAINER", @@ -9573,13 +9510,13 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); meltcdat->dobj_179__PREVLOC_CONTAINER.meltobj_class = (meltobject_ptr_t) ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5]); - meltcdat->dobj_179__PREVLOC_CONTAINER.obj_hash = 792532158; + meltcdat->dobj_179__PREVLOC_CONTAINER.obj_hash = 27428478; meltcdat->dobj_179__PREVLOC_CONTAINER.obj_len = 1; /*iniobj dsym_180__PREVIMPLBUF_CONTAINER*/ - /*uniqueobj*/ if (! /*_._VALDATA___V373*/ meltfptr[372]) -/*_._VALDATA___V373*/ meltfptr[372] = + /*uniqueobj*/ if (! /*_._VALDATA___V374*/ meltfptr[373]) +/*_._VALDATA___V374*/ meltfptr[373] = (melt_ptr_t) & meltcdat->dsym_180__PREVIMPLBUF_CONTAINER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg @@ -9599,7 +9536,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*inistring dstr_181__PREVIMPLBUF_CONTAINER*/ - /*_._VALSTR___V374*/ meltfptr[373] = + /*_._VALSTR___V375*/ meltfptr[374] = (melt_ptr_t) & meltcdat->dstr_181__PREVIMPLBUF_CONTAINER; meltcdat->dstr_181__PREVIMPLBUF_CONTAINER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -9614,7 +9551,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, MELT_LOCATION ("warmelt-outobj.melt:1374:/ iniobj"); /*iniobj dobj_182__PREVIMPLBUF_CONTAINER*/ -/*_._VALDATA___V267*/ meltfptr[266] = +/*_._VALDATA___V268*/ meltfptr[267] = (melt_ptr_t) & meltcdat->dobj_182__PREVIMPLBUF_CONTAINER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg @@ -9629,11 +9566,11 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); meltcdat->dobj_182__PREVIMPLBUF_CONTAINER.meltobj_class = (meltobject_ptr_t) ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5]); - meltcdat->dobj_182__PREVIMPLBUF_CONTAINER.obj_hash = 338029265; + meltcdat->dobj_182__PREVIMPLBUF_CONTAINER.obj_hash = 563535359; meltcdat->dobj_182__PREVIMPLBUF_CONTAINER.obj_len = 1; /*inirout drout_183__LINE_AND_FILE_OF_LOCATION */ - /*_._VALROUT___V375*/ meltfptr[374] = + /*_._VALROUT___V376*/ meltfptr[375] = (melt_ptr_t) & meltcdat->drout_183__LINE_AND_FILE_OF_LOCATION; meltcdat->drout_183__LINE_AND_FILE_OF_LOCATION.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -9645,7 +9582,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, meltrout_39_WARMELTmiOUTOBJ_LINE_AND_FILE_OF_LOCATION); /*iniclos dclo_184__LINE_AND_FILE_OF_LOCATION */ - /*_._VALCLO___V376*/ meltfptr[375] = + /*_._VALCLO___V377*/ meltfptr[376] = (melt_ptr_t) & meltcdat->dclo_184__LINE_AND_FILE_OF_LOCATION; meltcdat->dclo_184__LINE_AND_FILE_OF_LOCATION.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -9653,8 +9590,8 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*iniobj dsym_185__DISCR_INTEGER*/ - /*uniqueobj*/ if (! /*_._VALDATA___V377*/ meltfptr[376]) -/*_._VALDATA___V377*/ meltfptr[376] = + /*uniqueobj*/ if (! /*_._VALDATA___V378*/ meltfptr[377]) +/*_._VALDATA___V378*/ meltfptr[377] = (melt_ptr_t) & meltcdat->dsym_185__DISCR_INTEGER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_185__DISCR_INTEGER", @@ -9674,7 +9611,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*inistring dstr_186__DISCR_INTEGER*/ - /*_._VALSTR___V378*/ meltfptr[377] = + /*_._VALSTR___V379*/ meltfptr[378] = (melt_ptr_t) & meltcdat->dstr_186__DISCR_INTEGER; meltcdat->dstr_186__DISCR_INTEGER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -9687,8 +9624,8 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*iniobj dsym_187__DISCR_STRING*/ - /*uniqueobj*/ if (! /*_._VALDATA___V379*/ meltfptr[378]) -/*_._VALDATA___V379*/ meltfptr[378] = + /*uniqueobj*/ if (! /*_._VALDATA___V380*/ meltfptr[379]) +/*_._VALDATA___V380*/ meltfptr[379] = (melt_ptr_t) & meltcdat->dsym_187__DISCR_STRING; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_187__DISCR_STRING", @@ -9708,7 +9645,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*inistring dstr_188__DISCR_STRING*/ - /*_._VALSTR___V380*/ meltfptr[379] = + /*_._VALSTR___V381*/ meltfptr[380] = (melt_ptr_t) & meltcdat->dstr_188__DISCR_STRING; meltcdat->dstr_188__DISCR_STRING.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -9720,7 +9657,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, meltcdat->dstr_188__DISCR_STRING.slen = 12; /*inirout drout_189__OUTPUT_LOCATION */ - /*_._VALROUT___V265*/ meltfptr[264] = + /*_._VALROUT___V266*/ meltfptr[265] = (melt_ptr_t) & meltcdat->drout_189__OUTPUT_LOCATION; meltcdat->drout_189__OUTPUT_LOCATION.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -9732,14 +9669,14 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, meltrout_40_WARMELTmiOUTOBJ_OUTPUT_LOCATION); /*iniclos dclo_190__OUTPUT_LOCATION */ - /*_._VALCLO___V264*/ meltfptr[263] = + /*_._VALCLO___V265*/ meltfptr[264] = (melt_ptr_t) & meltcdat->dclo_190__OUTPUT_LOCATION; meltcdat->dclo_190__OUTPUT_LOCATION.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); meltcdat->dclo_190__OUTPUT_LOCATION.nbval = 0; /*inirout drout_191__OUTPUT_CURFRAME_DECLSTRUCT */ - /*_._VALROUT___V381*/ meltfptr[380] = + /*_._VALROUT___V382*/ meltfptr[381] = (melt_ptr_t) & meltcdat->drout_191__OUTPUT_CURFRAME_DECLSTRUCT; meltcdat->drout_191__OUTPUT_CURFRAME_DECLSTRUCT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -9751,7 +9688,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, meltrout_41_WARMELTmiOUTOBJ_OUTPUT_CURFRAME_DECLSTRUCT); /*iniclos dclo_192__OUTPUT_CURFRAME_DECLSTRUCT */ - /*_._VALCLO___V383*/ meltfptr[382] = + /*_._VALCLO___V384*/ meltfptr[383] = (melt_ptr_t) & meltcdat->dclo_192__OUTPUT_CURFRAME_DECLSTRUCT; meltcdat->dclo_192__OUTPUT_CURFRAME_DECLSTRUCT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -9759,8 +9696,8 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*iniobj dsym_193__CLASS_INITIAL_EXTENSION_ROUTINEOBJ*/ - /*uniqueobj*/ if (! /*_._VALDATA___V384*/ meltfptr[383]) -/*_._VALDATA___V384*/ meltfptr[383] = + /*uniqueobj*/ if (! /*_._VALDATA___V385*/ meltfptr[384]) +/*_._VALDATA___V385*/ meltfptr[384] = (melt_ptr_t) & meltcdat->dsym_193__CLASS_INITIAL_EXTENSION_ROUTINEOBJ; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg @@ -9781,7 +9718,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*inistring dstr_194__CLASS_INITIAL_EXTENSION_*/ - /*_._VALSTR___V385*/ meltfptr[384] = + /*_._VALSTR___V386*/ meltfptr[385] = (melt_ptr_t) & meltcdat->dstr_194__CLASS_INITIAL_EXTENSION_; meltcdat->dstr_194__CLASS_INITIAL_EXTENSION_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -9795,8 +9732,8 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*iniobj dsym_195__CLASS_INITIALROUTINEOBJ*/ - /*uniqueobj*/ if (! /*_._VALDATA___V386*/ meltfptr[385]) -/*_._VALDATA___V386*/ meltfptr[385] = + /*uniqueobj*/ if (! /*_._VALDATA___V387*/ meltfptr[386]) +/*_._VALDATA___V387*/ meltfptr[386] = (melt_ptr_t) & meltcdat->dsym_195__CLASS_INITIALROUTINEOBJ; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg @@ -9816,7 +9753,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*inistring dstr_196__CLASS_INITIALROUTINEOBJ*/ - /*_._VALSTR___V387*/ meltfptr[386] = + /*_._VALSTR___V388*/ meltfptr[387] = (melt_ptr_t) & meltcdat->dstr_196__CLASS_INITIALROUTINEOBJ; meltcdat->dstr_196__CLASS_INITIALROUTINEOBJ.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -9830,8 +9767,8 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*iniobj dsym_197__LIST_EVERY*/ - /*uniqueobj*/ if (! /*_._VALDATA___V388*/ meltfptr[387]) -/*_._VALDATA___V388*/ meltfptr[387] = + /*uniqueobj*/ if (! /*_._VALDATA___V389*/ meltfptr[388]) +/*_._VALDATA___V389*/ meltfptr[388] = (melt_ptr_t) & meltcdat->dsym_197__LIST_EVERY; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_197__LIST_EVERY", @@ -9851,7 +9788,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*inistring dstr_198__LIST_EVERY*/ - /*_._VALSTR___V389*/ meltfptr[388] = + /*_._VALSTR___V390*/ meltfptr[389] = (melt_ptr_t) & meltcdat->dstr_198__LIST_EVERY; meltcdat->dstr_198__LIST_EVERY.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -9863,7 +9800,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, meltcdat->dstr_198__LIST_EVERY.slen = 10; /*inirout drout_199__LAMBDA_ */ - /*_._VALROUT___V382*/ meltfptr[381] = + /*_._VALROUT___V383*/ meltfptr[382] = (melt_ptr_t) & meltcdat->drout_199__LAMBDA_; meltcdat->drout_199__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -9871,12 +9808,12 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, "LAMBDA_ @warmelt-outobj.melt:1559", MELT_ROUTDESCR_LEN - 1); meltcdat->drout_199__LAMBDA_.nbval = 5; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_199__LAMBDA_, - meltrout_42_WARMELTmiOUTOBJ_LAMBDA_cl2); + meltrout_42_WARMELTmiOUTOBJ); /*iniobj dsym_200__CLASS_OBJLOCV*/ - /*uniqueobj*/ if (! /*_._VALDATA___V390*/ meltfptr[389]) -/*_._VALDATA___V390*/ meltfptr[389] = + /*uniqueobj*/ if (! /*_._VALDATA___V391*/ meltfptr[390]) +/*_._VALDATA___V391*/ meltfptr[390] = (melt_ptr_t) & meltcdat->dsym_200__CLASS_OBJLOCV; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_200__CLASS_OBJLOCV", @@ -9896,7 +9833,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*inistring dstr_201__CLASS_OBJLOCV*/ - /*_._VALSTR___V391*/ meltfptr[390] = + /*_._VALSTR___V392*/ meltfptr[391] = (melt_ptr_t) & meltcdat->dstr_201__CLASS_OBJLOCV; meltcdat->dstr_201__CLASS_OBJLOCV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -9908,7 +9845,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, meltcdat->dstr_201__CLASS_OBJLOCV.slen = 13; /*inirout drout_202__OUTPUCOD_MARKER */ - /*_._VALROUT___V392*/ meltfptr[391] = + /*_._VALROUT___V393*/ meltfptr[392] = (melt_ptr_t) & meltcdat->drout_202__OUTPUCOD_MARKER; meltcdat->drout_202__OUTPUCOD_MARKER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -9920,7 +9857,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, meltrout_43_WARMELTmiOUTOBJ_OUTPUCOD_MARKER); /*iniclos dclo_203__OUTPUCOD_MARKER */ - /*_._VALCLO___V394*/ meltfptr[393] = + /*_._VALCLO___V395*/ meltfptr[394] = (melt_ptr_t) & meltcdat->dclo_203__OUTPUCOD_MARKER; meltcdat->dclo_203__OUTPUCOD_MARKER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -9928,8 +9865,8 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*iniobj dsym_204__CLASS_ROUTINEOBJ*/ - /*uniqueobj*/ if (! /*_._VALDATA___V395*/ meltfptr[394]) -/*_._VALDATA___V395*/ meltfptr[394] = + /*uniqueobj*/ if (! /*_._VALDATA___V396*/ meltfptr[395]) +/*_._VALDATA___V396*/ meltfptr[395] = (melt_ptr_t) & meltcdat->dsym_204__CLASS_ROUTINEOBJ; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_204__CLASS_ROUTINEOBJ", @@ -9949,7 +9886,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*inistring dstr_205__CLASS_ROUTINEOBJ*/ - /*_._VALSTR___V396*/ meltfptr[395] = + /*_._VALSTR___V397*/ meltfptr[396] = (melt_ptr_t) & meltcdat->dstr_205__CLASS_ROUTINEOBJ; meltcdat->dstr_205__CLASS_ROUTINEOBJ.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -9962,8 +9899,8 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*iniobj dsym_206__CLASS_PROCROUTINEOBJ*/ - /*uniqueobj*/ if (! /*_._VALDATA___V397*/ meltfptr[396]) -/*_._VALDATA___V397*/ meltfptr[396] = + /*uniqueobj*/ if (! /*_._VALDATA___V398*/ meltfptr[397]) +/*_._VALDATA___V398*/ meltfptr[397] = (melt_ptr_t) & meltcdat->dsym_206__CLASS_PROCROUTINEOBJ; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_206__CLASS_PROCROUTINEOBJ", @@ -9983,7 +9920,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*inistring dstr_207__CLASS_PROCROUTINEOBJ*/ - /*_._VALSTR___V398*/ meltfptr[397] = + /*_._VALSTR___V399*/ meltfptr[398] = (melt_ptr_t) & meltcdat->dstr_207__CLASS_PROCROUTINEOBJ; meltcdat->dstr_207__CLASS_PROCROUTINEOBJ.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -9996,7 +9933,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, meltcdat->dstr_207__CLASS_PROCROUTINEOBJ.slen = 20; /*inirout drout_208__LAMBDA_ */ - /*_._VALROUT___V393*/ meltfptr[392] = + /*_._VALROUT___V394*/ meltfptr[393] = (melt_ptr_t) & meltcdat->drout_208__LAMBDA_; meltcdat->drout_208__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -10004,10 +9941,10 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, "LAMBDA_ @warmelt-outobj.melt:1611", MELT_ROUTDESCR_LEN - 1); meltcdat->drout_208__LAMBDA_.nbval = 6; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_208__LAMBDA_, - meltrout_44_WARMELTmiOUTOBJ_LAMBDA_cl3); + meltrout_44_WARMELTmiOUTOBJ); /*inirout drout_209__OUTPUT_CURFRAME_DECLSTRUCT_INIT */ - /*_._VALROUT___V399*/ meltfptr[398] = + /*_._VALROUT___V400*/ meltfptr[399] = (melt_ptr_t) & meltcdat->drout_209__OUTPUT_CURFRAME_DECLSTRUCT_INIT; meltcdat->drout_209__OUTPUT_CURFRAME_DECLSTRUCT_INIT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -10020,7 +9957,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, meltrout_45_WARMELTmiOUTOBJ_OUTPUT_CURFRAME_DECLSTRUCT_INIT); /*iniclos dclo_210__OUTPUT_CURFRAME_DECLSTRUCT_INIT */ - /*_._VALCLO___V400*/ meltfptr[399] = + /*_._VALCLO___V401*/ meltfptr[400] = (melt_ptr_t) & meltcdat->dclo_210__OUTPUT_CURFRAME_DECLSTRUCT_INIT; meltcdat->dclo_210__OUTPUT_CURFRAME_DECLSTRUCT_INIT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -10028,8 +9965,8 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*iniobj dsym_211__CLASS_HOOKROUTINEOBJ*/ - /*uniqueobj*/ if (! /*_._VALDATA___V401*/ meltfptr[400]) -/*_._VALDATA___V401*/ meltfptr[400] = + /*uniqueobj*/ if (! /*_._VALDATA___V402*/ meltfptr[401]) +/*_._VALDATA___V402*/ meltfptr[401] = (melt_ptr_t) & meltcdat->dsym_211__CLASS_HOOKROUTINEOBJ; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_211__CLASS_HOOKROUTINEOBJ", @@ -10049,7 +9986,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*inistring dstr_212__CLASS_HOOKROUTINEOBJ*/ - /*_._VALSTR___V402*/ meltfptr[401] = + /*_._VALSTR___V403*/ meltfptr[402] = (melt_ptr_t) & meltcdat->dstr_212__CLASS_HOOKROUTINEOBJ; meltcdat->dstr_212__CLASS_HOOKROUTINEOBJ.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -10062,7 +9999,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, meltcdat->dstr_212__CLASS_HOOKROUTINEOBJ.slen = 20; /*inirout drout_213__OUTPUCOD_PROCROUTINE */ - /*_._VALROUT___V403*/ meltfptr[402] = + /*_._VALROUT___V404*/ meltfptr[403] = (melt_ptr_t) & meltcdat->drout_213__OUTPUCOD_PROCROUTINE; meltcdat->drout_213__OUTPUCOD_PROCROUTINE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -10074,7 +10011,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, meltrout_46_WARMELTmiOUTOBJ_OUTPUCOD_PROCROUTINE); /*iniclos dclo_214__OUTPUCOD_PROCROUTINE */ - /*_._VALCLO___V406*/ meltfptr[405] = + /*_._VALCLO___V407*/ meltfptr[406] = (melt_ptr_t) & meltcdat->dclo_214__OUTPUCOD_PROCROUTINE; meltcdat->dclo_214__OUTPUCOD_PROCROUTINE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -10082,7 +10019,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*inistring dstr_215__*/ - /*_._VALSTR___V404*/ meltfptr[403] = (melt_ptr_t) & meltcdat->dstr_215__; + /*_._VALSTR___V405*/ meltfptr[404] = (melt_ptr_t) & meltcdat->dstr_215__; meltcdat->dstr_215__.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (meltcdat->dstr_215__.val, "**", @@ -10092,8 +10029,8 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*iniobj dsym_216__VARIADIC_INDEX_IDSTR*/ - /*uniqueobj*/ if (! /*_._VALDATA___V407*/ meltfptr[406]) -/*_._VALDATA___V407*/ meltfptr[406] = + /*uniqueobj*/ if (! /*_._VALDATA___V408*/ meltfptr[407]) +/*_._VALDATA___V408*/ meltfptr[407] = (melt_ptr_t) & meltcdat->dsym_216__VARIADIC_INDEX_IDSTR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_216__VARIADIC_INDEX_IDSTR", @@ -10113,7 +10050,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*inistring dstr_217__VARIADIC_INDEX_IDSTR*/ - /*_._VALSTR___V408*/ meltfptr[407] = + /*_._VALSTR___V409*/ meltfptr[408] = (melt_ptr_t) & meltcdat->dstr_217__VARIADIC_INDEX_IDSTR; meltcdat->dstr_217__VARIADIC_INDEX_IDSTR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -10127,8 +10064,8 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*iniobj dsym_218__VARIADIC_LENGTH_IDSTR*/ - /*uniqueobj*/ if (! /*_._VALDATA___V409*/ meltfptr[408]) -/*_._VALDATA___V409*/ meltfptr[408] = + /*uniqueobj*/ if (! /*_._VALDATA___V410*/ meltfptr[409]) +/*_._VALDATA___V410*/ meltfptr[409] = (melt_ptr_t) & meltcdat->dsym_218__VARIADIC_LENGTH_IDSTR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg @@ -10148,7 +10085,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*inistring dstr_219__VARIADIC_LENGTH_IDSTR*/ - /*_._VALSTR___V410*/ meltfptr[409] = + /*_._VALSTR___V411*/ meltfptr[410] = (melt_ptr_t) & meltcdat->dstr_219__VARIADIC_LENGTH_IDSTR; meltcdat->dstr_219__VARIADIC_LENGTH_IDSTR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -10161,7 +10098,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, meltcdat->dstr_219__VARIADIC_LENGTH_IDSTR.slen = 21; /*inirout drout_220__LAMBDA_ */ - /*_._VALROUT___V405*/ meltfptr[404] = + /*_._VALROUT___V406*/ meltfptr[405] = (melt_ptr_t) & meltcdat->drout_220__LAMBDA_; meltcdat->drout_220__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -10169,12 +10106,12 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, "LAMBDA_ @warmelt-outobj.melt:1893", MELT_ROUTDESCR_LEN - 1); meltcdat->drout_220__LAMBDA_.nbval = 4; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_220__LAMBDA_, - meltrout_47_WARMELTmiOUTOBJ_LAMBDA_cl4); + meltrout_47_WARMELTmiOUTOBJ); /*iniobj dsym_221__CLASS_OBJPUREVALUE*/ - /*uniqueobj*/ if (! /*_._VALDATA___V411*/ meltfptr[410]) -/*_._VALDATA___V411*/ meltfptr[410] = + /*uniqueobj*/ if (! /*_._VALDATA___V412*/ meltfptr[411]) +/*_._VALDATA___V412*/ meltfptr[411] = (melt_ptr_t) & meltcdat->dsym_221__CLASS_OBJPUREVALUE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_221__CLASS_OBJPUREVALUE", @@ -10194,7 +10131,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*inistring dstr_222__CLASS_OBJPUREVALUE*/ - /*_._VALSTR___V412*/ meltfptr[411] = + /*_._VALSTR___V413*/ meltfptr[412] = (melt_ptr_t) & meltcdat->dstr_222__CLASS_OBJPUREVALUE; meltcdat->dstr_222__CLASS_OBJPUREVALUE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -10207,7 +10144,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, meltcdat->dstr_222__CLASS_OBJPUREVALUE.slen = 18; /*inirout drout_223__OUTPUT_CURFRAME_CDAT_STRUCT */ - /*_._VALROUT___V413*/ meltfptr[412] = + /*_._VALROUT___V414*/ meltfptr[413] = (melt_ptr_t) & meltcdat->drout_223__OUTPUT_CURFRAME_CDAT_STRUCT; meltcdat->drout_223__OUTPUT_CURFRAME_CDAT_STRUCT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -10220,14 +10157,14 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, meltrout_48_WARMELTmiOUTOBJ_OUTPUT_CURFRAME_CDAT_STRUCT); /*iniclos dclo_224__OUTPUT_CURFRAME_CDAT_STRUCT */ - /*_._VALCLO___V414*/ meltfptr[413] = + /*_._VALCLO___V415*/ meltfptr[414] = (melt_ptr_t) & meltcdat->dclo_224__OUTPUT_CURFRAME_CDAT_STRUCT; meltcdat->dclo_224__OUTPUT_CURFRAME_CDAT_STRUCT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); meltcdat->dclo_224__OUTPUT_CURFRAME_CDAT_STRUCT.nbval = 0; /*inirout drout_225__OUTPUT_CURFRAME_CDAT_FILL */ - /*_._VALROUT___V415*/ meltfptr[414] = + /*_._VALROUT___V416*/ meltfptr[415] = (melt_ptr_t) & meltcdat->drout_225__OUTPUT_CURFRAME_CDAT_FILL; meltcdat->drout_225__OUTPUT_CURFRAME_CDAT_FILL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -10239,7 +10176,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, meltrout_49_WARMELTmiOUTOBJ_OUTPUT_CURFRAME_CDAT_FILL); /*iniclos dclo_226__OUTPUT_CURFRAME_CDAT_FILL */ - /*_._VALCLO___V418*/ meltfptr[417] = + /*_._VALCLO___V419*/ meltfptr[418] = (melt_ptr_t) & meltcdat->dclo_226__OUTPUT_CURFRAME_CDAT_FILL; meltcdat->dclo_226__OUTPUT_CURFRAME_CDAT_FILL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -10247,7 +10184,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*inistring dstr_227__meltcdat*/ - /*_._VALSTR___V416*/ meltfptr[415] = + /*_._VALSTR___V417*/ meltfptr[416] = (melt_ptr_t) & meltcdat->dstr_227__meltcdat; meltcdat->dstr_227__meltcdat.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -10259,7 +10196,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*inistring dstr_228__meltcdat*/ - /*_._VALSTR___V417*/ meltfptr[416] = + /*_._VALSTR___V418*/ meltfptr[417] = (melt_ptr_t) & meltcdat->dstr_228__meltcdat; meltcdat->dstr_228__meltcdat.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -10270,7 +10207,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, meltcdat->dstr_228__meltcdat.slen = 8; /*inirout drout_229__OUTPUCOD_INITIALMODULEROUTINE */ - /*_._VALROUT___V419*/ meltfptr[418] = + /*_._VALROUT___V420*/ meltfptr[419] = (melt_ptr_t) & meltcdat->drout_229__OUTPUCOD_INITIALMODULEROUTINE; meltcdat->drout_229__OUTPUCOD_INITIALMODULEROUTINE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -10283,7 +10220,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, meltrout_50_WARMELTmiOUTOBJ_OUTPUCOD_INITIALMODULEROUTINE); /*iniclos dclo_230__OUTPUCOD_INITIALMODULEROUTINE */ - /*_._VALCLO___V421*/ meltfptr[420] = + /*_._VALCLO___V422*/ meltfptr[421] = (melt_ptr_t) & meltcdat->dclo_230__OUTPUCOD_INITIALMODULEROUTINE; meltcdat->dclo_230__OUTPUCOD_INITIALMODULEROUTINE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); @@ -10291,8 +10228,8 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*iniobj dsym_231__CLASS_INITIAL_MODULE_ROUTINEOBJ*/ - /*uniqueobj*/ if (! /*_._VALDATA___V422*/ meltfptr[421]) -/*_._VALDATA___V422*/ meltfptr[421] = + /*uniqueobj*/ if (! /*_._VALDATA___V423*/ meltfptr[422]) +/*_._VALDATA___V423*/ meltfptr[422] = (melt_ptr_t) & meltcdat->dsym_231__CLASS_INITIAL_MODULE_ROUTINEOBJ; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg @@ -10312,7 +10249,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*inistring dstr_232__CLASS_INITIAL_MODULE_ROU*/ - /*_._VALSTR___V423*/ meltfptr[422] = + /*_._VALSTR___V424*/ meltfptr[423] = (melt_ptr_t) & meltcdat->dstr_232__CLASS_INITIAL_MODULE_ROU; meltcdat->dstr_232__CLASS_INITIAL_MODULE_ROU.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -10325,7 +10262,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, meltcdat->dstr_232__CLASS_INITIAL_MODULE_ROU.slen = 31; /*inirout drout_233__LAMBDA_ */ - /*_._VALROUT___V420*/ meltfptr[419] = + /*_._VALROUT___V421*/ meltfptr[420] = (melt_ptr_t) & meltcdat->drout_233__LAMBDA_; meltcdat->drout_233__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -10333,12 +10270,12 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, "LAMBDA_ @warmelt-outobj.melt:2163", MELT_ROUTDESCR_LEN - 1); meltcdat->drout_233__LAMBDA_.nbval = 0; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_233__LAMBDA_, - meltrout_51_WARMELTmiOUTOBJ_LAMBDA_cl5); + meltrout_51_WARMELTmiOUTOBJ); /*iniobj dsym_234__DISCR_LIST*/ - /*uniqueobj*/ if (! /*_._VALDATA___V424*/ meltfptr[423]) -/*_._VALDATA___V424*/ meltfptr[423] = + /*uniqueobj*/ if (! /*_._VALDATA___V425*/ meltfptr[424]) +/*_._VALDATA___V425*/ meltfptr[424] = (melt_ptr_t) & meltcdat->dsym_234__DISCR_LIST; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_234__DISCR_LIST", @@ -10358,7 +10295,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*inistring dstr_235__DISCR_LIST*/ - /*_._VALSTR___V425*/ meltfptr[424] = + /*_._VALSTR___V426*/ meltfptr[425] = (melt_ptr_t) & meltcdat->dstr_235__DISCR_LIST; meltcdat->dstr_235__DISCR_LIST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -10371,8 +10308,8 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*iniobj dsym_236__LIST_TO_MULTIPLE*/ - /*uniqueobj*/ if (! /*_._VALDATA___V426*/ meltfptr[425]) -/*_._VALDATA___V426*/ meltfptr[425] = + /*uniqueobj*/ if (! /*_._VALDATA___V427*/ meltfptr[426]) +/*_._VALDATA___V427*/ meltfptr[426] = (melt_ptr_t) & meltcdat->dsym_236__LIST_TO_MULTIPLE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_236__LIST_TO_MULTIPLE", @@ -10392,7 +10329,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*inistring dstr_237__LIST_TO_MULTIPLE*/ - /*_._VALSTR___V427*/ meltfptr[426] = + /*_._VALSTR___V428*/ meltfptr[427] = (melt_ptr_t) & meltcdat->dstr_237__LIST_TO_MULTIPLE; meltcdat->dstr_237__LIST_TO_MULTIPLE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -10405,8 +10342,8 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*iniobj dsym_238__DISCR_MULTIPLE*/ - /*uniqueobj*/ if (! /*_._VALDATA___V428*/ meltfptr[427]) -/*_._VALDATA___V428*/ meltfptr[427] = + /*uniqueobj*/ if (! /*_._VALDATA___V429*/ meltfptr[428]) +/*_._VALDATA___V429*/ meltfptr[428] = (melt_ptr_t) & meltcdat->dsym_238__DISCR_MULTIPLE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_238__DISCR_MULTIPLE", @@ -10426,7 +10363,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*inistring dstr_239__DISCR_MULTIPLE*/ - /*_._VALSTR___V429*/ meltfptr[428] = + /*_._VALSTR___V430*/ meltfptr[429] = (melt_ptr_t) & meltcdat->dstr_239__DISCR_MULTIPLE; meltcdat->dstr_239__DISCR_MULTIPLE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -10439,8 +10376,8 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*iniobj dsym_240__DISCR_STRBUF*/ - /*uniqueobj*/ if (! /*_._VALDATA___V430*/ meltfptr[429]) -/*_._VALDATA___V430*/ meltfptr[429] = + /*uniqueobj*/ if (! /*_._VALDATA___V431*/ meltfptr[430]) +/*_._VALDATA___V431*/ meltfptr[430] = (melt_ptr_t) & meltcdat->dsym_240__DISCR_STRBUF; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_240__DISCR_STRBUF", @@ -10460,7 +10397,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*inistring dstr_241__DISCR_STRBUF*/ - /*_._VALSTR___V431*/ meltfptr[430] = + /*_._VALSTR___V432*/ meltfptr[431] = (melt_ptr_t) & meltcdat->dstr_241__DISCR_STRBUF; meltcdat->dstr_241__DISCR_STRBUF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -10473,8 +10410,8 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*iniobj dsym_242__CLASS_OBJINSTR*/ - /*uniqueobj*/ if (! /*_._VALDATA___V432*/ meltfptr[431]) -/*_._VALDATA___V432*/ meltfptr[431] = + /*uniqueobj*/ if (! /*_._VALDATA___V433*/ meltfptr[432]) +/*_._VALDATA___V433*/ meltfptr[432] = (melt_ptr_t) & meltcdat->dsym_242__CLASS_OBJINSTR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg ("iniobj check.discr isobj dsym_242__CLASS_OBJINSTR", @@ -10494,7 +10431,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, /*inistring dstr_243__CLASS_OBJINSTR*/ - /*_._VALSTR___V433*/ meltfptr[432] = + /*_._VALSTR___V434*/ meltfptr[433] = (melt_ptr_t) & meltcdat->dstr_243__CLASS_OBJINSTR; meltcdat->dstr_243__CLASS_OBJINSTR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); @@ -10506,7 +10443,7 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, meltcdat->dstr_243__CLASS_OBJINSTR.slen = 14; /*inirout drout_244__OUTPUT_CENTRALDECL_HOOKROUTINE */ - /*_._VALROUT___V434*/ meltfptr[433] = + /*_._VALROUT___V435*/ meltfptr[434] = (melt_ptr_t) & meltcdat->drout_244__OUTPUT_CENTRALDECL_HOOKROUTINE; meltcdat->drout_244__OUTPUT_CENTRALDECL_HOOKROUTINE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); @@ -10519,8248 +10456,8283 @@ initialize_module_meltdata_WARMELTmiOUTOBJ (meltinitial_frame_t * iniframp__, meltrout_52_WARMELTmiOUTOBJ_OUTPUT_CENTRALDECL_HOOKROUTINE); /*iniclos dclo_245__OUTPUT_CENTRALDECL_HOOKROUTINE */ - /*_._VALCLO___V435*/ meltfptr[434] = + /*_._VALCLO___V436*/ meltfptr[435] = (melt_ptr_t) & meltcdat->dclo_245__OUTPUT_CENTRALDECL_HOOKROUTINE; meltcdat->dclo_245__OUTPUT_CENTRALDECL_HOOKROUTINE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); meltcdat->dclo_245__OUTPUT_CENTRALDECL_HOOKROUTINE.nbval = 0; -/*iniobj dsym_246__CLASS_OBJCFORMAL*/ - /*uniqueobj*/ if (! /*_._VALDATA___V436*/ meltfptr[435]) -/*_._VALDATA___V436*/ meltfptr[435] = - (melt_ptr_t) & meltcdat->dsym_246__CLASS_OBJCFORMAL; +/*iniobj dsym_246__CLASS_NREP_HOOKPROC*/ + /*uniqueobj*/ if (! /*_._VALDATA___V437*/ meltfptr[436]) +/*_._VALDATA___V437*/ meltfptr[436] = + (melt_ptr_t) & meltcdat->dsym_246__CLASS_NREP_HOOKPROC; + if (MELT_LIKELY (!melt_prohibit_garbcoll)) + melt_assertmsg ("iniobj check.discr isobj dsym_246__CLASS_NREP_HOOKPROC", + melt_magic_discr ((melt_ptr_t) + (((melt_ptr_t) + (MELT_PREDEF (CLASS_SYMBOL))))) == + MELTOBMAG_OBJECT); + if (MELT_LIKELY (!melt_prohibit_garbcoll)) + melt_assertmsg + ("iniobj check.discr objmagic dsym_246__CLASS_NREP_HOOKPROC", + ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> + meltobj_magic == MELTOBMAG_OBJECT); + meltcdat->dsym_246__CLASS_NREP_HOOKPROC.meltobj_class = + (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); + meltcdat->dsym_246__CLASS_NREP_HOOKPROC.obj_hash = 999315103; + meltcdat->dsym_246__CLASS_NREP_HOOKPROC.obj_len = 3; + + +/*inistring dstr_247__CLASS_NREP_HOOKPROC*/ + /*_._VALSTR___V438*/ meltfptr[437] = + (melt_ptr_t) & meltcdat->dstr_247__CLASS_NREP_HOOKPROC; + meltcdat->dstr_247__CLASS_NREP_HOOKPROC.discr = + (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); + /*small inistring */ strncpy (meltcdat->dstr_247__CLASS_NREP_HOOKPROC.val, + "CLASS_NREP_HOOKPROC", + sizeof (meltcdat-> + dstr_247__CLASS_NREP_HOOKPROC.val) - + 1); + meltcdat->dstr_247__CLASS_NREP_HOOKPROC.val[19] = (char) 0; + meltcdat->dstr_247__CLASS_NREP_HOOKPROC.slen = 19; + + +/*iniobj dsym_248__CLASS_OBJCFORMAL*/ + /*uniqueobj*/ if (! /*_._VALDATA___V439*/ meltfptr[438]) +/*_._VALDATA___V439*/ meltfptr[438] = + (melt_ptr_t) & meltcdat->dsym_248__CLASS_OBJCFORMAL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_246__CLASS_OBJCFORMAL", + melt_assertmsg ("iniobj check.discr isobj dsym_248__CLASS_OBJCFORMAL", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr objmagic dsym_246__CLASS_OBJCFORMAL", + melt_assertmsg ("iniobj check.discr objmagic dsym_248__CLASS_OBJCFORMAL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_246__CLASS_OBJCFORMAL.meltobj_class = + meltcdat->dsym_248__CLASS_OBJCFORMAL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_246__CLASS_OBJCFORMAL.obj_hash = 344955941; - meltcdat->dsym_246__CLASS_OBJCFORMAL.obj_len = 3; + meltcdat->dsym_248__CLASS_OBJCFORMAL.obj_hash = 344955941; + meltcdat->dsym_248__CLASS_OBJCFORMAL.obj_len = 3; -/*inistring dstr_247__CLASS_OBJCFORMAL*/ - /*_._VALSTR___V437*/ meltfptr[436] = - (melt_ptr_t) & meltcdat->dstr_247__CLASS_OBJCFORMAL; - meltcdat->dstr_247__CLASS_OBJCFORMAL.discr = +/*inistring dstr_249__CLASS_OBJCFORMAL*/ + /*_._VALSTR___V440*/ meltfptr[439] = + (melt_ptr_t) & meltcdat->dstr_249__CLASS_OBJCFORMAL; + meltcdat->dstr_249__CLASS_OBJCFORMAL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_247__CLASS_OBJCFORMAL.val, + /*small inistring */ strncpy (meltcdat->dstr_249__CLASS_OBJCFORMAL.val, "CLASS_OBJCFORMAL", - sizeof (meltcdat->dstr_247__CLASS_OBJCFORMAL. + sizeof (meltcdat->dstr_249__CLASS_OBJCFORMAL. val) - 1); - meltcdat->dstr_247__CLASS_OBJCFORMAL.val[16] = (char) 0; - meltcdat->dstr_247__CLASS_OBJCFORMAL.slen = 16; + meltcdat->dstr_249__CLASS_OBJCFORMAL.val[16] = (char) 0; + meltcdat->dstr_249__CLASS_OBJCFORMAL.slen = 16; - /*inirout drout_248__OUTPUCOD_HOOKROUTINE */ - /*_._VALROUT___V438*/ meltfptr[437] = - (melt_ptr_t) & meltcdat->drout_248__OUTPUCOD_HOOKROUTINE; - meltcdat->drout_248__OUTPUCOD_HOOKROUTINE.discr = + /*inirout drout_250__OUTPUCOD_HOOKROUTINE */ + /*_._VALROUT___V441*/ meltfptr[440] = + (melt_ptr_t) & meltcdat->drout_250__OUTPUCOD_HOOKROUTINE; + meltcdat->drout_250__OUTPUCOD_HOOKROUTINE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); - strncpy (meltcdat->drout_248__OUTPUCOD_HOOKROUTINE.routdescr, + strncpy (meltcdat->drout_250__OUTPUCOD_HOOKROUTINE.routdescr, "OUTPUCOD_HOOKROUTINE @warmelt-outobj.melt:2463", MELT_ROUTDESCR_LEN - 1); - meltcdat->drout_248__OUTPUCOD_HOOKROUTINE.nbval = 16; - MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_248__OUTPUCOD_HOOKROUTINE, + meltcdat->drout_250__OUTPUCOD_HOOKROUTINE.nbval = 16; + MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_250__OUTPUCOD_HOOKROUTINE, meltrout_53_WARMELTmiOUTOBJ_OUTPUCOD_HOOKROUTINE); - /*iniclos dclo_249__OUTPUCOD_HOOKROUTINE */ - /*_._VALCLO___V439*/ meltfptr[438] = - (melt_ptr_t) & meltcdat->dclo_249__OUTPUCOD_HOOKROUTINE; - meltcdat->dclo_249__OUTPUCOD_HOOKROUTINE.discr = + /*iniclos dclo_251__OUTPUCOD_HOOKROUTINE */ + /*_._VALCLO___V442*/ meltfptr[441] = + (melt_ptr_t) & meltcdat->dclo_251__OUTPUCOD_HOOKROUTINE; + meltcdat->dclo_251__OUTPUCOD_HOOKROUTINE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); - meltcdat->dclo_249__OUTPUCOD_HOOKROUTINE.nbval = 0; + meltcdat->dclo_251__OUTPUCOD_HOOKROUTINE.nbval = 0; - /*inirout drout_250__OUTPUCOD_INITIALEXTENSIONROUTINE */ - /*_._VALROUT___V440*/ meltfptr[439] = - (melt_ptr_t) & meltcdat->drout_250__OUTPUCOD_INITIALEXTENSIONROUTINE; - meltcdat->drout_250__OUTPUCOD_INITIALEXTENSIONROUTINE.discr = + /*inirout drout_252__OUTPUCOD_INITIALEXTENSIONROUTINE */ + /*_._VALROUT___V443*/ meltfptr[442] = + (melt_ptr_t) & meltcdat->drout_252__OUTPUCOD_INITIALEXTENSIONROUTINE; + meltcdat->drout_252__OUTPUCOD_INITIALEXTENSIONROUTINE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); - strncpy (meltcdat->drout_250__OUTPUCOD_INITIALEXTENSIONROUTINE.routdescr, + strncpy (meltcdat->drout_252__OUTPUCOD_INITIALEXTENSIONROUTINE.routdescr, "OUTPUCOD_INITIALEXTENSIONROUTINE @warmelt-outobj.melt:2649", MELT_ROUTDESCR_LEN - 1); - meltcdat->drout_250__OUTPUCOD_INITIALEXTENSIONROUTINE.nbval = 19; + meltcdat->drout_252__OUTPUCOD_INITIALEXTENSIONROUTINE.nbval = 19; MELT_ROUTINE_SET_ROUTCODE (&meltcdat-> - drout_250__OUTPUCOD_INITIALEXTENSIONROUTINE, + drout_252__OUTPUCOD_INITIALEXTENSIONROUTINE, meltrout_54_WARMELTmiOUTOBJ_OUTPUCOD_INITIALEXTENSIONROUTINE); - /*iniclos dclo_251__OUTPUCOD_INITIALEXTENSIONROUTINE */ - /*_._VALCLO___V442*/ meltfptr[441] = - (melt_ptr_t) & meltcdat->dclo_251__OUTPUCOD_INITIALEXTENSIONROUTINE; - meltcdat->dclo_251__OUTPUCOD_INITIALEXTENSIONROUTINE.discr = + /*iniclos dclo_253__OUTPUCOD_INITIALEXTENSIONROUTINE */ + /*_._VALCLO___V445*/ meltfptr[444] = + (melt_ptr_t) & meltcdat->dclo_253__OUTPUCOD_INITIALEXTENSIONROUTINE; + meltcdat->dclo_253__OUTPUCOD_INITIALEXTENSIONROUTINE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); - meltcdat->dclo_251__OUTPUCOD_INITIALEXTENSIONROUTINE.nbval = 0; + meltcdat->dclo_253__OUTPUCOD_INITIALEXTENSIONROUTINE.nbval = 0; - /*inirout drout_252__LAMBDA_ */ - /*_._VALROUT___V441*/ meltfptr[440] = - (melt_ptr_t) & meltcdat->drout_252__LAMBDA_; - meltcdat->drout_252__LAMBDA_.discr = + /*inirout drout_254__LAMBDA_ */ + /*_._VALROUT___V444*/ meltfptr[443] = + (melt_ptr_t) & meltcdat->drout_254__LAMBDA_; + meltcdat->drout_254__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); - strncpy (meltcdat->drout_252__LAMBDA_.routdescr, + strncpy (meltcdat->drout_254__LAMBDA_.routdescr, "LAMBDA_ @warmelt-outobj.melt:2726", MELT_ROUTDESCR_LEN - 1); - meltcdat->drout_252__LAMBDA_.nbval = 1; - MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_252__LAMBDA_, - meltrout_55_WARMELTmiOUTOBJ_LAMBDA_cl6); - - /*inirout drout_253__OUTPUCOD_GETARG */ - /*_._VALROUT___V443*/ meltfptr[442] = - (melt_ptr_t) & meltcdat->drout_253__OUTPUCOD_GETARG; - meltcdat->drout_253__OUTPUCOD_GETARG.discr = + meltcdat->drout_254__LAMBDA_.nbval = 1; + MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_254__LAMBDA_, + meltrout_55_WARMELTmiOUTOBJ); + + /*inirout drout_255__OUTPUCOD_GETARG */ + /*_._VALROUT___V446*/ meltfptr[445] = + (melt_ptr_t) & meltcdat->drout_255__OUTPUCOD_GETARG; + meltcdat->drout_255__OUTPUCOD_GETARG.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); - strncpy (meltcdat->drout_253__OUTPUCOD_GETARG.routdescr, + strncpy (meltcdat->drout_255__OUTPUCOD_GETARG.routdescr, "OUTPUCOD_GETARG @warmelt-outobj.melt:2847", MELT_ROUTDESCR_LEN - 1); - meltcdat->drout_253__OUTPUCOD_GETARG.nbval = 9; - MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_253__OUTPUCOD_GETARG, + meltcdat->drout_255__OUTPUCOD_GETARG.nbval = 9; + MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_255__OUTPUCOD_GETARG, meltrout_56_WARMELTmiOUTOBJ_OUTPUCOD_GETARG); - /*iniclos dclo_254__OUTPUCOD_GETARG */ - /*_._VALCLO___V444*/ meltfptr[443] = - (melt_ptr_t) & meltcdat->dclo_254__OUTPUCOD_GETARG; - meltcdat->dclo_254__OUTPUCOD_GETARG.discr = + /*iniclos dclo_256__OUTPUCOD_GETARG */ + /*_._VALCLO___V447*/ meltfptr[446] = + (melt_ptr_t) & meltcdat->dclo_256__OUTPUCOD_GETARG; + meltcdat->dclo_256__OUTPUCOD_GETARG.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); - meltcdat->dclo_254__OUTPUCOD_GETARG.nbval = 0; + meltcdat->dclo_256__OUTPUCOD_GETARG.nbval = 0; -/*iniobj dsym_255__CLASS_OBJGETARG*/ - /*uniqueobj*/ if (! /*_._VALDATA___V445*/ meltfptr[444]) -/*_._VALDATA___V445*/ meltfptr[444] = - (melt_ptr_t) & meltcdat->dsym_255__CLASS_OBJGETARG; +/*iniobj dsym_257__CLASS_OBJGETARG*/ + /*uniqueobj*/ if (! /*_._VALDATA___V448*/ meltfptr[447]) +/*_._VALDATA___V448*/ meltfptr[447] = + (melt_ptr_t) & meltcdat->dsym_257__CLASS_OBJGETARG; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_255__CLASS_OBJGETARG", + melt_assertmsg ("iniobj check.discr isobj dsym_257__CLASS_OBJGETARG", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr objmagic dsym_255__CLASS_OBJGETARG", + melt_assertmsg ("iniobj check.discr objmagic dsym_257__CLASS_OBJGETARG", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_255__CLASS_OBJGETARG.meltobj_class = + meltcdat->dsym_257__CLASS_OBJGETARG.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_255__CLASS_OBJGETARG.obj_hash = 596373581; - meltcdat->dsym_255__CLASS_OBJGETARG.obj_len = 3; + meltcdat->dsym_257__CLASS_OBJGETARG.obj_hash = 596373581; + meltcdat->dsym_257__CLASS_OBJGETARG.obj_len = 3; -/*inistring dstr_256__CLASS_OBJGETARG*/ - /*_._VALSTR___V446*/ meltfptr[445] = - (melt_ptr_t) & meltcdat->dstr_256__CLASS_OBJGETARG; - meltcdat->dstr_256__CLASS_OBJGETARG.discr = +/*inistring dstr_258__CLASS_OBJGETARG*/ + /*_._VALSTR___V449*/ meltfptr[448] = + (melt_ptr_t) & meltcdat->dstr_258__CLASS_OBJGETARG; + meltcdat->dstr_258__CLASS_OBJGETARG.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_256__CLASS_OBJGETARG.val, + /*small inistring */ strncpy (meltcdat->dstr_258__CLASS_OBJGETARG.val, "CLASS_OBJGETARG", - sizeof (meltcdat->dstr_256__CLASS_OBJGETARG. + sizeof (meltcdat->dstr_258__CLASS_OBJGETARG. val) - 1); - meltcdat->dstr_256__CLASS_OBJGETARG.val[15] = (char) 0; - meltcdat->dstr_256__CLASS_OBJGETARG.slen = 15; + meltcdat->dstr_258__CLASS_OBJGETARG.val[15] = (char) 0; + meltcdat->dstr_258__CLASS_OBJGETARG.slen = 15; -/*iniobj dsym_257__CLASS_FORMAL_BINDING*/ - /*uniqueobj*/ if (! /*_._VALDATA___V447*/ meltfptr[446]) -/*_._VALDATA___V447*/ meltfptr[446] = - (melt_ptr_t) & meltcdat->dsym_257__CLASS_FORMAL_BINDING; +/*iniobj dsym_259__CLASS_FORMAL_BINDING*/ + /*uniqueobj*/ if (! /*_._VALDATA___V450*/ meltfptr[449]) +/*_._VALDATA___V450*/ meltfptr[449] = + (melt_ptr_t) & meltcdat->dsym_259__CLASS_FORMAL_BINDING; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_257__CLASS_FORMAL_BINDING", + melt_assertmsg ("iniobj check.discr isobj dsym_259__CLASS_FORMAL_BINDING", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr objmagic dsym_257__CLASS_FORMAL_BINDING", + ("iniobj check.discr objmagic dsym_259__CLASS_FORMAL_BINDING", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_257__CLASS_FORMAL_BINDING.meltobj_class = + meltcdat->dsym_259__CLASS_FORMAL_BINDING.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_257__CLASS_FORMAL_BINDING.obj_hash = 3733780; - meltcdat->dsym_257__CLASS_FORMAL_BINDING.obj_len = 3; + meltcdat->dsym_259__CLASS_FORMAL_BINDING.obj_hash = 3733780; + meltcdat->dsym_259__CLASS_FORMAL_BINDING.obj_len = 3; -/*inistring dstr_258__CLASS_FORMAL_BINDING*/ - /*_._VALSTR___V448*/ meltfptr[447] = - (melt_ptr_t) & meltcdat->dstr_258__CLASS_FORMAL_BINDING; - meltcdat->dstr_258__CLASS_FORMAL_BINDING.discr = +/*inistring dstr_260__CLASS_FORMAL_BINDING*/ + /*_._VALSTR___V451*/ meltfptr[450] = + (melt_ptr_t) & meltcdat->dstr_260__CLASS_FORMAL_BINDING; + meltcdat->dstr_260__CLASS_FORMAL_BINDING.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_258__CLASS_FORMAL_BINDING.val, + /*small inistring */ strncpy (meltcdat->dstr_260__CLASS_FORMAL_BINDING.val, "CLASS_FORMAL_BINDING", sizeof (meltcdat-> - dstr_258__CLASS_FORMAL_BINDING.val) - + dstr_260__CLASS_FORMAL_BINDING.val) - 1); - meltcdat->dstr_258__CLASS_FORMAL_BINDING.val[20] = (char) 0; - meltcdat->dstr_258__CLASS_FORMAL_BINDING.slen = 20; + meltcdat->dstr_260__CLASS_FORMAL_BINDING.val[20] = (char) 0; + meltcdat->dstr_260__CLASS_FORMAL_BINDING.slen = 20; - /*inirout drout_259__OUTPUCOD_GETARGREST */ - /*_._VALROUT___V449*/ meltfptr[448] = - (melt_ptr_t) & meltcdat->drout_259__OUTPUCOD_GETARGREST; - meltcdat->drout_259__OUTPUCOD_GETARGREST.discr = + /*inirout drout_261__OUTPUCOD_GETARGREST */ + /*_._VALROUT___V452*/ meltfptr[451] = + (melt_ptr_t) & meltcdat->drout_261__OUTPUCOD_GETARGREST; + meltcdat->drout_261__OUTPUCOD_GETARGREST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); - strncpy (meltcdat->drout_259__OUTPUCOD_GETARGREST.routdescr, + strncpy (meltcdat->drout_261__OUTPUCOD_GETARGREST.routdescr, "OUTPUCOD_GETARGREST @warmelt-outobj.melt:2912", MELT_ROUTDESCR_LEN - 1); - meltcdat->drout_259__OUTPUCOD_GETARGREST.nbval = 11; - MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_259__OUTPUCOD_GETARGREST, + meltcdat->drout_261__OUTPUCOD_GETARGREST.nbval = 11; + MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_261__OUTPUCOD_GETARGREST, meltrout_57_WARMELTmiOUTOBJ_OUTPUCOD_GETARGREST); - /*iniclos dclo_260__OUTPUCOD_GETARGREST */ - /*_._VALCLO___V450*/ meltfptr[449] = - (melt_ptr_t) & meltcdat->dclo_260__OUTPUCOD_GETARGREST; - meltcdat->dclo_260__OUTPUCOD_GETARGREST.discr = + /*iniclos dclo_262__OUTPUCOD_GETARGREST */ + /*_._VALCLO___V453*/ meltfptr[452] = + (melt_ptr_t) & meltcdat->dclo_262__OUTPUCOD_GETARGREST; + meltcdat->dclo_262__OUTPUCOD_GETARGREST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); - meltcdat->dclo_260__OUTPUCOD_GETARGREST.nbval = 0; + meltcdat->dclo_262__OUTPUCOD_GETARGREST.nbval = 0; -/*iniobj dsym_261__CLASS_OBJGETARGREST*/ - /*uniqueobj*/ if (! /*_._VALDATA___V451*/ meltfptr[450]) -/*_._VALDATA___V451*/ meltfptr[450] = - (melt_ptr_t) & meltcdat->dsym_261__CLASS_OBJGETARGREST; +/*iniobj dsym_263__CLASS_OBJGETARGREST*/ + /*uniqueobj*/ if (! /*_._VALDATA___V454*/ meltfptr[453]) +/*_._VALDATA___V454*/ meltfptr[453] = + (melt_ptr_t) & meltcdat->dsym_263__CLASS_OBJGETARGREST; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_261__CLASS_OBJGETARGREST", + melt_assertmsg ("iniobj check.discr isobj dsym_263__CLASS_OBJGETARGREST", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr objmagic dsym_261__CLASS_OBJGETARGREST", + ("iniobj check.discr objmagic dsym_263__CLASS_OBJGETARGREST", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_261__CLASS_OBJGETARGREST.meltobj_class = + meltcdat->dsym_263__CLASS_OBJGETARGREST.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_261__CLASS_OBJGETARGREST.obj_hash = 558628622; - meltcdat->dsym_261__CLASS_OBJGETARGREST.obj_len = 3; + meltcdat->dsym_263__CLASS_OBJGETARGREST.obj_hash = 558628622; + meltcdat->dsym_263__CLASS_OBJGETARGREST.obj_len = 3; -/*inistring dstr_262__CLASS_OBJGETARGREST*/ - /*_._VALSTR___V452*/ meltfptr[451] = - (melt_ptr_t) & meltcdat->dstr_262__CLASS_OBJGETARGREST; - meltcdat->dstr_262__CLASS_OBJGETARGREST.discr = +/*inistring dstr_264__CLASS_OBJGETARGREST*/ + /*_._VALSTR___V455*/ meltfptr[454] = + (melt_ptr_t) & meltcdat->dstr_264__CLASS_OBJGETARGREST; + meltcdat->dstr_264__CLASS_OBJGETARGREST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_262__CLASS_OBJGETARGREST.val, + /*small inistring */ strncpy (meltcdat->dstr_264__CLASS_OBJGETARGREST.val, "CLASS_OBJGETARGREST", sizeof (meltcdat-> - dstr_262__CLASS_OBJGETARGREST.val) - + dstr_264__CLASS_OBJGETARGREST.val) - 1); - meltcdat->dstr_262__CLASS_OBJGETARGREST.val[19] = (char) 0; - meltcdat->dstr_262__CLASS_OBJGETARGREST.slen = 19; + meltcdat->dstr_264__CLASS_OBJGETARGREST.val[19] = (char) 0; + meltcdat->dstr_264__CLASS_OBJGETARGREST.slen = 19; - /*inirout drout_263__OUTPUCOD_OBJCFORMAL */ - /*_._VALROUT___V453*/ meltfptr[452] = - (melt_ptr_t) & meltcdat->drout_263__OUTPUCOD_OBJCFORMAL; - meltcdat->drout_263__OUTPUCOD_OBJCFORMAL.discr = + /*inirout drout_265__OUTPUCOD_OBJCFORMAL */ + /*_._VALROUT___V456*/ meltfptr[455] = + (melt_ptr_t) & meltcdat->drout_265__OUTPUCOD_OBJCFORMAL; + meltcdat->drout_265__OUTPUCOD_OBJCFORMAL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); - strncpy (meltcdat->drout_263__OUTPUCOD_OBJCFORMAL.routdescr, + strncpy (meltcdat->drout_265__OUTPUCOD_OBJCFORMAL.routdescr, "OUTPUCOD_OBJCFORMAL @warmelt-outobj.melt:2995", MELT_ROUTDESCR_LEN - 1); - meltcdat->drout_263__OUTPUCOD_OBJCFORMAL.nbval = 2; - MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_263__OUTPUCOD_OBJCFORMAL, + meltcdat->drout_265__OUTPUCOD_OBJCFORMAL.nbval = 2; + MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_265__OUTPUCOD_OBJCFORMAL, meltrout_58_WARMELTmiOUTOBJ_OUTPUCOD_OBJCFORMAL); - /*iniclos dclo_264__OUTPUCOD_OBJCFORMAL */ - /*_._VALCLO___V454*/ meltfptr[453] = - (melt_ptr_t) & meltcdat->dclo_264__OUTPUCOD_OBJCFORMAL; - meltcdat->dclo_264__OUTPUCOD_OBJCFORMAL.discr = + /*iniclos dclo_266__OUTPUCOD_OBJCFORMAL */ + /*_._VALCLO___V457*/ meltfptr[456] = + (melt_ptr_t) & meltcdat->dclo_266__OUTPUCOD_OBJCFORMAL; + meltcdat->dclo_266__OUTPUCOD_OBJCFORMAL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); - meltcdat->dclo_264__OUTPUCOD_OBJCFORMAL.nbval = 0; + meltcdat->dclo_266__OUTPUCOD_OBJCFORMAL.nbval = 0; - /*inirout drout_265__OUTPUCOD_OBJFETCHMODVAR */ - /*_._VALROUT___V455*/ meltfptr[454] = - (melt_ptr_t) & meltcdat->drout_265__OUTPUCOD_OBJFETCHMODVAR; - meltcdat->drout_265__OUTPUCOD_OBJFETCHMODVAR.discr = + /*inirout drout_267__OUTPUCOD_OBJFETCHMODVAR */ + /*_._VALROUT___V458*/ meltfptr[457] = + (melt_ptr_t) & meltcdat->drout_267__OUTPUCOD_OBJFETCHMODVAR; + meltcdat->drout_267__OUTPUCOD_OBJFETCHMODVAR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); - strncpy (meltcdat->drout_265__OUTPUCOD_OBJFETCHMODVAR.routdescr, + strncpy (meltcdat->drout_267__OUTPUCOD_OBJFETCHMODVAR.routdescr, "OUTPUCOD_OBJFETCHMODVAR @warmelt-outobj.melt:3009", MELT_ROUTDESCR_LEN - 1); - meltcdat->drout_265__OUTPUCOD_OBJFETCHMODVAR.nbval = 5; - MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_265__OUTPUCOD_OBJFETCHMODVAR, + meltcdat->drout_267__OUTPUCOD_OBJFETCHMODVAR.nbval = 5; + MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_267__OUTPUCOD_OBJFETCHMODVAR, meltrout_59_WARMELTmiOUTOBJ_OUTPUCOD_OBJFETCHMODVAR); - /*iniclos dclo_266__OUTPUCOD_OBJFETCHMODVAR */ - /*_._VALCLO___V456*/ meltfptr[455] = - (melt_ptr_t) & meltcdat->dclo_266__OUTPUCOD_OBJFETCHMODVAR; - meltcdat->dclo_266__OUTPUCOD_OBJFETCHMODVAR.discr = + /*iniclos dclo_268__OUTPUCOD_OBJFETCHMODVAR */ + /*_._VALCLO___V459*/ meltfptr[458] = + (melt_ptr_t) & meltcdat->dclo_268__OUTPUCOD_OBJFETCHMODVAR; + meltcdat->dclo_268__OUTPUCOD_OBJFETCHMODVAR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); - meltcdat->dclo_266__OUTPUCOD_OBJFETCHMODVAR.nbval = 0; + meltcdat->dclo_268__OUTPUCOD_OBJFETCHMODVAR.nbval = 0; -/*iniobj dsym_267__CLASS_OBJFETCHMODVAR*/ - /*uniqueobj*/ if (! /*_._VALDATA___V457*/ meltfptr[456]) -/*_._VALDATA___V457*/ meltfptr[456] = - (melt_ptr_t) & meltcdat->dsym_267__CLASS_OBJFETCHMODVAR; +/*iniobj dsym_269__CLASS_OBJFETCHMODVAR*/ + /*uniqueobj*/ if (! /*_._VALDATA___V460*/ meltfptr[459]) +/*_._VALDATA___V460*/ meltfptr[459] = + (melt_ptr_t) & meltcdat->dsym_269__CLASS_OBJFETCHMODVAR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_267__CLASS_OBJFETCHMODVAR", + melt_assertmsg ("iniobj check.discr isobj dsym_269__CLASS_OBJFETCHMODVAR", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr objmagic dsym_267__CLASS_OBJFETCHMODVAR", + ("iniobj check.discr objmagic dsym_269__CLASS_OBJFETCHMODVAR", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_267__CLASS_OBJFETCHMODVAR.meltobj_class = + meltcdat->dsym_269__CLASS_OBJFETCHMODVAR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_267__CLASS_OBJFETCHMODVAR.obj_hash = 493414352; - meltcdat->dsym_267__CLASS_OBJFETCHMODVAR.obj_len = 3; + meltcdat->dsym_269__CLASS_OBJFETCHMODVAR.obj_hash = 493414352; + meltcdat->dsym_269__CLASS_OBJFETCHMODVAR.obj_len = 3; -/*inistring dstr_268__CLASS_OBJFETCHMODVAR*/ - /*_._VALSTR___V458*/ meltfptr[457] = - (melt_ptr_t) & meltcdat->dstr_268__CLASS_OBJFETCHMODVAR; - meltcdat->dstr_268__CLASS_OBJFETCHMODVAR.discr = +/*inistring dstr_270__CLASS_OBJFETCHMODVAR*/ + /*_._VALSTR___V461*/ meltfptr[460] = + (melt_ptr_t) & meltcdat->dstr_270__CLASS_OBJFETCHMODVAR; + meltcdat->dstr_270__CLASS_OBJFETCHMODVAR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_268__CLASS_OBJFETCHMODVAR.val, + /*small inistring */ strncpy (meltcdat->dstr_270__CLASS_OBJFETCHMODVAR.val, "CLASS_OBJFETCHMODVAR", sizeof (meltcdat-> - dstr_268__CLASS_OBJFETCHMODVAR.val) - + dstr_270__CLASS_OBJFETCHMODVAR.val) - 1); - meltcdat->dstr_268__CLASS_OBJFETCHMODVAR.val[20] = (char) 0; - meltcdat->dstr_268__CLASS_OBJFETCHMODVAR.slen = 20; + meltcdat->dstr_270__CLASS_OBJFETCHMODVAR.val[20] = (char) 0; + meltcdat->dstr_270__CLASS_OBJFETCHMODVAR.slen = 20; - /*inirout drout_269__OUTPUCOD_OBJPUTMODVAR */ - /*_._VALROUT___V459*/ meltfptr[458] = - (melt_ptr_t) & meltcdat->drout_269__OUTPUCOD_OBJPUTMODVAR; - meltcdat->drout_269__OUTPUCOD_OBJPUTMODVAR.discr = + /*inirout drout_271__OUTPUCOD_OBJPUTMODVAR */ + /*_._VALROUT___V462*/ meltfptr[461] = + (melt_ptr_t) & meltcdat->drout_271__OUTPUCOD_OBJPUTMODVAR; + meltcdat->drout_271__OUTPUCOD_OBJPUTMODVAR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); - strncpy (meltcdat->drout_269__OUTPUCOD_OBJPUTMODVAR.routdescr, + strncpy (meltcdat->drout_271__OUTPUCOD_OBJPUTMODVAR.routdescr, "OUTPUCOD_OBJPUTMODVAR @warmelt-outobj.melt:3023", MELT_ROUTDESCR_LEN - 1); - meltcdat->drout_269__OUTPUCOD_OBJPUTMODVAR.nbval = 8; - MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_269__OUTPUCOD_OBJPUTMODVAR, + meltcdat->drout_271__OUTPUCOD_OBJPUTMODVAR.nbval = 8; + MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_271__OUTPUCOD_OBJPUTMODVAR, meltrout_60_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTMODVAR); - /*iniclos dclo_270__OUTPUCOD_OBJPUTMODVAR */ - /*_._VALCLO___V460*/ meltfptr[459] = - (melt_ptr_t) & meltcdat->dclo_270__OUTPUCOD_OBJPUTMODVAR; - meltcdat->dclo_270__OUTPUCOD_OBJPUTMODVAR.discr = + /*iniclos dclo_272__OUTPUCOD_OBJPUTMODVAR */ + /*_._VALCLO___V463*/ meltfptr[462] = + (melt_ptr_t) & meltcdat->dclo_272__OUTPUCOD_OBJPUTMODVAR; + meltcdat->dclo_272__OUTPUCOD_OBJPUTMODVAR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); - meltcdat->dclo_270__OUTPUCOD_OBJPUTMODVAR.nbval = 0; + meltcdat->dclo_272__OUTPUCOD_OBJPUTMODVAR.nbval = 0; -/*iniobj dsym_271__CLASS_OBJPUTMODVAR*/ - /*uniqueobj*/ if (! /*_._VALDATA___V461*/ meltfptr[460]) -/*_._VALDATA___V461*/ meltfptr[460] = - (melt_ptr_t) & meltcdat->dsym_271__CLASS_OBJPUTMODVAR; +/*iniobj dsym_273__CLASS_OBJPUTMODVAR*/ + /*uniqueobj*/ if (! /*_._VALDATA___V464*/ meltfptr[463]) +/*_._VALDATA___V464*/ meltfptr[463] = + (melt_ptr_t) & meltcdat->dsym_273__CLASS_OBJPUTMODVAR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_271__CLASS_OBJPUTMODVAR", + melt_assertmsg ("iniobj check.discr isobj dsym_273__CLASS_OBJPUTMODVAR", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr objmagic dsym_271__CLASS_OBJPUTMODVAR", + ("iniobj check.discr objmagic dsym_273__CLASS_OBJPUTMODVAR", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_271__CLASS_OBJPUTMODVAR.meltobj_class = + meltcdat->dsym_273__CLASS_OBJPUTMODVAR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_271__CLASS_OBJPUTMODVAR.obj_hash = 665291680; - meltcdat->dsym_271__CLASS_OBJPUTMODVAR.obj_len = 3; + meltcdat->dsym_273__CLASS_OBJPUTMODVAR.obj_hash = 665291680; + meltcdat->dsym_273__CLASS_OBJPUTMODVAR.obj_len = 3; -/*inistring dstr_272__CLASS_OBJPUTMODVAR*/ - /*_._VALSTR___V462*/ meltfptr[461] = - (melt_ptr_t) & meltcdat->dstr_272__CLASS_OBJPUTMODVAR; - meltcdat->dstr_272__CLASS_OBJPUTMODVAR.discr = +/*inistring dstr_274__CLASS_OBJPUTMODVAR*/ + /*_._VALSTR___V465*/ meltfptr[464] = + (melt_ptr_t) & meltcdat->dstr_274__CLASS_OBJPUTMODVAR; + meltcdat->dstr_274__CLASS_OBJPUTMODVAR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_272__CLASS_OBJPUTMODVAR.val, + /*small inistring */ strncpy (meltcdat->dstr_274__CLASS_OBJPUTMODVAR.val, "CLASS_OBJPUTMODVAR", sizeof (meltcdat-> - dstr_272__CLASS_OBJPUTMODVAR.val) - + dstr_274__CLASS_OBJPUTMODVAR.val) - 1); - meltcdat->dstr_272__CLASS_OBJPUTMODVAR.val[18] = (char) 0; - meltcdat->dstr_272__CLASS_OBJPUTMODVAR.slen = 18; + meltcdat->dstr_274__CLASS_OBJPUTMODVAR.val[18] = (char) 0; + meltcdat->dstr_274__CLASS_OBJPUTMODVAR.slen = 18; - /*inirout drout_273__OUTPUCOD_OBJPUTOUTARG */ - /*_._VALROUT___V463*/ meltfptr[462] = - (melt_ptr_t) & meltcdat->drout_273__OUTPUCOD_OBJPUTOUTARG; - meltcdat->drout_273__OUTPUCOD_OBJPUTOUTARG.discr = + /*inirout drout_275__OUTPUCOD_OBJPUTOUTARG */ + /*_._VALROUT___V466*/ meltfptr[465] = + (melt_ptr_t) & meltcdat->drout_275__OUTPUCOD_OBJPUTOUTARG; + meltcdat->drout_275__OUTPUCOD_OBJPUTOUTARG.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); - strncpy (meltcdat->drout_273__OUTPUCOD_OBJPUTOUTARG.routdescr, + strncpy (meltcdat->drout_275__OUTPUCOD_OBJPUTOUTARG.routdescr, "OUTPUCOD_OBJPUTOUTARG @warmelt-outobj.melt:3044", MELT_ROUTDESCR_LEN - 1); - meltcdat->drout_273__OUTPUCOD_OBJPUTOUTARG.nbval = 8; - MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_273__OUTPUCOD_OBJPUTOUTARG, + meltcdat->drout_275__OUTPUCOD_OBJPUTOUTARG.nbval = 8; + MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_275__OUTPUCOD_OBJPUTOUTARG, meltrout_61_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTOUTARG); - /*iniclos dclo_274__OUTPUCOD_OBJPUTOUTARG */ - /*_._VALCLO___V464*/ meltfptr[463] = - (melt_ptr_t) & meltcdat->dclo_274__OUTPUCOD_OBJPUTOUTARG; - meltcdat->dclo_274__OUTPUCOD_OBJPUTOUTARG.discr = + /*iniclos dclo_276__OUTPUCOD_OBJPUTOUTARG */ + /*_._VALCLO___V467*/ meltfptr[466] = + (melt_ptr_t) & meltcdat->dclo_276__OUTPUCOD_OBJPUTOUTARG; + meltcdat->dclo_276__OUTPUCOD_OBJPUTOUTARG.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); - meltcdat->dclo_274__OUTPUCOD_OBJPUTOUTARG.nbval = 0; + meltcdat->dclo_276__OUTPUCOD_OBJPUTOUTARG.nbval = 0; -/*iniobj dsym_275__CLASS_OBJPUTOUTARG*/ - /*uniqueobj*/ if (! /*_._VALDATA___V465*/ meltfptr[464]) -/*_._VALDATA___V465*/ meltfptr[464] = - (melt_ptr_t) & meltcdat->dsym_275__CLASS_OBJPUTOUTARG; +/*iniobj dsym_277__CLASS_OBJPUTOUTARG*/ + /*uniqueobj*/ if (! /*_._VALDATA___V468*/ meltfptr[467]) +/*_._VALDATA___V468*/ meltfptr[467] = + (melt_ptr_t) & meltcdat->dsym_277__CLASS_OBJPUTOUTARG; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_275__CLASS_OBJPUTOUTARG", + melt_assertmsg ("iniobj check.discr isobj dsym_277__CLASS_OBJPUTOUTARG", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr objmagic dsym_275__CLASS_OBJPUTOUTARG", + ("iniobj check.discr objmagic dsym_277__CLASS_OBJPUTOUTARG", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_275__CLASS_OBJPUTOUTARG.meltobj_class = + meltcdat->dsym_277__CLASS_OBJPUTOUTARG.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_275__CLASS_OBJPUTOUTARG.obj_hash = 399195986; - meltcdat->dsym_275__CLASS_OBJPUTOUTARG.obj_len = 3; + meltcdat->dsym_277__CLASS_OBJPUTOUTARG.obj_hash = 399195986; + meltcdat->dsym_277__CLASS_OBJPUTOUTARG.obj_len = 3; -/*inistring dstr_276__CLASS_OBJPUTOUTARG*/ - /*_._VALSTR___V466*/ meltfptr[465] = - (melt_ptr_t) & meltcdat->dstr_276__CLASS_OBJPUTOUTARG; - meltcdat->dstr_276__CLASS_OBJPUTOUTARG.discr = +/*inistring dstr_278__CLASS_OBJPUTOUTARG*/ + /*_._VALSTR___V469*/ meltfptr[468] = + (melt_ptr_t) & meltcdat->dstr_278__CLASS_OBJPUTOUTARG; + meltcdat->dstr_278__CLASS_OBJPUTOUTARG.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_276__CLASS_OBJPUTOUTARG.val, + /*small inistring */ strncpy (meltcdat->dstr_278__CLASS_OBJPUTOUTARG.val, "CLASS_OBJPUTOUTARG", sizeof (meltcdat-> - dstr_276__CLASS_OBJPUTOUTARG.val) - + dstr_278__CLASS_OBJPUTOUTARG.val) - 1); - meltcdat->dstr_276__CLASS_OBJPUTOUTARG.val[18] = (char) 0; - meltcdat->dstr_276__CLASS_OBJPUTOUTARG.slen = 18; + meltcdat->dstr_278__CLASS_OBJPUTOUTARG.val[18] = (char) 0; + meltcdat->dstr_278__CLASS_OBJPUTOUTARG.slen = 18; - /*inirout drout_277__OUTPUCOD_OBJLOCV */ - /*_._VALROUT___V467*/ meltfptr[466] = - (melt_ptr_t) & meltcdat->drout_277__OUTPUCOD_OBJLOCV; - meltcdat->drout_277__OUTPUCOD_OBJLOCV.discr = + /*inirout drout_279__OUTPUCOD_OBJLOCV */ + /*_._VALROUT___V470*/ meltfptr[469] = + (melt_ptr_t) & meltcdat->drout_279__OUTPUCOD_OBJLOCV; + meltcdat->drout_279__OUTPUCOD_OBJLOCV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); - strncpy (meltcdat->drout_277__OUTPUCOD_OBJLOCV.routdescr, + strncpy (meltcdat->drout_279__OUTPUCOD_OBJLOCV.routdescr, "OUTPUCOD_OBJLOCV @warmelt-outobj.melt:3070", MELT_ROUTDESCR_LEN - 1); - meltcdat->drout_277__OUTPUCOD_OBJLOCV.nbval = 5; - MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_277__OUTPUCOD_OBJLOCV, + meltcdat->drout_279__OUTPUCOD_OBJLOCV.nbval = 5; + MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_279__OUTPUCOD_OBJLOCV, meltrout_62_WARMELTmiOUTOBJ_OUTPUCOD_OBJLOCV); - /*iniclos dclo_278__OUTPUCOD_OBJLOCV */ - /*_._VALCLO___V468*/ meltfptr[467] = - (melt_ptr_t) & meltcdat->dclo_278__OUTPUCOD_OBJLOCV; - meltcdat->dclo_278__OUTPUCOD_OBJLOCV.discr = + /*iniclos dclo_280__OUTPUCOD_OBJLOCV */ + /*_._VALCLO___V471*/ meltfptr[470] = + (melt_ptr_t) & meltcdat->dclo_280__OUTPUCOD_OBJLOCV; + meltcdat->dclo_280__OUTPUCOD_OBJLOCV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); - meltcdat->dclo_278__OUTPUCOD_OBJLOCV.nbval = 0; + meltcdat->dclo_280__OUTPUCOD_OBJLOCV.nbval = 0; -/*iniobj dsym_279__CTYPE_LONG*/ - /*uniqueobj*/ if (! /*_._VALDATA___V469*/ meltfptr[468]) -/*_._VALDATA___V469*/ meltfptr[468] = - (melt_ptr_t) & meltcdat->dsym_279__CTYPE_LONG; +/*iniobj dsym_281__CTYPE_LONG*/ + /*uniqueobj*/ if (! /*_._VALDATA___V472*/ meltfptr[471]) +/*_._VALDATA___V472*/ meltfptr[471] = + (melt_ptr_t) & meltcdat->dsym_281__CTYPE_LONG; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_279__CTYPE_LONG", + melt_assertmsg ("iniobj check.discr isobj dsym_281__CTYPE_LONG", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr objmagic dsym_279__CTYPE_LONG", + melt_assertmsg ("iniobj check.discr objmagic dsym_281__CTYPE_LONG", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_279__CTYPE_LONG.meltobj_class = + meltcdat->dsym_281__CTYPE_LONG.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_279__CTYPE_LONG.obj_hash = 64180850; - meltcdat->dsym_279__CTYPE_LONG.obj_len = 3; + meltcdat->dsym_281__CTYPE_LONG.obj_hash = 64180850; + meltcdat->dsym_281__CTYPE_LONG.obj_len = 3; -/*inistring dstr_280__CTYPE_LONG*/ - /*_._VALSTR___V470*/ meltfptr[469] = - (melt_ptr_t) & meltcdat->dstr_280__CTYPE_LONG; - meltcdat->dstr_280__CTYPE_LONG.discr = +/*inistring dstr_282__CTYPE_LONG*/ + /*_._VALSTR___V473*/ meltfptr[472] = + (melt_ptr_t) & meltcdat->dstr_282__CTYPE_LONG; + meltcdat->dstr_282__CTYPE_LONG.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_280__CTYPE_LONG.val, + /*small inistring */ strncpy (meltcdat->dstr_282__CTYPE_LONG.val, "CTYPE_LONG", - sizeof (meltcdat->dstr_280__CTYPE_LONG.val) - + sizeof (meltcdat->dstr_282__CTYPE_LONG.val) - 1); - meltcdat->dstr_280__CTYPE_LONG.val[10] = (char) 0; - meltcdat->dstr_280__CTYPE_LONG.slen = 10; + meltcdat->dstr_282__CTYPE_LONG.val[10] = (char) 0; + meltcdat->dstr_282__CTYPE_LONG.slen = 10; - /*inirout drout_281__OUTPUCOD_OBJCLOCCV */ - /*_._VALROUT___V471*/ meltfptr[470] = - (melt_ptr_t) & meltcdat->drout_281__OUTPUCOD_OBJCLOCCV; - meltcdat->drout_281__OUTPUCOD_OBJCLOCCV.discr = + /*inirout drout_283__OUTPUCOD_OBJCLOCCV */ + /*_._VALROUT___V474*/ meltfptr[473] = + (melt_ptr_t) & meltcdat->drout_283__OUTPUCOD_OBJCLOCCV; + meltcdat->drout_283__OUTPUCOD_OBJCLOCCV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); - strncpy (meltcdat->drout_281__OUTPUCOD_OBJCLOCCV.routdescr, + strncpy (meltcdat->drout_283__OUTPUCOD_OBJCLOCCV.routdescr, "OUTPUCOD_OBJCLOCCV @warmelt-outobj.melt:3101", MELT_ROUTDESCR_LEN - 1); - meltcdat->drout_281__OUTPUCOD_OBJCLOCCV.nbval = 4; - MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_281__OUTPUCOD_OBJCLOCCV, + meltcdat->drout_283__OUTPUCOD_OBJCLOCCV.nbval = 4; + MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_283__OUTPUCOD_OBJCLOCCV, meltrout_63_WARMELTmiOUTOBJ_OUTPUCOD_OBJCLOCCV); - /*iniclos dclo_282__OUTPUCOD_OBJCLOCCV */ - /*_._VALCLO___V472*/ meltfptr[471] = - (melt_ptr_t) & meltcdat->dclo_282__OUTPUCOD_OBJCLOCCV; - meltcdat->dclo_282__OUTPUCOD_OBJCLOCCV.discr = + /*iniclos dclo_284__OUTPUCOD_OBJCLOCCV */ + /*_._VALCLO___V475*/ meltfptr[474] = + (melt_ptr_t) & meltcdat->dclo_284__OUTPUCOD_OBJCLOCCV; + meltcdat->dclo_284__OUTPUCOD_OBJCLOCCV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); - meltcdat->dclo_282__OUTPUCOD_OBJCLOCCV.nbval = 0; + meltcdat->dclo_284__OUTPUCOD_OBJCLOCCV.nbval = 0; -/*iniobj dsym_283__CLASS_OBJCLOCCV*/ - /*uniqueobj*/ if (! /*_._VALDATA___V473*/ meltfptr[472]) -/*_._VALDATA___V473*/ meltfptr[472] = - (melt_ptr_t) & meltcdat->dsym_283__CLASS_OBJCLOCCV; +/*iniobj dsym_285__CLASS_OBJCLOCCV*/ + /*uniqueobj*/ if (! /*_._VALDATA___V476*/ meltfptr[475]) +/*_._VALDATA___V476*/ meltfptr[475] = + (melt_ptr_t) & meltcdat->dsym_285__CLASS_OBJCLOCCV; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_283__CLASS_OBJCLOCCV", + melt_assertmsg ("iniobj check.discr isobj dsym_285__CLASS_OBJCLOCCV", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr objmagic dsym_283__CLASS_OBJCLOCCV", + melt_assertmsg ("iniobj check.discr objmagic dsym_285__CLASS_OBJCLOCCV", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_283__CLASS_OBJCLOCCV.meltobj_class = + meltcdat->dsym_285__CLASS_OBJCLOCCV.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_283__CLASS_OBJCLOCCV.obj_hash = 195863179; - meltcdat->dsym_283__CLASS_OBJCLOCCV.obj_len = 3; + meltcdat->dsym_285__CLASS_OBJCLOCCV.obj_hash = 195863179; + meltcdat->dsym_285__CLASS_OBJCLOCCV.obj_len = 3; -/*inistring dstr_284__CLASS_OBJCLOCCV*/ - /*_._VALSTR___V474*/ meltfptr[473] = - (melt_ptr_t) & meltcdat->dstr_284__CLASS_OBJCLOCCV; - meltcdat->dstr_284__CLASS_OBJCLOCCV.discr = +/*inistring dstr_286__CLASS_OBJCLOCCV*/ + /*_._VALSTR___V477*/ meltfptr[476] = + (melt_ptr_t) & meltcdat->dstr_286__CLASS_OBJCLOCCV; + meltcdat->dstr_286__CLASS_OBJCLOCCV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_284__CLASS_OBJCLOCCV.val, + /*small inistring */ strncpy (meltcdat->dstr_286__CLASS_OBJCLOCCV.val, "CLASS_OBJCLOCCV", - sizeof (meltcdat->dstr_284__CLASS_OBJCLOCCV. + sizeof (meltcdat->dstr_286__CLASS_OBJCLOCCV. val) - 1); - meltcdat->dstr_284__CLASS_OBJCLOCCV.val[15] = (char) 0; - meltcdat->dstr_284__CLASS_OBJCLOCCV.slen = 15; + meltcdat->dstr_286__CLASS_OBJCLOCCV.val[15] = (char) 0; + meltcdat->dstr_286__CLASS_OBJCLOCCV.slen = 15; - /*inirout drout_285__OUTPUCOD_OBJCLOHOOKV */ - /*_._VALROUT___V475*/ meltfptr[474] = - (melt_ptr_t) & meltcdat->drout_285__OUTPUCOD_OBJCLOHOOKV; - meltcdat->drout_285__OUTPUCOD_OBJCLOHOOKV.discr = + /*inirout drout_287__OUTPUCOD_OBJCLOHOOKV */ + /*_._VALROUT___V478*/ meltfptr[477] = + (melt_ptr_t) & meltcdat->drout_287__OUTPUCOD_OBJCLOHOOKV; + meltcdat->drout_287__OUTPUCOD_OBJCLOHOOKV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); - strncpy (meltcdat->drout_285__OUTPUCOD_OBJCLOHOOKV.routdescr, + strncpy (meltcdat->drout_287__OUTPUCOD_OBJCLOHOOKV.routdescr, "OUTPUCOD_OBJCLOHOOKV @warmelt-outobj.melt:3119", MELT_ROUTDESCR_LEN - 1); - meltcdat->drout_285__OUTPUCOD_OBJCLOHOOKV.nbval = 5; - MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_285__OUTPUCOD_OBJCLOHOOKV, + meltcdat->drout_287__OUTPUCOD_OBJCLOHOOKV.nbval = 5; + MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_287__OUTPUCOD_OBJCLOHOOKV, meltrout_64_WARMELTmiOUTOBJ_OUTPUCOD_OBJCLOHOOKV); - /*iniclos dclo_286__OUTPUCOD_OBJCLOHOOKV */ - /*_._VALCLO___V476*/ meltfptr[475] = - (melt_ptr_t) & meltcdat->dclo_286__OUTPUCOD_OBJCLOHOOKV; - meltcdat->dclo_286__OUTPUCOD_OBJCLOHOOKV.discr = + /*iniclos dclo_288__OUTPUCOD_OBJCLOHOOKV */ + /*_._VALCLO___V479*/ meltfptr[478] = + (melt_ptr_t) & meltcdat->dclo_288__OUTPUCOD_OBJCLOHOOKV; + meltcdat->dclo_288__OUTPUCOD_OBJCLOHOOKV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); - meltcdat->dclo_286__OUTPUCOD_OBJCLOHOOKV.nbval = 0; + meltcdat->dclo_288__OUTPUCOD_OBJCLOHOOKV.nbval = 0; -/*iniobj dsym_287__CLASS_OBJCLOHOOKV*/ - /*uniqueobj*/ if (! /*_._VALDATA___V477*/ meltfptr[476]) -/*_._VALDATA___V477*/ meltfptr[476] = - (melt_ptr_t) & meltcdat->dsym_287__CLASS_OBJCLOHOOKV; +/*iniobj dsym_289__CLASS_OBJCLOHOOKV*/ + /*uniqueobj*/ if (! /*_._VALDATA___V480*/ meltfptr[479]) +/*_._VALDATA___V480*/ meltfptr[479] = + (melt_ptr_t) & meltcdat->dsym_289__CLASS_OBJCLOHOOKV; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_287__CLASS_OBJCLOHOOKV", + melt_assertmsg ("iniobj check.discr isobj dsym_289__CLASS_OBJCLOHOOKV", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr objmagic dsym_287__CLASS_OBJCLOHOOKV", + melt_assertmsg ("iniobj check.discr objmagic dsym_289__CLASS_OBJCLOHOOKV", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_287__CLASS_OBJCLOHOOKV.meltobj_class = + meltcdat->dsym_289__CLASS_OBJCLOHOOKV.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_287__CLASS_OBJCLOHOOKV.obj_hash = 822920976; - meltcdat->dsym_287__CLASS_OBJCLOHOOKV.obj_len = 3; + meltcdat->dsym_289__CLASS_OBJCLOHOOKV.obj_hash = 822920976; + meltcdat->dsym_289__CLASS_OBJCLOHOOKV.obj_len = 3; -/*inistring dstr_288__CLASS_OBJCLOHOOKV*/ - /*_._VALSTR___V478*/ meltfptr[477] = - (melt_ptr_t) & meltcdat->dstr_288__CLASS_OBJCLOHOOKV; - meltcdat->dstr_288__CLASS_OBJCLOHOOKV.discr = +/*inistring dstr_290__CLASS_OBJCLOHOOKV*/ + /*_._VALSTR___V481*/ meltfptr[480] = + (melt_ptr_t) & meltcdat->dstr_290__CLASS_OBJCLOHOOKV; + meltcdat->dstr_290__CLASS_OBJCLOHOOKV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_288__CLASS_OBJCLOHOOKV.val, + /*small inistring */ strncpy (meltcdat->dstr_290__CLASS_OBJCLOHOOKV.val, "CLASS_OBJCLOHOOKV", - sizeof (meltcdat->dstr_288__CLASS_OBJCLOHOOKV. + sizeof (meltcdat->dstr_290__CLASS_OBJCLOHOOKV. val) - 1); - meltcdat->dstr_288__CLASS_OBJCLOHOOKV.val[17] = (char) 0; - meltcdat->dstr_288__CLASS_OBJCLOHOOKV.slen = 17; + meltcdat->dstr_290__CLASS_OBJCLOHOOKV.val[17] = (char) 0; + meltcdat->dstr_290__CLASS_OBJCLOHOOKV.slen = 17; - /*inirout drout_289__OUTPUCOD_OBJCONSTV */ - /*_._VALROUT___V479*/ meltfptr[478] = - (melt_ptr_t) & meltcdat->drout_289__OUTPUCOD_OBJCONSTV; - meltcdat->drout_289__OUTPUCOD_OBJCONSTV.discr = + /*inirout drout_291__OUTPUCOD_OBJCONSTV */ + /*_._VALROUT___V482*/ meltfptr[481] = + (melt_ptr_t) & meltcdat->drout_291__OUTPUCOD_OBJCONSTV; + meltcdat->drout_291__OUTPUCOD_OBJCONSTV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); - strncpy (meltcdat->drout_289__OUTPUCOD_OBJCONSTV.routdescr, + strncpy (meltcdat->drout_291__OUTPUCOD_OBJCONSTV.routdescr, "OUTPUCOD_OBJCONSTV @warmelt-outobj.melt:3139", MELT_ROUTDESCR_LEN - 1); - meltcdat->drout_289__OUTPUCOD_OBJCONSTV.nbval = 4; - MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_289__OUTPUCOD_OBJCONSTV, + meltcdat->drout_291__OUTPUCOD_OBJCONSTV.nbval = 4; + MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_291__OUTPUCOD_OBJCONSTV, meltrout_65_WARMELTmiOUTOBJ_OUTPUCOD_OBJCONSTV); - /*iniclos dclo_290__OUTPUCOD_OBJCONSTV */ - /*_._VALCLO___V480*/ meltfptr[479] = - (melt_ptr_t) & meltcdat->dclo_290__OUTPUCOD_OBJCONSTV; - meltcdat->dclo_290__OUTPUCOD_OBJCONSTV.discr = + /*iniclos dclo_292__OUTPUCOD_OBJCONSTV */ + /*_._VALCLO___V483*/ meltfptr[482] = + (melt_ptr_t) & meltcdat->dclo_292__OUTPUCOD_OBJCONSTV; + meltcdat->dclo_292__OUTPUCOD_OBJCONSTV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); - meltcdat->dclo_290__OUTPUCOD_OBJCONSTV.nbval = 0; + meltcdat->dclo_292__OUTPUCOD_OBJCONSTV.nbval = 0; -/*iniobj dsym_291__CLASS_OBJCONSTV*/ - /*uniqueobj*/ if (! /*_._VALDATA___V481*/ meltfptr[480]) -/*_._VALDATA___V481*/ meltfptr[480] = - (melt_ptr_t) & meltcdat->dsym_291__CLASS_OBJCONSTV; +/*iniobj dsym_293__CLASS_OBJCONSTV*/ + /*uniqueobj*/ if (! /*_._VALDATA___V484*/ meltfptr[483]) +/*_._VALDATA___V484*/ meltfptr[483] = + (melt_ptr_t) & meltcdat->dsym_293__CLASS_OBJCONSTV; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_291__CLASS_OBJCONSTV", + melt_assertmsg ("iniobj check.discr isobj dsym_293__CLASS_OBJCONSTV", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr objmagic dsym_291__CLASS_OBJCONSTV", + melt_assertmsg ("iniobj check.discr objmagic dsym_293__CLASS_OBJCONSTV", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_291__CLASS_OBJCONSTV.meltobj_class = + meltcdat->dsym_293__CLASS_OBJCONSTV.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_291__CLASS_OBJCONSTV.obj_hash = 125371776; - meltcdat->dsym_291__CLASS_OBJCONSTV.obj_len = 3; + meltcdat->dsym_293__CLASS_OBJCONSTV.obj_hash = 125371776; + meltcdat->dsym_293__CLASS_OBJCONSTV.obj_len = 3; -/*inistring dstr_292__CLASS_OBJCONSTV*/ - /*_._VALSTR___V482*/ meltfptr[481] = - (melt_ptr_t) & meltcdat->dstr_292__CLASS_OBJCONSTV; - meltcdat->dstr_292__CLASS_OBJCONSTV.discr = +/*inistring dstr_294__CLASS_OBJCONSTV*/ + /*_._VALSTR___V485*/ meltfptr[484] = + (melt_ptr_t) & meltcdat->dstr_294__CLASS_OBJCONSTV; + meltcdat->dstr_294__CLASS_OBJCONSTV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_292__CLASS_OBJCONSTV.val, + /*small inistring */ strncpy (meltcdat->dstr_294__CLASS_OBJCONSTV.val, "CLASS_OBJCONSTV", - sizeof (meltcdat->dstr_292__CLASS_OBJCONSTV. + sizeof (meltcdat->dstr_294__CLASS_OBJCONSTV. val) - 1); - meltcdat->dstr_292__CLASS_OBJCONSTV.val[15] = (char) 0; - meltcdat->dstr_292__CLASS_OBJCONSTV.slen = 15; + meltcdat->dstr_294__CLASS_OBJCONSTV.val[15] = (char) 0; + meltcdat->dstr_294__CLASS_OBJCONSTV.slen = 15; - /*inirout drout_293__OUTPUT_CODE_INSTRUCTIONS_LIST */ - /*_._VALROUT___V483*/ meltfptr[482] = - (melt_ptr_t) & meltcdat->drout_293__OUTPUT_CODE_INSTRUCTIONS_LIST; - meltcdat->drout_293__OUTPUT_CODE_INSTRUCTIONS_LIST.discr = + /*inirout drout_295__OUTPUT_CODE_INSTRUCTIONS_LIST */ + /*_._VALROUT___V486*/ meltfptr[485] = + (melt_ptr_t) & meltcdat->drout_295__OUTPUT_CODE_INSTRUCTIONS_LIST; + meltcdat->drout_295__OUTPUT_CODE_INSTRUCTIONS_LIST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); - strncpy (meltcdat->drout_293__OUTPUT_CODE_INSTRUCTIONS_LIST.routdescr, + strncpy (meltcdat->drout_295__OUTPUT_CODE_INSTRUCTIONS_LIST.routdescr, "OUTPUT_CODE_INSTRUCTIONS_LIST @warmelt-outobj.melt:3158", MELT_ROUTDESCR_LEN - 1); - meltcdat->drout_293__OUTPUT_CODE_INSTRUCTIONS_LIST.nbval = 7; + meltcdat->drout_295__OUTPUT_CODE_INSTRUCTIONS_LIST.nbval = 7; MELT_ROUTINE_SET_ROUTCODE (&meltcdat-> - drout_293__OUTPUT_CODE_INSTRUCTIONS_LIST, + drout_295__OUTPUT_CODE_INSTRUCTIONS_LIST, meltrout_66_WARMELTmiOUTOBJ_OUTPUT_CODE_INSTRUCTIONS_LIST); - /*iniclos dclo_294__OUTPUT_CODE_INSTRUCTIONS_LIST */ - /*_._VALCLO___V484*/ meltfptr[483] = - (melt_ptr_t) & meltcdat->dclo_294__OUTPUT_CODE_INSTRUCTIONS_LIST; - meltcdat->dclo_294__OUTPUT_CODE_INSTRUCTIONS_LIST.discr = + /*iniclos dclo_296__OUTPUT_CODE_INSTRUCTIONS_LIST */ + /*_._VALCLO___V487*/ meltfptr[486] = + (melt_ptr_t) & meltcdat->dclo_296__OUTPUT_CODE_INSTRUCTIONS_LIST; + meltcdat->dclo_296__OUTPUT_CODE_INSTRUCTIONS_LIST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); - meltcdat->dclo_294__OUTPUT_CODE_INSTRUCTIONS_LIST.nbval = 0; + meltcdat->dclo_296__OUTPUT_CODE_INSTRUCTIONS_LIST.nbval = 0; -/*iniobj dsym_295__CLASS_OBJPLAINBLOCK*/ - /*uniqueobj*/ if (! /*_._VALDATA___V485*/ meltfptr[484]) -/*_._VALDATA___V485*/ meltfptr[484] = - (melt_ptr_t) & meltcdat->dsym_295__CLASS_OBJPLAINBLOCK; +/*iniobj dsym_297__CLASS_OBJPLAINBLOCK*/ + /*uniqueobj*/ if (! /*_._VALDATA___V488*/ meltfptr[487]) +/*_._VALDATA___V488*/ meltfptr[487] = + (melt_ptr_t) & meltcdat->dsym_297__CLASS_OBJPLAINBLOCK; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_295__CLASS_OBJPLAINBLOCK", + melt_assertmsg ("iniobj check.discr isobj dsym_297__CLASS_OBJPLAINBLOCK", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr objmagic dsym_295__CLASS_OBJPLAINBLOCK", + ("iniobj check.discr objmagic dsym_297__CLASS_OBJPLAINBLOCK", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_295__CLASS_OBJPLAINBLOCK.meltobj_class = + meltcdat->dsym_297__CLASS_OBJPLAINBLOCK.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_295__CLASS_OBJPLAINBLOCK.obj_hash = 984803675; - meltcdat->dsym_295__CLASS_OBJPLAINBLOCK.obj_len = 3; + meltcdat->dsym_297__CLASS_OBJPLAINBLOCK.obj_hash = 984803675; + meltcdat->dsym_297__CLASS_OBJPLAINBLOCK.obj_len = 3; -/*inistring dstr_296__CLASS_OBJPLAINBLOCK*/ - /*_._VALSTR___V486*/ meltfptr[485] = - (melt_ptr_t) & meltcdat->dstr_296__CLASS_OBJPLAINBLOCK; - meltcdat->dstr_296__CLASS_OBJPLAINBLOCK.discr = +/*inistring dstr_298__CLASS_OBJPLAINBLOCK*/ + /*_._VALSTR___V489*/ meltfptr[488] = + (melt_ptr_t) & meltcdat->dstr_298__CLASS_OBJPLAINBLOCK; + meltcdat->dstr_298__CLASS_OBJPLAINBLOCK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_296__CLASS_OBJPLAINBLOCK.val, + /*small inistring */ strncpy (meltcdat->dstr_298__CLASS_OBJPLAINBLOCK.val, "CLASS_OBJPLAINBLOCK", sizeof (meltcdat-> - dstr_296__CLASS_OBJPLAINBLOCK.val) - + dstr_298__CLASS_OBJPLAINBLOCK.val) - 1); - meltcdat->dstr_296__CLASS_OBJPLAINBLOCK.val[19] = (char) 0; - meltcdat->dstr_296__CLASS_OBJPLAINBLOCK.slen = 19; + meltcdat->dstr_298__CLASS_OBJPLAINBLOCK.val[19] = (char) 0; + meltcdat->dstr_298__CLASS_OBJPLAINBLOCK.slen = 19; - /*inirout drout_297__OUTPUCOD_OBJCHECKSIGNAL */ - /*_._VALROUT___V487*/ meltfptr[486] = - (melt_ptr_t) & meltcdat->drout_297__OUTPUCOD_OBJCHECKSIGNAL; - meltcdat->drout_297__OUTPUCOD_OBJCHECKSIGNAL.discr = + /*inirout drout_299__OUTPUCOD_OBJCHECKSIGNAL */ + /*_._VALROUT___V490*/ meltfptr[489] = + (melt_ptr_t) & meltcdat->drout_299__OUTPUCOD_OBJCHECKSIGNAL; + meltcdat->drout_299__OUTPUCOD_OBJCHECKSIGNAL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); - strncpy (meltcdat->drout_297__OUTPUCOD_OBJCHECKSIGNAL.routdescr, + strncpy (meltcdat->drout_299__OUTPUCOD_OBJCHECKSIGNAL.routdescr, "OUTPUCOD_OBJCHECKSIGNAL @warmelt-outobj.melt:3192", MELT_ROUTDESCR_LEN - 1); - meltcdat->drout_297__OUTPUCOD_OBJCHECKSIGNAL.nbval = 3; - MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_297__OUTPUCOD_OBJCHECKSIGNAL, + meltcdat->drout_299__OUTPUCOD_OBJCHECKSIGNAL.nbval = 3; + MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_299__OUTPUCOD_OBJCHECKSIGNAL, meltrout_67_WARMELTmiOUTOBJ_OUTPUCOD_OBJCHECKSIGNAL); - /*iniclos dclo_298__OUTPUCOD_OBJCHECKSIGNAL */ - /*_._VALCLO___V488*/ meltfptr[487] = - (melt_ptr_t) & meltcdat->dclo_298__OUTPUCOD_OBJCHECKSIGNAL; - meltcdat->dclo_298__OUTPUCOD_OBJCHECKSIGNAL.discr = + /*iniclos dclo_300__OUTPUCOD_OBJCHECKSIGNAL */ + /*_._VALCLO___V491*/ meltfptr[490] = + (melt_ptr_t) & meltcdat->dclo_300__OUTPUCOD_OBJCHECKSIGNAL; + meltcdat->dclo_300__OUTPUCOD_OBJCHECKSIGNAL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); - meltcdat->dclo_298__OUTPUCOD_OBJCHECKSIGNAL.nbval = 0; + meltcdat->dclo_300__OUTPUCOD_OBJCHECKSIGNAL.nbval = 0; -/*iniobj dsym_299__CLASS_OBJCHECKSIGNAL*/ - /*uniqueobj*/ if (! /*_._VALDATA___V489*/ meltfptr[488]) -/*_._VALDATA___V489*/ meltfptr[488] = - (melt_ptr_t) & meltcdat->dsym_299__CLASS_OBJCHECKSIGNAL; +/*iniobj dsym_301__CLASS_OBJCHECKSIGNAL*/ + /*uniqueobj*/ if (! /*_._VALDATA___V492*/ meltfptr[491]) +/*_._VALDATA___V492*/ meltfptr[491] = + (melt_ptr_t) & meltcdat->dsym_301__CLASS_OBJCHECKSIGNAL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_299__CLASS_OBJCHECKSIGNAL", + melt_assertmsg ("iniobj check.discr isobj dsym_301__CLASS_OBJCHECKSIGNAL", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr objmagic dsym_299__CLASS_OBJCHECKSIGNAL", + ("iniobj check.discr objmagic dsym_301__CLASS_OBJCHECKSIGNAL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_299__CLASS_OBJCHECKSIGNAL.meltobj_class = + meltcdat->dsym_301__CLASS_OBJCHECKSIGNAL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_299__CLASS_OBJCHECKSIGNAL.obj_hash = 215068855; - meltcdat->dsym_299__CLASS_OBJCHECKSIGNAL.obj_len = 3; + meltcdat->dsym_301__CLASS_OBJCHECKSIGNAL.obj_hash = 215068855; + meltcdat->dsym_301__CLASS_OBJCHECKSIGNAL.obj_len = 3; -/*inistring dstr_300__CLASS_OBJCHECKSIGNAL*/ - /*_._VALSTR___V490*/ meltfptr[489] = - (melt_ptr_t) & meltcdat->dstr_300__CLASS_OBJCHECKSIGNAL; - meltcdat->dstr_300__CLASS_OBJCHECKSIGNAL.discr = +/*inistring dstr_302__CLASS_OBJCHECKSIGNAL*/ + /*_._VALSTR___V493*/ meltfptr[492] = + (melt_ptr_t) & meltcdat->dstr_302__CLASS_OBJCHECKSIGNAL; + meltcdat->dstr_302__CLASS_OBJCHECKSIGNAL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_300__CLASS_OBJCHECKSIGNAL.val, + /*small inistring */ strncpy (meltcdat->dstr_302__CLASS_OBJCHECKSIGNAL.val, "CLASS_OBJCHECKSIGNAL", sizeof (meltcdat-> - dstr_300__CLASS_OBJCHECKSIGNAL.val) - + dstr_302__CLASS_OBJCHECKSIGNAL.val) - 1); - meltcdat->dstr_300__CLASS_OBJCHECKSIGNAL.val[20] = (char) 0; - meltcdat->dstr_300__CLASS_OBJCHECKSIGNAL.slen = 20; + meltcdat->dstr_302__CLASS_OBJCHECKSIGNAL.val[20] = (char) 0; + meltcdat->dstr_302__CLASS_OBJCHECKSIGNAL.slen = 20; - /*inirout drout_301__OUTPUCOD_OBJANYBLOCK */ - /*_._VALROUT___V491*/ meltfptr[490] = - (melt_ptr_t) & meltcdat->drout_301__OUTPUCOD_OBJANYBLOCK; - meltcdat->drout_301__OUTPUCOD_OBJANYBLOCK.discr = + /*inirout drout_303__OUTPUCOD_OBJANYBLOCK */ + /*_._VALROUT___V494*/ meltfptr[493] = + (melt_ptr_t) & meltcdat->drout_303__OUTPUCOD_OBJANYBLOCK; + meltcdat->drout_303__OUTPUCOD_OBJANYBLOCK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); - strncpy (meltcdat->drout_301__OUTPUCOD_OBJANYBLOCK.routdescr, + strncpy (meltcdat->drout_303__OUTPUCOD_OBJANYBLOCK.routdescr, "OUTPUCOD_OBJANYBLOCK @warmelt-outobj.melt:3205", MELT_ROUTDESCR_LEN - 1); - meltcdat->drout_301__OUTPUCOD_OBJANYBLOCK.nbval = 6; - MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_301__OUTPUCOD_OBJANYBLOCK, + meltcdat->drout_303__OUTPUCOD_OBJANYBLOCK.nbval = 6; + MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_303__OUTPUCOD_OBJANYBLOCK, meltrout_68_WARMELTmiOUTOBJ_OUTPUCOD_OBJANYBLOCK); - /*iniclos dclo_302__OUTPUCOD_OBJANYBLOCK */ - /*_._VALCLO___V492*/ meltfptr[491] = - (melt_ptr_t) & meltcdat->dclo_302__OUTPUCOD_OBJANYBLOCK; - meltcdat->dclo_302__OUTPUCOD_OBJANYBLOCK.discr = + /*iniclos dclo_304__OUTPUCOD_OBJANYBLOCK */ + /*_._VALCLO___V495*/ meltfptr[494] = + (melt_ptr_t) & meltcdat->dclo_304__OUTPUCOD_OBJANYBLOCK; + meltcdat->dclo_304__OUTPUCOD_OBJANYBLOCK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); - meltcdat->dclo_302__OUTPUCOD_OBJANYBLOCK.nbval = 0; + meltcdat->dclo_304__OUTPUCOD_OBJANYBLOCK.nbval = 0; -/*iniobj dsym_303__CLASS_OBJANYBLOCK*/ - /*uniqueobj*/ if (! /*_._VALDATA___V493*/ meltfptr[492]) -/*_._VALDATA___V493*/ meltfptr[492] = - (melt_ptr_t) & meltcdat->dsym_303__CLASS_OBJANYBLOCK; +/*iniobj dsym_305__CLASS_OBJANYBLOCK*/ + /*uniqueobj*/ if (! /*_._VALDATA___V496*/ meltfptr[495]) +/*_._VALDATA___V496*/ meltfptr[495] = + (melt_ptr_t) & meltcdat->dsym_305__CLASS_OBJANYBLOCK; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_303__CLASS_OBJANYBLOCK", + melt_assertmsg ("iniobj check.discr isobj dsym_305__CLASS_OBJANYBLOCK", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr objmagic dsym_303__CLASS_OBJANYBLOCK", + melt_assertmsg ("iniobj check.discr objmagic dsym_305__CLASS_OBJANYBLOCK", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_303__CLASS_OBJANYBLOCK.meltobj_class = + meltcdat->dsym_305__CLASS_OBJANYBLOCK.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_303__CLASS_OBJANYBLOCK.obj_hash = 872465590; - meltcdat->dsym_303__CLASS_OBJANYBLOCK.obj_len = 3; + meltcdat->dsym_305__CLASS_OBJANYBLOCK.obj_hash = 872465590; + meltcdat->dsym_305__CLASS_OBJANYBLOCK.obj_len = 3; -/*inistring dstr_304__CLASS_OBJANYBLOCK*/ - /*_._VALSTR___V494*/ meltfptr[493] = - (melt_ptr_t) & meltcdat->dstr_304__CLASS_OBJANYBLOCK; - meltcdat->dstr_304__CLASS_OBJANYBLOCK.discr = +/*inistring dstr_306__CLASS_OBJANYBLOCK*/ + /*_._VALSTR___V497*/ meltfptr[496] = + (melt_ptr_t) & meltcdat->dstr_306__CLASS_OBJANYBLOCK; + meltcdat->dstr_306__CLASS_OBJANYBLOCK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_304__CLASS_OBJANYBLOCK.val, + /*small inistring */ strncpy (meltcdat->dstr_306__CLASS_OBJANYBLOCK.val, "CLASS_OBJANYBLOCK", - sizeof (meltcdat->dstr_304__CLASS_OBJANYBLOCK. + sizeof (meltcdat->dstr_306__CLASS_OBJANYBLOCK. val) - 1); - meltcdat->dstr_304__CLASS_OBJANYBLOCK.val[17] = (char) 0; - meltcdat->dstr_304__CLASS_OBJANYBLOCK.slen = 17; + meltcdat->dstr_306__CLASS_OBJANYBLOCK.val[17] = (char) 0; + meltcdat->dstr_306__CLASS_OBJANYBLOCK.slen = 17; - /*inirout drout_305__OUTPUCOD_OBJFLAG */ - /*_._VALROUT___V495*/ meltfptr[494] = - (melt_ptr_t) & meltcdat->drout_305__OUTPUCOD_OBJFLAG; - meltcdat->drout_305__OUTPUCOD_OBJFLAG.discr = + /*inirout drout_307__OUTPUCOD_OBJFLAG */ + /*_._VALROUT___V498*/ meltfptr[497] = + (melt_ptr_t) & meltcdat->drout_307__OUTPUCOD_OBJFLAG; + meltcdat->drout_307__OUTPUCOD_OBJFLAG.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); - strncpy (meltcdat->drout_305__OUTPUCOD_OBJFLAG.routdescr, + strncpy (meltcdat->drout_307__OUTPUCOD_OBJFLAG.routdescr, "OUTPUCOD_OBJFLAG @warmelt-outobj.melt:3230", MELT_ROUTDESCR_LEN - 1); - meltcdat->drout_305__OUTPUCOD_OBJFLAG.nbval = 3; - MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_305__OUTPUCOD_OBJFLAG, + meltcdat->drout_307__OUTPUCOD_OBJFLAG.nbval = 3; + MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_307__OUTPUCOD_OBJFLAG, meltrout_69_WARMELTmiOUTOBJ_OUTPUCOD_OBJFLAG); - /*iniclos dclo_306__OUTPUCOD_OBJFLAG */ - /*_._VALCLO___V496*/ meltfptr[495] = - (melt_ptr_t) & meltcdat->dclo_306__OUTPUCOD_OBJFLAG; - meltcdat->dclo_306__OUTPUCOD_OBJFLAG.discr = + /*iniclos dclo_308__OUTPUCOD_OBJFLAG */ + /*_._VALCLO___V499*/ meltfptr[498] = + (melt_ptr_t) & meltcdat->dclo_308__OUTPUCOD_OBJFLAG; + meltcdat->dclo_308__OUTPUCOD_OBJFLAG.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); - meltcdat->dclo_306__OUTPUCOD_OBJFLAG.nbval = 0; + meltcdat->dclo_308__OUTPUCOD_OBJFLAG.nbval = 0; -/*iniobj dsym_307__CLASS_OBJFLAG*/ - /*uniqueobj*/ if (! /*_._VALDATA___V497*/ meltfptr[496]) -/*_._VALDATA___V497*/ meltfptr[496] = - (melt_ptr_t) & meltcdat->dsym_307__CLASS_OBJFLAG; +/*iniobj dsym_309__CLASS_OBJFLAG*/ + /*uniqueobj*/ if (! /*_._VALDATA___V500*/ meltfptr[499]) +/*_._VALDATA___V500*/ meltfptr[499] = + (melt_ptr_t) & meltcdat->dsym_309__CLASS_OBJFLAG; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_307__CLASS_OBJFLAG", + melt_assertmsg ("iniobj check.discr isobj dsym_309__CLASS_OBJFLAG", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr objmagic dsym_307__CLASS_OBJFLAG", + melt_assertmsg ("iniobj check.discr objmagic dsym_309__CLASS_OBJFLAG", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_307__CLASS_OBJFLAG.meltobj_class = + meltcdat->dsym_309__CLASS_OBJFLAG.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_307__CLASS_OBJFLAG.obj_hash = 994586081; - meltcdat->dsym_307__CLASS_OBJFLAG.obj_len = 3; + meltcdat->dsym_309__CLASS_OBJFLAG.obj_hash = 994586081; + meltcdat->dsym_309__CLASS_OBJFLAG.obj_len = 3; -/*inistring dstr_308__CLASS_OBJFLAG*/ - /*_._VALSTR___V498*/ meltfptr[497] = - (melt_ptr_t) & meltcdat->dstr_308__CLASS_OBJFLAG; - meltcdat->dstr_308__CLASS_OBJFLAG.discr = +/*inistring dstr_310__CLASS_OBJFLAG*/ + /*_._VALSTR___V501*/ meltfptr[500] = + (melt_ptr_t) & meltcdat->dstr_310__CLASS_OBJFLAG; + meltcdat->dstr_310__CLASS_OBJFLAG.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_308__CLASS_OBJFLAG.val, + /*small inistring */ strncpy (meltcdat->dstr_310__CLASS_OBJFLAG.val, "CLASS_OBJFLAG", - sizeof (meltcdat->dstr_308__CLASS_OBJFLAG. + sizeof (meltcdat->dstr_310__CLASS_OBJFLAG. val) - 1); - meltcdat->dstr_308__CLASS_OBJFLAG.val[13] = (char) 0; - meltcdat->dstr_308__CLASS_OBJFLAG.slen = 13; + meltcdat->dstr_310__CLASS_OBJFLAG.val[13] = (char) 0; + meltcdat->dstr_310__CLASS_OBJFLAG.slen = 13; - /*inirout drout_309__OUTPUCOD_OBJMATCHFLAGBLOCK */ - /*_._VALROUT___V499*/ meltfptr[498] = - (melt_ptr_t) & meltcdat->drout_309__OUTPUCOD_OBJMATCHFLAGBLOCK; - meltcdat->drout_309__OUTPUCOD_OBJMATCHFLAGBLOCK.discr = + /*inirout drout_311__OUTPUCOD_OBJMATCHFLAGBLOCK */ + /*_._VALROUT___V502*/ meltfptr[501] = + (melt_ptr_t) & meltcdat->drout_311__OUTPUCOD_OBJMATCHFLAGBLOCK; + meltcdat->drout_311__OUTPUCOD_OBJMATCHFLAGBLOCK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); - strncpy (meltcdat->drout_309__OUTPUCOD_OBJMATCHFLAGBLOCK.routdescr, + strncpy (meltcdat->drout_311__OUTPUCOD_OBJMATCHFLAGBLOCK.routdescr, "OUTPUCOD_OBJMATCHFLAGBLOCK @warmelt-outobj.melt:3241", MELT_ROUTDESCR_LEN - 1); - meltcdat->drout_309__OUTPUCOD_OBJMATCHFLAGBLOCK.nbval = 8; - MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_309__OUTPUCOD_OBJMATCHFLAGBLOCK, + meltcdat->drout_311__OUTPUCOD_OBJMATCHFLAGBLOCK.nbval = 8; + MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_311__OUTPUCOD_OBJMATCHFLAGBLOCK, meltrout_70_WARMELTmiOUTOBJ_OUTPUCOD_OBJMATCHFLAGBLOCK); - /*iniclos dclo_310__OUTPUCOD_OBJMATCHFLAGBLOCK */ - /*_._VALCLO___V500*/ meltfptr[499] = - (melt_ptr_t) & meltcdat->dclo_310__OUTPUCOD_OBJMATCHFLAGBLOCK; - meltcdat->dclo_310__OUTPUCOD_OBJMATCHFLAGBLOCK.discr = + /*iniclos dclo_312__OUTPUCOD_OBJMATCHFLAGBLOCK */ + /*_._VALCLO___V503*/ meltfptr[502] = + (melt_ptr_t) & meltcdat->dclo_312__OUTPUCOD_OBJMATCHFLAGBLOCK; + meltcdat->dclo_312__OUTPUCOD_OBJMATCHFLAGBLOCK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); - meltcdat->dclo_310__OUTPUCOD_OBJMATCHFLAGBLOCK.nbval = 0; + meltcdat->dclo_312__OUTPUCOD_OBJMATCHFLAGBLOCK.nbval = 0; -/*iniobj dsym_311__CLASS_OBJMATCHFLAGBLOCK*/ - /*uniqueobj*/ if (! /*_._VALDATA___V501*/ meltfptr[500]) -/*_._VALDATA___V501*/ meltfptr[500] = - (melt_ptr_t) & meltcdat->dsym_311__CLASS_OBJMATCHFLAGBLOCK; +/*iniobj dsym_313__CLASS_OBJMATCHFLAGBLOCK*/ + /*uniqueobj*/ if (! /*_._VALDATA___V504*/ meltfptr[503]) +/*_._VALDATA___V504*/ meltfptr[503] = + (melt_ptr_t) & meltcdat->dsym_313__CLASS_OBJMATCHFLAGBLOCK; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr isobj dsym_311__CLASS_OBJMATCHFLAGBLOCK", + ("iniobj check.discr isobj dsym_313__CLASS_OBJMATCHFLAGBLOCK", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr objmagic dsym_311__CLASS_OBJMATCHFLAGBLOCK", + ("iniobj check.discr objmagic dsym_313__CLASS_OBJMATCHFLAGBLOCK", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_311__CLASS_OBJMATCHFLAGBLOCK.meltobj_class = + meltcdat->dsym_313__CLASS_OBJMATCHFLAGBLOCK.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_311__CLASS_OBJMATCHFLAGBLOCK.obj_hash = 561303579; - meltcdat->dsym_311__CLASS_OBJMATCHFLAGBLOCK.obj_len = 3; + meltcdat->dsym_313__CLASS_OBJMATCHFLAGBLOCK.obj_hash = 561303579; + meltcdat->dsym_313__CLASS_OBJMATCHFLAGBLOCK.obj_len = 3; -/*inistring dstr_312__CLASS_OBJMATCHFLAGBLOCK*/ - /*_._VALSTR___V502*/ meltfptr[501] = - (melt_ptr_t) & meltcdat->dstr_312__CLASS_OBJMATCHFLAGBLOCK; - meltcdat->dstr_312__CLASS_OBJMATCHFLAGBLOCK.discr = +/*inistring dstr_314__CLASS_OBJMATCHFLAGBLOCK*/ + /*_._VALSTR___V505*/ meltfptr[504] = + (melt_ptr_t) & meltcdat->dstr_314__CLASS_OBJMATCHFLAGBLOCK; + meltcdat->dstr_314__CLASS_OBJMATCHFLAGBLOCK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_312__CLASS_OBJMATCHFLAGBLOCK. + /*small inistring */ strncpy (meltcdat->dstr_314__CLASS_OBJMATCHFLAGBLOCK. val, "CLASS_OBJMATCHFLAGBLOCK", sizeof (meltcdat-> - dstr_312__CLASS_OBJMATCHFLAGBLOCK. + dstr_314__CLASS_OBJMATCHFLAGBLOCK. val) - 1); - meltcdat->dstr_312__CLASS_OBJMATCHFLAGBLOCK.val[23] = (char) 0; - meltcdat->dstr_312__CLASS_OBJMATCHFLAGBLOCK.slen = 23; + meltcdat->dstr_314__CLASS_OBJMATCHFLAGBLOCK.val[23] = (char) 0; + meltcdat->dstr_314__CLASS_OBJMATCHFLAGBLOCK.slen = 23; - /*inirout drout_313__OUTPUCOD_OBJMULTIALLOCBLOCK */ - /*_._VALROUT___V503*/ meltfptr[502] = - (melt_ptr_t) & meltcdat->drout_313__OUTPUCOD_OBJMULTIALLOCBLOCK; - meltcdat->drout_313__OUTPUCOD_OBJMULTIALLOCBLOCK.discr = + /*inirout drout_315__OUTPUCOD_OBJMULTIALLOCBLOCK */ + /*_._VALROUT___V506*/ meltfptr[505] = + (melt_ptr_t) & meltcdat->drout_315__OUTPUCOD_OBJMULTIALLOCBLOCK; + meltcdat->drout_315__OUTPUCOD_OBJMULTIALLOCBLOCK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); - strncpy (meltcdat->drout_313__OUTPUCOD_OBJMULTIALLOCBLOCK.routdescr, + strncpy (meltcdat->drout_315__OUTPUCOD_OBJMULTIALLOCBLOCK.routdescr, "OUTPUCOD_OBJMULTIALLOCBLOCK @warmelt-outobj.melt:3293", MELT_ROUTDESCR_LEN - 1); - meltcdat->drout_313__OUTPUCOD_OBJMULTIALLOCBLOCK.nbval = 11; + meltcdat->drout_315__OUTPUCOD_OBJMULTIALLOCBLOCK.nbval = 11; MELT_ROUTINE_SET_ROUTCODE (&meltcdat-> - drout_313__OUTPUCOD_OBJMULTIALLOCBLOCK, + drout_315__OUTPUCOD_OBJMULTIALLOCBLOCK, meltrout_71_WARMELTmiOUTOBJ_OUTPUCOD_OBJMULTIALLOCBLOCK); - /*iniclos dclo_314__OUTPUCOD_OBJMULTIALLOCBLOCK */ - /*_._VALCLO___V504*/ meltfptr[503] = - (melt_ptr_t) & meltcdat->dclo_314__OUTPUCOD_OBJMULTIALLOCBLOCK; - meltcdat->dclo_314__OUTPUCOD_OBJMULTIALLOCBLOCK.discr = + /*iniclos dclo_316__OUTPUCOD_OBJMULTIALLOCBLOCK */ + /*_._VALCLO___V507*/ meltfptr[506] = + (melt_ptr_t) & meltcdat->dclo_316__OUTPUCOD_OBJMULTIALLOCBLOCK; + meltcdat->dclo_316__OUTPUCOD_OBJMULTIALLOCBLOCK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); - meltcdat->dclo_314__OUTPUCOD_OBJMULTIALLOCBLOCK.nbval = 0; + meltcdat->dclo_316__OUTPUCOD_OBJMULTIALLOCBLOCK.nbval = 0; -/*iniobj dsym_315__CLASS_OBJMULTIALLOCBLOCK*/ - /*uniqueobj*/ if (! /*_._VALDATA___V505*/ meltfptr[504]) -/*_._VALDATA___V505*/ meltfptr[504] = - (melt_ptr_t) & meltcdat->dsym_315__CLASS_OBJMULTIALLOCBLOCK; +/*iniobj dsym_317__CLASS_OBJMULTIALLOCBLOCK*/ + /*uniqueobj*/ if (! /*_._VALDATA___V508*/ meltfptr[507]) +/*_._VALDATA___V508*/ meltfptr[507] = + (melt_ptr_t) & meltcdat->dsym_317__CLASS_OBJMULTIALLOCBLOCK; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr isobj dsym_315__CLASS_OBJMULTIALLOCBLOCK", + ("iniobj check.discr isobj dsym_317__CLASS_OBJMULTIALLOCBLOCK", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr objmagic dsym_315__CLASS_OBJMULTIALLOCBLOCK", + ("iniobj check.discr objmagic dsym_317__CLASS_OBJMULTIALLOCBLOCK", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_315__CLASS_OBJMULTIALLOCBLOCK.meltobj_class = + meltcdat->dsym_317__CLASS_OBJMULTIALLOCBLOCK.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_315__CLASS_OBJMULTIALLOCBLOCK.obj_hash = 839199968; - meltcdat->dsym_315__CLASS_OBJMULTIALLOCBLOCK.obj_len = 3; + meltcdat->dsym_317__CLASS_OBJMULTIALLOCBLOCK.obj_hash = 839199968; + meltcdat->dsym_317__CLASS_OBJMULTIALLOCBLOCK.obj_len = 3; -/*inistring dstr_316__CLASS_OBJMULTIALLOCBLOCK*/ - /*_._VALSTR___V506*/ meltfptr[505] = - (melt_ptr_t) & meltcdat->dstr_316__CLASS_OBJMULTIALLOCBLOCK; - meltcdat->dstr_316__CLASS_OBJMULTIALLOCBLOCK.discr = +/*inistring dstr_318__CLASS_OBJMULTIALLOCBLOCK*/ + /*_._VALSTR___V509*/ meltfptr[508] = + (melt_ptr_t) & meltcdat->dstr_318__CLASS_OBJMULTIALLOCBLOCK; + meltcdat->dstr_318__CLASS_OBJMULTIALLOCBLOCK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_316__CLASS_OBJMULTIALLOCBLOCK. + /*small inistring */ strncpy (meltcdat->dstr_318__CLASS_OBJMULTIALLOCBLOCK. val, "CLASS_OBJMULTIALLOCBLOCK", sizeof (meltcdat-> - dstr_316__CLASS_OBJMULTIALLOCBLOCK. + dstr_318__CLASS_OBJMULTIALLOCBLOCK. val) - 1); - meltcdat->dstr_316__CLASS_OBJMULTIALLOCBLOCK.val[24] = (char) 0; - meltcdat->dstr_316__CLASS_OBJMULTIALLOCBLOCK.slen = 24; + meltcdat->dstr_318__CLASS_OBJMULTIALLOCBLOCK.val[24] = (char) 0; + meltcdat->dstr_318__CLASS_OBJMULTIALLOCBLOCK.slen = 24; -/*iniobj dsym_317__DISCR_VERBATIM_STRING*/ - /*uniqueobj*/ if (! /*_._VALDATA___V507*/ meltfptr[506]) -/*_._VALDATA___V507*/ meltfptr[506] = - (melt_ptr_t) & meltcdat->dsym_317__DISCR_VERBATIM_STRING; +/*iniobj dsym_319__DISCR_VERBATIM_STRING*/ + /*uniqueobj*/ if (! /*_._VALDATA___V510*/ meltfptr[509]) +/*_._VALDATA___V510*/ meltfptr[509] = + (melt_ptr_t) & meltcdat->dsym_319__DISCR_VERBATIM_STRING; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr isobj dsym_317__DISCR_VERBATIM_STRING", + ("iniobj check.discr isobj dsym_319__DISCR_VERBATIM_STRING", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr objmagic dsym_317__DISCR_VERBATIM_STRING", + ("iniobj check.discr objmagic dsym_319__DISCR_VERBATIM_STRING", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_317__DISCR_VERBATIM_STRING.meltobj_class = + meltcdat->dsym_319__DISCR_VERBATIM_STRING.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_317__DISCR_VERBATIM_STRING.obj_hash = 258402049; - meltcdat->dsym_317__DISCR_VERBATIM_STRING.obj_len = 3; + meltcdat->dsym_319__DISCR_VERBATIM_STRING.obj_hash = 258402049; + meltcdat->dsym_319__DISCR_VERBATIM_STRING.obj_len = 3; -/*inistring dstr_318__DISCR_VERBATIM_STRING*/ - /*_._VALSTR___V508*/ meltfptr[507] = - (melt_ptr_t) & meltcdat->dstr_318__DISCR_VERBATIM_STRING; - meltcdat->dstr_318__DISCR_VERBATIM_STRING.discr = +/*inistring dstr_320__DISCR_VERBATIM_STRING*/ + /*_._VALSTR___V511*/ meltfptr[510] = + (melt_ptr_t) & meltcdat->dstr_320__DISCR_VERBATIM_STRING; + meltcdat->dstr_320__DISCR_VERBATIM_STRING.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_318__DISCR_VERBATIM_STRING.val, + /*small inistring */ strncpy (meltcdat->dstr_320__DISCR_VERBATIM_STRING.val, "DISCR_VERBATIM_STRING", sizeof (meltcdat-> - dstr_318__DISCR_VERBATIM_STRING.val) - + dstr_320__DISCR_VERBATIM_STRING.val) - 1); - meltcdat->dstr_318__DISCR_VERBATIM_STRING.val[21] = (char) 0; - meltcdat->dstr_318__DISCR_VERBATIM_STRING.slen = 21; + meltcdat->dstr_320__DISCR_VERBATIM_STRING.val[21] = (char) 0; + meltcdat->dstr_320__DISCR_VERBATIM_STRING.slen = 21; - /*inirout drout_319__OUTPUCOD_OBJCITERBLOCK */ - /*_._VALROUT___V509*/ meltfptr[508] = - (melt_ptr_t) & meltcdat->drout_319__OUTPUCOD_OBJCITERBLOCK; - meltcdat->drout_319__OUTPUCOD_OBJCITERBLOCK.discr = + /*inirout drout_321__OUTPUCOD_OBJCITERBLOCK */ + /*_._VALROUT___V512*/ meltfptr[511] = + (melt_ptr_t) & meltcdat->drout_321__OUTPUCOD_OBJCITERBLOCK; + meltcdat->drout_321__OUTPUCOD_OBJCITERBLOCK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); - strncpy (meltcdat->drout_319__OUTPUCOD_OBJCITERBLOCK.routdescr, + strncpy (meltcdat->drout_321__OUTPUCOD_OBJCITERBLOCK.routdescr, "OUTPUCOD_OBJCITERBLOCK @warmelt-outobj.melt:3365", MELT_ROUTDESCR_LEN - 1); - meltcdat->drout_319__OUTPUCOD_OBJCITERBLOCK.nbval = 8; - MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_319__OUTPUCOD_OBJCITERBLOCK, + meltcdat->drout_321__OUTPUCOD_OBJCITERBLOCK.nbval = 8; + MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_321__OUTPUCOD_OBJCITERBLOCK, meltrout_72_WARMELTmiOUTOBJ_OUTPUCOD_OBJCITERBLOCK); - /*iniclos dclo_320__OUTPUCOD_OBJCITERBLOCK */ - /*_._VALCLO___V510*/ meltfptr[509] = - (melt_ptr_t) & meltcdat->dclo_320__OUTPUCOD_OBJCITERBLOCK; - meltcdat->dclo_320__OUTPUCOD_OBJCITERBLOCK.discr = + /*iniclos dclo_322__OUTPUCOD_OBJCITERBLOCK */ + /*_._VALCLO___V513*/ meltfptr[512] = + (melt_ptr_t) & meltcdat->dclo_322__OUTPUCOD_OBJCITERBLOCK; + meltcdat->dclo_322__OUTPUCOD_OBJCITERBLOCK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); - meltcdat->dclo_320__OUTPUCOD_OBJCITERBLOCK.nbval = 0; + meltcdat->dclo_322__OUTPUCOD_OBJCITERBLOCK.nbval = 0; -/*iniobj dsym_321__CLASS_OBJCITERBLOCK*/ - /*uniqueobj*/ if (! /*_._VALDATA___V511*/ meltfptr[510]) -/*_._VALDATA___V511*/ meltfptr[510] = - (melt_ptr_t) & meltcdat->dsym_321__CLASS_OBJCITERBLOCK; +/*iniobj dsym_323__CLASS_OBJCITERBLOCK*/ + /*uniqueobj*/ if (! /*_._VALDATA___V514*/ meltfptr[513]) +/*_._VALDATA___V514*/ meltfptr[513] = + (melt_ptr_t) & meltcdat->dsym_323__CLASS_OBJCITERBLOCK; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_321__CLASS_OBJCITERBLOCK", + melt_assertmsg ("iniobj check.discr isobj dsym_323__CLASS_OBJCITERBLOCK", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr objmagic dsym_321__CLASS_OBJCITERBLOCK", + ("iniobj check.discr objmagic dsym_323__CLASS_OBJCITERBLOCK", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_321__CLASS_OBJCITERBLOCK.meltobj_class = + meltcdat->dsym_323__CLASS_OBJCITERBLOCK.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_321__CLASS_OBJCITERBLOCK.obj_hash = 897861098; - meltcdat->dsym_321__CLASS_OBJCITERBLOCK.obj_len = 3; + meltcdat->dsym_323__CLASS_OBJCITERBLOCK.obj_hash = 897861098; + meltcdat->dsym_323__CLASS_OBJCITERBLOCK.obj_len = 3; -/*inistring dstr_322__CLASS_OBJCITERBLOCK*/ - /*_._VALSTR___V512*/ meltfptr[511] = - (melt_ptr_t) & meltcdat->dstr_322__CLASS_OBJCITERBLOCK; - meltcdat->dstr_322__CLASS_OBJCITERBLOCK.discr = +/*inistring dstr_324__CLASS_OBJCITERBLOCK*/ + /*_._VALSTR___V515*/ meltfptr[514] = + (melt_ptr_t) & meltcdat->dstr_324__CLASS_OBJCITERBLOCK; + meltcdat->dstr_324__CLASS_OBJCITERBLOCK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_322__CLASS_OBJCITERBLOCK.val, + /*small inistring */ strncpy (meltcdat->dstr_324__CLASS_OBJCITERBLOCK.val, "CLASS_OBJCITERBLOCK", sizeof (meltcdat-> - dstr_322__CLASS_OBJCITERBLOCK.val) - + dstr_324__CLASS_OBJCITERBLOCK.val) - 1); - meltcdat->dstr_322__CLASS_OBJCITERBLOCK.val[19] = (char) 0; - meltcdat->dstr_322__CLASS_OBJCITERBLOCK.slen = 19; + meltcdat->dstr_324__CLASS_OBJCITERBLOCK.val[19] = (char) 0; + meltcdat->dstr_324__CLASS_OBJCITERBLOCK.slen = 19; -/*iniobj dsym_323__CLASS_CITERATOR*/ - /*uniqueobj*/ if (! /*_._VALDATA___V513*/ meltfptr[512]) -/*_._VALDATA___V513*/ meltfptr[512] = - (melt_ptr_t) & meltcdat->dsym_323__CLASS_CITERATOR; +/*iniobj dsym_325__CLASS_CITERATOR*/ + /*uniqueobj*/ if (! /*_._VALDATA___V516*/ meltfptr[515]) +/*_._VALDATA___V516*/ meltfptr[515] = + (melt_ptr_t) & meltcdat->dsym_325__CLASS_CITERATOR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_323__CLASS_CITERATOR", + melt_assertmsg ("iniobj check.discr isobj dsym_325__CLASS_CITERATOR", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr objmagic dsym_323__CLASS_CITERATOR", + melt_assertmsg ("iniobj check.discr objmagic dsym_325__CLASS_CITERATOR", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_323__CLASS_CITERATOR.meltobj_class = + meltcdat->dsym_325__CLASS_CITERATOR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_323__CLASS_CITERATOR.obj_hash = 650290054; - meltcdat->dsym_323__CLASS_CITERATOR.obj_len = 3; + meltcdat->dsym_325__CLASS_CITERATOR.obj_hash = 650290054; + meltcdat->dsym_325__CLASS_CITERATOR.obj_len = 3; -/*inistring dstr_324__CLASS_CITERATOR*/ - /*_._VALSTR___V514*/ meltfptr[513] = - (melt_ptr_t) & meltcdat->dstr_324__CLASS_CITERATOR; - meltcdat->dstr_324__CLASS_CITERATOR.discr = +/*inistring dstr_326__CLASS_CITERATOR*/ + /*_._VALSTR___V517*/ meltfptr[516] = + (melt_ptr_t) & meltcdat->dstr_326__CLASS_CITERATOR; + meltcdat->dstr_326__CLASS_CITERATOR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_324__CLASS_CITERATOR.val, + /*small inistring */ strncpy (meltcdat->dstr_326__CLASS_CITERATOR.val, "CLASS_CITERATOR", - sizeof (meltcdat->dstr_324__CLASS_CITERATOR. + sizeof (meltcdat->dstr_326__CLASS_CITERATOR. val) - 1); - meltcdat->dstr_324__CLASS_CITERATOR.val[15] = (char) 0; - meltcdat->dstr_324__CLASS_CITERATOR.slen = 15; + meltcdat->dstr_326__CLASS_CITERATOR.val[15] = (char) 0; + meltcdat->dstr_326__CLASS_CITERATOR.slen = 15; - /*inirout drout_325__OUTPUCOD_OBJCOMMENTINSTR */ - /*_._VALROUT___V515*/ meltfptr[514] = - (melt_ptr_t) & meltcdat->drout_325__OUTPUCOD_OBJCOMMENTINSTR; - meltcdat->drout_325__OUTPUCOD_OBJCOMMENTINSTR.discr = + /*inirout drout_327__OUTPUCOD_OBJCOMMENTINSTR */ + /*_._VALROUT___V518*/ meltfptr[517] = + (melt_ptr_t) & meltcdat->drout_327__OUTPUCOD_OBJCOMMENTINSTR; + meltcdat->drout_327__OUTPUCOD_OBJCOMMENTINSTR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); - strncpy (meltcdat->drout_325__OUTPUCOD_OBJCOMMENTINSTR.routdescr, + strncpy (meltcdat->drout_327__OUTPUCOD_OBJCOMMENTINSTR.routdescr, "OUTPUCOD_OBJCOMMENTINSTR @warmelt-outobj.melt:3420", MELT_ROUTDESCR_LEN - 1); - meltcdat->drout_325__OUTPUCOD_OBJCOMMENTINSTR.nbval = 6; - MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_325__OUTPUCOD_OBJCOMMENTINSTR, + meltcdat->drout_327__OUTPUCOD_OBJCOMMENTINSTR.nbval = 6; + MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_327__OUTPUCOD_OBJCOMMENTINSTR, meltrout_73_WARMELTmiOUTOBJ_OUTPUCOD_OBJCOMMENTINSTR); - /*iniclos dclo_326__OUTPUCOD_OBJCOMMENTINSTR */ - /*_._VALCLO___V516*/ meltfptr[515] = - (melt_ptr_t) & meltcdat->dclo_326__OUTPUCOD_OBJCOMMENTINSTR; - meltcdat->dclo_326__OUTPUCOD_OBJCOMMENTINSTR.discr = + /*iniclos dclo_328__OUTPUCOD_OBJCOMMENTINSTR */ + /*_._VALCLO___V519*/ meltfptr[518] = + (melt_ptr_t) & meltcdat->dclo_328__OUTPUCOD_OBJCOMMENTINSTR; + meltcdat->dclo_328__OUTPUCOD_OBJCOMMENTINSTR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); - meltcdat->dclo_326__OUTPUCOD_OBJCOMMENTINSTR.nbval = 0; + meltcdat->dclo_328__OUTPUCOD_OBJCOMMENTINSTR.nbval = 0; -/*iniobj dsym_327__CLASS_OBJCOMMENTINSTR*/ - /*uniqueobj*/ if (! /*_._VALDATA___V517*/ meltfptr[516]) -/*_._VALDATA___V517*/ meltfptr[516] = - (melt_ptr_t) & meltcdat->dsym_327__CLASS_OBJCOMMENTINSTR; +/*iniobj dsym_329__CLASS_OBJCOMMENTINSTR*/ + /*uniqueobj*/ if (! /*_._VALDATA___V520*/ meltfptr[519]) +/*_._VALDATA___V520*/ meltfptr[519] = + (melt_ptr_t) & meltcdat->dsym_329__CLASS_OBJCOMMENTINSTR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr isobj dsym_327__CLASS_OBJCOMMENTINSTR", + ("iniobj check.discr isobj dsym_329__CLASS_OBJCOMMENTINSTR", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr objmagic dsym_327__CLASS_OBJCOMMENTINSTR", + ("iniobj check.discr objmagic dsym_329__CLASS_OBJCOMMENTINSTR", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_327__CLASS_OBJCOMMENTINSTR.meltobj_class = + meltcdat->dsym_329__CLASS_OBJCOMMENTINSTR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_327__CLASS_OBJCOMMENTINSTR.obj_hash = 564818642; - meltcdat->dsym_327__CLASS_OBJCOMMENTINSTR.obj_len = 3; + meltcdat->dsym_329__CLASS_OBJCOMMENTINSTR.obj_hash = 564818642; + meltcdat->dsym_329__CLASS_OBJCOMMENTINSTR.obj_len = 3; -/*inistring dstr_328__CLASS_OBJCOMMENTINSTR*/ - /*_._VALSTR___V518*/ meltfptr[517] = - (melt_ptr_t) & meltcdat->dstr_328__CLASS_OBJCOMMENTINSTR; - meltcdat->dstr_328__CLASS_OBJCOMMENTINSTR.discr = +/*inistring dstr_330__CLASS_OBJCOMMENTINSTR*/ + /*_._VALSTR___V521*/ meltfptr[520] = + (melt_ptr_t) & meltcdat->dstr_330__CLASS_OBJCOMMENTINSTR; + meltcdat->dstr_330__CLASS_OBJCOMMENTINSTR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_328__CLASS_OBJCOMMENTINSTR.val, + /*small inistring */ strncpy (meltcdat->dstr_330__CLASS_OBJCOMMENTINSTR.val, "CLASS_OBJCOMMENTINSTR", sizeof (meltcdat-> - dstr_328__CLASS_OBJCOMMENTINSTR.val) - + dstr_330__CLASS_OBJCOMMENTINSTR.val) - 1); - meltcdat->dstr_328__CLASS_OBJCOMMENTINSTR.val[21] = (char) 0; - meltcdat->dstr_328__CLASS_OBJCOMMENTINSTR.slen = 21; + meltcdat->dstr_330__CLASS_OBJCOMMENTINSTR.val[21] = (char) 0; + meltcdat->dstr_330__CLASS_OBJCOMMENTINSTR.slen = 21; - /*inirout drout_329__OUTPUCOD_OBJCOMMENTEDBLOCK */ - /*_._VALROUT___V519*/ meltfptr[518] = - (melt_ptr_t) & meltcdat->drout_329__OUTPUCOD_OBJCOMMENTEDBLOCK; - meltcdat->drout_329__OUTPUCOD_OBJCOMMENTEDBLOCK.discr = + /*inirout drout_331__OUTPUCOD_OBJCOMMENTEDBLOCK */ + /*_._VALROUT___V522*/ meltfptr[521] = + (melt_ptr_t) & meltcdat->drout_331__OUTPUCOD_OBJCOMMENTEDBLOCK; + meltcdat->drout_331__OUTPUCOD_OBJCOMMENTEDBLOCK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); - strncpy (meltcdat->drout_329__OUTPUCOD_OBJCOMMENTEDBLOCK.routdescr, + strncpy (meltcdat->drout_331__OUTPUCOD_OBJCOMMENTEDBLOCK.routdescr, "OUTPUCOD_OBJCOMMENTEDBLOCK @warmelt-outobj.melt:3441", MELT_ROUTDESCR_LEN - 1); - meltcdat->drout_329__OUTPUCOD_OBJCOMMENTEDBLOCK.nbval = 8; - MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_329__OUTPUCOD_OBJCOMMENTEDBLOCK, + meltcdat->drout_331__OUTPUCOD_OBJCOMMENTEDBLOCK.nbval = 8; + MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_331__OUTPUCOD_OBJCOMMENTEDBLOCK, meltrout_74_WARMELTmiOUTOBJ_OUTPUCOD_OBJCOMMENTEDBLOCK); - /*iniclos dclo_330__OUTPUCOD_OBJCOMMENTEDBLOCK */ - /*_._VALCLO___V520*/ meltfptr[519] = - (melt_ptr_t) & meltcdat->dclo_330__OUTPUCOD_OBJCOMMENTEDBLOCK; - meltcdat->dclo_330__OUTPUCOD_OBJCOMMENTEDBLOCK.discr = + /*iniclos dclo_332__OUTPUCOD_OBJCOMMENTEDBLOCK */ + /*_._VALCLO___V523*/ meltfptr[522] = + (melt_ptr_t) & meltcdat->dclo_332__OUTPUCOD_OBJCOMMENTEDBLOCK; + meltcdat->dclo_332__OUTPUCOD_OBJCOMMENTEDBLOCK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); - meltcdat->dclo_330__OUTPUCOD_OBJCOMMENTEDBLOCK.nbval = 0; + meltcdat->dclo_332__OUTPUCOD_OBJCOMMENTEDBLOCK.nbval = 0; -/*iniobj dsym_331__CLASS_OBJCOMMENTEDBLOCK*/ - /*uniqueobj*/ if (! /*_._VALDATA___V521*/ meltfptr[520]) -/*_._VALDATA___V521*/ meltfptr[520] = - (melt_ptr_t) & meltcdat->dsym_331__CLASS_OBJCOMMENTEDBLOCK; +/*iniobj dsym_333__CLASS_OBJCOMMENTEDBLOCK*/ + /*uniqueobj*/ if (! /*_._VALDATA___V524*/ meltfptr[523]) +/*_._VALDATA___V524*/ meltfptr[523] = + (melt_ptr_t) & meltcdat->dsym_333__CLASS_OBJCOMMENTEDBLOCK; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr isobj dsym_331__CLASS_OBJCOMMENTEDBLOCK", + ("iniobj check.discr isobj dsym_333__CLASS_OBJCOMMENTEDBLOCK", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr objmagic dsym_331__CLASS_OBJCOMMENTEDBLOCK", + ("iniobj check.discr objmagic dsym_333__CLASS_OBJCOMMENTEDBLOCK", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_331__CLASS_OBJCOMMENTEDBLOCK.meltobj_class = + meltcdat->dsym_333__CLASS_OBJCOMMENTEDBLOCK.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_331__CLASS_OBJCOMMENTEDBLOCK.obj_hash = 94800260; - meltcdat->dsym_331__CLASS_OBJCOMMENTEDBLOCK.obj_len = 3; + meltcdat->dsym_333__CLASS_OBJCOMMENTEDBLOCK.obj_hash = 94800260; + meltcdat->dsym_333__CLASS_OBJCOMMENTEDBLOCK.obj_len = 3; -/*inistring dstr_332__CLASS_OBJCOMMENTEDBLOCK*/ - /*_._VALSTR___V522*/ meltfptr[521] = - (melt_ptr_t) & meltcdat->dstr_332__CLASS_OBJCOMMENTEDBLOCK; - meltcdat->dstr_332__CLASS_OBJCOMMENTEDBLOCK.discr = +/*inistring dstr_334__CLASS_OBJCOMMENTEDBLOCK*/ + /*_._VALSTR___V525*/ meltfptr[524] = + (melt_ptr_t) & meltcdat->dstr_334__CLASS_OBJCOMMENTEDBLOCK; + meltcdat->dstr_334__CLASS_OBJCOMMENTEDBLOCK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_332__CLASS_OBJCOMMENTEDBLOCK. + /*small inistring */ strncpy (meltcdat->dstr_334__CLASS_OBJCOMMENTEDBLOCK. val, "CLASS_OBJCOMMENTEDBLOCK", sizeof (meltcdat-> - dstr_332__CLASS_OBJCOMMENTEDBLOCK. + dstr_334__CLASS_OBJCOMMENTEDBLOCK. val) - 1); - meltcdat->dstr_332__CLASS_OBJCOMMENTEDBLOCK.val[23] = (char) 0; - meltcdat->dstr_332__CLASS_OBJCOMMENTEDBLOCK.slen = 23; + meltcdat->dstr_334__CLASS_OBJCOMMENTEDBLOCK.val[23] = (char) 0; + meltcdat->dstr_334__CLASS_OBJCOMMENTEDBLOCK.slen = 23; -/*iniobj dsym_333__LABELCOUNTREF*/ - /*uniqueobj*/ if (! /*_._VALDATA___V523*/ meltfptr[522]) -/*_._VALDATA___V523*/ meltfptr[522] = - (melt_ptr_t) & meltcdat->dsym_333__LABELCOUNTREF; +/*iniobj dsym_335__LABELCOUNTREF*/ + /*uniqueobj*/ if (! /*_._VALDATA___V526*/ meltfptr[525]) +/*_._VALDATA___V526*/ meltfptr[525] = + (melt_ptr_t) & meltcdat->dsym_335__LABELCOUNTREF; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_333__LABELCOUNTREF", + melt_assertmsg ("iniobj check.discr isobj dsym_335__LABELCOUNTREF", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr objmagic dsym_333__LABELCOUNTREF", + melt_assertmsg ("iniobj check.discr objmagic dsym_335__LABELCOUNTREF", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_333__LABELCOUNTREF.meltobj_class = + meltcdat->dsym_335__LABELCOUNTREF.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_333__LABELCOUNTREF.obj_hash = 102600919; - meltcdat->dsym_333__LABELCOUNTREF.obj_len = 3; + meltcdat->dsym_335__LABELCOUNTREF.obj_hash = 102600919; + meltcdat->dsym_335__LABELCOUNTREF.obj_len = 3; -/*inistring dstr_334__LABELCOUNTREF*/ - /*_._VALSTR___V524*/ meltfptr[523] = - (melt_ptr_t) & meltcdat->dstr_334__LABELCOUNTREF; - meltcdat->dstr_334__LABELCOUNTREF.discr = +/*inistring dstr_336__LABELCOUNTREF*/ + /*_._VALSTR___V527*/ meltfptr[526] = + (melt_ptr_t) & meltcdat->dstr_336__LABELCOUNTREF; + meltcdat->dstr_336__LABELCOUNTREF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_334__LABELCOUNTREF.val, + /*small inistring */ strncpy (meltcdat->dstr_336__LABELCOUNTREF.val, "LABELCOUNTREF", - sizeof (meltcdat->dstr_334__LABELCOUNTREF. + sizeof (meltcdat->dstr_336__LABELCOUNTREF. val) - 1); - meltcdat->dstr_334__LABELCOUNTREF.val[13] = (char) 0; - meltcdat->dstr_334__LABELCOUNTREF.slen = 13; + meltcdat->dstr_336__LABELCOUNTREF.val[13] = (char) 0; + meltcdat->dstr_336__LABELCOUNTREF.slen = 13; MELT_LOCATION ("warmelt-outobj.melt:3479:/ iniobj"); -/*iniobj dobj_335__LABELCOUNTREF*/ -/*_._VALDATA___V525*/ meltfptr[524] = - (melt_ptr_t) & meltcdat->dobj_335__LABELCOUNTREF; +/*iniobj dobj_337__LABELCOUNTREF*/ +/*_._VALDATA___V528*/ meltfptr[527] = + (melt_ptr_t) & meltcdat->dobj_337__LABELCOUNTREF; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dobj_335__LABELCOUNTREF", + melt_assertmsg ("iniobj check.discr isobj dobj_337__LABELCOUNTREF", melt_magic_discr ((melt_ptr_t) ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5])) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr objmagic dobj_335__LABELCOUNTREF", + melt_assertmsg ("iniobj check.discr objmagic dobj_337__LABELCOUNTREF", ((meltobject_ptr_t) ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5]))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dobj_335__LABELCOUNTREF.meltobj_class = + meltcdat->dobj_337__LABELCOUNTREF.meltobj_class = (meltobject_ptr_t) ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5]); - meltcdat->dobj_335__LABELCOUNTREF.obj_hash = 984757634; - meltcdat->dobj_335__LABELCOUNTREF.obj_len = 1; + meltcdat->dobj_337__LABELCOUNTREF.obj_hash = 803376302; + meltcdat->dobj_337__LABELCOUNTREF.obj_len = 1; - /*iniboxint dint_336__ */ - /*_._VALBXINT___V526*/ meltfptr[525] = (melt_ptr_t) & meltcdat->dint_336__; - meltcdat->dint_336__.discr = + /*iniboxint dint_338__ */ + /*_._VALBXINT___V529*/ meltfptr[528] = (melt_ptr_t) & meltcdat->dint_338__; + meltcdat->dint_338__.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CONSTANT_INTEGER)))); - meltcdat->dint_336__.val = 0; + meltcdat->dint_338__.val = 0; - /*inirout drout_337__OUTPUCOD_OBJLABELINSTR */ - /*_._VALROUT___V527*/ meltfptr[526] = - (melt_ptr_t) & meltcdat->drout_337__OUTPUCOD_OBJLABELINSTR; - meltcdat->drout_337__OUTPUCOD_OBJLABELINSTR.discr = + /*inirout drout_339__OUTPUCOD_OBJLABELINSTR */ + /*_._VALROUT___V530*/ meltfptr[529] = + (melt_ptr_t) & meltcdat->drout_339__OUTPUCOD_OBJLABELINSTR; + meltcdat->drout_339__OUTPUCOD_OBJLABELINSTR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); - strncpy (meltcdat->drout_337__OUTPUCOD_OBJLABELINSTR.routdescr, + strncpy (meltcdat->drout_339__OUTPUCOD_OBJLABELINSTR.routdescr, "OUTPUCOD_OBJLABELINSTR @warmelt-outobj.melt:3480", MELT_ROUTDESCR_LEN - 1); - meltcdat->drout_337__OUTPUCOD_OBJLABELINSTR.nbval = 10; - MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_337__OUTPUCOD_OBJLABELINSTR, + meltcdat->drout_339__OUTPUCOD_OBJLABELINSTR.nbval = 10; + MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_339__OUTPUCOD_OBJLABELINSTR, meltrout_75_WARMELTmiOUTOBJ_OUTPUCOD_OBJLABELINSTR); - /*iniclos dclo_338__OUTPUCOD_OBJLABELINSTR */ - /*_._VALCLO___V528*/ meltfptr[527] = - (melt_ptr_t) & meltcdat->dclo_338__OUTPUCOD_OBJLABELINSTR; - meltcdat->dclo_338__OUTPUCOD_OBJLABELINSTR.discr = + /*iniclos dclo_340__OUTPUCOD_OBJLABELINSTR */ + /*_._VALCLO___V531*/ meltfptr[530] = + (melt_ptr_t) & meltcdat->dclo_340__OUTPUCOD_OBJLABELINSTR; + meltcdat->dclo_340__OUTPUCOD_OBJLABELINSTR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); - meltcdat->dclo_338__OUTPUCOD_OBJLABELINSTR.nbval = 0; + meltcdat->dclo_340__OUTPUCOD_OBJLABELINSTR.nbval = 0; -/*iniobj dsym_339__CLASS_OBJLABELINSTR*/ - /*uniqueobj*/ if (! /*_._VALDATA___V529*/ meltfptr[528]) -/*_._VALDATA___V529*/ meltfptr[528] = - (melt_ptr_t) & meltcdat->dsym_339__CLASS_OBJLABELINSTR; +/*iniobj dsym_341__CLASS_OBJLABELINSTR*/ + /*uniqueobj*/ if (! /*_._VALDATA___V532*/ meltfptr[531]) +/*_._VALDATA___V532*/ meltfptr[531] = + (melt_ptr_t) & meltcdat->dsym_341__CLASS_OBJLABELINSTR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_339__CLASS_OBJLABELINSTR", + melt_assertmsg ("iniobj check.discr isobj dsym_341__CLASS_OBJLABELINSTR", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr objmagic dsym_339__CLASS_OBJLABELINSTR", + ("iniobj check.discr objmagic dsym_341__CLASS_OBJLABELINSTR", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_339__CLASS_OBJLABELINSTR.meltobj_class = + meltcdat->dsym_341__CLASS_OBJLABELINSTR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_339__CLASS_OBJLABELINSTR.obj_hash = 573008884; - meltcdat->dsym_339__CLASS_OBJLABELINSTR.obj_len = 3; + meltcdat->dsym_341__CLASS_OBJLABELINSTR.obj_hash = 573008884; + meltcdat->dsym_341__CLASS_OBJLABELINSTR.obj_len = 3; -/*inistring dstr_340__CLASS_OBJLABELINSTR*/ - /*_._VALSTR___V530*/ meltfptr[529] = - (melt_ptr_t) & meltcdat->dstr_340__CLASS_OBJLABELINSTR; - meltcdat->dstr_340__CLASS_OBJLABELINSTR.discr = +/*inistring dstr_342__CLASS_OBJLABELINSTR*/ + /*_._VALSTR___V533*/ meltfptr[532] = + (melt_ptr_t) & meltcdat->dstr_342__CLASS_OBJLABELINSTR; + meltcdat->dstr_342__CLASS_OBJLABELINSTR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_340__CLASS_OBJLABELINSTR.val, + /*small inistring */ strncpy (meltcdat->dstr_342__CLASS_OBJLABELINSTR.val, "CLASS_OBJLABELINSTR", sizeof (meltcdat-> - dstr_340__CLASS_OBJLABELINSTR.val) - + dstr_342__CLASS_OBJLABELINSTR.val) - 1); - meltcdat->dstr_340__CLASS_OBJLABELINSTR.val[19] = (char) 0; - meltcdat->dstr_340__CLASS_OBJLABELINSTR.slen = 19; + meltcdat->dstr_342__CLASS_OBJLABELINSTR.val[19] = (char) 0; + meltcdat->dstr_342__CLASS_OBJLABELINSTR.slen = 19; -/*iniobj dsym_341__SET_CONTENT*/ - /*uniqueobj*/ if (! /*_._VALDATA___V531*/ meltfptr[530]) -/*_._VALDATA___V531*/ meltfptr[530] = - (melt_ptr_t) & meltcdat->dsym_341__SET_CONTENT; +/*iniobj dsym_343__SET_CONTENT*/ + /*uniqueobj*/ if (! /*_._VALDATA___V534*/ meltfptr[533]) +/*_._VALDATA___V534*/ meltfptr[533] = + (melt_ptr_t) & meltcdat->dsym_343__SET_CONTENT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_341__SET_CONTENT", + melt_assertmsg ("iniobj check.discr isobj dsym_343__SET_CONTENT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr objmagic dsym_341__SET_CONTENT", + melt_assertmsg ("iniobj check.discr objmagic dsym_343__SET_CONTENT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_341__SET_CONTENT.meltobj_class = + meltcdat->dsym_343__SET_CONTENT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_341__SET_CONTENT.obj_hash = 1002281179; - meltcdat->dsym_341__SET_CONTENT.obj_len = 3; + meltcdat->dsym_343__SET_CONTENT.obj_hash = 1002281179; + meltcdat->dsym_343__SET_CONTENT.obj_len = 3; -/*inistring dstr_342__SET_CONTENT*/ - /*_._VALSTR___V532*/ meltfptr[531] = - (melt_ptr_t) & meltcdat->dstr_342__SET_CONTENT; - meltcdat->dstr_342__SET_CONTENT.discr = +/*inistring dstr_344__SET_CONTENT*/ + /*_._VALSTR___V535*/ meltfptr[534] = + (melt_ptr_t) & meltcdat->dstr_344__SET_CONTENT; + meltcdat->dstr_344__SET_CONTENT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_342__SET_CONTENT.val, + /*small inistring */ strncpy (meltcdat->dstr_344__SET_CONTENT.val, "SET_CONTENT", - sizeof (meltcdat->dstr_342__SET_CONTENT.val) - + sizeof (meltcdat->dstr_344__SET_CONTENT.val) - 1); - meltcdat->dstr_342__SET_CONTENT.val[11] = (char) 0; - meltcdat->dstr_342__SET_CONTENT.slen = 11; + meltcdat->dstr_344__SET_CONTENT.val[11] = (char) 0; + meltcdat->dstr_344__SET_CONTENT.slen = 11; -/*iniobj dsym_343__STRING4OUT*/ - /*uniqueobj*/ if (! /*_._VALDATA___V533*/ meltfptr[532]) -/*_._VALDATA___V533*/ meltfptr[532] = - (melt_ptr_t) & meltcdat->dsym_343__STRING4OUT; +/*iniobj dsym_345__STRING4OUT*/ + /*uniqueobj*/ if (! /*_._VALDATA___V536*/ meltfptr[535]) +/*_._VALDATA___V536*/ meltfptr[535] = + (melt_ptr_t) & meltcdat->dsym_345__STRING4OUT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_343__STRING4OUT", + melt_assertmsg ("iniobj check.discr isobj dsym_345__STRING4OUT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr objmagic dsym_343__STRING4OUT", + melt_assertmsg ("iniobj check.discr objmagic dsym_345__STRING4OUT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_343__STRING4OUT.meltobj_class = + meltcdat->dsym_345__STRING4OUT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_343__STRING4OUT.obj_hash = 209944893; - meltcdat->dsym_343__STRING4OUT.obj_len = 3; + meltcdat->dsym_345__STRING4OUT.obj_hash = 209944893; + meltcdat->dsym_345__STRING4OUT.obj_len = 3; -/*inistring dstr_344__STRING4OUT*/ - /*_._VALSTR___V534*/ meltfptr[533] = - (melt_ptr_t) & meltcdat->dstr_344__STRING4OUT; - meltcdat->dstr_344__STRING4OUT.discr = +/*inistring dstr_346__STRING4OUT*/ + /*_._VALSTR___V537*/ meltfptr[536] = + (melt_ptr_t) & meltcdat->dstr_346__STRING4OUT; + meltcdat->dstr_346__STRING4OUT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_344__STRING4OUT.val, + /*small inistring */ strncpy (meltcdat->dstr_346__STRING4OUT.val, "STRING4OUT", - sizeof (meltcdat->dstr_344__STRING4OUT.val) - + sizeof (meltcdat->dstr_346__STRING4OUT.val) - 1); - meltcdat->dstr_344__STRING4OUT.val[10] = (char) 0; - meltcdat->dstr_344__STRING4OUT.slen = 10; + meltcdat->dstr_346__STRING4OUT.val[10] = (char) 0; + meltcdat->dstr_346__STRING4OUT.slen = 10; - /*inirout drout_345__OUTPUCOD_OBJGOTOINSTR */ - /*_._VALROUT___V535*/ meltfptr[534] = - (melt_ptr_t) & meltcdat->drout_345__OUTPUCOD_OBJGOTOINSTR; - meltcdat->drout_345__OUTPUCOD_OBJGOTOINSTR.discr = + /*inirout drout_347__OUTPUCOD_OBJGOTOINSTR */ + /*_._VALROUT___V538*/ meltfptr[537] = + (melt_ptr_t) & meltcdat->drout_347__OUTPUCOD_OBJGOTOINSTR; + meltcdat->drout_347__OUTPUCOD_OBJGOTOINSTR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); - strncpy (meltcdat->drout_345__OUTPUCOD_OBJGOTOINSTR.routdescr, + strncpy (meltcdat->drout_347__OUTPUCOD_OBJGOTOINSTR.routdescr, "OUTPUCOD_OBJGOTOINSTR @warmelt-outobj.melt:3515", MELT_ROUTDESCR_LEN - 1); - meltcdat->drout_345__OUTPUCOD_OBJGOTOINSTR.nbval = 4; - MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_345__OUTPUCOD_OBJGOTOINSTR, + meltcdat->drout_347__OUTPUCOD_OBJGOTOINSTR.nbval = 4; + MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_347__OUTPUCOD_OBJGOTOINSTR, meltrout_76_WARMELTmiOUTOBJ_OUTPUCOD_OBJGOTOINSTR); - /*iniclos dclo_346__OUTPUCOD_OBJGOTOINSTR */ - /*_._VALCLO___V536*/ meltfptr[535] = - (melt_ptr_t) & meltcdat->dclo_346__OUTPUCOD_OBJGOTOINSTR; - meltcdat->dclo_346__OUTPUCOD_OBJGOTOINSTR.discr = + /*iniclos dclo_348__OUTPUCOD_OBJGOTOINSTR */ + /*_._VALCLO___V539*/ meltfptr[538] = + (melt_ptr_t) & meltcdat->dclo_348__OUTPUCOD_OBJGOTOINSTR; + meltcdat->dclo_348__OUTPUCOD_OBJGOTOINSTR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); - meltcdat->dclo_346__OUTPUCOD_OBJGOTOINSTR.nbval = 0; + meltcdat->dclo_348__OUTPUCOD_OBJGOTOINSTR.nbval = 0; -/*iniobj dsym_347__CLASS_OBJGOTOINSTR*/ - /*uniqueobj*/ if (! /*_._VALDATA___V537*/ meltfptr[536]) -/*_._VALDATA___V537*/ meltfptr[536] = - (melt_ptr_t) & meltcdat->dsym_347__CLASS_OBJGOTOINSTR; +/*iniobj dsym_349__CLASS_OBJGOTOINSTR*/ + /*uniqueobj*/ if (! /*_._VALDATA___V540*/ meltfptr[539]) +/*_._VALDATA___V540*/ meltfptr[539] = + (melt_ptr_t) & meltcdat->dsym_349__CLASS_OBJGOTOINSTR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_347__CLASS_OBJGOTOINSTR", + melt_assertmsg ("iniobj check.discr isobj dsym_349__CLASS_OBJGOTOINSTR", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr objmagic dsym_347__CLASS_OBJGOTOINSTR", + ("iniobj check.discr objmagic dsym_349__CLASS_OBJGOTOINSTR", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_347__CLASS_OBJGOTOINSTR.meltobj_class = + meltcdat->dsym_349__CLASS_OBJGOTOINSTR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_347__CLASS_OBJGOTOINSTR.obj_hash = 100586655; - meltcdat->dsym_347__CLASS_OBJGOTOINSTR.obj_len = 3; + meltcdat->dsym_349__CLASS_OBJGOTOINSTR.obj_hash = 100586655; + meltcdat->dsym_349__CLASS_OBJGOTOINSTR.obj_len = 3; -/*inistring dstr_348__CLASS_OBJGOTOINSTR*/ - /*_._VALSTR___V538*/ meltfptr[537] = - (melt_ptr_t) & meltcdat->dstr_348__CLASS_OBJGOTOINSTR; - meltcdat->dstr_348__CLASS_OBJGOTOINSTR.discr = +/*inistring dstr_350__CLASS_OBJGOTOINSTR*/ + /*_._VALSTR___V541*/ meltfptr[540] = + (melt_ptr_t) & meltcdat->dstr_350__CLASS_OBJGOTOINSTR; + meltcdat->dstr_350__CLASS_OBJGOTOINSTR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_348__CLASS_OBJGOTOINSTR.val, + /*small inistring */ strncpy (meltcdat->dstr_350__CLASS_OBJGOTOINSTR.val, "CLASS_OBJGOTOINSTR", sizeof (meltcdat-> - dstr_348__CLASS_OBJGOTOINSTR.val) - + dstr_350__CLASS_OBJGOTOINSTR.val) - 1); - meltcdat->dstr_348__CLASS_OBJGOTOINSTR.val[18] = (char) 0; - meltcdat->dstr_348__CLASS_OBJGOTOINSTR.slen = 18; + meltcdat->dstr_350__CLASS_OBJGOTOINSTR.val[18] = (char) 0; + meltcdat->dstr_350__CLASS_OBJGOTOINSTR.slen = 18; - /*inirout drout_349__ADD2SBUF_CLONSYM */ - /*_._VALROUT___V539*/ meltfptr[538] = - (melt_ptr_t) & meltcdat->drout_349__ADD2SBUF_CLONSYM; - meltcdat->drout_349__ADD2SBUF_CLONSYM.discr = + /*inirout drout_351__ADD2SBUF_CLONSYM */ + /*_._VALROUT___V542*/ meltfptr[541] = + (melt_ptr_t) & meltcdat->drout_351__ADD2SBUF_CLONSYM; + meltcdat->drout_351__ADD2SBUF_CLONSYM.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); - strncpy (meltcdat->drout_349__ADD2SBUF_CLONSYM.routdescr, + strncpy (meltcdat->drout_351__ADD2SBUF_CLONSYM.routdescr, "ADD2SBUF_CLONSYM @warmelt-outobj.melt:3532", MELT_ROUTDESCR_LEN - 1); - meltcdat->drout_349__ADD2SBUF_CLONSYM.nbval = 3; - MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_349__ADD2SBUF_CLONSYM, + meltcdat->drout_351__ADD2SBUF_CLONSYM.nbval = 3; + MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_351__ADD2SBUF_CLONSYM, meltrout_77_WARMELTmiOUTOBJ_ADD2SBUF_CLONSYM); - /*iniclos dclo_350__ADD2SBUF_CLONSYM */ - /*_._VALCLO___V540*/ meltfptr[539] = - (melt_ptr_t) & meltcdat->dclo_350__ADD2SBUF_CLONSYM; - meltcdat->dclo_350__ADD2SBUF_CLONSYM.discr = + /*iniclos dclo_352__ADD2SBUF_CLONSYM */ + /*_._VALCLO___V543*/ meltfptr[542] = + (melt_ptr_t) & meltcdat->dclo_352__ADD2SBUF_CLONSYM; + meltcdat->dclo_352__ADD2SBUF_CLONSYM.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); - meltcdat->dclo_350__ADD2SBUF_CLONSYM.nbval = 0; + meltcdat->dclo_352__ADD2SBUF_CLONSYM.nbval = 0; - /*inirout drout_351__OUTPUCOD_OBJLOOP */ - /*_._VALROUT___V541*/ meltfptr[540] = - (melt_ptr_t) & meltcdat->drout_351__OUTPUCOD_OBJLOOP; - meltcdat->drout_351__OUTPUCOD_OBJLOOP.discr = + /*inirout drout_353__OUTPUCOD_OBJLOOP */ + /*_._VALROUT___V544*/ meltfptr[543] = + (melt_ptr_t) & meltcdat->drout_353__OUTPUCOD_OBJLOOP; + meltcdat->drout_353__OUTPUCOD_OBJLOOP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); - strncpy (meltcdat->drout_351__OUTPUCOD_OBJLOOP.routdescr, + strncpy (meltcdat->drout_353__OUTPUCOD_OBJLOOP.routdescr, "OUTPUCOD_OBJLOOP @warmelt-outobj.melt:3545", MELT_ROUTDESCR_LEN - 1); - meltcdat->drout_351__OUTPUCOD_OBJLOOP.nbval = 16; - MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_351__OUTPUCOD_OBJLOOP, + meltcdat->drout_353__OUTPUCOD_OBJLOOP.nbval = 16; + MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_353__OUTPUCOD_OBJLOOP, meltrout_78_WARMELTmiOUTOBJ_OUTPUCOD_OBJLOOP); - /*iniclos dclo_352__OUTPUCOD_OBJLOOP */ - /*_._VALCLO___V544*/ meltfptr[543] = - (melt_ptr_t) & meltcdat->dclo_352__OUTPUCOD_OBJLOOP; - meltcdat->dclo_352__OUTPUCOD_OBJLOOP.discr = + /*iniclos dclo_354__OUTPUCOD_OBJLOOP */ + /*_._VALCLO___V547*/ meltfptr[546] = + (melt_ptr_t) & meltcdat->dclo_354__OUTPUCOD_OBJLOOP; + meltcdat->dclo_354__OUTPUCOD_OBJLOOP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); - meltcdat->dclo_352__OUTPUCOD_OBJLOOP.nbval = 0; + meltcdat->dclo_354__OUTPUCOD_OBJLOOP.nbval = 0; -/*iniobj dsym_353__CLASS_OBJLOOP*/ - /*uniqueobj*/ if (! /*_._VALDATA___V545*/ meltfptr[544]) -/*_._VALDATA___V545*/ meltfptr[544] = - (melt_ptr_t) & meltcdat->dsym_353__CLASS_OBJLOOP; +/*iniobj dsym_355__CLASS_OBJLOOP*/ + /*uniqueobj*/ if (! /*_._VALDATA___V548*/ meltfptr[547]) +/*_._VALDATA___V548*/ meltfptr[547] = + (melt_ptr_t) & meltcdat->dsym_355__CLASS_OBJLOOP; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_353__CLASS_OBJLOOP", + melt_assertmsg ("iniobj check.discr isobj dsym_355__CLASS_OBJLOOP", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr objmagic dsym_353__CLASS_OBJLOOP", + melt_assertmsg ("iniobj check.discr objmagic dsym_355__CLASS_OBJLOOP", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_353__CLASS_OBJLOOP.meltobj_class = + meltcdat->dsym_355__CLASS_OBJLOOP.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_353__CLASS_OBJLOOP.obj_hash = 763853388; - meltcdat->dsym_353__CLASS_OBJLOOP.obj_len = 3; + meltcdat->dsym_355__CLASS_OBJLOOP.obj_hash = 763853388; + meltcdat->dsym_355__CLASS_OBJLOOP.obj_len = 3; -/*inistring dstr_354__CLASS_OBJLOOP*/ - /*_._VALSTR___V546*/ meltfptr[545] = - (melt_ptr_t) & meltcdat->dstr_354__CLASS_OBJLOOP; - meltcdat->dstr_354__CLASS_OBJLOOP.discr = +/*inistring dstr_356__CLASS_OBJLOOP*/ + /*_._VALSTR___V549*/ meltfptr[548] = + (melt_ptr_t) & meltcdat->dstr_356__CLASS_OBJLOOP; + meltcdat->dstr_356__CLASS_OBJLOOP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_354__CLASS_OBJLOOP.val, + /*small inistring */ strncpy (meltcdat->dstr_356__CLASS_OBJLOOP.val, "CLASS_OBJLOOP", - sizeof (meltcdat->dstr_354__CLASS_OBJLOOP. + sizeof (meltcdat->dstr_356__CLASS_OBJLOOP. val) - 1); - meltcdat->dstr_354__CLASS_OBJLOOP.val[13] = (char) 0; - meltcdat->dstr_354__CLASS_OBJLOOP.slen = 13; + meltcdat->dstr_356__CLASS_OBJLOOP.val[13] = (char) 0; + meltcdat->dstr_356__CLASS_OBJLOOP.slen = 13; - /*inirout drout_355__LAMBDA_ */ - /*_._VALROUT___V542*/ meltfptr[541] = - (melt_ptr_t) & meltcdat->drout_355__LAMBDA_; - meltcdat->drout_355__LAMBDA_.discr = + /*inirout drout_357__LAMBDA_ */ + /*_._VALROUT___V545*/ meltfptr[544] = + (melt_ptr_t) & meltcdat->drout_357__LAMBDA_; + meltcdat->drout_357__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); - strncpy (meltcdat->drout_355__LAMBDA_.routdescr, + strncpy (meltcdat->drout_357__LAMBDA_.routdescr, "LAMBDA_ @warmelt-outobj.melt:3564", MELT_ROUTDESCR_LEN - 1); - meltcdat->drout_355__LAMBDA_.nbval = 2; - MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_355__LAMBDA_, - meltrout_79_WARMELTmiOUTOBJ_LAMBDA_cl7); - - /*inirout drout_356__LAMBDA_ */ - /*_._VALROUT___V543*/ meltfptr[542] = - (melt_ptr_t) & meltcdat->drout_356__LAMBDA_; - meltcdat->drout_356__LAMBDA_.discr = + meltcdat->drout_357__LAMBDA_.nbval = 2; + MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_357__LAMBDA_, + meltrout_79_WARMELTmiOUTOBJ); + + /*inirout drout_358__LAMBDA_ */ + /*_._VALROUT___V546*/ meltfptr[545] = + (melt_ptr_t) & meltcdat->drout_358__LAMBDA_; + meltcdat->drout_358__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); - strncpy (meltcdat->drout_356__LAMBDA_.routdescr, + strncpy (meltcdat->drout_358__LAMBDA_.routdescr, "LAMBDA_ @warmelt-outobj.melt:3586", MELT_ROUTDESCR_LEN - 1); - meltcdat->drout_356__LAMBDA_.nbval = 4; - MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_356__LAMBDA_, - meltrout_80_WARMELTmiOUTOBJ_LAMBDA_cl8); - - /*inirout drout_357__OUTPUCOD_OBJEXIT */ - /*_._VALROUT___V547*/ meltfptr[546] = - (melt_ptr_t) & meltcdat->drout_357__OUTPUCOD_OBJEXIT; - meltcdat->drout_357__OUTPUCOD_OBJEXIT.discr = + meltcdat->drout_358__LAMBDA_.nbval = 4; + MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_358__LAMBDA_, + meltrout_80_WARMELTmiOUTOBJ); + + /*inirout drout_359__OUTPUCOD_OBJEXIT */ + /*_._VALROUT___V550*/ meltfptr[549] = + (melt_ptr_t) & meltcdat->drout_359__OUTPUCOD_OBJEXIT; + meltcdat->drout_359__OUTPUCOD_OBJEXIT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); - strncpy (meltcdat->drout_357__OUTPUCOD_OBJEXIT.routdescr, + strncpy (meltcdat->drout_359__OUTPUCOD_OBJEXIT.routdescr, "OUTPUCOD_OBJEXIT @warmelt-outobj.melt:3604", MELT_ROUTDESCR_LEN - 1); - meltcdat->drout_357__OUTPUCOD_OBJEXIT.nbval = 6; - MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_357__OUTPUCOD_OBJEXIT, + meltcdat->drout_359__OUTPUCOD_OBJEXIT.nbval = 6; + MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_359__OUTPUCOD_OBJEXIT, meltrout_81_WARMELTmiOUTOBJ_OUTPUCOD_OBJEXIT); - /*iniclos dclo_358__OUTPUCOD_OBJEXIT */ - /*_._VALCLO___V548*/ meltfptr[547] = - (melt_ptr_t) & meltcdat->dclo_358__OUTPUCOD_OBJEXIT; - meltcdat->dclo_358__OUTPUCOD_OBJEXIT.discr = + /*iniclos dclo_360__OUTPUCOD_OBJEXIT */ + /*_._VALCLO___V551*/ meltfptr[550] = + (melt_ptr_t) & meltcdat->dclo_360__OUTPUCOD_OBJEXIT; + meltcdat->dclo_360__OUTPUCOD_OBJEXIT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); - meltcdat->dclo_358__OUTPUCOD_OBJEXIT.nbval = 0; + meltcdat->dclo_360__OUTPUCOD_OBJEXIT.nbval = 0; -/*iniobj dsym_359__CLASS_OBJEXIT*/ - /*uniqueobj*/ if (! /*_._VALDATA___V549*/ meltfptr[548]) -/*_._VALDATA___V549*/ meltfptr[548] = - (melt_ptr_t) & meltcdat->dsym_359__CLASS_OBJEXIT; +/*iniobj dsym_361__CLASS_OBJEXIT*/ + /*uniqueobj*/ if (! /*_._VALDATA___V552*/ meltfptr[551]) +/*_._VALDATA___V552*/ meltfptr[551] = + (melt_ptr_t) & meltcdat->dsym_361__CLASS_OBJEXIT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_359__CLASS_OBJEXIT", + melt_assertmsg ("iniobj check.discr isobj dsym_361__CLASS_OBJEXIT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr objmagic dsym_359__CLASS_OBJEXIT", + melt_assertmsg ("iniobj check.discr objmagic dsym_361__CLASS_OBJEXIT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_359__CLASS_OBJEXIT.meltobj_class = + meltcdat->dsym_361__CLASS_OBJEXIT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_359__CLASS_OBJEXIT.obj_hash = 635210442; - meltcdat->dsym_359__CLASS_OBJEXIT.obj_len = 3; + meltcdat->dsym_361__CLASS_OBJEXIT.obj_hash = 635210442; + meltcdat->dsym_361__CLASS_OBJEXIT.obj_len = 3; -/*inistring dstr_360__CLASS_OBJEXIT*/ - /*_._VALSTR___V550*/ meltfptr[549] = - (melt_ptr_t) & meltcdat->dstr_360__CLASS_OBJEXIT; - meltcdat->dstr_360__CLASS_OBJEXIT.discr = +/*inistring dstr_362__CLASS_OBJEXIT*/ + /*_._VALSTR___V553*/ meltfptr[552] = + (melt_ptr_t) & meltcdat->dstr_362__CLASS_OBJEXIT; + meltcdat->dstr_362__CLASS_OBJEXIT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_360__CLASS_OBJEXIT.val, + /*small inistring */ strncpy (meltcdat->dstr_362__CLASS_OBJEXIT.val, "CLASS_OBJEXIT", - sizeof (meltcdat->dstr_360__CLASS_OBJEXIT. + sizeof (meltcdat->dstr_362__CLASS_OBJEXIT. val) - 1); - meltcdat->dstr_360__CLASS_OBJEXIT.val[13] = (char) 0; - meltcdat->dstr_360__CLASS_OBJEXIT.slen = 13; + meltcdat->dstr_362__CLASS_OBJEXIT.val[13] = (char) 0; + meltcdat->dstr_362__CLASS_OBJEXIT.slen = 13; - /*inirout drout_361__OUTPUCOD_OBJAGAIN */ - /*_._VALROUT___V551*/ meltfptr[550] = - (melt_ptr_t) & meltcdat->drout_361__OUTPUCOD_OBJAGAIN; - meltcdat->drout_361__OUTPUCOD_OBJAGAIN.discr = + /*inirout drout_363__OUTPUCOD_OBJAGAIN */ + /*_._VALROUT___V554*/ meltfptr[553] = + (melt_ptr_t) & meltcdat->drout_363__OUTPUCOD_OBJAGAIN; + meltcdat->drout_363__OUTPUCOD_OBJAGAIN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); - strncpy (meltcdat->drout_361__OUTPUCOD_OBJAGAIN.routdescr, + strncpy (meltcdat->drout_363__OUTPUCOD_OBJAGAIN.routdescr, "OUTPUCOD_OBJAGAIN @warmelt-outobj.melt:3624", MELT_ROUTDESCR_LEN - 1); - meltcdat->drout_361__OUTPUCOD_OBJAGAIN.nbval = 6; - MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_361__OUTPUCOD_OBJAGAIN, + meltcdat->drout_363__OUTPUCOD_OBJAGAIN.nbval = 6; + MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_363__OUTPUCOD_OBJAGAIN, meltrout_82_WARMELTmiOUTOBJ_OUTPUCOD_OBJAGAIN); - /*iniclos dclo_362__OUTPUCOD_OBJAGAIN */ - /*_._VALCLO___V552*/ meltfptr[551] = - (melt_ptr_t) & meltcdat->dclo_362__OUTPUCOD_OBJAGAIN; - meltcdat->dclo_362__OUTPUCOD_OBJAGAIN.discr = + /*iniclos dclo_364__OUTPUCOD_OBJAGAIN */ + /*_._VALCLO___V555*/ meltfptr[554] = + (melt_ptr_t) & meltcdat->dclo_364__OUTPUCOD_OBJAGAIN; + meltcdat->dclo_364__OUTPUCOD_OBJAGAIN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); - meltcdat->dclo_362__OUTPUCOD_OBJAGAIN.nbval = 0; + meltcdat->dclo_364__OUTPUCOD_OBJAGAIN.nbval = 0; -/*iniobj dsym_363__CLASS_OBJAGAIN*/ - /*uniqueobj*/ if (! /*_._VALDATA___V553*/ meltfptr[552]) -/*_._VALDATA___V553*/ meltfptr[552] = - (melt_ptr_t) & meltcdat->dsym_363__CLASS_OBJAGAIN; +/*iniobj dsym_365__CLASS_OBJAGAIN*/ + /*uniqueobj*/ if (! /*_._VALDATA___V556*/ meltfptr[555]) +/*_._VALDATA___V556*/ meltfptr[555] = + (melt_ptr_t) & meltcdat->dsym_365__CLASS_OBJAGAIN; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_363__CLASS_OBJAGAIN", + melt_assertmsg ("iniobj check.discr isobj dsym_365__CLASS_OBJAGAIN", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr objmagic dsym_363__CLASS_OBJAGAIN", + melt_assertmsg ("iniobj check.discr objmagic dsym_365__CLASS_OBJAGAIN", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_363__CLASS_OBJAGAIN.meltobj_class = + meltcdat->dsym_365__CLASS_OBJAGAIN.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_363__CLASS_OBJAGAIN.obj_hash = 540256863; - meltcdat->dsym_363__CLASS_OBJAGAIN.obj_len = 3; + meltcdat->dsym_365__CLASS_OBJAGAIN.obj_hash = 540256863; + meltcdat->dsym_365__CLASS_OBJAGAIN.obj_len = 3; -/*inistring dstr_364__CLASS_OBJAGAIN*/ - /*_._VALSTR___V554*/ meltfptr[553] = - (melt_ptr_t) & meltcdat->dstr_364__CLASS_OBJAGAIN; - meltcdat->dstr_364__CLASS_OBJAGAIN.discr = +/*inistring dstr_366__CLASS_OBJAGAIN*/ + /*_._VALSTR___V557*/ meltfptr[556] = + (melt_ptr_t) & meltcdat->dstr_366__CLASS_OBJAGAIN; + meltcdat->dstr_366__CLASS_OBJAGAIN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_364__CLASS_OBJAGAIN.val, + /*small inistring */ strncpy (meltcdat->dstr_366__CLASS_OBJAGAIN.val, "CLASS_OBJAGAIN", - sizeof (meltcdat->dstr_364__CLASS_OBJAGAIN. + sizeof (meltcdat->dstr_366__CLASS_OBJAGAIN. val) - 1); - meltcdat->dstr_364__CLASS_OBJAGAIN.val[14] = (char) 0; - meltcdat->dstr_364__CLASS_OBJAGAIN.slen = 14; + meltcdat->dstr_366__CLASS_OBJAGAIN.val[14] = (char) 0; + meltcdat->dstr_366__CLASS_OBJAGAIN.slen = 14; - /*inirout drout_365__OUTPUCOD_OBJCOMPUTE */ - /*_._VALROUT___V555*/ meltfptr[554] = - (melt_ptr_t) & meltcdat->drout_365__OUTPUCOD_OBJCOMPUTE; - meltcdat->drout_365__OUTPUCOD_OBJCOMPUTE.discr = + /*inirout drout_367__OUTPUCOD_OBJCOMPUTE */ + /*_._VALROUT___V558*/ meltfptr[557] = + (melt_ptr_t) & meltcdat->drout_367__OUTPUCOD_OBJCOMPUTE; + meltcdat->drout_367__OUTPUCOD_OBJCOMPUTE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); - strncpy (meltcdat->drout_365__OUTPUCOD_OBJCOMPUTE.routdescr, + strncpy (meltcdat->drout_367__OUTPUCOD_OBJCOMPUTE.routdescr, "OUTPUCOD_OBJCOMPUTE @warmelt-outobj.melt:3643", MELT_ROUTDESCR_LEN - 1); - meltcdat->drout_365__OUTPUCOD_OBJCOMPUTE.nbval = 18; - MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_365__OUTPUCOD_OBJCOMPUTE, + meltcdat->drout_367__OUTPUCOD_OBJCOMPUTE.nbval = 18; + MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_367__OUTPUCOD_OBJCOMPUTE, meltrout_83_WARMELTmiOUTOBJ_OUTPUCOD_OBJCOMPUTE); - /*iniclos dclo_366__OUTPUCOD_OBJCOMPUTE */ - /*_._VALCLO___V559*/ meltfptr[558] = - (melt_ptr_t) & meltcdat->dclo_366__OUTPUCOD_OBJCOMPUTE; - meltcdat->dclo_366__OUTPUCOD_OBJCOMPUTE.discr = + /*iniclos dclo_368__OUTPUCOD_OBJCOMPUTE */ + /*_._VALCLO___V562*/ meltfptr[561] = + (melt_ptr_t) & meltcdat->dclo_368__OUTPUCOD_OBJCOMPUTE; + meltcdat->dclo_368__OUTPUCOD_OBJCOMPUTE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); - meltcdat->dclo_366__OUTPUCOD_OBJCOMPUTE.nbval = 0; + meltcdat->dclo_368__OUTPUCOD_OBJCOMPUTE.nbval = 0; -/*iniobj dsym_367__CLASS_OBJCOMPUTE*/ - /*uniqueobj*/ if (! /*_._VALDATA___V560*/ meltfptr[559]) -/*_._VALDATA___V560*/ meltfptr[559] = - (melt_ptr_t) & meltcdat->dsym_367__CLASS_OBJCOMPUTE; +/*iniobj dsym_369__CLASS_OBJCOMPUTE*/ + /*uniqueobj*/ if (! /*_._VALDATA___V563*/ meltfptr[562]) +/*_._VALDATA___V563*/ meltfptr[562] = + (melt_ptr_t) & meltcdat->dsym_369__CLASS_OBJCOMPUTE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_367__CLASS_OBJCOMPUTE", + melt_assertmsg ("iniobj check.discr isobj dsym_369__CLASS_OBJCOMPUTE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr objmagic dsym_367__CLASS_OBJCOMPUTE", + melt_assertmsg ("iniobj check.discr objmagic dsym_369__CLASS_OBJCOMPUTE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_367__CLASS_OBJCOMPUTE.meltobj_class = + meltcdat->dsym_369__CLASS_OBJCOMPUTE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_367__CLASS_OBJCOMPUTE.obj_hash = 943434547; - meltcdat->dsym_367__CLASS_OBJCOMPUTE.obj_len = 3; + meltcdat->dsym_369__CLASS_OBJCOMPUTE.obj_hash = 943434547; + meltcdat->dsym_369__CLASS_OBJCOMPUTE.obj_len = 3; -/*inistring dstr_368__CLASS_OBJCOMPUTE*/ - /*_._VALSTR___V561*/ meltfptr[560] = - (melt_ptr_t) & meltcdat->dstr_368__CLASS_OBJCOMPUTE; - meltcdat->dstr_368__CLASS_OBJCOMPUTE.discr = +/*inistring dstr_370__CLASS_OBJCOMPUTE*/ + /*_._VALSTR___V564*/ meltfptr[563] = + (melt_ptr_t) & meltcdat->dstr_370__CLASS_OBJCOMPUTE; + meltcdat->dstr_370__CLASS_OBJCOMPUTE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_368__CLASS_OBJCOMPUTE.val, + /*small inistring */ strncpy (meltcdat->dstr_370__CLASS_OBJCOMPUTE.val, "CLASS_OBJCOMPUTE", - sizeof (meltcdat->dstr_368__CLASS_OBJCOMPUTE. + sizeof (meltcdat->dstr_370__CLASS_OBJCOMPUTE. val) - 1); - meltcdat->dstr_368__CLASS_OBJCOMPUTE.val[16] = (char) 0; - meltcdat->dstr_368__CLASS_OBJCOMPUTE.slen = 16; + meltcdat->dstr_370__CLASS_OBJCOMPUTE.val[16] = (char) 0; + meltcdat->dstr_370__CLASS_OBJCOMPUTE.slen = 16; - /*inirout drout_369__LAMBDA_ */ - /*_._VALROUT___V556*/ meltfptr[555] = - (melt_ptr_t) & meltcdat->drout_369__LAMBDA_; - meltcdat->drout_369__LAMBDA_.discr = + /*inirout drout_371__LAMBDA_ */ + /*_._VALROUT___V559*/ meltfptr[558] = + (melt_ptr_t) & meltcdat->drout_371__LAMBDA_; + meltcdat->drout_371__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); - strncpy (meltcdat->drout_369__LAMBDA_.routdescr, + strncpy (meltcdat->drout_371__LAMBDA_.routdescr, "LAMBDA_ @warmelt-outobj.melt:3654", MELT_ROUTDESCR_LEN - 1); - meltcdat->drout_369__LAMBDA_.nbval = 1; - MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_369__LAMBDA_, - meltrout_84_WARMELTmiOUTOBJ_LAMBDA_cl9); - - /*inirout drout_370__LAMBDA_ */ - /*_._VALROUT___V557*/ meltfptr[556] = - (melt_ptr_t) & meltcdat->drout_370__LAMBDA_; - meltcdat->drout_370__LAMBDA_.discr = + meltcdat->drout_371__LAMBDA_.nbval = 1; + MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_371__LAMBDA_, + meltrout_84_WARMELTmiOUTOBJ); + + /*inirout drout_372__LAMBDA_ */ + /*_._VALROUT___V560*/ meltfptr[559] = + (melt_ptr_t) & meltcdat->drout_372__LAMBDA_; + meltcdat->drout_372__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); - strncpy (meltcdat->drout_370__LAMBDA_.routdescr, + strncpy (meltcdat->drout_372__LAMBDA_.routdescr, "LAMBDA_ @warmelt-outobj.melt:3663", MELT_ROUTDESCR_LEN - 1); - meltcdat->drout_370__LAMBDA_.nbval = 3; - MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_370__LAMBDA_, - meltrout_85_WARMELTmiOUTOBJ_LAMBDA_cl10); + meltcdat->drout_372__LAMBDA_.nbval = 3; + MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_372__LAMBDA_, + meltrout_85_WARMELTmiOUTOBJ); -/*iniobj dsym_371__MULTIPLE_EVERY*/ - /*uniqueobj*/ if (! /*_._VALDATA___V562*/ meltfptr[561]) -/*_._VALDATA___V562*/ meltfptr[561] = - (melt_ptr_t) & meltcdat->dsym_371__MULTIPLE_EVERY; +/*iniobj dsym_373__MULTIPLE_EVERY*/ + /*uniqueobj*/ if (! /*_._VALDATA___V565*/ meltfptr[564]) +/*_._VALDATA___V565*/ meltfptr[564] = + (melt_ptr_t) & meltcdat->dsym_373__MULTIPLE_EVERY; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_371__MULTIPLE_EVERY", + melt_assertmsg ("iniobj check.discr isobj dsym_373__MULTIPLE_EVERY", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr objmagic dsym_371__MULTIPLE_EVERY", + melt_assertmsg ("iniobj check.discr objmagic dsym_373__MULTIPLE_EVERY", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_371__MULTIPLE_EVERY.meltobj_class = + meltcdat->dsym_373__MULTIPLE_EVERY.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_371__MULTIPLE_EVERY.obj_hash = 130098745; - meltcdat->dsym_371__MULTIPLE_EVERY.obj_len = 3; + meltcdat->dsym_373__MULTIPLE_EVERY.obj_hash = 130098745; + meltcdat->dsym_373__MULTIPLE_EVERY.obj_len = 3; -/*inistring dstr_372__MULTIPLE_EVERY*/ - /*_._VALSTR___V563*/ meltfptr[562] = - (melt_ptr_t) & meltcdat->dstr_372__MULTIPLE_EVERY; - meltcdat->dstr_372__MULTIPLE_EVERY.discr = +/*inistring dstr_374__MULTIPLE_EVERY*/ + /*_._VALSTR___V566*/ meltfptr[565] = + (melt_ptr_t) & meltcdat->dstr_374__MULTIPLE_EVERY; + meltcdat->dstr_374__MULTIPLE_EVERY.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_372__MULTIPLE_EVERY.val, + /*small inistring */ strncpy (meltcdat->dstr_374__MULTIPLE_EVERY.val, "MULTIPLE_EVERY", - sizeof (meltcdat->dstr_372__MULTIPLE_EVERY. + sizeof (meltcdat->dstr_374__MULTIPLE_EVERY. val) - 1); - meltcdat->dstr_372__MULTIPLE_EVERY.val[14] = (char) 0; - meltcdat->dstr_372__MULTIPLE_EVERY.slen = 14; + meltcdat->dstr_374__MULTIPLE_EVERY.val[14] = (char) 0; + meltcdat->dstr_374__MULTIPLE_EVERY.slen = 14; - /*inirout drout_373__LAMBDA_ */ - /*_._VALROUT___V558*/ meltfptr[557] = - (melt_ptr_t) & meltcdat->drout_373__LAMBDA_; - meltcdat->drout_373__LAMBDA_.discr = + /*inirout drout_375__LAMBDA_ */ + /*_._VALROUT___V561*/ meltfptr[560] = + (melt_ptr_t) & meltcdat->drout_375__LAMBDA_; + meltcdat->drout_375__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); - strncpy (meltcdat->drout_373__LAMBDA_.routdescr, + strncpy (meltcdat->drout_375__LAMBDA_.routdescr, "LAMBDA_ @warmelt-outobj.melt:3673", MELT_ROUTDESCR_LEN - 1); - meltcdat->drout_373__LAMBDA_.nbval = 3; - MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_373__LAMBDA_, - meltrout_86_WARMELTmiOUTOBJ_LAMBDA_cl11); - - /*inirout drout_374__OUTPUCOD_OBJCOND */ - /*_._VALROUT___V564*/ meltfptr[563] = - (melt_ptr_t) & meltcdat->drout_374__OUTPUCOD_OBJCOND; - meltcdat->drout_374__OUTPUCOD_OBJCOND.discr = + meltcdat->drout_375__LAMBDA_.nbval = 3; + MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_375__LAMBDA_, + meltrout_86_WARMELTmiOUTOBJ); + + /*inirout drout_376__OUTPUCOD_OBJCOND */ + /*_._VALROUT___V567*/ meltfptr[566] = + (melt_ptr_t) & meltcdat->drout_376__OUTPUCOD_OBJCOND; + meltcdat->drout_376__OUTPUCOD_OBJCOND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); - strncpy (meltcdat->drout_374__OUTPUCOD_OBJCOND.routdescr, + strncpy (meltcdat->drout_376__OUTPUCOD_OBJCOND.routdescr, "OUTPUCOD_OBJCOND @warmelt-outobj.melt:3689", MELT_ROUTDESCR_LEN - 1); - meltcdat->drout_374__OUTPUCOD_OBJCOND.nbval = 6; - MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_374__OUTPUCOD_OBJCOND, + meltcdat->drout_376__OUTPUCOD_OBJCOND.nbval = 6; + MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_376__OUTPUCOD_OBJCOND, meltrout_87_WARMELTmiOUTOBJ_OUTPUCOD_OBJCOND); - /*iniclos dclo_375__OUTPUCOD_OBJCOND */ - /*_._VALCLO___V565*/ meltfptr[564] = - (melt_ptr_t) & meltcdat->dclo_375__OUTPUCOD_OBJCOND; - meltcdat->dclo_375__OUTPUCOD_OBJCOND.discr = + /*iniclos dclo_377__OUTPUCOD_OBJCOND */ + /*_._VALCLO___V568*/ meltfptr[567] = + (melt_ptr_t) & meltcdat->dclo_377__OUTPUCOD_OBJCOND; + meltcdat->dclo_377__OUTPUCOD_OBJCOND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); - meltcdat->dclo_375__OUTPUCOD_OBJCOND.nbval = 0; + meltcdat->dclo_377__OUTPUCOD_OBJCOND.nbval = 0; -/*iniobj dsym_376__CLASS_OBJCOND*/ - /*uniqueobj*/ if (! /*_._VALDATA___V566*/ meltfptr[565]) -/*_._VALDATA___V566*/ meltfptr[565] = - (melt_ptr_t) & meltcdat->dsym_376__CLASS_OBJCOND; +/*iniobj dsym_378__CLASS_OBJCOND*/ + /*uniqueobj*/ if (! /*_._VALDATA___V569*/ meltfptr[568]) +/*_._VALDATA___V569*/ meltfptr[568] = + (melt_ptr_t) & meltcdat->dsym_378__CLASS_OBJCOND; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_376__CLASS_OBJCOND", + melt_assertmsg ("iniobj check.discr isobj dsym_378__CLASS_OBJCOND", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr objmagic dsym_376__CLASS_OBJCOND", + melt_assertmsg ("iniobj check.discr objmagic dsym_378__CLASS_OBJCOND", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_376__CLASS_OBJCOND.meltobj_class = + meltcdat->dsym_378__CLASS_OBJCOND.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_376__CLASS_OBJCOND.obj_hash = 545823211; - meltcdat->dsym_376__CLASS_OBJCOND.obj_len = 3; + meltcdat->dsym_378__CLASS_OBJCOND.obj_hash = 545823211; + meltcdat->dsym_378__CLASS_OBJCOND.obj_len = 3; -/*inistring dstr_377__CLASS_OBJCOND*/ - /*_._VALSTR___V567*/ meltfptr[566] = - (melt_ptr_t) & meltcdat->dstr_377__CLASS_OBJCOND; - meltcdat->dstr_377__CLASS_OBJCOND.discr = +/*inistring dstr_379__CLASS_OBJCOND*/ + /*_._VALSTR___V570*/ meltfptr[569] = + (melt_ptr_t) & meltcdat->dstr_379__CLASS_OBJCOND; + meltcdat->dstr_379__CLASS_OBJCOND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_377__CLASS_OBJCOND.val, + /*small inistring */ strncpy (meltcdat->dstr_379__CLASS_OBJCOND.val, "CLASS_OBJCOND", - sizeof (meltcdat->dstr_377__CLASS_OBJCOND. + sizeof (meltcdat->dstr_379__CLASS_OBJCOND. val) - 1); - meltcdat->dstr_377__CLASS_OBJCOND.val[13] = (char) 0; - meltcdat->dstr_377__CLASS_OBJCOND.slen = 13; + meltcdat->dstr_379__CLASS_OBJCOND.val[13] = (char) 0; + meltcdat->dstr_379__CLASS_OBJCOND.slen = 13; - /*inirout drout_378__OUTPUCOD_OBJCPPIF */ - /*_._VALROUT___V568*/ meltfptr[567] = - (melt_ptr_t) & meltcdat->drout_378__OUTPUCOD_OBJCPPIF; - meltcdat->drout_378__OUTPUCOD_OBJCPPIF.discr = + /*inirout drout_380__OUTPUCOD_OBJCPPIF */ + /*_._VALROUT___V571*/ meltfptr[570] = + (melt_ptr_t) & meltcdat->drout_380__OUTPUCOD_OBJCPPIF; + meltcdat->drout_380__OUTPUCOD_OBJCPPIF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); - strncpy (meltcdat->drout_378__OUTPUCOD_OBJCPPIF.routdescr, + strncpy (meltcdat->drout_380__OUTPUCOD_OBJCPPIF.routdescr, "OUTPUCOD_OBJCPPIF @warmelt-outobj.melt:3731", MELT_ROUTDESCR_LEN - 1); - meltcdat->drout_378__OUTPUCOD_OBJCPPIF.nbval = 6; - MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_378__OUTPUCOD_OBJCPPIF, + meltcdat->drout_380__OUTPUCOD_OBJCPPIF.nbval = 6; + MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_380__OUTPUCOD_OBJCPPIF, meltrout_88_WARMELTmiOUTOBJ_OUTPUCOD_OBJCPPIF); - /*iniclos dclo_379__OUTPUCOD_OBJCPPIF */ - /*_._VALCLO___V569*/ meltfptr[568] = - (melt_ptr_t) & meltcdat->dclo_379__OUTPUCOD_OBJCPPIF; - meltcdat->dclo_379__OUTPUCOD_OBJCPPIF.discr = + /*iniclos dclo_381__OUTPUCOD_OBJCPPIF */ + /*_._VALCLO___V572*/ meltfptr[571] = + (melt_ptr_t) & meltcdat->dclo_381__OUTPUCOD_OBJCPPIF; + meltcdat->dclo_381__OUTPUCOD_OBJCPPIF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); - meltcdat->dclo_379__OUTPUCOD_OBJCPPIF.nbval = 0; + meltcdat->dclo_381__OUTPUCOD_OBJCPPIF.nbval = 0; -/*iniobj dsym_380__CLASS_OBJCPPIF*/ - /*uniqueobj*/ if (! /*_._VALDATA___V570*/ meltfptr[569]) -/*_._VALDATA___V570*/ meltfptr[569] = - (melt_ptr_t) & meltcdat->dsym_380__CLASS_OBJCPPIF; +/*iniobj dsym_382__CLASS_OBJCPPIF*/ + /*uniqueobj*/ if (! /*_._VALDATA___V573*/ meltfptr[572]) +/*_._VALDATA___V573*/ meltfptr[572] = + (melt_ptr_t) & meltcdat->dsym_382__CLASS_OBJCPPIF; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_380__CLASS_OBJCPPIF", + melt_assertmsg ("iniobj check.discr isobj dsym_382__CLASS_OBJCPPIF", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr objmagic dsym_380__CLASS_OBJCPPIF", + melt_assertmsg ("iniobj check.discr objmagic dsym_382__CLASS_OBJCPPIF", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_380__CLASS_OBJCPPIF.meltobj_class = + meltcdat->dsym_382__CLASS_OBJCPPIF.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_380__CLASS_OBJCPPIF.obj_hash = 418843843; - meltcdat->dsym_380__CLASS_OBJCPPIF.obj_len = 3; + meltcdat->dsym_382__CLASS_OBJCPPIF.obj_hash = 418843843; + meltcdat->dsym_382__CLASS_OBJCPPIF.obj_len = 3; -/*inistring dstr_381__CLASS_OBJCPPIF*/ - /*_._VALSTR___V571*/ meltfptr[570] = - (melt_ptr_t) & meltcdat->dstr_381__CLASS_OBJCPPIF; - meltcdat->dstr_381__CLASS_OBJCPPIF.discr = +/*inistring dstr_383__CLASS_OBJCPPIF*/ + /*_._VALSTR___V574*/ meltfptr[573] = + (melt_ptr_t) & meltcdat->dstr_383__CLASS_OBJCPPIF; + meltcdat->dstr_383__CLASS_OBJCPPIF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_381__CLASS_OBJCPPIF.val, + /*small inistring */ strncpy (meltcdat->dstr_383__CLASS_OBJCPPIF.val, "CLASS_OBJCPPIF", - sizeof (meltcdat->dstr_381__CLASS_OBJCPPIF. + sizeof (meltcdat->dstr_383__CLASS_OBJCPPIF. val) - 1); - meltcdat->dstr_381__CLASS_OBJCPPIF.val[14] = (char) 0; - meltcdat->dstr_381__CLASS_OBJCPPIF.slen = 14; + meltcdat->dstr_383__CLASS_OBJCPPIF.val[14] = (char) 0; + meltcdat->dstr_383__CLASS_OBJCPPIF.slen = 14; - /*inirout drout_382__OUTPUCOD_OBJINTERNSYMBOL */ - /*_._VALROUT___V572*/ meltfptr[571] = - (melt_ptr_t) & meltcdat->drout_382__OUTPUCOD_OBJINTERNSYMBOL; - meltcdat->drout_382__OUTPUCOD_OBJINTERNSYMBOL.discr = + /*inirout drout_384__OUTPUCOD_OBJINTERNSYMBOL */ + /*_._VALROUT___V575*/ meltfptr[574] = + (melt_ptr_t) & meltcdat->drout_384__OUTPUCOD_OBJINTERNSYMBOL; + meltcdat->drout_384__OUTPUCOD_OBJINTERNSYMBOL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); - strncpy (meltcdat->drout_382__OUTPUCOD_OBJINTERNSYMBOL.routdescr, + strncpy (meltcdat->drout_384__OUTPUCOD_OBJINTERNSYMBOL.routdescr, "OUTPUCOD_OBJINTERNSYMBOL @warmelt-outobj.melt:3764", MELT_ROUTDESCR_LEN - 1); - meltcdat->drout_382__OUTPUCOD_OBJINTERNSYMBOL.nbval = 7; - MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_382__OUTPUCOD_OBJINTERNSYMBOL, + meltcdat->drout_384__OUTPUCOD_OBJINTERNSYMBOL.nbval = 7; + MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_384__OUTPUCOD_OBJINTERNSYMBOL, meltrout_89_WARMELTmiOUTOBJ_OUTPUCOD_OBJINTERNSYMBOL); - /*iniclos dclo_383__OUTPUCOD_OBJINTERNSYMBOL */ - /*_._VALCLO___V573*/ meltfptr[572] = - (melt_ptr_t) & meltcdat->dclo_383__OUTPUCOD_OBJINTERNSYMBOL; - meltcdat->dclo_383__OUTPUCOD_OBJINTERNSYMBOL.discr = + /*iniclos dclo_385__OUTPUCOD_OBJINTERNSYMBOL */ + /*_._VALCLO___V576*/ meltfptr[575] = + (melt_ptr_t) & meltcdat->dclo_385__OUTPUCOD_OBJINTERNSYMBOL; + meltcdat->dclo_385__OUTPUCOD_OBJINTERNSYMBOL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); - meltcdat->dclo_383__OUTPUCOD_OBJINTERNSYMBOL.nbval = 0; + meltcdat->dclo_385__OUTPUCOD_OBJINTERNSYMBOL.nbval = 0; -/*iniobj dsym_384__CLASS_OBJINTERNSYMBOL*/ - /*uniqueobj*/ if (! /*_._VALDATA___V574*/ meltfptr[573]) -/*_._VALDATA___V574*/ meltfptr[573] = - (melt_ptr_t) & meltcdat->dsym_384__CLASS_OBJINTERNSYMBOL; +/*iniobj dsym_386__CLASS_OBJINTERNSYMBOL*/ + /*uniqueobj*/ if (! /*_._VALDATA___V577*/ meltfptr[576]) +/*_._VALDATA___V577*/ meltfptr[576] = + (melt_ptr_t) & meltcdat->dsym_386__CLASS_OBJINTERNSYMBOL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr isobj dsym_384__CLASS_OBJINTERNSYMBOL", + ("iniobj check.discr isobj dsym_386__CLASS_OBJINTERNSYMBOL", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr objmagic dsym_384__CLASS_OBJINTERNSYMBOL", + ("iniobj check.discr objmagic dsym_386__CLASS_OBJINTERNSYMBOL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_384__CLASS_OBJINTERNSYMBOL.meltobj_class = + meltcdat->dsym_386__CLASS_OBJINTERNSYMBOL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_384__CLASS_OBJINTERNSYMBOL.obj_hash = 881953204; - meltcdat->dsym_384__CLASS_OBJINTERNSYMBOL.obj_len = 3; + meltcdat->dsym_386__CLASS_OBJINTERNSYMBOL.obj_hash = 881953204; + meltcdat->dsym_386__CLASS_OBJINTERNSYMBOL.obj_len = 3; -/*inistring dstr_385__CLASS_OBJINTERNSYMBOL*/ - /*_._VALSTR___V575*/ meltfptr[574] = - (melt_ptr_t) & meltcdat->dstr_385__CLASS_OBJINTERNSYMBOL; - meltcdat->dstr_385__CLASS_OBJINTERNSYMBOL.discr = +/*inistring dstr_387__CLASS_OBJINTERNSYMBOL*/ + /*_._VALSTR___V578*/ meltfptr[577] = + (melt_ptr_t) & meltcdat->dstr_387__CLASS_OBJINTERNSYMBOL; + meltcdat->dstr_387__CLASS_OBJINTERNSYMBOL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_385__CLASS_OBJINTERNSYMBOL.val, + /*small inistring */ strncpy (meltcdat->dstr_387__CLASS_OBJINTERNSYMBOL.val, "CLASS_OBJINTERNSYMBOL", sizeof (meltcdat-> - dstr_385__CLASS_OBJINTERNSYMBOL.val) - + dstr_387__CLASS_OBJINTERNSYMBOL.val) - 1); - meltcdat->dstr_385__CLASS_OBJINTERNSYMBOL.val[21] = (char) 0; - meltcdat->dstr_385__CLASS_OBJINTERNSYMBOL.slen = 21; + meltcdat->dstr_387__CLASS_OBJINTERNSYMBOL.val[21] = (char) 0; + meltcdat->dstr_387__CLASS_OBJINTERNSYMBOL.slen = 21; -/*iniobj dsym_386__CLASS_NREP_DATASYMBOL*/ - /*uniqueobj*/ if (! /*_._VALDATA___V576*/ meltfptr[575]) -/*_._VALDATA___V576*/ meltfptr[575] = - (melt_ptr_t) & meltcdat->dsym_386__CLASS_NREP_DATASYMBOL; +/*iniobj dsym_388__CLASS_NREP_DATASYMBOL*/ + /*uniqueobj*/ if (! /*_._VALDATA___V579*/ meltfptr[578]) +/*_._VALDATA___V579*/ meltfptr[578] = + (melt_ptr_t) & meltcdat->dsym_388__CLASS_NREP_DATASYMBOL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr isobj dsym_386__CLASS_NREP_DATASYMBOL", + ("iniobj check.discr isobj dsym_388__CLASS_NREP_DATASYMBOL", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr objmagic dsym_386__CLASS_NREP_DATASYMBOL", + ("iniobj check.discr objmagic dsym_388__CLASS_NREP_DATASYMBOL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_386__CLASS_NREP_DATASYMBOL.meltobj_class = + meltcdat->dsym_388__CLASS_NREP_DATASYMBOL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_386__CLASS_NREP_DATASYMBOL.obj_hash = 55902456; - meltcdat->dsym_386__CLASS_NREP_DATASYMBOL.obj_len = 3; + meltcdat->dsym_388__CLASS_NREP_DATASYMBOL.obj_hash = 55902456; + meltcdat->dsym_388__CLASS_NREP_DATASYMBOL.obj_len = 3; -/*inistring dstr_387__CLASS_NREP_DATASYMBOL*/ - /*_._VALSTR___V577*/ meltfptr[576] = - (melt_ptr_t) & meltcdat->dstr_387__CLASS_NREP_DATASYMBOL; - meltcdat->dstr_387__CLASS_NREP_DATASYMBOL.discr = +/*inistring dstr_389__CLASS_NREP_DATASYMBOL*/ + /*_._VALSTR___V580*/ meltfptr[579] = + (melt_ptr_t) & meltcdat->dstr_389__CLASS_NREP_DATASYMBOL; + meltcdat->dstr_389__CLASS_NREP_DATASYMBOL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_387__CLASS_NREP_DATASYMBOL.val, + /*small inistring */ strncpy (meltcdat->dstr_389__CLASS_NREP_DATASYMBOL.val, "CLASS_NREP_DATASYMBOL", sizeof (meltcdat-> - dstr_387__CLASS_NREP_DATASYMBOL.val) - + dstr_389__CLASS_NREP_DATASYMBOL.val) - 1); - meltcdat->dstr_387__CLASS_NREP_DATASYMBOL.val[21] = (char) 0; - meltcdat->dstr_387__CLASS_NREP_DATASYMBOL.slen = 21; + meltcdat->dstr_389__CLASS_NREP_DATASYMBOL.val[21] = (char) 0; + meltcdat->dstr_389__CLASS_NREP_DATASYMBOL.slen = 21; - /*inirout drout_388__OUTPUCOD_OBJINTERNKEYWORD */ - /*_._VALROUT___V578*/ meltfptr[577] = - (melt_ptr_t) & meltcdat->drout_388__OUTPUCOD_OBJINTERNKEYWORD; - meltcdat->drout_388__OUTPUCOD_OBJINTERNKEYWORD.discr = + /*inirout drout_390__OUTPUCOD_OBJINTERNKEYWORD */ + /*_._VALROUT___V581*/ meltfptr[580] = + (melt_ptr_t) & meltcdat->drout_390__OUTPUCOD_OBJINTERNKEYWORD; + meltcdat->drout_390__OUTPUCOD_OBJINTERNKEYWORD.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); - strncpy (meltcdat->drout_388__OUTPUCOD_OBJINTERNKEYWORD.routdescr, + strncpy (meltcdat->drout_390__OUTPUCOD_OBJINTERNKEYWORD.routdescr, "OUTPUCOD_OBJINTERNKEYWORD @warmelt-outobj.melt:3789", MELT_ROUTDESCR_LEN - 1); - meltcdat->drout_388__OUTPUCOD_OBJINTERNKEYWORD.nbval = 6; - MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_388__OUTPUCOD_OBJINTERNKEYWORD, + meltcdat->drout_390__OUTPUCOD_OBJINTERNKEYWORD.nbval = 6; + MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_390__OUTPUCOD_OBJINTERNKEYWORD, meltrout_90_WARMELTmiOUTOBJ_OUTPUCOD_OBJINTERNKEYWORD); - /*iniclos dclo_389__OUTPUCOD_OBJINTERNKEYWORD */ - /*_._VALCLO___V579*/ meltfptr[578] = - (melt_ptr_t) & meltcdat->dclo_389__OUTPUCOD_OBJINTERNKEYWORD; - meltcdat->dclo_389__OUTPUCOD_OBJINTERNKEYWORD.discr = + /*iniclos dclo_391__OUTPUCOD_OBJINTERNKEYWORD */ + /*_._VALCLO___V582*/ meltfptr[581] = + (melt_ptr_t) & meltcdat->dclo_391__OUTPUCOD_OBJINTERNKEYWORD; + meltcdat->dclo_391__OUTPUCOD_OBJINTERNKEYWORD.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); - meltcdat->dclo_389__OUTPUCOD_OBJINTERNKEYWORD.nbval = 0; + meltcdat->dclo_391__OUTPUCOD_OBJINTERNKEYWORD.nbval = 0; -/*iniobj dsym_390__CLASS_OBJINTERNKEYWORD*/ - /*uniqueobj*/ if (! /*_._VALDATA___V580*/ meltfptr[579]) -/*_._VALDATA___V580*/ meltfptr[579] = - (melt_ptr_t) & meltcdat->dsym_390__CLASS_OBJINTERNKEYWORD; +/*iniobj dsym_392__CLASS_OBJINTERNKEYWORD*/ + /*uniqueobj*/ if (! /*_._VALDATA___V583*/ meltfptr[582]) +/*_._VALDATA___V583*/ meltfptr[582] = + (melt_ptr_t) & meltcdat->dsym_392__CLASS_OBJINTERNKEYWORD; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr isobj dsym_390__CLASS_OBJINTERNKEYWORD", + ("iniobj check.discr isobj dsym_392__CLASS_OBJINTERNKEYWORD", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr objmagic dsym_390__CLASS_OBJINTERNKEYWORD", + ("iniobj check.discr objmagic dsym_392__CLASS_OBJINTERNKEYWORD", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_390__CLASS_OBJINTERNKEYWORD.meltobj_class = + meltcdat->dsym_392__CLASS_OBJINTERNKEYWORD.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_390__CLASS_OBJINTERNKEYWORD.obj_hash = 606725080; - meltcdat->dsym_390__CLASS_OBJINTERNKEYWORD.obj_len = 3; + meltcdat->dsym_392__CLASS_OBJINTERNKEYWORD.obj_hash = 606725080; + meltcdat->dsym_392__CLASS_OBJINTERNKEYWORD.obj_len = 3; -/*inistring dstr_391__CLASS_OBJINTERNKEYWORD*/ - /*_._VALSTR___V581*/ meltfptr[580] = - (melt_ptr_t) & meltcdat->dstr_391__CLASS_OBJINTERNKEYWORD; - meltcdat->dstr_391__CLASS_OBJINTERNKEYWORD.discr = +/*inistring dstr_393__CLASS_OBJINTERNKEYWORD*/ + /*_._VALSTR___V584*/ meltfptr[583] = + (melt_ptr_t) & meltcdat->dstr_393__CLASS_OBJINTERNKEYWORD; + meltcdat->dstr_393__CLASS_OBJINTERNKEYWORD.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_391__CLASS_OBJINTERNKEYWORD. + /*small inistring */ strncpy (meltcdat->dstr_393__CLASS_OBJINTERNKEYWORD. val, "CLASS_OBJINTERNKEYWORD", sizeof (meltcdat-> - dstr_391__CLASS_OBJINTERNKEYWORD. + dstr_393__CLASS_OBJINTERNKEYWORD. val) - 1); - meltcdat->dstr_391__CLASS_OBJINTERNKEYWORD.val[22] = (char) 0; - meltcdat->dstr_391__CLASS_OBJINTERNKEYWORD.slen = 22; + meltcdat->dstr_393__CLASS_OBJINTERNKEYWORD.val[22] = (char) 0; + meltcdat->dstr_393__CLASS_OBJINTERNKEYWORD.slen = 22; -/*iniobj dsym_392__CLASS_NREP_DATAKEYWORD*/ - /*uniqueobj*/ if (! /*_._VALDATA___V582*/ meltfptr[581]) -/*_._VALDATA___V582*/ meltfptr[581] = - (melt_ptr_t) & meltcdat->dsym_392__CLASS_NREP_DATAKEYWORD; +/*iniobj dsym_394__CLASS_NREP_DATAKEYWORD*/ + /*uniqueobj*/ if (! /*_._VALDATA___V585*/ meltfptr[584]) +/*_._VALDATA___V585*/ meltfptr[584] = + (melt_ptr_t) & meltcdat->dsym_394__CLASS_NREP_DATAKEYWORD; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr isobj dsym_392__CLASS_NREP_DATAKEYWORD", + ("iniobj check.discr isobj dsym_394__CLASS_NREP_DATAKEYWORD", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr objmagic dsym_392__CLASS_NREP_DATAKEYWORD", + ("iniobj check.discr objmagic dsym_394__CLASS_NREP_DATAKEYWORD", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_392__CLASS_NREP_DATAKEYWORD.meltobj_class = + meltcdat->dsym_394__CLASS_NREP_DATAKEYWORD.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_392__CLASS_NREP_DATAKEYWORD.obj_hash = 755124591; - meltcdat->dsym_392__CLASS_NREP_DATAKEYWORD.obj_len = 3; + meltcdat->dsym_394__CLASS_NREP_DATAKEYWORD.obj_hash = 755124591; + meltcdat->dsym_394__CLASS_NREP_DATAKEYWORD.obj_len = 3; -/*inistring dstr_393__CLASS_NREP_DATAKEYWORD*/ - /*_._VALSTR___V583*/ meltfptr[582] = - (melt_ptr_t) & meltcdat->dstr_393__CLASS_NREP_DATAKEYWORD; - meltcdat->dstr_393__CLASS_NREP_DATAKEYWORD.discr = +/*inistring dstr_395__CLASS_NREP_DATAKEYWORD*/ + /*_._VALSTR___V586*/ meltfptr[585] = + (melt_ptr_t) & meltcdat->dstr_395__CLASS_NREP_DATAKEYWORD; + meltcdat->dstr_395__CLASS_NREP_DATAKEYWORD.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_393__CLASS_NREP_DATAKEYWORD. + /*small inistring */ strncpy (meltcdat->dstr_395__CLASS_NREP_DATAKEYWORD. val, "CLASS_NREP_DATAKEYWORD", sizeof (meltcdat-> - dstr_393__CLASS_NREP_DATAKEYWORD. + dstr_395__CLASS_NREP_DATAKEYWORD. val) - 1); - meltcdat->dstr_393__CLASS_NREP_DATAKEYWORD.val[22] = (char) 0; - meltcdat->dstr_393__CLASS_NREP_DATAKEYWORD.slen = 22; + meltcdat->dstr_395__CLASS_NREP_DATAKEYWORD.val[22] = (char) 0; + meltcdat->dstr_395__CLASS_NREP_DATAKEYWORD.slen = 22; - /*inirout drout_394__OUTPUCOD_OBJGETNAMEDSYMBOL */ - /*_._VALROUT___V584*/ meltfptr[583] = - (melt_ptr_t) & meltcdat->drout_394__OUTPUCOD_OBJGETNAMEDSYMBOL; - meltcdat->drout_394__OUTPUCOD_OBJGETNAMEDSYMBOL.discr = + /*inirout drout_396__OUTPUCOD_OBJGETNAMEDSYMBOL */ + /*_._VALROUT___V587*/ meltfptr[586] = + (melt_ptr_t) & meltcdat->drout_396__OUTPUCOD_OBJGETNAMEDSYMBOL; + meltcdat->drout_396__OUTPUCOD_OBJGETNAMEDSYMBOL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); - strncpy (meltcdat->drout_394__OUTPUCOD_OBJGETNAMEDSYMBOL.routdescr, + strncpy (meltcdat->drout_396__OUTPUCOD_OBJGETNAMEDSYMBOL.routdescr, "OUTPUCOD_OBJGETNAMEDSYMBOL @warmelt-outobj.melt:3813", MELT_ROUTDESCR_LEN - 1); - meltcdat->drout_394__OUTPUCOD_OBJGETNAMEDSYMBOL.nbval = 8; - MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_394__OUTPUCOD_OBJGETNAMEDSYMBOL, + meltcdat->drout_396__OUTPUCOD_OBJGETNAMEDSYMBOL.nbval = 8; + MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_396__OUTPUCOD_OBJGETNAMEDSYMBOL, meltrout_91_WARMELTmiOUTOBJ_OUTPUCOD_OBJGETNAMEDSYMBOL); - /*iniclos dclo_395__OUTPUCOD_OBJGETNAMEDSYMBOL */ - /*_._VALCLO___V585*/ meltfptr[584] = - (melt_ptr_t) & meltcdat->dclo_395__OUTPUCOD_OBJGETNAMEDSYMBOL; - meltcdat->dclo_395__OUTPUCOD_OBJGETNAMEDSYMBOL.discr = + /*iniclos dclo_397__OUTPUCOD_OBJGETNAMEDSYMBOL */ + /*_._VALCLO___V588*/ meltfptr[587] = + (melt_ptr_t) & meltcdat->dclo_397__OUTPUCOD_OBJGETNAMEDSYMBOL; + meltcdat->dclo_397__OUTPUCOD_OBJGETNAMEDSYMBOL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); - meltcdat->dclo_395__OUTPUCOD_OBJGETNAMEDSYMBOL.nbval = 0; + meltcdat->dclo_397__OUTPUCOD_OBJGETNAMEDSYMBOL.nbval = 0; -/*iniobj dsym_396__CLASS_OBJGETNAMEDSYMBOL*/ - /*uniqueobj*/ if (! /*_._VALDATA___V586*/ meltfptr[585]) -/*_._VALDATA___V586*/ meltfptr[585] = - (melt_ptr_t) & meltcdat->dsym_396__CLASS_OBJGETNAMEDSYMBOL; +/*iniobj dsym_398__CLASS_OBJGETNAMEDSYMBOL*/ + /*uniqueobj*/ if (! /*_._VALDATA___V589*/ meltfptr[588]) +/*_._VALDATA___V589*/ meltfptr[588] = + (melt_ptr_t) & meltcdat->dsym_398__CLASS_OBJGETNAMEDSYMBOL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr isobj dsym_396__CLASS_OBJGETNAMEDSYMBOL", + ("iniobj check.discr isobj dsym_398__CLASS_OBJGETNAMEDSYMBOL", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr objmagic dsym_396__CLASS_OBJGETNAMEDSYMBOL", + ("iniobj check.discr objmagic dsym_398__CLASS_OBJGETNAMEDSYMBOL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_396__CLASS_OBJGETNAMEDSYMBOL.meltobj_class = + meltcdat->dsym_398__CLASS_OBJGETNAMEDSYMBOL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_396__CLASS_OBJGETNAMEDSYMBOL.obj_hash = 552748717; - meltcdat->dsym_396__CLASS_OBJGETNAMEDSYMBOL.obj_len = 3; + meltcdat->dsym_398__CLASS_OBJGETNAMEDSYMBOL.obj_hash = 552748717; + meltcdat->dsym_398__CLASS_OBJGETNAMEDSYMBOL.obj_len = 3; -/*inistring dstr_397__CLASS_OBJGETNAMEDSYMBOL*/ - /*_._VALSTR___V587*/ meltfptr[586] = - (melt_ptr_t) & meltcdat->dstr_397__CLASS_OBJGETNAMEDSYMBOL; - meltcdat->dstr_397__CLASS_OBJGETNAMEDSYMBOL.discr = +/*inistring dstr_399__CLASS_OBJGETNAMEDSYMBOL*/ + /*_._VALSTR___V590*/ meltfptr[589] = + (melt_ptr_t) & meltcdat->dstr_399__CLASS_OBJGETNAMEDSYMBOL; + meltcdat->dstr_399__CLASS_OBJGETNAMEDSYMBOL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_397__CLASS_OBJGETNAMEDSYMBOL. + /*small inistring */ strncpy (meltcdat->dstr_399__CLASS_OBJGETNAMEDSYMBOL. val, "CLASS_OBJGETNAMEDSYMBOL", sizeof (meltcdat-> - dstr_397__CLASS_OBJGETNAMEDSYMBOL. + dstr_399__CLASS_OBJGETNAMEDSYMBOL. val) - 1); - meltcdat->dstr_397__CLASS_OBJGETNAMEDSYMBOL.val[23] = (char) 0; - meltcdat->dstr_397__CLASS_OBJGETNAMEDSYMBOL.slen = 23; + meltcdat->dstr_399__CLASS_OBJGETNAMEDSYMBOL.val[23] = (char) 0; + meltcdat->dstr_399__CLASS_OBJGETNAMEDSYMBOL.slen = 23; - /*inirout drout_398__OUTPUCOD_OBJGETNAMEDKEYWORD */ - /*_._VALROUT___V588*/ meltfptr[587] = - (melt_ptr_t) & meltcdat->drout_398__OUTPUCOD_OBJGETNAMEDKEYWORD; - meltcdat->drout_398__OUTPUCOD_OBJGETNAMEDKEYWORD.discr = + /*inirout drout_400__OUTPUCOD_OBJGETNAMEDKEYWORD */ + /*_._VALROUT___V591*/ meltfptr[590] = + (melt_ptr_t) & meltcdat->drout_400__OUTPUCOD_OBJGETNAMEDKEYWORD; + meltcdat->drout_400__OUTPUCOD_OBJGETNAMEDKEYWORD.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); - strncpy (meltcdat->drout_398__OUTPUCOD_OBJGETNAMEDKEYWORD.routdescr, + strncpy (meltcdat->drout_400__OUTPUCOD_OBJGETNAMEDKEYWORD.routdescr, "OUTPUCOD_OBJGETNAMEDKEYWORD @warmelt-outobj.melt:3864", MELT_ROUTDESCR_LEN - 1); - meltcdat->drout_398__OUTPUCOD_OBJGETNAMEDKEYWORD.nbval = 7; + meltcdat->drout_400__OUTPUCOD_OBJGETNAMEDKEYWORD.nbval = 7; MELT_ROUTINE_SET_ROUTCODE (&meltcdat-> - drout_398__OUTPUCOD_OBJGETNAMEDKEYWORD, + drout_400__OUTPUCOD_OBJGETNAMEDKEYWORD, meltrout_92_WARMELTmiOUTOBJ_OUTPUCOD_OBJGETNAMEDKEYWORD); - /*iniclos dclo_399__OUTPUCOD_OBJGETNAMEDKEYWORD */ - /*_._VALCLO___V589*/ meltfptr[588] = - (melt_ptr_t) & meltcdat->dclo_399__OUTPUCOD_OBJGETNAMEDKEYWORD; - meltcdat->dclo_399__OUTPUCOD_OBJGETNAMEDKEYWORD.discr = + /*iniclos dclo_401__OUTPUCOD_OBJGETNAMEDKEYWORD */ + /*_._VALCLO___V592*/ meltfptr[591] = + (melt_ptr_t) & meltcdat->dclo_401__OUTPUCOD_OBJGETNAMEDKEYWORD; + meltcdat->dclo_401__OUTPUCOD_OBJGETNAMEDKEYWORD.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); - meltcdat->dclo_399__OUTPUCOD_OBJGETNAMEDKEYWORD.nbval = 0; + meltcdat->dclo_401__OUTPUCOD_OBJGETNAMEDKEYWORD.nbval = 0; -/*iniobj dsym_400__CLASS_OBJGETNAMEDKEYWORD*/ - /*uniqueobj*/ if (! /*_._VALDATA___V590*/ meltfptr[589]) -/*_._VALDATA___V590*/ meltfptr[589] = - (melt_ptr_t) & meltcdat->dsym_400__CLASS_OBJGETNAMEDKEYWORD; +/*iniobj dsym_402__CLASS_OBJGETNAMEDKEYWORD*/ + /*uniqueobj*/ if (! /*_._VALDATA___V593*/ meltfptr[592]) +/*_._VALDATA___V593*/ meltfptr[592] = + (melt_ptr_t) & meltcdat->dsym_402__CLASS_OBJGETNAMEDKEYWORD; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr isobj dsym_400__CLASS_OBJGETNAMEDKEYWORD", + ("iniobj check.discr isobj dsym_402__CLASS_OBJGETNAMEDKEYWORD", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr objmagic dsym_400__CLASS_OBJGETNAMEDKEYWORD", + ("iniobj check.discr objmagic dsym_402__CLASS_OBJGETNAMEDKEYWORD", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_400__CLASS_OBJGETNAMEDKEYWORD.meltobj_class = + meltcdat->dsym_402__CLASS_OBJGETNAMEDKEYWORD.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_400__CLASS_OBJGETNAMEDKEYWORD.obj_hash = 877025959; - meltcdat->dsym_400__CLASS_OBJGETNAMEDKEYWORD.obj_len = 3; + meltcdat->dsym_402__CLASS_OBJGETNAMEDKEYWORD.obj_hash = 877025959; + meltcdat->dsym_402__CLASS_OBJGETNAMEDKEYWORD.obj_len = 3; -/*inistring dstr_401__CLASS_OBJGETNAMEDKEYWORD*/ - /*_._VALSTR___V591*/ meltfptr[590] = - (melt_ptr_t) & meltcdat->dstr_401__CLASS_OBJGETNAMEDKEYWORD; - meltcdat->dstr_401__CLASS_OBJGETNAMEDKEYWORD.discr = +/*inistring dstr_403__CLASS_OBJGETNAMEDKEYWORD*/ + /*_._VALSTR___V594*/ meltfptr[593] = + (melt_ptr_t) & meltcdat->dstr_403__CLASS_OBJGETNAMEDKEYWORD; + meltcdat->dstr_403__CLASS_OBJGETNAMEDKEYWORD.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_401__CLASS_OBJGETNAMEDKEYWORD. + /*small inistring */ strncpy (meltcdat->dstr_403__CLASS_OBJGETNAMEDKEYWORD. val, "CLASS_OBJGETNAMEDKEYWORD", sizeof (meltcdat-> - dstr_401__CLASS_OBJGETNAMEDKEYWORD. + dstr_403__CLASS_OBJGETNAMEDKEYWORD. val) - 1); - meltcdat->dstr_401__CLASS_OBJGETNAMEDKEYWORD.val[24] = (char) 0; - meltcdat->dstr_401__CLASS_OBJGETNAMEDKEYWORD.slen = 24; + meltcdat->dstr_403__CLASS_OBJGETNAMEDKEYWORD.val[24] = (char) 0; + meltcdat->dstr_403__CLASS_OBJGETNAMEDKEYWORD.slen = 24; - /*inirout drout_402__OUTPUCOD_OBJAPPLY */ - /*_._VALROUT___V592*/ meltfptr[591] = - (melt_ptr_t) & meltcdat->drout_402__OUTPUCOD_OBJAPPLY; - meltcdat->drout_402__OUTPUCOD_OBJAPPLY.discr = + /*inirout drout_404__OUTPUCOD_OBJAPPLY */ + /*_._VALROUT___V595*/ meltfptr[594] = + (melt_ptr_t) & meltcdat->drout_404__OUTPUCOD_OBJAPPLY; + meltcdat->drout_404__OUTPUCOD_OBJAPPLY.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); - strncpy (meltcdat->drout_402__OUTPUCOD_OBJAPPLY.routdescr, + strncpy (meltcdat->drout_404__OUTPUCOD_OBJAPPLY.routdescr, "OUTPUCOD_OBJAPPLY @warmelt-outobj.melt:3900", MELT_ROUTDESCR_LEN - 1); - meltcdat->drout_402__OUTPUCOD_OBJAPPLY.nbval = 18; - MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_402__OUTPUCOD_OBJAPPLY, + meltcdat->drout_404__OUTPUCOD_OBJAPPLY.nbval = 18; + MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_404__OUTPUCOD_OBJAPPLY, meltrout_93_WARMELTmiOUTOBJ_OUTPUCOD_OBJAPPLY); - /*iniclos dclo_403__OUTPUCOD_OBJAPPLY */ - /*_._VALCLO___V595*/ meltfptr[594] = - (melt_ptr_t) & meltcdat->dclo_403__OUTPUCOD_OBJAPPLY; - meltcdat->dclo_403__OUTPUCOD_OBJAPPLY.discr = + /*iniclos dclo_405__OUTPUCOD_OBJAPPLY */ + /*_._VALCLO___V598*/ meltfptr[597] = + (melt_ptr_t) & meltcdat->dclo_405__OUTPUCOD_OBJAPPLY; + meltcdat->dclo_405__OUTPUCOD_OBJAPPLY.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); - meltcdat->dclo_403__OUTPUCOD_OBJAPPLY.nbval = 0; + meltcdat->dclo_405__OUTPUCOD_OBJAPPLY.nbval = 0; -/*iniobj dsym_404__CLASS_OBJAPPLY*/ - /*uniqueobj*/ if (! /*_._VALDATA___V596*/ meltfptr[595]) -/*_._VALDATA___V596*/ meltfptr[595] = - (melt_ptr_t) & meltcdat->dsym_404__CLASS_OBJAPPLY; +/*iniobj dsym_406__CLASS_OBJAPPLY*/ + /*uniqueobj*/ if (! /*_._VALDATA___V599*/ meltfptr[598]) +/*_._VALDATA___V599*/ meltfptr[598] = + (melt_ptr_t) & meltcdat->dsym_406__CLASS_OBJAPPLY; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_404__CLASS_OBJAPPLY", + melt_assertmsg ("iniobj check.discr isobj dsym_406__CLASS_OBJAPPLY", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr objmagic dsym_404__CLASS_OBJAPPLY", + melt_assertmsg ("iniobj check.discr objmagic dsym_406__CLASS_OBJAPPLY", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_404__CLASS_OBJAPPLY.meltobj_class = + meltcdat->dsym_406__CLASS_OBJAPPLY.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_404__CLASS_OBJAPPLY.obj_hash = 734111989; - meltcdat->dsym_404__CLASS_OBJAPPLY.obj_len = 3; + meltcdat->dsym_406__CLASS_OBJAPPLY.obj_hash = 734111989; + meltcdat->dsym_406__CLASS_OBJAPPLY.obj_len = 3; -/*inistring dstr_405__CLASS_OBJAPPLY*/ - /*_._VALSTR___V597*/ meltfptr[596] = - (melt_ptr_t) & meltcdat->dstr_405__CLASS_OBJAPPLY; - meltcdat->dstr_405__CLASS_OBJAPPLY.discr = +/*inistring dstr_407__CLASS_OBJAPPLY*/ + /*_._VALSTR___V600*/ meltfptr[599] = + (melt_ptr_t) & meltcdat->dstr_407__CLASS_OBJAPPLY; + meltcdat->dstr_407__CLASS_OBJAPPLY.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_405__CLASS_OBJAPPLY.val, + /*small inistring */ strncpy (meltcdat->dstr_407__CLASS_OBJAPPLY.val, "CLASS_OBJAPPLY", - sizeof (meltcdat->dstr_405__CLASS_OBJAPPLY. + sizeof (meltcdat->dstr_407__CLASS_OBJAPPLY. val) - 1); - meltcdat->dstr_405__CLASS_OBJAPPLY.val[14] = (char) 0; - meltcdat->dstr_405__CLASS_OBJAPPLY.slen = 14; + meltcdat->dstr_407__CLASS_OBJAPPLY.val[14] = (char) 0; + meltcdat->dstr_407__CLASS_OBJAPPLY.slen = 14; -/*iniobj dsym_406__GET_CTYPE*/ - /*uniqueobj*/ if (! /*_._VALDATA___V598*/ meltfptr[597]) -/*_._VALDATA___V598*/ meltfptr[597] = - (melt_ptr_t) & meltcdat->dsym_406__GET_CTYPE; +/*iniobj dsym_408__GET_CTYPE*/ + /*uniqueobj*/ if (! /*_._VALDATA___V601*/ meltfptr[600]) +/*_._VALDATA___V601*/ meltfptr[600] = + (melt_ptr_t) & meltcdat->dsym_408__GET_CTYPE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_406__GET_CTYPE", + melt_assertmsg ("iniobj check.discr isobj dsym_408__GET_CTYPE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr objmagic dsym_406__GET_CTYPE", + melt_assertmsg ("iniobj check.discr objmagic dsym_408__GET_CTYPE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_406__GET_CTYPE.meltobj_class = + meltcdat->dsym_408__GET_CTYPE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_406__GET_CTYPE.obj_hash = 747649571; - meltcdat->dsym_406__GET_CTYPE.obj_len = 3; + meltcdat->dsym_408__GET_CTYPE.obj_hash = 747649571; + meltcdat->dsym_408__GET_CTYPE.obj_len = 3; -/*inistring dstr_407__GET_CTYPE*/ - /*_._VALSTR___V599*/ meltfptr[598] = - (melt_ptr_t) & meltcdat->dstr_407__GET_CTYPE; - meltcdat->dstr_407__GET_CTYPE.discr = +/*inistring dstr_409__GET_CTYPE*/ + /*_._VALSTR___V602*/ meltfptr[601] = + (melt_ptr_t) & meltcdat->dstr_409__GET_CTYPE; + meltcdat->dstr_409__GET_CTYPE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_407__GET_CTYPE.val, + /*small inistring */ strncpy (meltcdat->dstr_409__GET_CTYPE.val, "GET_CTYPE", - sizeof (meltcdat->dstr_407__GET_CTYPE.val) - + sizeof (meltcdat->dstr_409__GET_CTYPE.val) - 1); - meltcdat->dstr_407__GET_CTYPE.val[9] = (char) 0; - meltcdat->dstr_407__GET_CTYPE.slen = 9; + meltcdat->dstr_409__GET_CTYPE.val[9] = (char) 0; + meltcdat->dstr_409__GET_CTYPE.slen = 9; - /*inirout drout_408__LAMBDA_ */ - /*_._VALROUT___V593*/ meltfptr[592] = - (melt_ptr_t) & meltcdat->drout_408__LAMBDA_; - meltcdat->drout_408__LAMBDA_.discr = + /*inirout drout_410__LAMBDA_ */ + /*_._VALROUT___V596*/ meltfptr[595] = + (melt_ptr_t) & meltcdat->drout_410__LAMBDA_; + meltcdat->drout_410__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); - strncpy (meltcdat->drout_408__LAMBDA_.routdescr, + strncpy (meltcdat->drout_410__LAMBDA_.routdescr, "LAMBDA_ @warmelt-outobj.melt:3958", MELT_ROUTDESCR_LEN - 1); - meltcdat->drout_408__LAMBDA_.nbval = 3; - MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_408__LAMBDA_, - meltrout_94_WARMELTmiOUTOBJ_LAMBDA_cl12); - - /*inirout drout_409__LAMBDA_ */ - /*_._VALROUT___V594*/ meltfptr[593] = - (melt_ptr_t) & meltcdat->drout_409__LAMBDA_; - meltcdat->drout_409__LAMBDA_.discr = + meltcdat->drout_410__LAMBDA_.nbval = 3; + MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_410__LAMBDA_, + meltrout_94_WARMELTmiOUTOBJ); + + /*inirout drout_411__LAMBDA_ */ + /*_._VALROUT___V597*/ meltfptr[596] = + (melt_ptr_t) & meltcdat->drout_411__LAMBDA_; + meltcdat->drout_411__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); - strncpy (meltcdat->drout_409__LAMBDA_.routdescr, + strncpy (meltcdat->drout_411__LAMBDA_.routdescr, "LAMBDA_ @warmelt-outobj.melt:3975", MELT_ROUTDESCR_LEN - 1); - meltcdat->drout_409__LAMBDA_.nbval = 0; - MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_409__LAMBDA_, - meltrout_95_WARMELTmiOUTOBJ_LAMBDA_cl13); - - /*inirout drout_410__OUTPUCOD_OBJMSEND */ - /*_._VALROUT___V600*/ meltfptr[599] = - (melt_ptr_t) & meltcdat->drout_410__OUTPUCOD_OBJMSEND; - meltcdat->drout_410__OUTPUCOD_OBJMSEND.discr = + meltcdat->drout_411__LAMBDA_.nbval = 0; + MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_411__LAMBDA_, + meltrout_95_WARMELTmiOUTOBJ); + + /*inirout drout_412__OUTPUCOD_OBJMSEND */ + /*_._VALROUT___V603*/ meltfptr[602] = + (melt_ptr_t) & meltcdat->drout_412__OUTPUCOD_OBJMSEND; + meltcdat->drout_412__OUTPUCOD_OBJMSEND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); - strncpy (meltcdat->drout_410__OUTPUCOD_OBJMSEND.routdescr, + strncpy (meltcdat->drout_412__OUTPUCOD_OBJMSEND.routdescr, "OUTPUCOD_OBJMSEND @warmelt-outobj.melt:3997", MELT_ROUTDESCR_LEN - 1); - meltcdat->drout_410__OUTPUCOD_OBJMSEND.nbval = 13; - MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_410__OUTPUCOD_OBJMSEND, + meltcdat->drout_412__OUTPUCOD_OBJMSEND.nbval = 13; + MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_412__OUTPUCOD_OBJMSEND, meltrout_96_WARMELTmiOUTOBJ_OUTPUCOD_OBJMSEND); - /*iniclos dclo_411__OUTPUCOD_OBJMSEND */ - /*_._VALCLO___V602*/ meltfptr[601] = - (melt_ptr_t) & meltcdat->dclo_411__OUTPUCOD_OBJMSEND; - meltcdat->dclo_411__OUTPUCOD_OBJMSEND.discr = + /*iniclos dclo_413__OUTPUCOD_OBJMSEND */ + /*_._VALCLO___V605*/ meltfptr[604] = + (melt_ptr_t) & meltcdat->dclo_413__OUTPUCOD_OBJMSEND; + meltcdat->dclo_413__OUTPUCOD_OBJMSEND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); - meltcdat->dclo_411__OUTPUCOD_OBJMSEND.nbval = 0; + meltcdat->dclo_413__OUTPUCOD_OBJMSEND.nbval = 0; -/*iniobj dsym_412__CLASS_OBJMSEND*/ - /*uniqueobj*/ if (! /*_._VALDATA___V603*/ meltfptr[602]) -/*_._VALDATA___V603*/ meltfptr[602] = - (melt_ptr_t) & meltcdat->dsym_412__CLASS_OBJMSEND; +/*iniobj dsym_414__CLASS_OBJMSEND*/ + /*uniqueobj*/ if (! /*_._VALDATA___V606*/ meltfptr[605]) +/*_._VALDATA___V606*/ meltfptr[605] = + (melt_ptr_t) & meltcdat->dsym_414__CLASS_OBJMSEND; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_412__CLASS_OBJMSEND", + melt_assertmsg ("iniobj check.discr isobj dsym_414__CLASS_OBJMSEND", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr objmagic dsym_412__CLASS_OBJMSEND", + melt_assertmsg ("iniobj check.discr objmagic dsym_414__CLASS_OBJMSEND", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_412__CLASS_OBJMSEND.meltobj_class = + meltcdat->dsym_414__CLASS_OBJMSEND.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_412__CLASS_OBJMSEND.obj_hash = 664056168; - meltcdat->dsym_412__CLASS_OBJMSEND.obj_len = 3; + meltcdat->dsym_414__CLASS_OBJMSEND.obj_hash = 664056168; + meltcdat->dsym_414__CLASS_OBJMSEND.obj_len = 3; -/*inistring dstr_413__CLASS_OBJMSEND*/ - /*_._VALSTR___V604*/ meltfptr[603] = - (melt_ptr_t) & meltcdat->dstr_413__CLASS_OBJMSEND; - meltcdat->dstr_413__CLASS_OBJMSEND.discr = +/*inistring dstr_415__CLASS_OBJMSEND*/ + /*_._VALSTR___V607*/ meltfptr[606] = + (melt_ptr_t) & meltcdat->dstr_415__CLASS_OBJMSEND; + meltcdat->dstr_415__CLASS_OBJMSEND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_413__CLASS_OBJMSEND.val, + /*small inistring */ strncpy (meltcdat->dstr_415__CLASS_OBJMSEND.val, "CLASS_OBJMSEND", - sizeof (meltcdat->dstr_413__CLASS_OBJMSEND. + sizeof (meltcdat->dstr_415__CLASS_OBJMSEND. val) - 1); - meltcdat->dstr_413__CLASS_OBJMSEND.val[14] = (char) 0; - meltcdat->dstr_413__CLASS_OBJMSEND.slen = 14; + meltcdat->dstr_415__CLASS_OBJMSEND.val[14] = (char) 0; + meltcdat->dstr_415__CLASS_OBJMSEND.slen = 14; - /*inirout drout_414__LAMBDA_ */ - /*_._VALROUT___V601*/ meltfptr[600] = - (melt_ptr_t) & meltcdat->drout_414__LAMBDA_; - meltcdat->drout_414__LAMBDA_.discr = + /*inirout drout_416__LAMBDA_ */ + /*_._VALROUT___V604*/ meltfptr[603] = + (melt_ptr_t) & meltcdat->drout_416__LAMBDA_; + meltcdat->drout_416__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); - strncpy (meltcdat->drout_414__LAMBDA_.routdescr, + strncpy (meltcdat->drout_416__LAMBDA_.routdescr, "LAMBDA_ @warmelt-outobj.melt:4074", MELT_ROUTDESCR_LEN - 1); - meltcdat->drout_414__LAMBDA_.nbval = 0; - MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_414__LAMBDA_, - meltrout_97_WARMELTmiOUTOBJ_LAMBDA_cl14); - - /*inirout drout_415__OUTPUCOD_OBJMULTIAPPLY */ - /*_._VALROUT___V605*/ meltfptr[604] = - (melt_ptr_t) & meltcdat->drout_415__OUTPUCOD_OBJMULTIAPPLY; - meltcdat->drout_415__OUTPUCOD_OBJMULTIAPPLY.discr = + meltcdat->drout_416__LAMBDA_.nbval = 0; + MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_416__LAMBDA_, + meltrout_97_WARMELTmiOUTOBJ); + + /*inirout drout_417__OUTPUCOD_OBJMULTIAPPLY */ + /*_._VALROUT___V608*/ meltfptr[607] = + (melt_ptr_t) & meltcdat->drout_417__OUTPUCOD_OBJMULTIAPPLY; + meltcdat->drout_417__OUTPUCOD_OBJMULTIAPPLY.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); - strncpy (meltcdat->drout_415__OUTPUCOD_OBJMULTIAPPLY.routdescr, + strncpy (meltcdat->drout_417__OUTPUCOD_OBJMULTIAPPLY.routdescr, "OUTPUCOD_OBJMULTIAPPLY @warmelt-outobj.melt:4095", MELT_ROUTDESCR_LEN - 1); - meltcdat->drout_415__OUTPUCOD_OBJMULTIAPPLY.nbval = 24; - MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_415__OUTPUCOD_OBJMULTIAPPLY, + meltcdat->drout_417__OUTPUCOD_OBJMULTIAPPLY.nbval = 24; + MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_417__OUTPUCOD_OBJMULTIAPPLY, meltrout_98_WARMELTmiOUTOBJ_OUTPUCOD_OBJMULTIAPPLY); - /*iniclos dclo_416__OUTPUCOD_OBJMULTIAPPLY */ - /*_._VALCLO___V611*/ meltfptr[610] = - (melt_ptr_t) & meltcdat->dclo_416__OUTPUCOD_OBJMULTIAPPLY; - meltcdat->dclo_416__OUTPUCOD_OBJMULTIAPPLY.discr = + /*iniclos dclo_418__OUTPUCOD_OBJMULTIAPPLY */ + /*_._VALCLO___V614*/ meltfptr[613] = + (melt_ptr_t) & meltcdat->dclo_418__OUTPUCOD_OBJMULTIAPPLY; + meltcdat->dclo_418__OUTPUCOD_OBJMULTIAPPLY.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); - meltcdat->dclo_416__OUTPUCOD_OBJMULTIAPPLY.nbval = 0; + meltcdat->dclo_418__OUTPUCOD_OBJMULTIAPPLY.nbval = 0; -/*iniobj dsym_417__CLASS_OBJMULTIAPPLY*/ - /*uniqueobj*/ if (! /*_._VALDATA___V612*/ meltfptr[611]) -/*_._VALDATA___V612*/ meltfptr[611] = - (melt_ptr_t) & meltcdat->dsym_417__CLASS_OBJMULTIAPPLY; +/*iniobj dsym_419__CLASS_OBJMULTIAPPLY*/ + /*uniqueobj*/ if (! /*_._VALDATA___V615*/ meltfptr[614]) +/*_._VALDATA___V615*/ meltfptr[614] = + (melt_ptr_t) & meltcdat->dsym_419__CLASS_OBJMULTIAPPLY; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_417__CLASS_OBJMULTIAPPLY", + melt_assertmsg ("iniobj check.discr isobj dsym_419__CLASS_OBJMULTIAPPLY", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr objmagic dsym_417__CLASS_OBJMULTIAPPLY", + ("iniobj check.discr objmagic dsym_419__CLASS_OBJMULTIAPPLY", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_417__CLASS_OBJMULTIAPPLY.meltobj_class = + meltcdat->dsym_419__CLASS_OBJMULTIAPPLY.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_417__CLASS_OBJMULTIAPPLY.obj_hash = 718205837; - meltcdat->dsym_417__CLASS_OBJMULTIAPPLY.obj_len = 3; + meltcdat->dsym_419__CLASS_OBJMULTIAPPLY.obj_hash = 718205837; + meltcdat->dsym_419__CLASS_OBJMULTIAPPLY.obj_len = 3; -/*inistring dstr_418__CLASS_OBJMULTIAPPLY*/ - /*_._VALSTR___V613*/ meltfptr[612] = - (melt_ptr_t) & meltcdat->dstr_418__CLASS_OBJMULTIAPPLY; - meltcdat->dstr_418__CLASS_OBJMULTIAPPLY.discr = +/*inistring dstr_420__CLASS_OBJMULTIAPPLY*/ + /*_._VALSTR___V616*/ meltfptr[615] = + (melt_ptr_t) & meltcdat->dstr_420__CLASS_OBJMULTIAPPLY; + meltcdat->dstr_420__CLASS_OBJMULTIAPPLY.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_418__CLASS_OBJMULTIAPPLY.val, + /*small inistring */ strncpy (meltcdat->dstr_420__CLASS_OBJMULTIAPPLY.val, "CLASS_OBJMULTIAPPLY", sizeof (meltcdat-> - dstr_418__CLASS_OBJMULTIAPPLY.val) - + dstr_420__CLASS_OBJMULTIAPPLY.val) - 1); - meltcdat->dstr_418__CLASS_OBJMULTIAPPLY.val[19] = (char) 0; - meltcdat->dstr_418__CLASS_OBJMULTIAPPLY.slen = 19; - - /*inirout drout_419__LAMBDA_ */ - /*_._VALROUT___V606*/ meltfptr[605] = - (melt_ptr_t) & meltcdat->drout_419__LAMBDA_; - meltcdat->drout_419__LAMBDA_.discr = - (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); - strncpy (meltcdat->drout_419__LAMBDA_.routdescr, - "LAMBDA_ @warmelt-outobj.melt:4141", MELT_ROUTDESCR_LEN - 1); - meltcdat->drout_419__LAMBDA_.nbval = 1; - MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_419__LAMBDA_, - meltrout_99_WARMELTmiOUTOBJ_LAMBDA_cl15); - - /*inirout drout_420__LAMBDA_ */ - /*_._VALROUT___V607*/ meltfptr[606] = - (melt_ptr_t) & meltcdat->drout_420__LAMBDA_; - meltcdat->drout_420__LAMBDA_.discr = - (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); - strncpy (meltcdat->drout_420__LAMBDA_.routdescr, - "LAMBDA_ @warmelt-outobj.melt:4184", MELT_ROUTDESCR_LEN - 1); - meltcdat->drout_420__LAMBDA_.nbval = 5; - MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_420__LAMBDA_, - meltrout_100_WARMELTmiOUTOBJ_LAMBDA_cl16); + meltcdat->dstr_420__CLASS_OBJMULTIAPPLY.val[19] = (char) 0; + meltcdat->dstr_420__CLASS_OBJMULTIAPPLY.slen = 19; /*inirout drout_421__LAMBDA_ */ - /*_._VALROUT___V608*/ meltfptr[607] = + /*_._VALROUT___V609*/ meltfptr[608] = (melt_ptr_t) & meltcdat->drout_421__LAMBDA_; meltcdat->drout_421__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (meltcdat->drout_421__LAMBDA_.routdescr, - "LAMBDA_ @warmelt-outobj.melt:4212", MELT_ROUTDESCR_LEN - 1); + "LAMBDA_ @warmelt-outobj.melt:4141", MELT_ROUTDESCR_LEN - 1); meltcdat->drout_421__LAMBDA_.nbval = 1; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_421__LAMBDA_, - meltrout_101_WARMELTmiOUTOBJ_LAMBDA_cl17); + meltrout_99_WARMELTmiOUTOBJ); /*inirout drout_422__LAMBDA_ */ - /*_._VALROUT___V609*/ meltfptr[608] = + /*_._VALROUT___V610*/ meltfptr[609] = (melt_ptr_t) & meltcdat->drout_422__LAMBDA_; meltcdat->drout_422__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (meltcdat->drout_422__LAMBDA_.routdescr, - "LAMBDA_ @warmelt-outobj.melt:4227", MELT_ROUTDESCR_LEN - 1); - meltcdat->drout_422__LAMBDA_.nbval = 0; + "LAMBDA_ @warmelt-outobj.melt:4184", MELT_ROUTDESCR_LEN - 1); + meltcdat->drout_422__LAMBDA_.nbval = 5; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_422__LAMBDA_, - meltrout_102_WARMELTmiOUTOBJ_LAMBDA_cl18); + meltrout_100_WARMELTmiOUTOBJ); /*inirout drout_423__LAMBDA_ */ - /*_._VALROUT___V610*/ meltfptr[609] = + /*_._VALROUT___V611*/ meltfptr[610] = (melt_ptr_t) & meltcdat->drout_423__LAMBDA_; meltcdat->drout_423__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (meltcdat->drout_423__LAMBDA_.routdescr, - "LAMBDA_ @warmelt-outobj.melt:4238", MELT_ROUTDESCR_LEN - 1); - meltcdat->drout_423__LAMBDA_.nbval = 0; + "LAMBDA_ @warmelt-outobj.melt:4212", MELT_ROUTDESCR_LEN - 1); + meltcdat->drout_423__LAMBDA_.nbval = 1; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_423__LAMBDA_, - meltrout_103_WARMELTmiOUTOBJ_LAMBDA_cl19); + meltrout_101_WARMELTmiOUTOBJ); - /*inirout drout_424__OUTPUCOD_OBJMULTIMSEND */ - /*_._VALROUT___V614*/ meltfptr[613] = - (melt_ptr_t) & meltcdat->drout_424__OUTPUCOD_OBJMULTIMSEND; - meltcdat->drout_424__OUTPUCOD_OBJMULTIMSEND.discr = + /*inirout drout_424__LAMBDA_ */ + /*_._VALROUT___V612*/ meltfptr[611] = + (melt_ptr_t) & meltcdat->drout_424__LAMBDA_; + meltcdat->drout_424__LAMBDA_.discr = + (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); + strncpy (meltcdat->drout_424__LAMBDA_.routdescr, + "LAMBDA_ @warmelt-outobj.melt:4227", MELT_ROUTDESCR_LEN - 1); + meltcdat->drout_424__LAMBDA_.nbval = 0; + MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_424__LAMBDA_, + meltrout_102_WARMELTmiOUTOBJ); + + /*inirout drout_425__LAMBDA_ */ + /*_._VALROUT___V613*/ meltfptr[612] = + (melt_ptr_t) & meltcdat->drout_425__LAMBDA_; + meltcdat->drout_425__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); - strncpy (meltcdat->drout_424__OUTPUCOD_OBJMULTIMSEND.routdescr, + strncpy (meltcdat->drout_425__LAMBDA_.routdescr, + "LAMBDA_ @warmelt-outobj.melt:4238", MELT_ROUTDESCR_LEN - 1); + meltcdat->drout_425__LAMBDA_.nbval = 0; + MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_425__LAMBDA_, + meltrout_103_WARMELTmiOUTOBJ); + + /*inirout drout_426__OUTPUCOD_OBJMULTIMSEND */ + /*_._VALROUT___V617*/ meltfptr[616] = + (melt_ptr_t) & meltcdat->drout_426__OUTPUCOD_OBJMULTIMSEND; + meltcdat->drout_426__OUTPUCOD_OBJMULTIMSEND.discr = + (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); + strncpy (meltcdat->drout_426__OUTPUCOD_OBJMULTIMSEND.routdescr, "OUTPUCOD_OBJMULTIMSEND @warmelt-outobj.melt:4260", MELT_ROUTDESCR_LEN - 1); - meltcdat->drout_424__OUTPUCOD_OBJMULTIMSEND.nbval = 24; - MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_424__OUTPUCOD_OBJMULTIMSEND, + meltcdat->drout_426__OUTPUCOD_OBJMULTIMSEND.nbval = 24; + MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_426__OUTPUCOD_OBJMULTIMSEND, meltrout_104_WARMELTmiOUTOBJ_OUTPUCOD_OBJMULTIMSEND); - /*iniclos dclo_425__OUTPUCOD_OBJMULTIMSEND */ - /*_._VALCLO___V620*/ meltfptr[619] = - (melt_ptr_t) & meltcdat->dclo_425__OUTPUCOD_OBJMULTIMSEND; - meltcdat->dclo_425__OUTPUCOD_OBJMULTIMSEND.discr = + /*iniclos dclo_427__OUTPUCOD_OBJMULTIMSEND */ + /*_._VALCLO___V623*/ meltfptr[622] = + (melt_ptr_t) & meltcdat->dclo_427__OUTPUCOD_OBJMULTIMSEND; + meltcdat->dclo_427__OUTPUCOD_OBJMULTIMSEND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); - meltcdat->dclo_425__OUTPUCOD_OBJMULTIMSEND.nbval = 0; + meltcdat->dclo_427__OUTPUCOD_OBJMULTIMSEND.nbval = 0; -/*iniobj dsym_426__CLASS_OBJMULTIMSEND*/ - /*uniqueobj*/ if (! /*_._VALDATA___V621*/ meltfptr[620]) -/*_._VALDATA___V621*/ meltfptr[620] = - (melt_ptr_t) & meltcdat->dsym_426__CLASS_OBJMULTIMSEND; +/*iniobj dsym_428__CLASS_OBJMULTIMSEND*/ + /*uniqueobj*/ if (! /*_._VALDATA___V624*/ meltfptr[623]) +/*_._VALDATA___V624*/ meltfptr[623] = + (melt_ptr_t) & meltcdat->dsym_428__CLASS_OBJMULTIMSEND; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_426__CLASS_OBJMULTIMSEND", + melt_assertmsg ("iniobj check.discr isobj dsym_428__CLASS_OBJMULTIMSEND", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr objmagic dsym_426__CLASS_OBJMULTIMSEND", + ("iniobj check.discr objmagic dsym_428__CLASS_OBJMULTIMSEND", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_426__CLASS_OBJMULTIMSEND.meltobj_class = + meltcdat->dsym_428__CLASS_OBJMULTIMSEND.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_426__CLASS_OBJMULTIMSEND.obj_hash = 441055573; - meltcdat->dsym_426__CLASS_OBJMULTIMSEND.obj_len = 3; + meltcdat->dsym_428__CLASS_OBJMULTIMSEND.obj_hash = 441055573; + meltcdat->dsym_428__CLASS_OBJMULTIMSEND.obj_len = 3; -/*inistring dstr_427__CLASS_OBJMULTIMSEND*/ - /*_._VALSTR___V622*/ meltfptr[621] = - (melt_ptr_t) & meltcdat->dstr_427__CLASS_OBJMULTIMSEND; - meltcdat->dstr_427__CLASS_OBJMULTIMSEND.discr = +/*inistring dstr_429__CLASS_OBJMULTIMSEND*/ + /*_._VALSTR___V625*/ meltfptr[624] = + (melt_ptr_t) & meltcdat->dstr_429__CLASS_OBJMULTIMSEND; + meltcdat->dstr_429__CLASS_OBJMULTIMSEND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_427__CLASS_OBJMULTIMSEND.val, + /*small inistring */ strncpy (meltcdat->dstr_429__CLASS_OBJMULTIMSEND.val, "CLASS_OBJMULTIMSEND", sizeof (meltcdat-> - dstr_427__CLASS_OBJMULTIMSEND.val) - + dstr_429__CLASS_OBJMULTIMSEND.val) - 1); - meltcdat->dstr_427__CLASS_OBJMULTIMSEND.val[19] = (char) 0; - meltcdat->dstr_427__CLASS_OBJMULTIMSEND.slen = 19; - - /*inirout drout_428__LAMBDA_ */ - /*_._VALROUT___V615*/ meltfptr[614] = - (melt_ptr_t) & meltcdat->drout_428__LAMBDA_; - meltcdat->drout_428__LAMBDA_.discr = - (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); - strncpy (meltcdat->drout_428__LAMBDA_.routdescr, - "LAMBDA_ @warmelt-outobj.melt:4293", MELT_ROUTDESCR_LEN - 1); - meltcdat->drout_428__LAMBDA_.nbval = 1; - MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_428__LAMBDA_, - meltrout_105_WARMELTmiOUTOBJ_LAMBDA_cl20); - - /*inirout drout_429__LAMBDA_ */ - /*_._VALROUT___V616*/ meltfptr[615] = - (melt_ptr_t) & meltcdat->drout_429__LAMBDA_; - meltcdat->drout_429__LAMBDA_.discr = - (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); - strncpy (meltcdat->drout_429__LAMBDA_.routdescr, - "LAMBDA_ @warmelt-outobj.melt:4343", MELT_ROUTDESCR_LEN - 1); - meltcdat->drout_429__LAMBDA_.nbval = 5; - MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_429__LAMBDA_, - meltrout_106_WARMELTmiOUTOBJ_LAMBDA_cl21); + meltcdat->dstr_429__CLASS_OBJMULTIMSEND.val[19] = (char) 0; + meltcdat->dstr_429__CLASS_OBJMULTIMSEND.slen = 19; /*inirout drout_430__LAMBDA_ */ - /*_._VALROUT___V617*/ meltfptr[616] = + /*_._VALROUT___V618*/ meltfptr[617] = (melt_ptr_t) & meltcdat->drout_430__LAMBDA_; meltcdat->drout_430__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (meltcdat->drout_430__LAMBDA_.routdescr, - "LAMBDA_ @warmelt-outobj.melt:4371", MELT_ROUTDESCR_LEN - 1); + "LAMBDA_ @warmelt-outobj.melt:4293", MELT_ROUTDESCR_LEN - 1); meltcdat->drout_430__LAMBDA_.nbval = 1; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_430__LAMBDA_, - meltrout_107_WARMELTmiOUTOBJ_LAMBDA_cl22); + meltrout_105_WARMELTmiOUTOBJ); /*inirout drout_431__LAMBDA_ */ - /*_._VALROUT___V618*/ meltfptr[617] = + /*_._VALROUT___V619*/ meltfptr[618] = (melt_ptr_t) & meltcdat->drout_431__LAMBDA_; meltcdat->drout_431__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (meltcdat->drout_431__LAMBDA_.routdescr, - "LAMBDA_ @warmelt-outobj.melt:4384", MELT_ROUTDESCR_LEN - 1); - meltcdat->drout_431__LAMBDA_.nbval = 0; + "LAMBDA_ @warmelt-outobj.melt:4343", MELT_ROUTDESCR_LEN - 1); + meltcdat->drout_431__LAMBDA_.nbval = 5; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_431__LAMBDA_, - meltrout_108_WARMELTmiOUTOBJ_LAMBDA_cl23); + meltrout_106_WARMELTmiOUTOBJ); /*inirout drout_432__LAMBDA_ */ - /*_._VALROUT___V619*/ meltfptr[618] = + /*_._VALROUT___V620*/ meltfptr[619] = (melt_ptr_t) & meltcdat->drout_432__LAMBDA_; meltcdat->drout_432__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (meltcdat->drout_432__LAMBDA_.routdescr, - "LAMBDA_ @warmelt-outobj.melt:4395", MELT_ROUTDESCR_LEN - 1); - meltcdat->drout_432__LAMBDA_.nbval = 0; + "LAMBDA_ @warmelt-outobj.melt:4371", MELT_ROUTDESCR_LEN - 1); + meltcdat->drout_432__LAMBDA_.nbval = 1; MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_432__LAMBDA_, - meltrout_109_WARMELTmiOUTOBJ_LAMBDA_cl24); + meltrout_107_WARMELTmiOUTOBJ); - /*inirout drout_433__OUTPUCOD_OBJCLEAR */ - /*_._VALROUT___V623*/ meltfptr[622] = - (melt_ptr_t) & meltcdat->drout_433__OUTPUCOD_OBJCLEAR; - meltcdat->drout_433__OUTPUCOD_OBJCLEAR.discr = + /*inirout drout_433__LAMBDA_ */ + /*_._VALROUT___V621*/ meltfptr[620] = + (melt_ptr_t) & meltcdat->drout_433__LAMBDA_; + meltcdat->drout_433__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); - strncpy (meltcdat->drout_433__OUTPUCOD_OBJCLEAR.routdescr, + strncpy (meltcdat->drout_433__LAMBDA_.routdescr, + "LAMBDA_ @warmelt-outobj.melt:4384", MELT_ROUTDESCR_LEN - 1); + meltcdat->drout_433__LAMBDA_.nbval = 0; + MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_433__LAMBDA_, + meltrout_108_WARMELTmiOUTOBJ); + + /*inirout drout_434__LAMBDA_ */ + /*_._VALROUT___V622*/ meltfptr[621] = + (melt_ptr_t) & meltcdat->drout_434__LAMBDA_; + meltcdat->drout_434__LAMBDA_.discr = + (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); + strncpy (meltcdat->drout_434__LAMBDA_.routdescr, + "LAMBDA_ @warmelt-outobj.melt:4395", MELT_ROUTDESCR_LEN - 1); + meltcdat->drout_434__LAMBDA_.nbval = 0; + MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_434__LAMBDA_, + meltrout_109_WARMELTmiOUTOBJ); + + /*inirout drout_435__OUTPUCOD_OBJCLEAR */ + /*_._VALROUT___V626*/ meltfptr[625] = + (melt_ptr_t) & meltcdat->drout_435__OUTPUCOD_OBJCLEAR; + meltcdat->drout_435__OUTPUCOD_OBJCLEAR.discr = + (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); + strncpy (meltcdat->drout_435__OUTPUCOD_OBJCLEAR.routdescr, "OUTPUCOD_OBJCLEAR @warmelt-outobj.melt:4415", MELT_ROUTDESCR_LEN - 1); - meltcdat->drout_433__OUTPUCOD_OBJCLEAR.nbval = 5; - MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_433__OUTPUCOD_OBJCLEAR, + meltcdat->drout_435__OUTPUCOD_OBJCLEAR.nbval = 5; + MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_435__OUTPUCOD_OBJCLEAR, meltrout_110_WARMELTmiOUTOBJ_OUTPUCOD_OBJCLEAR); - /*iniclos dclo_434__OUTPUCOD_OBJCLEAR */ - /*_._VALCLO___V624*/ meltfptr[623] = - (melt_ptr_t) & meltcdat->dclo_434__OUTPUCOD_OBJCLEAR; - meltcdat->dclo_434__OUTPUCOD_OBJCLEAR.discr = + /*iniclos dclo_436__OUTPUCOD_OBJCLEAR */ + /*_._VALCLO___V627*/ meltfptr[626] = + (melt_ptr_t) & meltcdat->dclo_436__OUTPUCOD_OBJCLEAR; + meltcdat->dclo_436__OUTPUCOD_OBJCLEAR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); - meltcdat->dclo_434__OUTPUCOD_OBJCLEAR.nbval = 0; + meltcdat->dclo_436__OUTPUCOD_OBJCLEAR.nbval = 0; -/*iniobj dsym_435__CLASS_OBJCLEAR*/ - /*uniqueobj*/ if (! /*_._VALDATA___V625*/ meltfptr[624]) -/*_._VALDATA___V625*/ meltfptr[624] = - (melt_ptr_t) & meltcdat->dsym_435__CLASS_OBJCLEAR; +/*iniobj dsym_437__CLASS_OBJCLEAR*/ + /*uniqueobj*/ if (! /*_._VALDATA___V628*/ meltfptr[627]) +/*_._VALDATA___V628*/ meltfptr[627] = + (melt_ptr_t) & meltcdat->dsym_437__CLASS_OBJCLEAR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_435__CLASS_OBJCLEAR", + melt_assertmsg ("iniobj check.discr isobj dsym_437__CLASS_OBJCLEAR", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr objmagic dsym_435__CLASS_OBJCLEAR", + melt_assertmsg ("iniobj check.discr objmagic dsym_437__CLASS_OBJCLEAR", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_435__CLASS_OBJCLEAR.meltobj_class = + meltcdat->dsym_437__CLASS_OBJCLEAR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_435__CLASS_OBJCLEAR.obj_hash = 1071635108; - meltcdat->dsym_435__CLASS_OBJCLEAR.obj_len = 3; + meltcdat->dsym_437__CLASS_OBJCLEAR.obj_hash = 1071635108; + meltcdat->dsym_437__CLASS_OBJCLEAR.obj_len = 3; -/*inistring dstr_436__CLASS_OBJCLEAR*/ - /*_._VALSTR___V626*/ meltfptr[625] = - (melt_ptr_t) & meltcdat->dstr_436__CLASS_OBJCLEAR; - meltcdat->dstr_436__CLASS_OBJCLEAR.discr = +/*inistring dstr_438__CLASS_OBJCLEAR*/ + /*_._VALSTR___V629*/ meltfptr[628] = + (melt_ptr_t) & meltcdat->dstr_438__CLASS_OBJCLEAR; + meltcdat->dstr_438__CLASS_OBJCLEAR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_436__CLASS_OBJCLEAR.val, + /*small inistring */ strncpy (meltcdat->dstr_438__CLASS_OBJCLEAR.val, "CLASS_OBJCLEAR", - sizeof (meltcdat->dstr_436__CLASS_OBJCLEAR. + sizeof (meltcdat->dstr_438__CLASS_OBJCLEAR. val) - 1); - meltcdat->dstr_436__CLASS_OBJCLEAR.val[14] = (char) 0; - meltcdat->dstr_436__CLASS_OBJCLEAR.slen = 14; + meltcdat->dstr_438__CLASS_OBJCLEAR.val[14] = (char) 0; + meltcdat->dstr_438__CLASS_OBJCLEAR.slen = 14; - /*inirout drout_437__OUTPUCOD_OBJRAWALLOCOBJ */ - /*_._VALROUT___V627*/ meltfptr[626] = - (melt_ptr_t) & meltcdat->drout_437__OUTPUCOD_OBJRAWALLOCOBJ; - meltcdat->drout_437__OUTPUCOD_OBJRAWALLOCOBJ.discr = + /*inirout drout_439__OUTPUCOD_OBJRAWALLOCOBJ */ + /*_._VALROUT___V630*/ meltfptr[629] = + (melt_ptr_t) & meltcdat->drout_439__OUTPUCOD_OBJRAWALLOCOBJ; + meltcdat->drout_439__OUTPUCOD_OBJRAWALLOCOBJ.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); - strncpy (meltcdat->drout_437__OUTPUCOD_OBJRAWALLOCOBJ.routdescr, + strncpy (meltcdat->drout_439__OUTPUCOD_OBJRAWALLOCOBJ.routdescr, "OUTPUCOD_OBJRAWALLOCOBJ @warmelt-outobj.melt:4431", MELT_ROUTDESCR_LEN - 1); - meltcdat->drout_437__OUTPUCOD_OBJRAWALLOCOBJ.nbval = 7; - MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_437__OUTPUCOD_OBJRAWALLOCOBJ, + meltcdat->drout_439__OUTPUCOD_OBJRAWALLOCOBJ.nbval = 7; + MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_439__OUTPUCOD_OBJRAWALLOCOBJ, meltrout_111_WARMELTmiOUTOBJ_OUTPUCOD_OBJRAWALLOCOBJ); - /*iniclos dclo_438__OUTPUCOD_OBJRAWALLOCOBJ */ - /*_._VALCLO___V628*/ meltfptr[627] = - (melt_ptr_t) & meltcdat->dclo_438__OUTPUCOD_OBJRAWALLOCOBJ; - meltcdat->dclo_438__OUTPUCOD_OBJRAWALLOCOBJ.discr = + /*iniclos dclo_440__OUTPUCOD_OBJRAWALLOCOBJ */ + /*_._VALCLO___V631*/ meltfptr[630] = + (melt_ptr_t) & meltcdat->dclo_440__OUTPUCOD_OBJRAWALLOCOBJ; + meltcdat->dclo_440__OUTPUCOD_OBJRAWALLOCOBJ.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); - meltcdat->dclo_438__OUTPUCOD_OBJRAWALLOCOBJ.nbval = 0; + meltcdat->dclo_440__OUTPUCOD_OBJRAWALLOCOBJ.nbval = 0; -/*iniobj dsym_439__CLASS_OBJRAWALLOCOBJ*/ - /*uniqueobj*/ if (! /*_._VALDATA___V629*/ meltfptr[628]) -/*_._VALDATA___V629*/ meltfptr[628] = - (melt_ptr_t) & meltcdat->dsym_439__CLASS_OBJRAWALLOCOBJ; +/*iniobj dsym_441__CLASS_OBJRAWALLOCOBJ*/ + /*uniqueobj*/ if (! /*_._VALDATA___V632*/ meltfptr[631]) +/*_._VALDATA___V632*/ meltfptr[631] = + (melt_ptr_t) & meltcdat->dsym_441__CLASS_OBJRAWALLOCOBJ; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_439__CLASS_OBJRAWALLOCOBJ", + melt_assertmsg ("iniobj check.discr isobj dsym_441__CLASS_OBJRAWALLOCOBJ", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr objmagic dsym_439__CLASS_OBJRAWALLOCOBJ", + ("iniobj check.discr objmagic dsym_441__CLASS_OBJRAWALLOCOBJ", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_439__CLASS_OBJRAWALLOCOBJ.meltobj_class = + meltcdat->dsym_441__CLASS_OBJRAWALLOCOBJ.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_439__CLASS_OBJRAWALLOCOBJ.obj_hash = 795830730; - meltcdat->dsym_439__CLASS_OBJRAWALLOCOBJ.obj_len = 3; + meltcdat->dsym_441__CLASS_OBJRAWALLOCOBJ.obj_hash = 795830730; + meltcdat->dsym_441__CLASS_OBJRAWALLOCOBJ.obj_len = 3; -/*inistring dstr_440__CLASS_OBJRAWALLOCOBJ*/ - /*_._VALSTR___V630*/ meltfptr[629] = - (melt_ptr_t) & meltcdat->dstr_440__CLASS_OBJRAWALLOCOBJ; - meltcdat->dstr_440__CLASS_OBJRAWALLOCOBJ.discr = +/*inistring dstr_442__CLASS_OBJRAWALLOCOBJ*/ + /*_._VALSTR___V633*/ meltfptr[632] = + (melt_ptr_t) & meltcdat->dstr_442__CLASS_OBJRAWALLOCOBJ; + meltcdat->dstr_442__CLASS_OBJRAWALLOCOBJ.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_440__CLASS_OBJRAWALLOCOBJ.val, + /*small inistring */ strncpy (meltcdat->dstr_442__CLASS_OBJRAWALLOCOBJ.val, "CLASS_OBJRAWALLOCOBJ", sizeof (meltcdat-> - dstr_440__CLASS_OBJRAWALLOCOBJ.val) - + dstr_442__CLASS_OBJRAWALLOCOBJ.val) - 1); - meltcdat->dstr_440__CLASS_OBJRAWALLOCOBJ.val[20] = (char) 0; - meltcdat->dstr_440__CLASS_OBJRAWALLOCOBJ.slen = 20; + meltcdat->dstr_442__CLASS_OBJRAWALLOCOBJ.val[20] = (char) 0; + meltcdat->dstr_442__CLASS_OBJRAWALLOCOBJ.slen = 20; - /*inirout drout_441__OUTPUCOD_OBJNEWCLOSURE */ - /*_._VALROUT___V631*/ meltfptr[630] = - (melt_ptr_t) & meltcdat->drout_441__OUTPUCOD_OBJNEWCLOSURE; - meltcdat->drout_441__OUTPUCOD_OBJNEWCLOSURE.discr = + /*inirout drout_443__OUTPUCOD_OBJNEWCLOSURE */ + /*_._VALROUT___V634*/ meltfptr[633] = + (melt_ptr_t) & meltcdat->drout_443__OUTPUCOD_OBJNEWCLOSURE; + meltcdat->drout_443__OUTPUCOD_OBJNEWCLOSURE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); - strncpy (meltcdat->drout_441__OUTPUCOD_OBJNEWCLOSURE.routdescr, + strncpy (meltcdat->drout_443__OUTPUCOD_OBJNEWCLOSURE.routdescr, "OUTPUCOD_OBJNEWCLOSURE @warmelt-outobj.melt:4469", MELT_ROUTDESCR_LEN - 1); - meltcdat->drout_441__OUTPUCOD_OBJNEWCLOSURE.nbval = 11; - MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_441__OUTPUCOD_OBJNEWCLOSURE, + meltcdat->drout_443__OUTPUCOD_OBJNEWCLOSURE.nbval = 11; + MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_443__OUTPUCOD_OBJNEWCLOSURE, meltrout_112_WARMELTmiOUTOBJ_OUTPUCOD_OBJNEWCLOSURE); - /*iniclos dclo_442__OUTPUCOD_OBJNEWCLOSURE */ - /*_._VALCLO___V633*/ meltfptr[632] = - (melt_ptr_t) & meltcdat->dclo_442__OUTPUCOD_OBJNEWCLOSURE; - meltcdat->dclo_442__OUTPUCOD_OBJNEWCLOSURE.discr = + /*iniclos dclo_444__OUTPUCOD_OBJNEWCLOSURE */ + /*_._VALCLO___V636*/ meltfptr[635] = + (melt_ptr_t) & meltcdat->dclo_444__OUTPUCOD_OBJNEWCLOSURE; + meltcdat->dclo_444__OUTPUCOD_OBJNEWCLOSURE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); - meltcdat->dclo_442__OUTPUCOD_OBJNEWCLOSURE.nbval = 0; + meltcdat->dclo_444__OUTPUCOD_OBJNEWCLOSURE.nbval = 0; -/*iniobj dsym_443__CLASS_OBJNEWCLOSURE*/ - /*uniqueobj*/ if (! /*_._VALDATA___V634*/ meltfptr[633]) -/*_._VALDATA___V634*/ meltfptr[633] = - (melt_ptr_t) & meltcdat->dsym_443__CLASS_OBJNEWCLOSURE; +/*iniobj dsym_445__CLASS_OBJNEWCLOSURE*/ + /*uniqueobj*/ if (! /*_._VALDATA___V637*/ meltfptr[636]) +/*_._VALDATA___V637*/ meltfptr[636] = + (melt_ptr_t) & meltcdat->dsym_445__CLASS_OBJNEWCLOSURE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_443__CLASS_OBJNEWCLOSURE", + melt_assertmsg ("iniobj check.discr isobj dsym_445__CLASS_OBJNEWCLOSURE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr objmagic dsym_443__CLASS_OBJNEWCLOSURE", + ("iniobj check.discr objmagic dsym_445__CLASS_OBJNEWCLOSURE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_443__CLASS_OBJNEWCLOSURE.meltobj_class = + meltcdat->dsym_445__CLASS_OBJNEWCLOSURE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_443__CLASS_OBJNEWCLOSURE.obj_hash = 699586028; - meltcdat->dsym_443__CLASS_OBJNEWCLOSURE.obj_len = 3; + meltcdat->dsym_445__CLASS_OBJNEWCLOSURE.obj_hash = 699586028; + meltcdat->dsym_445__CLASS_OBJNEWCLOSURE.obj_len = 3; -/*inistring dstr_444__CLASS_OBJNEWCLOSURE*/ - /*_._VALSTR___V635*/ meltfptr[634] = - (melt_ptr_t) & meltcdat->dstr_444__CLASS_OBJNEWCLOSURE; - meltcdat->dstr_444__CLASS_OBJNEWCLOSURE.discr = +/*inistring dstr_446__CLASS_OBJNEWCLOSURE*/ + /*_._VALSTR___V638*/ meltfptr[637] = + (melt_ptr_t) & meltcdat->dstr_446__CLASS_OBJNEWCLOSURE; + meltcdat->dstr_446__CLASS_OBJNEWCLOSURE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_444__CLASS_OBJNEWCLOSURE.val, + /*small inistring */ strncpy (meltcdat->dstr_446__CLASS_OBJNEWCLOSURE.val, "CLASS_OBJNEWCLOSURE", sizeof (meltcdat-> - dstr_444__CLASS_OBJNEWCLOSURE.val) - + dstr_446__CLASS_OBJNEWCLOSURE.val) - 1); - meltcdat->dstr_444__CLASS_OBJNEWCLOSURE.val[19] = (char) 0; - meltcdat->dstr_444__CLASS_OBJNEWCLOSURE.slen = 19; + meltcdat->dstr_446__CLASS_OBJNEWCLOSURE.val[19] = (char) 0; + meltcdat->dstr_446__CLASS_OBJNEWCLOSURE.slen = 19; - /*inirout drout_445__LAMBDA_ */ - /*_._VALROUT___V632*/ meltfptr[631] = - (melt_ptr_t) & meltcdat->drout_445__LAMBDA_; - meltcdat->drout_445__LAMBDA_.discr = + /*inirout drout_447__LAMBDA_ */ + /*_._VALROUT___V635*/ meltfptr[634] = + (melt_ptr_t) & meltcdat->drout_447__LAMBDA_; + meltcdat->drout_447__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); - strncpy (meltcdat->drout_445__LAMBDA_.routdescr, + strncpy (meltcdat->drout_447__LAMBDA_.routdescr, "LAMBDA_ @warmelt-outobj.melt:4482", MELT_ROUTDESCR_LEN - 1); - meltcdat->drout_445__LAMBDA_.nbval = 3; - MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_445__LAMBDA_, - meltrout_113_WARMELTmiOUTOBJ_LAMBDA_cl25); - - /*inirout drout_446__OUTPUCOD_OBJTOUCH */ - /*_._VALROUT___V636*/ meltfptr[635] = - (melt_ptr_t) & meltcdat->drout_446__OUTPUCOD_OBJTOUCH; - meltcdat->drout_446__OUTPUCOD_OBJTOUCH.discr = + meltcdat->drout_447__LAMBDA_.nbval = 3; + MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_447__LAMBDA_, + meltrout_113_WARMELTmiOUTOBJ); + + /*inirout drout_448__OUTPUCOD_OBJTOUCH */ + /*_._VALROUT___V639*/ meltfptr[638] = + (melt_ptr_t) & meltcdat->drout_448__OUTPUCOD_OBJTOUCH; + meltcdat->drout_448__OUTPUCOD_OBJTOUCH.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); - strncpy (meltcdat->drout_446__OUTPUCOD_OBJTOUCH.routdescr, + strncpy (meltcdat->drout_448__OUTPUCOD_OBJTOUCH.routdescr, "OUTPUCOD_OBJTOUCH @warmelt-outobj.melt:4502", MELT_ROUTDESCR_LEN - 1); - meltcdat->drout_446__OUTPUCOD_OBJTOUCH.nbval = 3; - MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_446__OUTPUCOD_OBJTOUCH, + meltcdat->drout_448__OUTPUCOD_OBJTOUCH.nbval = 3; + MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_448__OUTPUCOD_OBJTOUCH, meltrout_114_WARMELTmiOUTOBJ_OUTPUCOD_OBJTOUCH); - /*iniclos dclo_447__OUTPUCOD_OBJTOUCH */ - /*_._VALCLO___V637*/ meltfptr[636] = - (melt_ptr_t) & meltcdat->dclo_447__OUTPUCOD_OBJTOUCH; - meltcdat->dclo_447__OUTPUCOD_OBJTOUCH.discr = + /*iniclos dclo_449__OUTPUCOD_OBJTOUCH */ + /*_._VALCLO___V640*/ meltfptr[639] = + (melt_ptr_t) & meltcdat->dclo_449__OUTPUCOD_OBJTOUCH; + meltcdat->dclo_449__OUTPUCOD_OBJTOUCH.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); - meltcdat->dclo_447__OUTPUCOD_OBJTOUCH.nbval = 0; + meltcdat->dclo_449__OUTPUCOD_OBJTOUCH.nbval = 0; -/*iniobj dsym_448__CLASS_OBJTOUCH*/ - /*uniqueobj*/ if (! /*_._VALDATA___V638*/ meltfptr[637]) -/*_._VALDATA___V638*/ meltfptr[637] = - (melt_ptr_t) & meltcdat->dsym_448__CLASS_OBJTOUCH; +/*iniobj dsym_450__CLASS_OBJTOUCH*/ + /*uniqueobj*/ if (! /*_._VALDATA___V641*/ meltfptr[640]) +/*_._VALDATA___V641*/ meltfptr[640] = + (melt_ptr_t) & meltcdat->dsym_450__CLASS_OBJTOUCH; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_448__CLASS_OBJTOUCH", + melt_assertmsg ("iniobj check.discr isobj dsym_450__CLASS_OBJTOUCH", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr objmagic dsym_448__CLASS_OBJTOUCH", + melt_assertmsg ("iniobj check.discr objmagic dsym_450__CLASS_OBJTOUCH", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_448__CLASS_OBJTOUCH.meltobj_class = + meltcdat->dsym_450__CLASS_OBJTOUCH.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_448__CLASS_OBJTOUCH.obj_hash = 643155770; - meltcdat->dsym_448__CLASS_OBJTOUCH.obj_len = 3; + meltcdat->dsym_450__CLASS_OBJTOUCH.obj_hash = 643155770; + meltcdat->dsym_450__CLASS_OBJTOUCH.obj_len = 3; -/*inistring dstr_449__CLASS_OBJTOUCH*/ - /*_._VALSTR___V639*/ meltfptr[638] = - (melt_ptr_t) & meltcdat->dstr_449__CLASS_OBJTOUCH; - meltcdat->dstr_449__CLASS_OBJTOUCH.discr = +/*inistring dstr_451__CLASS_OBJTOUCH*/ + /*_._VALSTR___V642*/ meltfptr[641] = + (melt_ptr_t) & meltcdat->dstr_451__CLASS_OBJTOUCH; + meltcdat->dstr_451__CLASS_OBJTOUCH.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_449__CLASS_OBJTOUCH.val, + /*small inistring */ strncpy (meltcdat->dstr_451__CLASS_OBJTOUCH.val, "CLASS_OBJTOUCH", - sizeof (meltcdat->dstr_449__CLASS_OBJTOUCH. + sizeof (meltcdat->dstr_451__CLASS_OBJTOUCH. val) - 1); - meltcdat->dstr_449__CLASS_OBJTOUCH.val[14] = (char) 0; - meltcdat->dstr_449__CLASS_OBJTOUCH.slen = 14; + meltcdat->dstr_451__CLASS_OBJTOUCH.val[14] = (char) 0; + meltcdat->dstr_451__CLASS_OBJTOUCH.slen = 14; - /*inirout drout_450__OUTPUCOD_DBGTRACEWRITEOBJ */ - /*_._VALROUT___V640*/ meltfptr[639] = - (melt_ptr_t) & meltcdat->drout_450__OUTPUCOD_DBGTRACEWRITEOBJ; - meltcdat->drout_450__OUTPUCOD_DBGTRACEWRITEOBJ.discr = + /*inirout drout_452__OUTPUCOD_DBGTRACEWRITEOBJ */ + /*_._VALROUT___V643*/ meltfptr[642] = + (melt_ptr_t) & meltcdat->drout_452__OUTPUCOD_DBGTRACEWRITEOBJ; + meltcdat->drout_452__OUTPUCOD_DBGTRACEWRITEOBJ.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); - strncpy (meltcdat->drout_450__OUTPUCOD_DBGTRACEWRITEOBJ.routdescr, + strncpy (meltcdat->drout_452__OUTPUCOD_DBGTRACEWRITEOBJ.routdescr, "OUTPUCOD_DBGTRACEWRITEOBJ @warmelt-outobj.melt:4527", MELT_ROUTDESCR_LEN - 1); - meltcdat->drout_450__OUTPUCOD_DBGTRACEWRITEOBJ.nbval = 3; - MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_450__OUTPUCOD_DBGTRACEWRITEOBJ, + meltcdat->drout_452__OUTPUCOD_DBGTRACEWRITEOBJ.nbval = 3; + MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_452__OUTPUCOD_DBGTRACEWRITEOBJ, meltrout_115_WARMELTmiOUTOBJ_OUTPUCOD_DBGTRACEWRITEOBJ); - /*iniclos dclo_451__OUTPUCOD_DBGTRACEWRITEOBJ */ - /*_._VALCLO___V641*/ meltfptr[640] = - (melt_ptr_t) & meltcdat->dclo_451__OUTPUCOD_DBGTRACEWRITEOBJ; - meltcdat->dclo_451__OUTPUCOD_DBGTRACEWRITEOBJ.discr = + /*iniclos dclo_453__OUTPUCOD_DBGTRACEWRITEOBJ */ + /*_._VALCLO___V644*/ meltfptr[643] = + (melt_ptr_t) & meltcdat->dclo_453__OUTPUCOD_DBGTRACEWRITEOBJ; + meltcdat->dclo_453__OUTPUCOD_DBGTRACEWRITEOBJ.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); - meltcdat->dclo_451__OUTPUCOD_DBGTRACEWRITEOBJ.nbval = 0; + meltcdat->dclo_453__OUTPUCOD_DBGTRACEWRITEOBJ.nbval = 0; -/*iniobj dsym_452__CLASS_OBJDBGTRACEWRITEOBJ*/ - /*uniqueobj*/ if (! /*_._VALDATA___V642*/ meltfptr[641]) -/*_._VALDATA___V642*/ meltfptr[641] = - (melt_ptr_t) & meltcdat->dsym_452__CLASS_OBJDBGTRACEWRITEOBJ; +/*iniobj dsym_454__CLASS_OBJDBGTRACEWRITEOBJ*/ + /*uniqueobj*/ if (! /*_._VALDATA___V645*/ meltfptr[644]) +/*_._VALDATA___V645*/ meltfptr[644] = + (melt_ptr_t) & meltcdat->dsym_454__CLASS_OBJDBGTRACEWRITEOBJ; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr isobj dsym_452__CLASS_OBJDBGTRACEWRITEOBJ", + ("iniobj check.discr isobj dsym_454__CLASS_OBJDBGTRACEWRITEOBJ", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr objmagic dsym_452__CLASS_OBJDBGTRACEWRITEOBJ", + ("iniobj check.discr objmagic dsym_454__CLASS_OBJDBGTRACEWRITEOBJ", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_452__CLASS_OBJDBGTRACEWRITEOBJ.meltobj_class = + meltcdat->dsym_454__CLASS_OBJDBGTRACEWRITEOBJ.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_452__CLASS_OBJDBGTRACEWRITEOBJ.obj_hash = 822920976; - meltcdat->dsym_452__CLASS_OBJDBGTRACEWRITEOBJ.obj_len = 3; + meltcdat->dsym_454__CLASS_OBJDBGTRACEWRITEOBJ.obj_hash = 822920976; + meltcdat->dsym_454__CLASS_OBJDBGTRACEWRITEOBJ.obj_len = 3; -/*inistring dstr_453__CLASS_OBJDBGTRACEWRITEOB*/ - /*_._VALSTR___V643*/ meltfptr[642] = - (melt_ptr_t) & meltcdat->dstr_453__CLASS_OBJDBGTRACEWRITEOB; - meltcdat->dstr_453__CLASS_OBJDBGTRACEWRITEOB.discr = +/*inistring dstr_455__CLASS_OBJDBGTRACEWRITEOB*/ + /*_._VALSTR___V646*/ meltfptr[645] = + (melt_ptr_t) & meltcdat->dstr_455__CLASS_OBJDBGTRACEWRITEOB; + meltcdat->dstr_455__CLASS_OBJDBGTRACEWRITEOB.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_453__CLASS_OBJDBGTRACEWRITEOB. + /*small inistring */ strncpy (meltcdat->dstr_455__CLASS_OBJDBGTRACEWRITEOB. val, "CLASS_OBJDBGTRACEWRITEOBJ", sizeof (meltcdat-> - dstr_453__CLASS_OBJDBGTRACEWRITEOB. + dstr_455__CLASS_OBJDBGTRACEWRITEOB. val) - 1); - meltcdat->dstr_453__CLASS_OBJDBGTRACEWRITEOB.val[25] = (char) 0; - meltcdat->dstr_453__CLASS_OBJDBGTRACEWRITEOB.slen = 25; + meltcdat->dstr_455__CLASS_OBJDBGTRACEWRITEOB.val[25] = (char) 0; + meltcdat->dstr_455__CLASS_OBJDBGTRACEWRITEOB.slen = 25; - /*inirout drout_454__OUTPUCOD_OBJPUTUPLE */ - /*_._VALROUT___V644*/ meltfptr[643] = - (melt_ptr_t) & meltcdat->drout_454__OUTPUCOD_OBJPUTUPLE; - meltcdat->drout_454__OUTPUCOD_OBJPUTUPLE.discr = + /*inirout drout_456__OUTPUCOD_OBJPUTUPLE */ + /*_._VALROUT___V647*/ meltfptr[646] = + (melt_ptr_t) & meltcdat->drout_456__OUTPUCOD_OBJPUTUPLE; + meltcdat->drout_456__OUTPUCOD_OBJPUTUPLE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); - strncpy (meltcdat->drout_454__OUTPUCOD_OBJPUTUPLE.routdescr, + strncpy (meltcdat->drout_456__OUTPUCOD_OBJPUTUPLE.routdescr, "OUTPUCOD_OBJPUTUPLE @warmelt-outobj.melt:4547", MELT_ROUTDESCR_LEN - 1); - meltcdat->drout_454__OUTPUCOD_OBJPUTUPLE.nbval = 6; - MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_454__OUTPUCOD_OBJPUTUPLE, + meltcdat->drout_456__OUTPUCOD_OBJPUTUPLE.nbval = 6; + MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_456__OUTPUCOD_OBJPUTUPLE, meltrout_116_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTUPLE); - /*iniclos dclo_455__OUTPUCOD_OBJPUTUPLE */ - /*_._VALCLO___V645*/ meltfptr[644] = - (melt_ptr_t) & meltcdat->dclo_455__OUTPUCOD_OBJPUTUPLE; - meltcdat->dclo_455__OUTPUCOD_OBJPUTUPLE.discr = + /*iniclos dclo_457__OUTPUCOD_OBJPUTUPLE */ + /*_._VALCLO___V648*/ meltfptr[647] = + (melt_ptr_t) & meltcdat->dclo_457__OUTPUCOD_OBJPUTUPLE; + meltcdat->dclo_457__OUTPUCOD_OBJPUTUPLE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); - meltcdat->dclo_455__OUTPUCOD_OBJPUTUPLE.nbval = 0; + meltcdat->dclo_457__OUTPUCOD_OBJPUTUPLE.nbval = 0; -/*iniobj dsym_456__CLASS_OBJPUTUPLE*/ - /*uniqueobj*/ if (! /*_._VALDATA___V646*/ meltfptr[645]) -/*_._VALDATA___V646*/ meltfptr[645] = - (melt_ptr_t) & meltcdat->dsym_456__CLASS_OBJPUTUPLE; +/*iniobj dsym_458__CLASS_OBJPUTUPLE*/ + /*uniqueobj*/ if (! /*_._VALDATA___V649*/ meltfptr[648]) +/*_._VALDATA___V649*/ meltfptr[648] = + (melt_ptr_t) & meltcdat->dsym_458__CLASS_OBJPUTUPLE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_456__CLASS_OBJPUTUPLE", + melt_assertmsg ("iniobj check.discr isobj dsym_458__CLASS_OBJPUTUPLE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr objmagic dsym_456__CLASS_OBJPUTUPLE", + melt_assertmsg ("iniobj check.discr objmagic dsym_458__CLASS_OBJPUTUPLE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_456__CLASS_OBJPUTUPLE.meltobj_class = + meltcdat->dsym_458__CLASS_OBJPUTUPLE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_456__CLASS_OBJPUTUPLE.obj_hash = 419131762; - meltcdat->dsym_456__CLASS_OBJPUTUPLE.obj_len = 3; + meltcdat->dsym_458__CLASS_OBJPUTUPLE.obj_hash = 419131762; + meltcdat->dsym_458__CLASS_OBJPUTUPLE.obj_len = 3; -/*inistring dstr_457__CLASS_OBJPUTUPLE*/ - /*_._VALSTR___V647*/ meltfptr[646] = - (melt_ptr_t) & meltcdat->dstr_457__CLASS_OBJPUTUPLE; - meltcdat->dstr_457__CLASS_OBJPUTUPLE.discr = +/*inistring dstr_459__CLASS_OBJPUTUPLE*/ + /*_._VALSTR___V650*/ meltfptr[649] = + (melt_ptr_t) & meltcdat->dstr_459__CLASS_OBJPUTUPLE; + meltcdat->dstr_459__CLASS_OBJPUTUPLE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_457__CLASS_OBJPUTUPLE.val, + /*small inistring */ strncpy (meltcdat->dstr_459__CLASS_OBJPUTUPLE.val, "CLASS_OBJPUTUPLE", - sizeof (meltcdat->dstr_457__CLASS_OBJPUTUPLE. + sizeof (meltcdat->dstr_459__CLASS_OBJPUTUPLE. val) - 1); - meltcdat->dstr_457__CLASS_OBJPUTUPLE.val[16] = (char) 0; - meltcdat->dstr_457__CLASS_OBJPUTUPLE.slen = 16; + meltcdat->dstr_459__CLASS_OBJPUTUPLE.val[16] = (char) 0; + meltcdat->dstr_459__CLASS_OBJPUTUPLE.slen = 16; -/*iniobj dsym_458__OBJPUTPAIRHEAD_COUNTER*/ - /*uniqueobj*/ if (! /*_._VALDATA___V648*/ meltfptr[647]) -/*_._VALDATA___V648*/ meltfptr[647] = - (melt_ptr_t) & meltcdat->dsym_458__OBJPUTPAIRHEAD_COUNTER; +/*iniobj dsym_460__OBJPUTPAIRHEAD_COUNTER*/ + /*uniqueobj*/ if (! /*_._VALDATA___V651*/ meltfptr[650]) +/*_._VALDATA___V651*/ meltfptr[650] = + (melt_ptr_t) & meltcdat->dsym_460__OBJPUTPAIRHEAD_COUNTER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr isobj dsym_458__OBJPUTPAIRHEAD_COUNTER", + ("iniobj check.discr isobj dsym_460__OBJPUTPAIRHEAD_COUNTER", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr objmagic dsym_458__OBJPUTPAIRHEAD_COUNTER", + ("iniobj check.discr objmagic dsym_460__OBJPUTPAIRHEAD_COUNTER", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_458__OBJPUTPAIRHEAD_COUNTER.meltobj_class = + meltcdat->dsym_460__OBJPUTPAIRHEAD_COUNTER.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_458__OBJPUTPAIRHEAD_COUNTER.obj_hash = 710161913; - meltcdat->dsym_458__OBJPUTPAIRHEAD_COUNTER.obj_len = 3; + meltcdat->dsym_460__OBJPUTPAIRHEAD_COUNTER.obj_hash = 710161913; + meltcdat->dsym_460__OBJPUTPAIRHEAD_COUNTER.obj_len = 3; -/*inistring dstr_459__OBJPUTPAIRHEAD_COUNTER*/ - /*_._VALSTR___V649*/ meltfptr[648] = - (melt_ptr_t) & meltcdat->dstr_459__OBJPUTPAIRHEAD_COUNTER; - meltcdat->dstr_459__OBJPUTPAIRHEAD_COUNTER.discr = +/*inistring dstr_461__OBJPUTPAIRHEAD_COUNTER*/ + /*_._VALSTR___V652*/ meltfptr[651] = + (melt_ptr_t) & meltcdat->dstr_461__OBJPUTPAIRHEAD_COUNTER; + meltcdat->dstr_461__OBJPUTPAIRHEAD_COUNTER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_459__OBJPUTPAIRHEAD_COUNTER. + /*small inistring */ strncpy (meltcdat->dstr_461__OBJPUTPAIRHEAD_COUNTER. val, "OBJPUTPAIRHEAD_COUNTER", sizeof (meltcdat-> - dstr_459__OBJPUTPAIRHEAD_COUNTER. + dstr_461__OBJPUTPAIRHEAD_COUNTER. val) - 1); - meltcdat->dstr_459__OBJPUTPAIRHEAD_COUNTER.val[22] = (char) 0; - meltcdat->dstr_459__OBJPUTPAIRHEAD_COUNTER.slen = 22; + meltcdat->dstr_461__OBJPUTPAIRHEAD_COUNTER.val[22] = (char) 0; + meltcdat->dstr_461__OBJPUTPAIRHEAD_COUNTER.slen = 22; MELT_LOCATION ("warmelt-outobj.melt:4620:/ iniobj"); -/*iniobj dobj_460__OBJPUTPAIRHEAD_COUNTER*/ -/*_._VALDATA___V650*/ meltfptr[649] = - (melt_ptr_t) & meltcdat->dobj_460__OBJPUTPAIRHEAD_COUNTER; +/*iniobj dobj_462__OBJPUTPAIRHEAD_COUNTER*/ +/*_._VALDATA___V653*/ meltfptr[652] = + (melt_ptr_t) & meltcdat->dobj_462__OBJPUTPAIRHEAD_COUNTER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr isobj dobj_460__OBJPUTPAIRHEAD_COUNTER", + ("iniobj check.discr isobj dobj_462__OBJPUTPAIRHEAD_COUNTER", melt_magic_discr ((melt_ptr_t) ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5])) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr objmagic dobj_460__OBJPUTPAIRHEAD_COUNTER", + ("iniobj check.discr objmagic dobj_462__OBJPUTPAIRHEAD_COUNTER", ((meltobject_ptr_t) ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5]))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dobj_460__OBJPUTPAIRHEAD_COUNTER.meltobj_class = + meltcdat->dobj_462__OBJPUTPAIRHEAD_COUNTER.meltobj_class = (meltobject_ptr_t) ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5]); - meltcdat->dobj_460__OBJPUTPAIRHEAD_COUNTER.obj_hash = 293363546; - meltcdat->dobj_460__OBJPUTPAIRHEAD_COUNTER.obj_len = 1; + meltcdat->dobj_462__OBJPUTPAIRHEAD_COUNTER.obj_hash = 515055940; + meltcdat->dobj_462__OBJPUTPAIRHEAD_COUNTER.obj_len = 1; - /*iniboxint dint_461__ */ - /*_._VALBXINT___V651*/ meltfptr[650] = (melt_ptr_t) & meltcdat->dint_461__; - meltcdat->dint_461__.discr = + /*iniboxint dint_463__ */ + /*_._VALBXINT___V654*/ meltfptr[653] = (melt_ptr_t) & meltcdat->dint_463__; + meltcdat->dint_463__.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CONSTANT_INTEGER)))); - meltcdat->dint_461__.val = 0; + meltcdat->dint_463__.val = 0; - /*inirout drout_462__OUTPUCOD_OBJPUTPAIRHEAD */ - /*_._VALROUT___V652*/ meltfptr[651] = - (melt_ptr_t) & meltcdat->drout_462__OUTPUCOD_OBJPUTPAIRHEAD; - meltcdat->drout_462__OUTPUCOD_OBJPUTPAIRHEAD.discr = + /*inirout drout_464__OUTPUCOD_OBJPUTPAIRHEAD */ + /*_._VALROUT___V655*/ meltfptr[654] = + (melt_ptr_t) & meltcdat->drout_464__OUTPUCOD_OBJPUTPAIRHEAD; + meltcdat->drout_464__OUTPUCOD_OBJPUTPAIRHEAD.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); - strncpy (meltcdat->drout_462__OUTPUCOD_OBJPUTPAIRHEAD.routdescr, + strncpy (meltcdat->drout_464__OUTPUCOD_OBJPUTPAIRHEAD.routdescr, "OUTPUCOD_OBJPUTPAIRHEAD @warmelt-outobj.melt:4622", MELT_ROUTDESCR_LEN - 1); - meltcdat->drout_462__OUTPUCOD_OBJPUTPAIRHEAD.nbval = 7; - MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_462__OUTPUCOD_OBJPUTPAIRHEAD, + meltcdat->drout_464__OUTPUCOD_OBJPUTPAIRHEAD.nbval = 7; + MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_464__OUTPUCOD_OBJPUTPAIRHEAD, meltrout_117_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTPAIRHEAD); - /*iniclos dclo_463__OUTPUCOD_OBJPUTPAIRHEAD */ - /*_._VALCLO___V653*/ meltfptr[652] = - (melt_ptr_t) & meltcdat->dclo_463__OUTPUCOD_OBJPUTPAIRHEAD; - meltcdat->dclo_463__OUTPUCOD_OBJPUTPAIRHEAD.discr = + /*iniclos dclo_465__OUTPUCOD_OBJPUTPAIRHEAD */ + /*_._VALCLO___V656*/ meltfptr[655] = + (melt_ptr_t) & meltcdat->dclo_465__OUTPUCOD_OBJPUTPAIRHEAD; + meltcdat->dclo_465__OUTPUCOD_OBJPUTPAIRHEAD.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); - meltcdat->dclo_463__OUTPUCOD_OBJPUTPAIRHEAD.nbval = 0; + meltcdat->dclo_465__OUTPUCOD_OBJPUTPAIRHEAD.nbval = 0; -/*iniobj dsym_464__CLASS_OBJPUTPAIR*/ - /*uniqueobj*/ if (! /*_._VALDATA___V654*/ meltfptr[653]) -/*_._VALDATA___V654*/ meltfptr[653] = - (melt_ptr_t) & meltcdat->dsym_464__CLASS_OBJPUTPAIR; +/*iniobj dsym_466__CLASS_OBJPUTPAIR*/ + /*uniqueobj*/ if (! /*_._VALDATA___V657*/ meltfptr[656]) +/*_._VALDATA___V657*/ meltfptr[656] = + (melt_ptr_t) & meltcdat->dsym_466__CLASS_OBJPUTPAIR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_464__CLASS_OBJPUTPAIR", + melt_assertmsg ("iniobj check.discr isobj dsym_466__CLASS_OBJPUTPAIR", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr objmagic dsym_464__CLASS_OBJPUTPAIR", + melt_assertmsg ("iniobj check.discr objmagic dsym_466__CLASS_OBJPUTPAIR", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_464__CLASS_OBJPUTPAIR.meltobj_class = + meltcdat->dsym_466__CLASS_OBJPUTPAIR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_464__CLASS_OBJPUTPAIR.obj_hash = 28800659; - meltcdat->dsym_464__CLASS_OBJPUTPAIR.obj_len = 3; + meltcdat->dsym_466__CLASS_OBJPUTPAIR.obj_hash = 28800659; + meltcdat->dsym_466__CLASS_OBJPUTPAIR.obj_len = 3; -/*inistring dstr_465__CLASS_OBJPUTPAIR*/ - /*_._VALSTR___V655*/ meltfptr[654] = - (melt_ptr_t) & meltcdat->dstr_465__CLASS_OBJPUTPAIR; - meltcdat->dstr_465__CLASS_OBJPUTPAIR.discr = +/*inistring dstr_467__CLASS_OBJPUTPAIR*/ + /*_._VALSTR___V658*/ meltfptr[657] = + (melt_ptr_t) & meltcdat->dstr_467__CLASS_OBJPUTPAIR; + meltcdat->dstr_467__CLASS_OBJPUTPAIR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_465__CLASS_OBJPUTPAIR.val, + /*small inistring */ strncpy (meltcdat->dstr_467__CLASS_OBJPUTPAIR.val, "CLASS_OBJPUTPAIR", - sizeof (meltcdat->dstr_465__CLASS_OBJPUTPAIR. + sizeof (meltcdat->dstr_467__CLASS_OBJPUTPAIR. val) - 1); - meltcdat->dstr_465__CLASS_OBJPUTPAIR.val[16] = (char) 0; - meltcdat->dstr_465__CLASS_OBJPUTPAIR.slen = 16; + meltcdat->dstr_467__CLASS_OBJPUTPAIR.val[16] = (char) 0; + meltcdat->dstr_467__CLASS_OBJPUTPAIR.slen = 16; -/*iniobj dsym_466__CLASS_OBJPUTPAIRHEAD*/ - /*uniqueobj*/ if (! /*_._VALDATA___V656*/ meltfptr[655]) -/*_._VALDATA___V656*/ meltfptr[655] = - (melt_ptr_t) & meltcdat->dsym_466__CLASS_OBJPUTPAIRHEAD; +/*iniobj dsym_468__CLASS_OBJPUTPAIRHEAD*/ + /*uniqueobj*/ if (! /*_._VALDATA___V659*/ meltfptr[658]) +/*_._VALDATA___V659*/ meltfptr[658] = + (melt_ptr_t) & meltcdat->dsym_468__CLASS_OBJPUTPAIRHEAD; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_466__CLASS_OBJPUTPAIRHEAD", + melt_assertmsg ("iniobj check.discr isobj dsym_468__CLASS_OBJPUTPAIRHEAD", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr objmagic dsym_466__CLASS_OBJPUTPAIRHEAD", + ("iniobj check.discr objmagic dsym_468__CLASS_OBJPUTPAIRHEAD", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_466__CLASS_OBJPUTPAIRHEAD.meltobj_class = + meltcdat->dsym_468__CLASS_OBJPUTPAIRHEAD.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_466__CLASS_OBJPUTPAIRHEAD.obj_hash = 844112648; - meltcdat->dsym_466__CLASS_OBJPUTPAIRHEAD.obj_len = 3; + meltcdat->dsym_468__CLASS_OBJPUTPAIRHEAD.obj_hash = 844112648; + meltcdat->dsym_468__CLASS_OBJPUTPAIRHEAD.obj_len = 3; -/*inistring dstr_467__CLASS_OBJPUTPAIRHEAD*/ - /*_._VALSTR___V657*/ meltfptr[656] = - (melt_ptr_t) & meltcdat->dstr_467__CLASS_OBJPUTPAIRHEAD; - meltcdat->dstr_467__CLASS_OBJPUTPAIRHEAD.discr = +/*inistring dstr_469__CLASS_OBJPUTPAIRHEAD*/ + /*_._VALSTR___V660*/ meltfptr[659] = + (melt_ptr_t) & meltcdat->dstr_469__CLASS_OBJPUTPAIRHEAD; + meltcdat->dstr_469__CLASS_OBJPUTPAIRHEAD.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_467__CLASS_OBJPUTPAIRHEAD.val, + /*small inistring */ strncpy (meltcdat->dstr_469__CLASS_OBJPUTPAIRHEAD.val, "CLASS_OBJPUTPAIRHEAD", sizeof (meltcdat-> - dstr_467__CLASS_OBJPUTPAIRHEAD.val) - + dstr_469__CLASS_OBJPUTPAIRHEAD.val) - 1); - meltcdat->dstr_467__CLASS_OBJPUTPAIRHEAD.val[20] = (char) 0; - meltcdat->dstr_467__CLASS_OBJPUTPAIRHEAD.slen = 20; + meltcdat->dstr_469__CLASS_OBJPUTPAIRHEAD.val[20] = (char) 0; + meltcdat->dstr_469__CLASS_OBJPUTPAIRHEAD.slen = 20; - /*inirout drout_468__OUTPUCOD_OBJPUTPAIRTAIL */ - /*_._VALROUT___V658*/ meltfptr[657] = - (melt_ptr_t) & meltcdat->drout_468__OUTPUCOD_OBJPUTPAIRTAIL; - meltcdat->drout_468__OUTPUCOD_OBJPUTPAIRTAIL.discr = + /*inirout drout_470__OUTPUCOD_OBJPUTPAIRTAIL */ + /*_._VALROUT___V661*/ meltfptr[660] = + (melt_ptr_t) & meltcdat->drout_470__OUTPUCOD_OBJPUTPAIRTAIL; + meltcdat->drout_470__OUTPUCOD_OBJPUTPAIRTAIL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); - strncpy (meltcdat->drout_468__OUTPUCOD_OBJPUTPAIRTAIL.routdescr, + strncpy (meltcdat->drout_470__OUTPUCOD_OBJPUTPAIRTAIL.routdescr, "OUTPUCOD_OBJPUTPAIRTAIL @warmelt-outobj.melt:4651", MELT_ROUTDESCR_LEN - 1); - meltcdat->drout_468__OUTPUCOD_OBJPUTPAIRTAIL.nbval = 6; - MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_468__OUTPUCOD_OBJPUTPAIRTAIL, + meltcdat->drout_470__OUTPUCOD_OBJPUTPAIRTAIL.nbval = 6; + MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_470__OUTPUCOD_OBJPUTPAIRTAIL, meltrout_118_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTPAIRTAIL); - /*iniclos dclo_469__OUTPUCOD_OBJPUTPAIRTAIL */ - /*_._VALCLO___V659*/ meltfptr[658] = - (melt_ptr_t) & meltcdat->dclo_469__OUTPUCOD_OBJPUTPAIRTAIL; - meltcdat->dclo_469__OUTPUCOD_OBJPUTPAIRTAIL.discr = + /*iniclos dclo_471__OUTPUCOD_OBJPUTPAIRTAIL */ + /*_._VALCLO___V662*/ meltfptr[661] = + (melt_ptr_t) & meltcdat->dclo_471__OUTPUCOD_OBJPUTPAIRTAIL; + meltcdat->dclo_471__OUTPUCOD_OBJPUTPAIRTAIL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); - meltcdat->dclo_469__OUTPUCOD_OBJPUTPAIRTAIL.nbval = 0; + meltcdat->dclo_471__OUTPUCOD_OBJPUTPAIRTAIL.nbval = 0; -/*iniobj dsym_470__CLASS_OBJPUTPAIRTAIL*/ - /*uniqueobj*/ if (! /*_._VALDATA___V660*/ meltfptr[659]) -/*_._VALDATA___V660*/ meltfptr[659] = - (melt_ptr_t) & meltcdat->dsym_470__CLASS_OBJPUTPAIRTAIL; +/*iniobj dsym_472__CLASS_OBJPUTPAIRTAIL*/ + /*uniqueobj*/ if (! /*_._VALDATA___V663*/ meltfptr[662]) +/*_._VALDATA___V663*/ meltfptr[662] = + (melt_ptr_t) & meltcdat->dsym_472__CLASS_OBJPUTPAIRTAIL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_470__CLASS_OBJPUTPAIRTAIL", + melt_assertmsg ("iniobj check.discr isobj dsym_472__CLASS_OBJPUTPAIRTAIL", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr objmagic dsym_470__CLASS_OBJPUTPAIRTAIL", + ("iniobj check.discr objmagic dsym_472__CLASS_OBJPUTPAIRTAIL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_470__CLASS_OBJPUTPAIRTAIL.meltobj_class = + meltcdat->dsym_472__CLASS_OBJPUTPAIRTAIL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_470__CLASS_OBJPUTPAIRTAIL.obj_hash = 11812974; - meltcdat->dsym_470__CLASS_OBJPUTPAIRTAIL.obj_len = 3; + meltcdat->dsym_472__CLASS_OBJPUTPAIRTAIL.obj_hash = 11812974; + meltcdat->dsym_472__CLASS_OBJPUTPAIRTAIL.obj_len = 3; -/*inistring dstr_471__CLASS_OBJPUTPAIRTAIL*/ - /*_._VALSTR___V661*/ meltfptr[660] = - (melt_ptr_t) & meltcdat->dstr_471__CLASS_OBJPUTPAIRTAIL; - meltcdat->dstr_471__CLASS_OBJPUTPAIRTAIL.discr = +/*inistring dstr_473__CLASS_OBJPUTPAIRTAIL*/ + /*_._VALSTR___V664*/ meltfptr[663] = + (melt_ptr_t) & meltcdat->dstr_473__CLASS_OBJPUTPAIRTAIL; + meltcdat->dstr_473__CLASS_OBJPUTPAIRTAIL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_471__CLASS_OBJPUTPAIRTAIL.val, + /*small inistring */ strncpy (meltcdat->dstr_473__CLASS_OBJPUTPAIRTAIL.val, "CLASS_OBJPUTPAIRTAIL", sizeof (meltcdat-> - dstr_471__CLASS_OBJPUTPAIRTAIL.val) - + dstr_473__CLASS_OBJPUTPAIRTAIL.val) - 1); - meltcdat->dstr_471__CLASS_OBJPUTPAIRTAIL.val[20] = (char) 0; - meltcdat->dstr_471__CLASS_OBJPUTPAIRTAIL.slen = 20; + meltcdat->dstr_473__CLASS_OBJPUTPAIRTAIL.val[20] = (char) 0; + meltcdat->dstr_473__CLASS_OBJPUTPAIRTAIL.slen = 20; - /*inirout drout_472__OUTPUCOD_OBJPUTLIST */ - /*_._VALROUT___V662*/ meltfptr[661] = - (melt_ptr_t) & meltcdat->drout_472__OUTPUCOD_OBJPUTLIST; - meltcdat->drout_472__OUTPUCOD_OBJPUTLIST.discr = + /*inirout drout_474__OUTPUCOD_OBJPUTLIST */ + /*_._VALROUT___V665*/ meltfptr[664] = + (melt_ptr_t) & meltcdat->drout_474__OUTPUCOD_OBJPUTLIST; + meltcdat->drout_474__OUTPUCOD_OBJPUTLIST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); - strncpy (meltcdat->drout_472__OUTPUCOD_OBJPUTLIST.routdescr, + strncpy (meltcdat->drout_474__OUTPUCOD_OBJPUTLIST.routdescr, "OUTPUCOD_OBJPUTLIST @warmelt-outobj.melt:4677", MELT_ROUTDESCR_LEN - 1); - meltcdat->drout_472__OUTPUCOD_OBJPUTLIST.nbval = 5; - MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_472__OUTPUCOD_OBJPUTLIST, + meltcdat->drout_474__OUTPUCOD_OBJPUTLIST.nbval = 5; + MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_474__OUTPUCOD_OBJPUTLIST, meltrout_119_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTLIST); - /*iniclos dclo_473__OUTPUCOD_OBJPUTLIST */ - /*_._VALCLO___V663*/ meltfptr[662] = - (melt_ptr_t) & meltcdat->dclo_473__OUTPUCOD_OBJPUTLIST; - meltcdat->dclo_473__OUTPUCOD_OBJPUTLIST.discr = + /*iniclos dclo_475__OUTPUCOD_OBJPUTLIST */ + /*_._VALCLO___V666*/ meltfptr[665] = + (melt_ptr_t) & meltcdat->dclo_475__OUTPUCOD_OBJPUTLIST; + meltcdat->dclo_475__OUTPUCOD_OBJPUTLIST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); - meltcdat->dclo_473__OUTPUCOD_OBJPUTLIST.nbval = 0; + meltcdat->dclo_475__OUTPUCOD_OBJPUTLIST.nbval = 0; -/*iniobj dsym_474__CLASS_OBJPUTLIST*/ - /*uniqueobj*/ if (! /*_._VALDATA___V664*/ meltfptr[663]) -/*_._VALDATA___V664*/ meltfptr[663] = - (melt_ptr_t) & meltcdat->dsym_474__CLASS_OBJPUTLIST; +/*iniobj dsym_476__CLASS_OBJPUTLIST*/ + /*uniqueobj*/ if (! /*_._VALDATA___V667*/ meltfptr[666]) +/*_._VALDATA___V667*/ meltfptr[666] = + (melt_ptr_t) & meltcdat->dsym_476__CLASS_OBJPUTLIST; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_474__CLASS_OBJPUTLIST", + melt_assertmsg ("iniobj check.discr isobj dsym_476__CLASS_OBJPUTLIST", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr objmagic dsym_474__CLASS_OBJPUTLIST", + melt_assertmsg ("iniobj check.discr objmagic dsym_476__CLASS_OBJPUTLIST", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_474__CLASS_OBJPUTLIST.meltobj_class = + meltcdat->dsym_476__CLASS_OBJPUTLIST.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_474__CLASS_OBJPUTLIST.obj_hash = 581868612; - meltcdat->dsym_474__CLASS_OBJPUTLIST.obj_len = 3; + meltcdat->dsym_476__CLASS_OBJPUTLIST.obj_hash = 581868612; + meltcdat->dsym_476__CLASS_OBJPUTLIST.obj_len = 3; -/*inistring dstr_475__CLASS_OBJPUTLIST*/ - /*_._VALSTR___V665*/ meltfptr[664] = - (melt_ptr_t) & meltcdat->dstr_475__CLASS_OBJPUTLIST; - meltcdat->dstr_475__CLASS_OBJPUTLIST.discr = +/*inistring dstr_477__CLASS_OBJPUTLIST*/ + /*_._VALSTR___V668*/ meltfptr[667] = + (melt_ptr_t) & meltcdat->dstr_477__CLASS_OBJPUTLIST; + meltcdat->dstr_477__CLASS_OBJPUTLIST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_475__CLASS_OBJPUTLIST.val, + /*small inistring */ strncpy (meltcdat->dstr_477__CLASS_OBJPUTLIST.val, "CLASS_OBJPUTLIST", - sizeof (meltcdat->dstr_475__CLASS_OBJPUTLIST. + sizeof (meltcdat->dstr_477__CLASS_OBJPUTLIST. val) - 1); - meltcdat->dstr_475__CLASS_OBJPUTLIST.val[16] = (char) 0; - meltcdat->dstr_475__CLASS_OBJPUTLIST.slen = 16; + meltcdat->dstr_477__CLASS_OBJPUTLIST.val[16] = (char) 0; + meltcdat->dstr_477__CLASS_OBJPUTLIST.slen = 16; - /*inirout drout_476__OUTPUCOD_OBJGETSLOT */ - /*_._VALROUT___V666*/ meltfptr[665] = - (melt_ptr_t) & meltcdat->drout_476__OUTPUCOD_OBJGETSLOT; - meltcdat->drout_476__OUTPUCOD_OBJGETSLOT.discr = + /*inirout drout_478__OUTPUCOD_OBJGETSLOT */ + /*_._VALROUT___V669*/ meltfptr[668] = + (melt_ptr_t) & meltcdat->drout_478__OUTPUCOD_OBJGETSLOT; + meltcdat->drout_478__OUTPUCOD_OBJGETSLOT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); - strncpy (meltcdat->drout_476__OUTPUCOD_OBJGETSLOT.routdescr, + strncpy (meltcdat->drout_478__OUTPUCOD_OBJGETSLOT.routdescr, "OUTPUCOD_OBJGETSLOT @warmelt-outobj.melt:4708", MELT_ROUTDESCR_LEN - 1); - meltcdat->drout_476__OUTPUCOD_OBJGETSLOT.nbval = 12; - MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_476__OUTPUCOD_OBJGETSLOT, + meltcdat->drout_478__OUTPUCOD_OBJGETSLOT.nbval = 12; + MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_478__OUTPUCOD_OBJGETSLOT, meltrout_120_WARMELTmiOUTOBJ_OUTPUCOD_OBJGETSLOT); - /*iniclos dclo_477__OUTPUCOD_OBJGETSLOT */ - /*_._VALCLO___V668*/ meltfptr[667] = - (melt_ptr_t) & meltcdat->dclo_477__OUTPUCOD_OBJGETSLOT; - meltcdat->dclo_477__OUTPUCOD_OBJGETSLOT.discr = + /*iniclos dclo_479__OUTPUCOD_OBJGETSLOT */ + /*_._VALCLO___V671*/ meltfptr[670] = + (melt_ptr_t) & meltcdat->dclo_479__OUTPUCOD_OBJGETSLOT; + meltcdat->dclo_479__OUTPUCOD_OBJGETSLOT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); - meltcdat->dclo_477__OUTPUCOD_OBJGETSLOT.nbval = 0; + meltcdat->dclo_479__OUTPUCOD_OBJGETSLOT.nbval = 0; -/*iniobj dsym_478__CLASS_OBJGETSLOT*/ - /*uniqueobj*/ if (! /*_._VALDATA___V669*/ meltfptr[668]) -/*_._VALDATA___V669*/ meltfptr[668] = - (melt_ptr_t) & meltcdat->dsym_478__CLASS_OBJGETSLOT; +/*iniobj dsym_480__CLASS_OBJGETSLOT*/ + /*uniqueobj*/ if (! /*_._VALDATA___V672*/ meltfptr[671]) +/*_._VALDATA___V672*/ meltfptr[671] = + (melt_ptr_t) & meltcdat->dsym_480__CLASS_OBJGETSLOT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_478__CLASS_OBJGETSLOT", + melt_assertmsg ("iniobj check.discr isobj dsym_480__CLASS_OBJGETSLOT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr objmagic dsym_478__CLASS_OBJGETSLOT", + melt_assertmsg ("iniobj check.discr objmagic dsym_480__CLASS_OBJGETSLOT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_478__CLASS_OBJGETSLOT.meltobj_class = + meltcdat->dsym_480__CLASS_OBJGETSLOT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_478__CLASS_OBJGETSLOT.obj_hash = 1004612742; - meltcdat->dsym_478__CLASS_OBJGETSLOT.obj_len = 3; + meltcdat->dsym_480__CLASS_OBJGETSLOT.obj_hash = 1004612742; + meltcdat->dsym_480__CLASS_OBJGETSLOT.obj_len = 3; -/*inistring dstr_479__CLASS_OBJGETSLOT*/ - /*_._VALSTR___V670*/ meltfptr[669] = - (melt_ptr_t) & meltcdat->dstr_479__CLASS_OBJGETSLOT; - meltcdat->dstr_479__CLASS_OBJGETSLOT.discr = +/*inistring dstr_481__CLASS_OBJGETSLOT*/ + /*_._VALSTR___V673*/ meltfptr[672] = + (melt_ptr_t) & meltcdat->dstr_481__CLASS_OBJGETSLOT; + meltcdat->dstr_481__CLASS_OBJGETSLOT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_479__CLASS_OBJGETSLOT.val, + /*small inistring */ strncpy (meltcdat->dstr_481__CLASS_OBJGETSLOT.val, "CLASS_OBJGETSLOT", - sizeof (meltcdat->dstr_479__CLASS_OBJGETSLOT. + sizeof (meltcdat->dstr_481__CLASS_OBJGETSLOT. val) - 1); - meltcdat->dstr_479__CLASS_OBJGETSLOT.val[16] = (char) 0; - meltcdat->dstr_479__CLASS_OBJGETSLOT.slen = 16; + meltcdat->dstr_481__CLASS_OBJGETSLOT.val[16] = (char) 0; + meltcdat->dstr_481__CLASS_OBJGETSLOT.slen = 16; -/*iniobj dsym_480__CLASS_FIELD*/ - /*uniqueobj*/ if (! /*_._VALDATA___V671*/ meltfptr[670]) -/*_._VALDATA___V671*/ meltfptr[670] = - (melt_ptr_t) & meltcdat->dsym_480__CLASS_FIELD; +/*iniobj dsym_482__CLASS_FIELD*/ + /*uniqueobj*/ if (! /*_._VALDATA___V674*/ meltfptr[673]) +/*_._VALDATA___V674*/ meltfptr[673] = + (melt_ptr_t) & meltcdat->dsym_482__CLASS_FIELD; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_480__CLASS_FIELD", + melt_assertmsg ("iniobj check.discr isobj dsym_482__CLASS_FIELD", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr objmagic dsym_480__CLASS_FIELD", + melt_assertmsg ("iniobj check.discr objmagic dsym_482__CLASS_FIELD", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_480__CLASS_FIELD.meltobj_class = + meltcdat->dsym_482__CLASS_FIELD.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_480__CLASS_FIELD.obj_hash = 523073; - meltcdat->dsym_480__CLASS_FIELD.obj_len = 3; + meltcdat->dsym_482__CLASS_FIELD.obj_hash = 523073; + meltcdat->dsym_482__CLASS_FIELD.obj_len = 3; -/*inistring dstr_481__CLASS_FIELD*/ - /*_._VALSTR___V672*/ meltfptr[671] = - (melt_ptr_t) & meltcdat->dstr_481__CLASS_FIELD; - meltcdat->dstr_481__CLASS_FIELD.discr = +/*inistring dstr_483__CLASS_FIELD*/ + /*_._VALSTR___V675*/ meltfptr[674] = + (melt_ptr_t) & meltcdat->dstr_483__CLASS_FIELD; + meltcdat->dstr_483__CLASS_FIELD.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_481__CLASS_FIELD.val, + /*small inistring */ strncpy (meltcdat->dstr_483__CLASS_FIELD.val, "CLASS_FIELD", - sizeof (meltcdat->dstr_481__CLASS_FIELD.val) - + sizeof (meltcdat->dstr_483__CLASS_FIELD.val) - 1); - meltcdat->dstr_481__CLASS_FIELD.val[11] = (char) 0; - meltcdat->dstr_481__CLASS_FIELD.slen = 11; + meltcdat->dstr_483__CLASS_FIELD.val[11] = (char) 0; + meltcdat->dstr_483__CLASS_FIELD.slen = 11; - /*inirout drout_482__LAMBDA_ */ - /*_._VALROUT___V667*/ meltfptr[666] = - (melt_ptr_t) & meltcdat->drout_482__LAMBDA_; - meltcdat->drout_482__LAMBDA_.discr = + /*inirout drout_484__LAMBDA_ */ + /*_._VALROUT___V670*/ meltfptr[669] = + (melt_ptr_t) & meltcdat->drout_484__LAMBDA_; + meltcdat->drout_484__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); - strncpy (meltcdat->drout_482__LAMBDA_.routdescr, + strncpy (meltcdat->drout_484__LAMBDA_.routdescr, "LAMBDA_ @warmelt-outobj.melt:4732", MELT_ROUTDESCR_LEN - 1); - meltcdat->drout_482__LAMBDA_.nbval = 3; - MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_482__LAMBDA_, - meltrout_121_WARMELTmiOUTOBJ_LAMBDA_cl26); - - /*inirout drout_483__OUTPUCOD_OBJPUTSLOT */ - /*_._VALROUT___V673*/ meltfptr[672] = - (melt_ptr_t) & meltcdat->drout_483__OUTPUCOD_OBJPUTSLOT; - meltcdat->drout_483__OUTPUCOD_OBJPUTSLOT.discr = + meltcdat->drout_484__LAMBDA_.nbval = 3; + MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_484__LAMBDA_, + meltrout_121_WARMELTmiOUTOBJ); + + /*inirout drout_485__OUTPUCOD_OBJPUTSLOT */ + /*_._VALROUT___V676*/ meltfptr[675] = + (melt_ptr_t) & meltcdat->drout_485__OUTPUCOD_OBJPUTSLOT; + meltcdat->drout_485__OUTPUCOD_OBJPUTSLOT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); - strncpy (meltcdat->drout_483__OUTPUCOD_OBJPUTSLOT.routdescr, + strncpy (meltcdat->drout_485__OUTPUCOD_OBJPUTSLOT.routdescr, "OUTPUCOD_OBJPUTSLOT @warmelt-outobj.melt:4747", MELT_ROUTDESCR_LEN - 1); - meltcdat->drout_483__OUTPUCOD_OBJPUTSLOT.nbval = 13; - MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_483__OUTPUCOD_OBJPUTSLOT, + meltcdat->drout_485__OUTPUCOD_OBJPUTSLOT.nbval = 13; + MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_485__OUTPUCOD_OBJPUTSLOT, meltrout_122_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTSLOT); - /*iniclos dclo_484__OUTPUCOD_OBJPUTSLOT */ - /*_._VALCLO___V674*/ meltfptr[673] = - (melt_ptr_t) & meltcdat->dclo_484__OUTPUCOD_OBJPUTSLOT; - meltcdat->dclo_484__OUTPUCOD_OBJPUTSLOT.discr = + /*iniclos dclo_486__OUTPUCOD_OBJPUTSLOT */ + /*_._VALCLO___V677*/ meltfptr[676] = + (melt_ptr_t) & meltcdat->dclo_486__OUTPUCOD_OBJPUTSLOT; + meltcdat->dclo_486__OUTPUCOD_OBJPUTSLOT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); - meltcdat->dclo_484__OUTPUCOD_OBJPUTSLOT.nbval = 0; + meltcdat->dclo_486__OUTPUCOD_OBJPUTSLOT.nbval = 0; -/*iniobj dsym_485__CLASS_OBJPUTSLOT*/ - /*uniqueobj*/ if (! /*_._VALDATA___V675*/ meltfptr[674]) -/*_._VALDATA___V675*/ meltfptr[674] = - (melt_ptr_t) & meltcdat->dsym_485__CLASS_OBJPUTSLOT; +/*iniobj dsym_487__CLASS_OBJPUTSLOT*/ + /*uniqueobj*/ if (! /*_._VALDATA___V678*/ meltfptr[677]) +/*_._VALDATA___V678*/ meltfptr[677] = + (melt_ptr_t) & meltcdat->dsym_487__CLASS_OBJPUTSLOT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_485__CLASS_OBJPUTSLOT", + melt_assertmsg ("iniobj check.discr isobj dsym_487__CLASS_OBJPUTSLOT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr objmagic dsym_485__CLASS_OBJPUTSLOT", + melt_assertmsg ("iniobj check.discr objmagic dsym_487__CLASS_OBJPUTSLOT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_485__CLASS_OBJPUTSLOT.meltobj_class = + meltcdat->dsym_487__CLASS_OBJPUTSLOT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_485__CLASS_OBJPUTSLOT.obj_hash = 382942903; - meltcdat->dsym_485__CLASS_OBJPUTSLOT.obj_len = 3; + meltcdat->dsym_487__CLASS_OBJPUTSLOT.obj_hash = 382942903; + meltcdat->dsym_487__CLASS_OBJPUTSLOT.obj_len = 3; -/*inistring dstr_486__CLASS_OBJPUTSLOT*/ - /*_._VALSTR___V676*/ meltfptr[675] = - (melt_ptr_t) & meltcdat->dstr_486__CLASS_OBJPUTSLOT; - meltcdat->dstr_486__CLASS_OBJPUTSLOT.discr = +/*inistring dstr_488__CLASS_OBJPUTSLOT*/ + /*_._VALSTR___V679*/ meltfptr[678] = + (melt_ptr_t) & meltcdat->dstr_488__CLASS_OBJPUTSLOT; + meltcdat->dstr_488__CLASS_OBJPUTSLOT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_486__CLASS_OBJPUTSLOT.val, + /*small inistring */ strncpy (meltcdat->dstr_488__CLASS_OBJPUTSLOT.val, "CLASS_OBJPUTSLOT", - sizeof (meltcdat->dstr_486__CLASS_OBJPUTSLOT. + sizeof (meltcdat->dstr_488__CLASS_OBJPUTSLOT. val) - 1); - meltcdat->dstr_486__CLASS_OBJPUTSLOT.val[16] = (char) 0; - meltcdat->dstr_486__CLASS_OBJPUTSLOT.slen = 16; + meltcdat->dstr_488__CLASS_OBJPUTSLOT.val[16] = (char) 0; + meltcdat->dstr_488__CLASS_OBJPUTSLOT.slen = 16; - /*inirout drout_487__OUTPUCOD_OBJPUTCLOSUROUT */ - /*_._VALROUT___V677*/ meltfptr[676] = - (melt_ptr_t) & meltcdat->drout_487__OUTPUCOD_OBJPUTCLOSUROUT; - meltcdat->drout_487__OUTPUCOD_OBJPUTCLOSUROUT.discr = + /*inirout drout_489__OUTPUCOD_OBJPUTCLOSUROUT */ + /*_._VALROUT___V680*/ meltfptr[679] = + (melt_ptr_t) & meltcdat->drout_489__OUTPUCOD_OBJPUTCLOSUROUT; + meltcdat->drout_489__OUTPUCOD_OBJPUTCLOSUROUT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); - strncpy (meltcdat->drout_487__OUTPUCOD_OBJPUTCLOSUROUT.routdescr, + strncpy (meltcdat->drout_489__OUTPUCOD_OBJPUTCLOSUROUT.routdescr, "OUTPUCOD_OBJPUTCLOSUROUT @warmelt-outobj.melt:4823", MELT_ROUTDESCR_LEN - 1); - meltcdat->drout_487__OUTPUCOD_OBJPUTCLOSUROUT.nbval = 5; - MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_487__OUTPUCOD_OBJPUTCLOSUROUT, + meltcdat->drout_489__OUTPUCOD_OBJPUTCLOSUROUT.nbval = 5; + MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_489__OUTPUCOD_OBJPUTCLOSUROUT, meltrout_123_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTCLOSUROUT); - /*iniclos dclo_488__OUTPUCOD_OBJPUTCLOSUROUT */ - /*_._VALCLO___V678*/ meltfptr[677] = - (melt_ptr_t) & meltcdat->dclo_488__OUTPUCOD_OBJPUTCLOSUROUT; - meltcdat->dclo_488__OUTPUCOD_OBJPUTCLOSUROUT.discr = + /*iniclos dclo_490__OUTPUCOD_OBJPUTCLOSUROUT */ + /*_._VALCLO___V681*/ meltfptr[680] = + (melt_ptr_t) & meltcdat->dclo_490__OUTPUCOD_OBJPUTCLOSUROUT; + meltcdat->dclo_490__OUTPUCOD_OBJPUTCLOSUROUT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); - meltcdat->dclo_488__OUTPUCOD_OBJPUTCLOSUROUT.nbval = 0; + meltcdat->dclo_490__OUTPUCOD_OBJPUTCLOSUROUT.nbval = 0; -/*iniobj dsym_489__CLASS_OBJPUTCLOSUROUT*/ - /*uniqueobj*/ if (! /*_._VALDATA___V679*/ meltfptr[678]) -/*_._VALDATA___V679*/ meltfptr[678] = - (melt_ptr_t) & meltcdat->dsym_489__CLASS_OBJPUTCLOSUROUT; +/*iniobj dsym_491__CLASS_OBJPUTCLOSUROUT*/ + /*uniqueobj*/ if (! /*_._VALDATA___V682*/ meltfptr[681]) +/*_._VALDATA___V682*/ meltfptr[681] = + (melt_ptr_t) & meltcdat->dsym_491__CLASS_OBJPUTCLOSUROUT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr isobj dsym_489__CLASS_OBJPUTCLOSUROUT", + ("iniobj check.discr isobj dsym_491__CLASS_OBJPUTCLOSUROUT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr objmagic dsym_489__CLASS_OBJPUTCLOSUROUT", + ("iniobj check.discr objmagic dsym_491__CLASS_OBJPUTCLOSUROUT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_489__CLASS_OBJPUTCLOSUROUT.meltobj_class = + meltcdat->dsym_491__CLASS_OBJPUTCLOSUROUT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_489__CLASS_OBJPUTCLOSUROUT.obj_hash = 331144291; - meltcdat->dsym_489__CLASS_OBJPUTCLOSUROUT.obj_len = 3; + meltcdat->dsym_491__CLASS_OBJPUTCLOSUROUT.obj_hash = 331144291; + meltcdat->dsym_491__CLASS_OBJPUTCLOSUROUT.obj_len = 3; -/*inistring dstr_490__CLASS_OBJPUTCLOSUROUT*/ - /*_._VALSTR___V680*/ meltfptr[679] = - (melt_ptr_t) & meltcdat->dstr_490__CLASS_OBJPUTCLOSUROUT; - meltcdat->dstr_490__CLASS_OBJPUTCLOSUROUT.discr = +/*inistring dstr_492__CLASS_OBJPUTCLOSUROUT*/ + /*_._VALSTR___V683*/ meltfptr[682] = + (melt_ptr_t) & meltcdat->dstr_492__CLASS_OBJPUTCLOSUROUT; + meltcdat->dstr_492__CLASS_OBJPUTCLOSUROUT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_490__CLASS_OBJPUTCLOSUROUT.val, + /*small inistring */ strncpy (meltcdat->dstr_492__CLASS_OBJPUTCLOSUROUT.val, "CLASS_OBJPUTCLOSUROUT", sizeof (meltcdat-> - dstr_490__CLASS_OBJPUTCLOSUROUT.val) - + dstr_492__CLASS_OBJPUTCLOSUROUT.val) - 1); - meltcdat->dstr_490__CLASS_OBJPUTCLOSUROUT.val[21] = (char) 0; - meltcdat->dstr_490__CLASS_OBJPUTCLOSUROUT.slen = 21; + meltcdat->dstr_492__CLASS_OBJPUTCLOSUROUT.val[21] = (char) 0; + meltcdat->dstr_492__CLASS_OBJPUTCLOSUROUT.slen = 21; - /*inirout drout_491__OUTPUCOD_OBJPUTCLOSEDV */ - /*_._VALROUT___V681*/ meltfptr[680] = - (melt_ptr_t) & meltcdat->drout_491__OUTPUCOD_OBJPUTCLOSEDV; - meltcdat->drout_491__OUTPUCOD_OBJPUTCLOSEDV.discr = + /*inirout drout_493__OUTPUCOD_OBJPUTCLOSEDV */ + /*_._VALROUT___V684*/ meltfptr[683] = + (melt_ptr_t) & meltcdat->drout_493__OUTPUCOD_OBJPUTCLOSEDV; + meltcdat->drout_493__OUTPUCOD_OBJPUTCLOSEDV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); - strncpy (meltcdat->drout_491__OUTPUCOD_OBJPUTCLOSEDV.routdescr, + strncpy (meltcdat->drout_493__OUTPUCOD_OBJPUTCLOSEDV.routdescr, "OUTPUCOD_OBJPUTCLOSEDV @warmelt-outobj.melt:4867", MELT_ROUTDESCR_LEN - 1); - meltcdat->drout_491__OUTPUCOD_OBJPUTCLOSEDV.nbval = 5; - MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_491__OUTPUCOD_OBJPUTCLOSEDV, + meltcdat->drout_493__OUTPUCOD_OBJPUTCLOSEDV.nbval = 5; + MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_493__OUTPUCOD_OBJPUTCLOSEDV, meltrout_124_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTCLOSEDV); - /*iniclos dclo_492__OUTPUCOD_OBJPUTCLOSEDV */ - /*_._VALCLO___V682*/ meltfptr[681] = - (melt_ptr_t) & meltcdat->dclo_492__OUTPUCOD_OBJPUTCLOSEDV; - meltcdat->dclo_492__OUTPUCOD_OBJPUTCLOSEDV.discr = + /*iniclos dclo_494__OUTPUCOD_OBJPUTCLOSEDV */ + /*_._VALCLO___V685*/ meltfptr[684] = + (melt_ptr_t) & meltcdat->dclo_494__OUTPUCOD_OBJPUTCLOSEDV; + meltcdat->dclo_494__OUTPUCOD_OBJPUTCLOSEDV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); - meltcdat->dclo_492__OUTPUCOD_OBJPUTCLOSEDV.nbval = 0; + meltcdat->dclo_494__OUTPUCOD_OBJPUTCLOSEDV.nbval = 0; -/*iniobj dsym_493__CLASS_OBJPUTCLOSEDV*/ - /*uniqueobj*/ if (! /*_._VALDATA___V683*/ meltfptr[682]) -/*_._VALDATA___V683*/ meltfptr[682] = - (melt_ptr_t) & meltcdat->dsym_493__CLASS_OBJPUTCLOSEDV; +/*iniobj dsym_495__CLASS_OBJPUTCLOSEDV*/ + /*uniqueobj*/ if (! /*_._VALDATA___V686*/ meltfptr[685]) +/*_._VALDATA___V686*/ meltfptr[685] = + (melt_ptr_t) & meltcdat->dsym_495__CLASS_OBJPUTCLOSEDV; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_493__CLASS_OBJPUTCLOSEDV", + melt_assertmsg ("iniobj check.discr isobj dsym_495__CLASS_OBJPUTCLOSEDV", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr objmagic dsym_493__CLASS_OBJPUTCLOSEDV", + ("iniobj check.discr objmagic dsym_495__CLASS_OBJPUTCLOSEDV", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_493__CLASS_OBJPUTCLOSEDV.meltobj_class = + meltcdat->dsym_495__CLASS_OBJPUTCLOSEDV.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_493__CLASS_OBJPUTCLOSEDV.obj_hash = 870174829; - meltcdat->dsym_493__CLASS_OBJPUTCLOSEDV.obj_len = 3; + meltcdat->dsym_495__CLASS_OBJPUTCLOSEDV.obj_hash = 870174829; + meltcdat->dsym_495__CLASS_OBJPUTCLOSEDV.obj_len = 3; -/*inistring dstr_494__CLASS_OBJPUTCLOSEDV*/ - /*_._VALSTR___V684*/ meltfptr[683] = - (melt_ptr_t) & meltcdat->dstr_494__CLASS_OBJPUTCLOSEDV; - meltcdat->dstr_494__CLASS_OBJPUTCLOSEDV.discr = +/*inistring dstr_496__CLASS_OBJPUTCLOSEDV*/ + /*_._VALSTR___V687*/ meltfptr[686] = + (melt_ptr_t) & meltcdat->dstr_496__CLASS_OBJPUTCLOSEDV; + meltcdat->dstr_496__CLASS_OBJPUTCLOSEDV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_494__CLASS_OBJPUTCLOSEDV.val, + /*small inistring */ strncpy (meltcdat->dstr_496__CLASS_OBJPUTCLOSEDV.val, "CLASS_OBJPUTCLOSEDV", sizeof (meltcdat-> - dstr_494__CLASS_OBJPUTCLOSEDV.val) - + dstr_496__CLASS_OBJPUTCLOSEDV.val) - 1); - meltcdat->dstr_494__CLASS_OBJPUTCLOSEDV.val[19] = (char) 0; - meltcdat->dstr_494__CLASS_OBJPUTCLOSEDV.slen = 19; + meltcdat->dstr_496__CLASS_OBJPUTCLOSEDV.val[19] = (char) 0; + meltcdat->dstr_496__CLASS_OBJPUTCLOSEDV.slen = 19; - /*inirout drout_495__OUTPUCOD_OBJPUTCLOSEDNOTNULLV */ - /*_._VALROUT___V685*/ meltfptr[684] = - (melt_ptr_t) & meltcdat->drout_495__OUTPUCOD_OBJPUTCLOSEDNOTNULLV; - meltcdat->drout_495__OUTPUCOD_OBJPUTCLOSEDNOTNULLV.discr = + /*inirout drout_497__OUTPUCOD_OBJPUTCLOSEDNOTNULLV */ + /*_._VALROUT___V688*/ meltfptr[687] = + (melt_ptr_t) & meltcdat->drout_497__OUTPUCOD_OBJPUTCLOSEDNOTNULLV; + meltcdat->drout_497__OUTPUCOD_OBJPUTCLOSEDNOTNULLV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); - strncpy (meltcdat->drout_495__OUTPUCOD_OBJPUTCLOSEDNOTNULLV.routdescr, + strncpy (meltcdat->drout_497__OUTPUCOD_OBJPUTCLOSEDNOTNULLV.routdescr, "OUTPUCOD_OBJPUTCLOSEDNOTNULLV @warmelt-outobj.melt:4903", MELT_ROUTDESCR_LEN - 1); - meltcdat->drout_495__OUTPUCOD_OBJPUTCLOSEDNOTNULLV.nbval = 5; + meltcdat->drout_497__OUTPUCOD_OBJPUTCLOSEDNOTNULLV.nbval = 5; MELT_ROUTINE_SET_ROUTCODE (&meltcdat-> - drout_495__OUTPUCOD_OBJPUTCLOSEDNOTNULLV, + drout_497__OUTPUCOD_OBJPUTCLOSEDNOTNULLV, meltrout_125_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTCLOSEDNOTNULLV); - /*iniclos dclo_496__OUTPUCOD_OBJPUTCLOSEDNOTNULLV */ - /*_._VALCLO___V686*/ meltfptr[685] = - (melt_ptr_t) & meltcdat->dclo_496__OUTPUCOD_OBJPUTCLOSEDNOTNULLV; - meltcdat->dclo_496__OUTPUCOD_OBJPUTCLOSEDNOTNULLV.discr = + /*iniclos dclo_498__OUTPUCOD_OBJPUTCLOSEDNOTNULLV */ + /*_._VALCLO___V689*/ meltfptr[688] = + (melt_ptr_t) & meltcdat->dclo_498__OUTPUCOD_OBJPUTCLOSEDNOTNULLV; + meltcdat->dclo_498__OUTPUCOD_OBJPUTCLOSEDNOTNULLV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); - meltcdat->dclo_496__OUTPUCOD_OBJPUTCLOSEDNOTNULLV.nbval = 0; + meltcdat->dclo_498__OUTPUCOD_OBJPUTCLOSEDNOTNULLV.nbval = 0; -/*iniobj dsym_497__CLASS_OBJPUTCLOSEDNOTNULLV*/ - /*uniqueobj*/ if (! /*_._VALDATA___V687*/ meltfptr[686]) -/*_._VALDATA___V687*/ meltfptr[686] = - (melt_ptr_t) & meltcdat->dsym_497__CLASS_OBJPUTCLOSEDNOTNULLV; +/*iniobj dsym_499__CLASS_OBJPUTCLOSEDNOTNULLV*/ + /*uniqueobj*/ if (! /*_._VALDATA___V690*/ meltfptr[689]) +/*_._VALDATA___V690*/ meltfptr[689] = + (melt_ptr_t) & meltcdat->dsym_499__CLASS_OBJPUTCLOSEDNOTNULLV; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr isobj dsym_497__CLASS_OBJPUTCLOSEDNOTNULLV", + ("iniobj check.discr isobj dsym_499__CLASS_OBJPUTCLOSEDNOTNULLV", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr objmagic dsym_497__CLASS_OBJPUTCLOSEDNOTNULLV", + ("iniobj check.discr objmagic dsym_499__CLASS_OBJPUTCLOSEDNOTNULLV", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_497__CLASS_OBJPUTCLOSEDNOTNULLV.meltobj_class = + meltcdat->dsym_499__CLASS_OBJPUTCLOSEDNOTNULLV.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_497__CLASS_OBJPUTCLOSEDNOTNULLV.obj_hash = 674443590; - meltcdat->dsym_497__CLASS_OBJPUTCLOSEDNOTNULLV.obj_len = 3; + meltcdat->dsym_499__CLASS_OBJPUTCLOSEDNOTNULLV.obj_hash = 674443590; + meltcdat->dsym_499__CLASS_OBJPUTCLOSEDNOTNULLV.obj_len = 3; -/*inistring dstr_498__CLASS_OBJPUTCLOSEDNOTNUL*/ - /*_._VALSTR___V688*/ meltfptr[687] = - (melt_ptr_t) & meltcdat->dstr_498__CLASS_OBJPUTCLOSEDNOTNUL; - meltcdat->dstr_498__CLASS_OBJPUTCLOSEDNOTNUL.discr = +/*inistring dstr_500__CLASS_OBJPUTCLOSEDNOTNUL*/ + /*_._VALSTR___V691*/ meltfptr[690] = + (melt_ptr_t) & meltcdat->dstr_500__CLASS_OBJPUTCLOSEDNOTNUL; + meltcdat->dstr_500__CLASS_OBJPUTCLOSEDNOTNUL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_498__CLASS_OBJPUTCLOSEDNOTNUL. + /*small inistring */ strncpy (meltcdat->dstr_500__CLASS_OBJPUTCLOSEDNOTNUL. val, "CLASS_OBJPUTCLOSEDNOTNULLV", sizeof (meltcdat-> - dstr_498__CLASS_OBJPUTCLOSEDNOTNUL. + dstr_500__CLASS_OBJPUTCLOSEDNOTNUL. val) - 1); - meltcdat->dstr_498__CLASS_OBJPUTCLOSEDNOTNUL.val[26] = (char) 0; - meltcdat->dstr_498__CLASS_OBJPUTCLOSEDNOTNUL.slen = 26; + meltcdat->dstr_500__CLASS_OBJPUTCLOSEDNOTNUL.val[26] = (char) 0; + meltcdat->dstr_500__CLASS_OBJPUTCLOSEDNOTNUL.slen = 26; - /*inirout drout_499__OUTPUCOD_OBJPUTROUTCONST */ - /*_._VALROUT___V689*/ meltfptr[688] = - (melt_ptr_t) & meltcdat->drout_499__OUTPUCOD_OBJPUTROUTCONST; - meltcdat->drout_499__OUTPUCOD_OBJPUTROUTCONST.discr = + /*inirout drout_501__OUTPUCOD_OBJPUTROUTCONST */ + /*_._VALROUT___V692*/ meltfptr[691] = + (melt_ptr_t) & meltcdat->drout_501__OUTPUCOD_OBJPUTROUTCONST; + meltcdat->drout_501__OUTPUCOD_OBJPUTROUTCONST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); - strncpy (meltcdat->drout_499__OUTPUCOD_OBJPUTROUTCONST.routdescr, + strncpy (meltcdat->drout_501__OUTPUCOD_OBJPUTROUTCONST.routdescr, "OUTPUCOD_OBJPUTROUTCONST @warmelt-outobj.melt:4943", MELT_ROUTDESCR_LEN - 1); - meltcdat->drout_499__OUTPUCOD_OBJPUTROUTCONST.nbval = 6; - MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_499__OUTPUCOD_OBJPUTROUTCONST, + meltcdat->drout_501__OUTPUCOD_OBJPUTROUTCONST.nbval = 6; + MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_501__OUTPUCOD_OBJPUTROUTCONST, meltrout_126_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTROUTCONST); - /*iniclos dclo_500__OUTPUCOD_OBJPUTROUTCONST */ - /*_._VALCLO___V690*/ meltfptr[689] = - (melt_ptr_t) & meltcdat->dclo_500__OUTPUCOD_OBJPUTROUTCONST; - meltcdat->dclo_500__OUTPUCOD_OBJPUTROUTCONST.discr = + /*iniclos dclo_502__OUTPUCOD_OBJPUTROUTCONST */ + /*_._VALCLO___V693*/ meltfptr[692] = + (melt_ptr_t) & meltcdat->dclo_502__OUTPUCOD_OBJPUTROUTCONST; + meltcdat->dclo_502__OUTPUCOD_OBJPUTROUTCONST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); - meltcdat->dclo_500__OUTPUCOD_OBJPUTROUTCONST.nbval = 0; + meltcdat->dclo_502__OUTPUCOD_OBJPUTROUTCONST.nbval = 0; -/*iniobj dsym_501__CLASS_OBJPUTROUTCONST*/ - /*uniqueobj*/ if (! /*_._VALDATA___V691*/ meltfptr[690]) -/*_._VALDATA___V691*/ meltfptr[690] = - (melt_ptr_t) & meltcdat->dsym_501__CLASS_OBJPUTROUTCONST; +/*iniobj dsym_503__CLASS_OBJPUTROUTCONST*/ + /*uniqueobj*/ if (! /*_._VALDATA___V694*/ meltfptr[693]) +/*_._VALDATA___V694*/ meltfptr[693] = + (melt_ptr_t) & meltcdat->dsym_503__CLASS_OBJPUTROUTCONST; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr isobj dsym_501__CLASS_OBJPUTROUTCONST", + ("iniobj check.discr isobj dsym_503__CLASS_OBJPUTROUTCONST", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr objmagic dsym_501__CLASS_OBJPUTROUTCONST", + ("iniobj check.discr objmagic dsym_503__CLASS_OBJPUTROUTCONST", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_501__CLASS_OBJPUTROUTCONST.meltobj_class = + meltcdat->dsym_503__CLASS_OBJPUTROUTCONST.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_501__CLASS_OBJPUTROUTCONST.obj_hash = 815485494; - meltcdat->dsym_501__CLASS_OBJPUTROUTCONST.obj_len = 3; + meltcdat->dsym_503__CLASS_OBJPUTROUTCONST.obj_hash = 815485494; + meltcdat->dsym_503__CLASS_OBJPUTROUTCONST.obj_len = 3; -/*inistring dstr_502__CLASS_OBJPUTROUTCONST*/ - /*_._VALSTR___V692*/ meltfptr[691] = - (melt_ptr_t) & meltcdat->dstr_502__CLASS_OBJPUTROUTCONST; - meltcdat->dstr_502__CLASS_OBJPUTROUTCONST.discr = +/*inistring dstr_504__CLASS_OBJPUTROUTCONST*/ + /*_._VALSTR___V695*/ meltfptr[694] = + (melt_ptr_t) & meltcdat->dstr_504__CLASS_OBJPUTROUTCONST; + meltcdat->dstr_504__CLASS_OBJPUTROUTCONST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_502__CLASS_OBJPUTROUTCONST.val, + /*small inistring */ strncpy (meltcdat->dstr_504__CLASS_OBJPUTROUTCONST.val, "CLASS_OBJPUTROUTCONST", sizeof (meltcdat-> - dstr_502__CLASS_OBJPUTROUTCONST.val) - + dstr_504__CLASS_OBJPUTROUTCONST.val) - 1); - meltcdat->dstr_502__CLASS_OBJPUTROUTCONST.val[21] = (char) 0; - meltcdat->dstr_502__CLASS_OBJPUTROUTCONST.slen = 21; + meltcdat->dstr_504__CLASS_OBJPUTROUTCONST.val[21] = (char) 0; + meltcdat->dstr_504__CLASS_OBJPUTROUTCONST.slen = 21; - /*inirout drout_503__OUTPUCOD_OBJPUTROUTCONSTNOTNULL */ - /*_._VALROUT___V693*/ meltfptr[692] = - (melt_ptr_t) & meltcdat->drout_503__OUTPUCOD_OBJPUTROUTCONSTNOTNULL; - meltcdat->drout_503__OUTPUCOD_OBJPUTROUTCONSTNOTNULL.discr = + /*inirout drout_505__OUTPUCOD_OBJPUTROUTCONSTNOTNULL */ + /*_._VALROUT___V696*/ meltfptr[695] = + (melt_ptr_t) & meltcdat->drout_505__OUTPUCOD_OBJPUTROUTCONSTNOTNULL; + meltcdat->drout_505__OUTPUCOD_OBJPUTROUTCONSTNOTNULL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); - strncpy (meltcdat->drout_503__OUTPUCOD_OBJPUTROUTCONSTNOTNULL.routdescr, + strncpy (meltcdat->drout_505__OUTPUCOD_OBJPUTROUTCONSTNOTNULL.routdescr, "OUTPUCOD_OBJPUTROUTCONSTNOTNULL @warmelt-outobj.melt:4982", MELT_ROUTDESCR_LEN - 1); - meltcdat->drout_503__OUTPUCOD_OBJPUTROUTCONSTNOTNULL.nbval = 5; + meltcdat->drout_505__OUTPUCOD_OBJPUTROUTCONSTNOTNULL.nbval = 5; MELT_ROUTINE_SET_ROUTCODE (&meltcdat-> - drout_503__OUTPUCOD_OBJPUTROUTCONSTNOTNULL, + drout_505__OUTPUCOD_OBJPUTROUTCONSTNOTNULL, meltrout_127_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTROUTCONSTNOTNULL); - /*iniclos dclo_504__OUTPUCOD_OBJPUTROUTCONSTNOTNULL */ - /*_._VALCLO___V694*/ meltfptr[693] = - (melt_ptr_t) & meltcdat->dclo_504__OUTPUCOD_OBJPUTROUTCONSTNOTNULL; - meltcdat->dclo_504__OUTPUCOD_OBJPUTROUTCONSTNOTNULL.discr = + /*iniclos dclo_506__OUTPUCOD_OBJPUTROUTCONSTNOTNULL */ + /*_._VALCLO___V697*/ meltfptr[696] = + (melt_ptr_t) & meltcdat->dclo_506__OUTPUCOD_OBJPUTROUTCONSTNOTNULL; + meltcdat->dclo_506__OUTPUCOD_OBJPUTROUTCONSTNOTNULL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); - meltcdat->dclo_504__OUTPUCOD_OBJPUTROUTCONSTNOTNULL.nbval = 0; + meltcdat->dclo_506__OUTPUCOD_OBJPUTROUTCONSTNOTNULL.nbval = 0; -/*iniobj dsym_505__CLASS_OBJPUTROUTCONSTNOTNULL*/ - /*uniqueobj*/ if (! /*_._VALDATA___V695*/ meltfptr[694]) -/*_._VALDATA___V695*/ meltfptr[694] = - (melt_ptr_t) & meltcdat->dsym_505__CLASS_OBJPUTROUTCONSTNOTNULL; +/*iniobj dsym_507__CLASS_OBJPUTROUTCONSTNOTNULL*/ + /*uniqueobj*/ if (! /*_._VALDATA___V698*/ meltfptr[697]) +/*_._VALDATA___V698*/ meltfptr[697] = + (melt_ptr_t) & meltcdat->dsym_507__CLASS_OBJPUTROUTCONSTNOTNULL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr isobj dsym_505__CLASS_OBJPUTROUTCONSTNOTNULL", + ("iniobj check.discr isobj dsym_507__CLASS_OBJPUTROUTCONSTNOTNULL", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr objmagic dsym_505__CLASS_OBJPUTROUTCONSTNOTNULL", + ("iniobj check.discr objmagic dsym_507__CLASS_OBJPUTROUTCONSTNOTNULL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_505__CLASS_OBJPUTROUTCONSTNOTNULL.meltobj_class = + meltcdat->dsym_507__CLASS_OBJPUTROUTCONSTNOTNULL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_505__CLASS_OBJPUTROUTCONSTNOTNULL.obj_hash = 698971949; - meltcdat->dsym_505__CLASS_OBJPUTROUTCONSTNOTNULL.obj_len = 3; + meltcdat->dsym_507__CLASS_OBJPUTROUTCONSTNOTNULL.obj_hash = 698971949; + meltcdat->dsym_507__CLASS_OBJPUTROUTCONSTNOTNULL.obj_len = 3; -/*inistring dstr_506__CLASS_OBJPUTROUTCONSTNOT*/ - /*_._VALSTR___V696*/ meltfptr[695] = - (melt_ptr_t) & meltcdat->dstr_506__CLASS_OBJPUTROUTCONSTNOT; - meltcdat->dstr_506__CLASS_OBJPUTROUTCONSTNOT.discr = +/*inistring dstr_508__CLASS_OBJPUTROUTCONSTNOT*/ + /*_._VALSTR___V699*/ meltfptr[698] = + (melt_ptr_t) & meltcdat->dstr_508__CLASS_OBJPUTROUTCONSTNOT; + meltcdat->dstr_508__CLASS_OBJPUTROUTCONSTNOT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_506__CLASS_OBJPUTROUTCONSTNOT. + /*small inistring */ strncpy (meltcdat->dstr_508__CLASS_OBJPUTROUTCONSTNOT. val, "CLASS_OBJPUTROUTCONSTNOTNULL", sizeof (meltcdat-> - dstr_506__CLASS_OBJPUTROUTCONSTNOT. + dstr_508__CLASS_OBJPUTROUTCONSTNOT. val) - 1); - meltcdat->dstr_506__CLASS_OBJPUTROUTCONSTNOT.val[28] = (char) 0; - meltcdat->dstr_506__CLASS_OBJPUTROUTCONSTNOT.slen = 28; + meltcdat->dstr_508__CLASS_OBJPUTROUTCONSTNOT.val[28] = (char) 0; + meltcdat->dstr_508__CLASS_OBJPUTROUTCONSTNOT.slen = 28; - /*inirout drout_507__OUTPUCOD_OBJPUTHOOKCONST */ - /*_._VALROUT___V697*/ meltfptr[696] = - (melt_ptr_t) & meltcdat->drout_507__OUTPUCOD_OBJPUTHOOKCONST; - meltcdat->drout_507__OUTPUCOD_OBJPUTHOOKCONST.discr = + /*inirout drout_509__OUTPUCOD_OBJPUTHOOKCONST */ + /*_._VALROUT___V700*/ meltfptr[699] = + (melt_ptr_t) & meltcdat->drout_509__OUTPUCOD_OBJPUTHOOKCONST; + meltcdat->drout_509__OUTPUCOD_OBJPUTHOOKCONST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); - strncpy (meltcdat->drout_507__OUTPUCOD_OBJPUTHOOKCONST.routdescr, + strncpy (meltcdat->drout_509__OUTPUCOD_OBJPUTHOOKCONST.routdescr, "OUTPUCOD_OBJPUTHOOKCONST @warmelt-outobj.melt:5015", MELT_ROUTDESCR_LEN - 1); - meltcdat->drout_507__OUTPUCOD_OBJPUTHOOKCONST.nbval = 8; - MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_507__OUTPUCOD_OBJPUTHOOKCONST, + meltcdat->drout_509__OUTPUCOD_OBJPUTHOOKCONST.nbval = 8; + MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_509__OUTPUCOD_OBJPUTHOOKCONST, meltrout_128_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTHOOKCONST); - /*iniclos dclo_508__OUTPUCOD_OBJPUTHOOKCONST */ - /*_._VALCLO___V698*/ meltfptr[697] = - (melt_ptr_t) & meltcdat->dclo_508__OUTPUCOD_OBJPUTHOOKCONST; - meltcdat->dclo_508__OUTPUCOD_OBJPUTHOOKCONST.discr = + /*iniclos dclo_510__OUTPUCOD_OBJPUTHOOKCONST */ + /*_._VALCLO___V701*/ meltfptr[700] = + (melt_ptr_t) & meltcdat->dclo_510__OUTPUCOD_OBJPUTHOOKCONST; + meltcdat->dclo_510__OUTPUCOD_OBJPUTHOOKCONST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); - meltcdat->dclo_508__OUTPUCOD_OBJPUTHOOKCONST.nbval = 0; + meltcdat->dclo_510__OUTPUCOD_OBJPUTHOOKCONST.nbval = 0; -/*iniobj dsym_509__CLASS_OBJPUTHOOKCONST*/ - /*uniqueobj*/ if (! /*_._VALDATA___V699*/ meltfptr[698]) -/*_._VALDATA___V699*/ meltfptr[698] = - (melt_ptr_t) & meltcdat->dsym_509__CLASS_OBJPUTHOOKCONST; +/*iniobj dsym_511__CLASS_OBJPUTHOOKCONST*/ + /*uniqueobj*/ if (! /*_._VALDATA___V702*/ meltfptr[701]) +/*_._VALDATA___V702*/ meltfptr[701] = + (melt_ptr_t) & meltcdat->dsym_511__CLASS_OBJPUTHOOKCONST; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr isobj dsym_509__CLASS_OBJPUTHOOKCONST", + ("iniobj check.discr isobj dsym_511__CLASS_OBJPUTHOOKCONST", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr objmagic dsym_509__CLASS_OBJPUTHOOKCONST", + ("iniobj check.discr objmagic dsym_511__CLASS_OBJPUTHOOKCONST", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_509__CLASS_OBJPUTHOOKCONST.meltobj_class = + meltcdat->dsym_511__CLASS_OBJPUTHOOKCONST.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_509__CLASS_OBJPUTHOOKCONST.obj_hash = 533859598; - meltcdat->dsym_509__CLASS_OBJPUTHOOKCONST.obj_len = 3; + meltcdat->dsym_511__CLASS_OBJPUTHOOKCONST.obj_hash = 533859598; + meltcdat->dsym_511__CLASS_OBJPUTHOOKCONST.obj_len = 3; -/*inistring dstr_510__CLASS_OBJPUTHOOKCONST*/ - /*_._VALSTR___V700*/ meltfptr[699] = - (melt_ptr_t) & meltcdat->dstr_510__CLASS_OBJPUTHOOKCONST; - meltcdat->dstr_510__CLASS_OBJPUTHOOKCONST.discr = +/*inistring dstr_512__CLASS_OBJPUTHOOKCONST*/ + /*_._VALSTR___V703*/ meltfptr[702] = + (melt_ptr_t) & meltcdat->dstr_512__CLASS_OBJPUTHOOKCONST; + meltcdat->dstr_512__CLASS_OBJPUTHOOKCONST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_510__CLASS_OBJPUTHOOKCONST.val, + /*small inistring */ strncpy (meltcdat->dstr_512__CLASS_OBJPUTHOOKCONST.val, "CLASS_OBJPUTHOOKCONST", sizeof (meltcdat-> - dstr_510__CLASS_OBJPUTHOOKCONST.val) - + dstr_512__CLASS_OBJPUTHOOKCONST.val) - 1); - meltcdat->dstr_510__CLASS_OBJPUTHOOKCONST.val[21] = (char) 0; - meltcdat->dstr_510__CLASS_OBJPUTHOOKCONST.slen = 21; + meltcdat->dstr_512__CLASS_OBJPUTHOOKCONST.val[21] = (char) 0; + meltcdat->dstr_512__CLASS_OBJPUTHOOKCONST.slen = 21; -/*iniobj dsym_511__CLASS_NREP_BOUND_DATA*/ - /*uniqueobj*/ if (! /*_._VALDATA___V701*/ meltfptr[700]) -/*_._VALDATA___V701*/ meltfptr[700] = - (melt_ptr_t) & meltcdat->dsym_511__CLASS_NREP_BOUND_DATA; +/*iniobj dsym_513__CLASS_NREP_BOUND_DATA*/ + /*uniqueobj*/ if (! /*_._VALDATA___V704*/ meltfptr[703]) +/*_._VALDATA___V704*/ meltfptr[703] = + (melt_ptr_t) & meltcdat->dsym_513__CLASS_NREP_BOUND_DATA; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr isobj dsym_511__CLASS_NREP_BOUND_DATA", + ("iniobj check.discr isobj dsym_513__CLASS_NREP_BOUND_DATA", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr objmagic dsym_511__CLASS_NREP_BOUND_DATA", + ("iniobj check.discr objmagic dsym_513__CLASS_NREP_BOUND_DATA", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_511__CLASS_NREP_BOUND_DATA.meltobj_class = + meltcdat->dsym_513__CLASS_NREP_BOUND_DATA.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_511__CLASS_NREP_BOUND_DATA.obj_hash = 580314803; - meltcdat->dsym_511__CLASS_NREP_BOUND_DATA.obj_len = 3; + meltcdat->dsym_513__CLASS_NREP_BOUND_DATA.obj_hash = 580314803; + meltcdat->dsym_513__CLASS_NREP_BOUND_DATA.obj_len = 3; -/*inistring dstr_512__CLASS_NREP_BOUND_DATA*/ - /*_._VALSTR___V702*/ meltfptr[701] = - (melt_ptr_t) & meltcdat->dstr_512__CLASS_NREP_BOUND_DATA; - meltcdat->dstr_512__CLASS_NREP_BOUND_DATA.discr = +/*inistring dstr_514__CLASS_NREP_BOUND_DATA*/ + /*_._VALSTR___V705*/ meltfptr[704] = + (melt_ptr_t) & meltcdat->dstr_514__CLASS_NREP_BOUND_DATA; + meltcdat->dstr_514__CLASS_NREP_BOUND_DATA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_512__CLASS_NREP_BOUND_DATA.val, + /*small inistring */ strncpy (meltcdat->dstr_514__CLASS_NREP_BOUND_DATA.val, "CLASS_NREP_BOUND_DATA", sizeof (meltcdat-> - dstr_512__CLASS_NREP_BOUND_DATA.val) - + dstr_514__CLASS_NREP_BOUND_DATA.val) - 1); - meltcdat->dstr_512__CLASS_NREP_BOUND_DATA.val[21] = (char) 0; - meltcdat->dstr_512__CLASS_NREP_BOUND_DATA.slen = 21; + meltcdat->dstr_514__CLASS_NREP_BOUND_DATA.val[21] = (char) 0; + meltcdat->dstr_514__CLASS_NREP_BOUND_DATA.slen = 21; - /*inirout drout_513__OUTPUCOD_OBJPUTHOOKDATA */ - /*_._VALROUT___V703*/ meltfptr[702] = - (melt_ptr_t) & meltcdat->drout_513__OUTPUCOD_OBJPUTHOOKDATA; - meltcdat->drout_513__OUTPUCOD_OBJPUTHOOKDATA.discr = + /*inirout drout_515__OUTPUCOD_OBJPUTHOOKDATA */ + /*_._VALROUT___V706*/ meltfptr[705] = + (melt_ptr_t) & meltcdat->drout_515__OUTPUCOD_OBJPUTHOOKDATA; + meltcdat->drout_515__OUTPUCOD_OBJPUTHOOKDATA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); - strncpy (meltcdat->drout_513__OUTPUCOD_OBJPUTHOOKDATA.routdescr, + strncpy (meltcdat->drout_515__OUTPUCOD_OBJPUTHOOKDATA.routdescr, "OUTPUCOD_OBJPUTHOOKDATA @warmelt-outobj.melt:5055", MELT_ROUTDESCR_LEN - 1); - meltcdat->drout_513__OUTPUCOD_OBJPUTHOOKDATA.nbval = 9; - MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_513__OUTPUCOD_OBJPUTHOOKDATA, + meltcdat->drout_515__OUTPUCOD_OBJPUTHOOKDATA.nbval = 9; + MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_515__OUTPUCOD_OBJPUTHOOKDATA, meltrout_129_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTHOOKDATA); - /*iniclos dclo_514__OUTPUCOD_OBJPUTHOOKDATA */ - /*_._VALCLO___V704*/ meltfptr[703] = - (melt_ptr_t) & meltcdat->dclo_514__OUTPUCOD_OBJPUTHOOKDATA; - meltcdat->dclo_514__OUTPUCOD_OBJPUTHOOKDATA.discr = + /*iniclos dclo_516__OUTPUCOD_OBJPUTHOOKDATA */ + /*_._VALCLO___V707*/ meltfptr[706] = + (melt_ptr_t) & meltcdat->dclo_516__OUTPUCOD_OBJPUTHOOKDATA; + meltcdat->dclo_516__OUTPUCOD_OBJPUTHOOKDATA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); - meltcdat->dclo_514__OUTPUCOD_OBJPUTHOOKDATA.nbval = 0; + meltcdat->dclo_516__OUTPUCOD_OBJPUTHOOKDATA.nbval = 0; -/*iniobj dsym_515__CLASS_OBJPUTHOOKDATA*/ - /*uniqueobj*/ if (! /*_._VALDATA___V705*/ meltfptr[704]) -/*_._VALDATA___V705*/ meltfptr[704] = - (melt_ptr_t) & meltcdat->dsym_515__CLASS_OBJPUTHOOKDATA; +/*iniobj dsym_517__CLASS_OBJPUTHOOKDATA*/ + /*uniqueobj*/ if (! /*_._VALDATA___V708*/ meltfptr[707]) +/*_._VALDATA___V708*/ meltfptr[707] = + (melt_ptr_t) & meltcdat->dsym_517__CLASS_OBJPUTHOOKDATA; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_515__CLASS_OBJPUTHOOKDATA", + melt_assertmsg ("iniobj check.discr isobj dsym_517__CLASS_OBJPUTHOOKDATA", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr objmagic dsym_515__CLASS_OBJPUTHOOKDATA", + ("iniobj check.discr objmagic dsym_517__CLASS_OBJPUTHOOKDATA", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_515__CLASS_OBJPUTHOOKDATA.meltobj_class = + meltcdat->dsym_517__CLASS_OBJPUTHOOKDATA.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_515__CLASS_OBJPUTHOOKDATA.obj_hash = 877753267; - meltcdat->dsym_515__CLASS_OBJPUTHOOKDATA.obj_len = 3; + meltcdat->dsym_517__CLASS_OBJPUTHOOKDATA.obj_hash = 877753267; + meltcdat->dsym_517__CLASS_OBJPUTHOOKDATA.obj_len = 3; -/*inistring dstr_516__CLASS_OBJPUTHOOKDATA*/ - /*_._VALSTR___V706*/ meltfptr[705] = - (melt_ptr_t) & meltcdat->dstr_516__CLASS_OBJPUTHOOKDATA; - meltcdat->dstr_516__CLASS_OBJPUTHOOKDATA.discr = +/*inistring dstr_518__CLASS_OBJPUTHOOKDATA*/ + /*_._VALSTR___V709*/ meltfptr[708] = + (melt_ptr_t) & meltcdat->dstr_518__CLASS_OBJPUTHOOKDATA; + meltcdat->dstr_518__CLASS_OBJPUTHOOKDATA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_516__CLASS_OBJPUTHOOKDATA.val, + /*small inistring */ strncpy (meltcdat->dstr_518__CLASS_OBJPUTHOOKDATA.val, "CLASS_OBJPUTHOOKDATA", sizeof (meltcdat-> - dstr_516__CLASS_OBJPUTHOOKDATA.val) - + dstr_518__CLASS_OBJPUTHOOKDATA.val) - 1); - meltcdat->dstr_516__CLASS_OBJPUTHOOKDATA.val[20] = (char) 0; - meltcdat->dstr_516__CLASS_OBJPUTHOOKDATA.slen = 20; + meltcdat->dstr_518__CLASS_OBJPUTHOOKDATA.val[20] = (char) 0; + meltcdat->dstr_518__CLASS_OBJPUTHOOKDATA.slen = 20; - /*inirout drout_517__OUTPUCOD_OBJPUTXTRARESULT */ - /*_._VALROUT___V707*/ meltfptr[706] = - (melt_ptr_t) & meltcdat->drout_517__OUTPUCOD_OBJPUTXTRARESULT; - meltcdat->drout_517__OUTPUCOD_OBJPUTXTRARESULT.discr = + /*inirout drout_519__OUTPUCOD_OBJPUTXTRARESULT */ + /*_._VALROUT___V710*/ meltfptr[709] = + (melt_ptr_t) & meltcdat->drout_519__OUTPUCOD_OBJPUTXTRARESULT; + meltcdat->drout_519__OUTPUCOD_OBJPUTXTRARESULT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); - strncpy (meltcdat->drout_517__OUTPUCOD_OBJPUTXTRARESULT.routdescr, + strncpy (meltcdat->drout_519__OUTPUCOD_OBJPUTXTRARESULT.routdescr, "OUTPUCOD_OBJPUTXTRARESULT @warmelt-outobj.melt:5084", MELT_ROUTDESCR_LEN - 1); - meltcdat->drout_517__OUTPUCOD_OBJPUTXTRARESULT.nbval = 10; - MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_517__OUTPUCOD_OBJPUTXTRARESULT, + meltcdat->drout_519__OUTPUCOD_OBJPUTXTRARESULT.nbval = 10; + MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_519__OUTPUCOD_OBJPUTXTRARESULT, meltrout_130_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTXTRARESULT); - /*iniclos dclo_518__OUTPUCOD_OBJPUTXTRARESULT */ - /*_._VALCLO___V708*/ meltfptr[707] = - (melt_ptr_t) & meltcdat->dclo_518__OUTPUCOD_OBJPUTXTRARESULT; - meltcdat->dclo_518__OUTPUCOD_OBJPUTXTRARESULT.discr = + /*iniclos dclo_520__OUTPUCOD_OBJPUTXTRARESULT */ + /*_._VALCLO___V711*/ meltfptr[710] = + (melt_ptr_t) & meltcdat->dclo_520__OUTPUCOD_OBJPUTXTRARESULT; + meltcdat->dclo_520__OUTPUCOD_OBJPUTXTRARESULT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); - meltcdat->dclo_518__OUTPUCOD_OBJPUTXTRARESULT.nbval = 0; + meltcdat->dclo_520__OUTPUCOD_OBJPUTXTRARESULT.nbval = 0; -/*iniobj dsym_519__CLASS_OBJPUTXTRARESULT*/ - /*uniqueobj*/ if (! /*_._VALDATA___V709*/ meltfptr[708]) -/*_._VALDATA___V709*/ meltfptr[708] = - (melt_ptr_t) & meltcdat->dsym_519__CLASS_OBJPUTXTRARESULT; +/*iniobj dsym_521__CLASS_OBJPUTXTRARESULT*/ + /*uniqueobj*/ if (! /*_._VALDATA___V712*/ meltfptr[711]) +/*_._VALDATA___V712*/ meltfptr[711] = + (melt_ptr_t) & meltcdat->dsym_521__CLASS_OBJPUTXTRARESULT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr isobj dsym_519__CLASS_OBJPUTXTRARESULT", + ("iniobj check.discr isobj dsym_521__CLASS_OBJPUTXTRARESULT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr objmagic dsym_519__CLASS_OBJPUTXTRARESULT", + ("iniobj check.discr objmagic dsym_521__CLASS_OBJPUTXTRARESULT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_519__CLASS_OBJPUTXTRARESULT.meltobj_class = + meltcdat->dsym_521__CLASS_OBJPUTXTRARESULT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_519__CLASS_OBJPUTXTRARESULT.obj_hash = 66172370; - meltcdat->dsym_519__CLASS_OBJPUTXTRARESULT.obj_len = 3; + meltcdat->dsym_521__CLASS_OBJPUTXTRARESULT.obj_hash = 66172370; + meltcdat->dsym_521__CLASS_OBJPUTXTRARESULT.obj_len = 3; -/*inistring dstr_520__CLASS_OBJPUTXTRARESULT*/ - /*_._VALSTR___V710*/ meltfptr[709] = - (melt_ptr_t) & meltcdat->dstr_520__CLASS_OBJPUTXTRARESULT; - meltcdat->dstr_520__CLASS_OBJPUTXTRARESULT.discr = +/*inistring dstr_522__CLASS_OBJPUTXTRARESULT*/ + /*_._VALSTR___V713*/ meltfptr[712] = + (melt_ptr_t) & meltcdat->dstr_522__CLASS_OBJPUTXTRARESULT; + meltcdat->dstr_522__CLASS_OBJPUTXTRARESULT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_520__CLASS_OBJPUTXTRARESULT. + /*small inistring */ strncpy (meltcdat->dstr_522__CLASS_OBJPUTXTRARESULT. val, "CLASS_OBJPUTXTRARESULT", sizeof (meltcdat-> - dstr_520__CLASS_OBJPUTXTRARESULT. + dstr_522__CLASS_OBJPUTXTRARESULT. val) - 1); - meltcdat->dstr_520__CLASS_OBJPUTXTRARESULT.val[22] = (char) 0; - meltcdat->dstr_520__CLASS_OBJPUTXTRARESULT.slen = 22; + meltcdat->dstr_522__CLASS_OBJPUTXTRARESULT.val[22] = (char) 0; + meltcdat->dstr_522__CLASS_OBJPUTXTRARESULT.slen = 22; - /*inirout drout_521__OUTPUCOD_OBJEXPV */ - /*_._VALROUT___V711*/ meltfptr[710] = - (melt_ptr_t) & meltcdat->drout_521__OUTPUCOD_OBJEXPV; - meltcdat->drout_521__OUTPUCOD_OBJEXPV.discr = + /*inirout drout_523__OUTPUCOD_OBJEXPV */ + /*_._VALROUT___V714*/ meltfptr[713] = + (melt_ptr_t) & meltcdat->drout_523__OUTPUCOD_OBJEXPV; + meltcdat->drout_523__OUTPUCOD_OBJEXPV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); - strncpy (meltcdat->drout_521__OUTPUCOD_OBJEXPV.routdescr, + strncpy (meltcdat->drout_523__OUTPUCOD_OBJEXPV.routdescr, "OUTPUCOD_OBJEXPV @warmelt-outobj.melt:5125", MELT_ROUTDESCR_LEN - 1); - meltcdat->drout_521__OUTPUCOD_OBJEXPV.nbval = 5; - MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_521__OUTPUCOD_OBJEXPV, + meltcdat->drout_523__OUTPUCOD_OBJEXPV.nbval = 5; + MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_523__OUTPUCOD_OBJEXPV, meltrout_131_WARMELTmiOUTOBJ_OUTPUCOD_OBJEXPV); - /*iniclos dclo_522__OUTPUCOD_OBJEXPV */ - /*_._VALCLO___V712*/ meltfptr[711] = - (melt_ptr_t) & meltcdat->dclo_522__OUTPUCOD_OBJEXPV; - meltcdat->dclo_522__OUTPUCOD_OBJEXPV.discr = + /*iniclos dclo_524__OUTPUCOD_OBJEXPV */ + /*_._VALCLO___V715*/ meltfptr[714] = + (melt_ptr_t) & meltcdat->dclo_524__OUTPUCOD_OBJEXPV; + meltcdat->dclo_524__OUTPUCOD_OBJEXPV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); - meltcdat->dclo_522__OUTPUCOD_OBJEXPV.nbval = 0; + meltcdat->dclo_524__OUTPUCOD_OBJEXPV.nbval = 0; -/*iniobj dsym_523__CLASS_OBJEXPV*/ - /*uniqueobj*/ if (! /*_._VALDATA___V713*/ meltfptr[712]) -/*_._VALDATA___V713*/ meltfptr[712] = - (melt_ptr_t) & meltcdat->dsym_523__CLASS_OBJEXPV; +/*iniobj dsym_525__CLASS_OBJEXPV*/ + /*uniqueobj*/ if (! /*_._VALDATA___V716*/ meltfptr[715]) +/*_._VALDATA___V716*/ meltfptr[715] = + (melt_ptr_t) & meltcdat->dsym_525__CLASS_OBJEXPV; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_523__CLASS_OBJEXPV", + melt_assertmsg ("iniobj check.discr isobj dsym_525__CLASS_OBJEXPV", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr objmagic dsym_523__CLASS_OBJEXPV", + melt_assertmsg ("iniobj check.discr objmagic dsym_525__CLASS_OBJEXPV", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_523__CLASS_OBJEXPV.meltobj_class = + meltcdat->dsym_525__CLASS_OBJEXPV.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_523__CLASS_OBJEXPV.obj_hash = 134484056; - meltcdat->dsym_523__CLASS_OBJEXPV.obj_len = 3; + meltcdat->dsym_525__CLASS_OBJEXPV.obj_hash = 134484056; + meltcdat->dsym_525__CLASS_OBJEXPV.obj_len = 3; -/*inistring dstr_524__CLASS_OBJEXPV*/ - /*_._VALSTR___V714*/ meltfptr[713] = - (melt_ptr_t) & meltcdat->dstr_524__CLASS_OBJEXPV; - meltcdat->dstr_524__CLASS_OBJEXPV.discr = +/*inistring dstr_526__CLASS_OBJEXPV*/ + /*_._VALSTR___V717*/ meltfptr[716] = + (melt_ptr_t) & meltcdat->dstr_526__CLASS_OBJEXPV; + meltcdat->dstr_526__CLASS_OBJEXPV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_524__CLASS_OBJEXPV.val, + /*small inistring */ strncpy (meltcdat->dstr_526__CLASS_OBJEXPV.val, "CLASS_OBJEXPV", - sizeof (meltcdat->dstr_524__CLASS_OBJEXPV. + sizeof (meltcdat->dstr_526__CLASS_OBJEXPV. val) - 1); - meltcdat->dstr_524__CLASS_OBJEXPV.val[13] = (char) 0; - meltcdat->dstr_524__CLASS_OBJEXPV.slen = 13; + meltcdat->dstr_526__CLASS_OBJEXPV.val[13] = (char) 0; + meltcdat->dstr_526__CLASS_OBJEXPV.slen = 13; - /*inirout drout_525__OUTPUCOD_OBJLOCATEDEXPV */ - /*_._VALROUT___V715*/ meltfptr[714] = - (melt_ptr_t) & meltcdat->drout_525__OUTPUCOD_OBJLOCATEDEXPV; - meltcdat->drout_525__OUTPUCOD_OBJLOCATEDEXPV.discr = + /*inirout drout_527__OUTPUCOD_OBJLOCATEDEXPV */ + /*_._VALROUT___V718*/ meltfptr[717] = + (melt_ptr_t) & meltcdat->drout_527__OUTPUCOD_OBJLOCATEDEXPV; + meltcdat->drout_527__OUTPUCOD_OBJLOCATEDEXPV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); - strncpy (meltcdat->drout_525__OUTPUCOD_OBJLOCATEDEXPV.routdescr, + strncpy (meltcdat->drout_527__OUTPUCOD_OBJLOCATEDEXPV.routdescr, "OUTPUCOD_OBJLOCATEDEXPV @warmelt-outobj.melt:5141", MELT_ROUTDESCR_LEN - 1); - meltcdat->drout_525__OUTPUCOD_OBJLOCATEDEXPV.nbval = 8; - MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_525__OUTPUCOD_OBJLOCATEDEXPV, + meltcdat->drout_527__OUTPUCOD_OBJLOCATEDEXPV.nbval = 8; + MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_527__OUTPUCOD_OBJLOCATEDEXPV, meltrout_132_WARMELTmiOUTOBJ_OUTPUCOD_OBJLOCATEDEXPV); - /*iniclos dclo_526__OUTPUCOD_OBJLOCATEDEXPV */ - /*_._VALCLO___V716*/ meltfptr[715] = - (melt_ptr_t) & meltcdat->dclo_526__OUTPUCOD_OBJLOCATEDEXPV; - meltcdat->dclo_526__OUTPUCOD_OBJLOCATEDEXPV.discr = + /*iniclos dclo_528__OUTPUCOD_OBJLOCATEDEXPV */ + /*_._VALCLO___V719*/ meltfptr[718] = + (melt_ptr_t) & meltcdat->dclo_528__OUTPUCOD_OBJLOCATEDEXPV; + meltcdat->dclo_528__OUTPUCOD_OBJLOCATEDEXPV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); - meltcdat->dclo_526__OUTPUCOD_OBJLOCATEDEXPV.nbval = 0; + meltcdat->dclo_528__OUTPUCOD_OBJLOCATEDEXPV.nbval = 0; -/*iniobj dsym_527__CLASS_OBJLOCATEDEXPV*/ - /*uniqueobj*/ if (! /*_._VALDATA___V717*/ meltfptr[716]) -/*_._VALDATA___V717*/ meltfptr[716] = - (melt_ptr_t) & meltcdat->dsym_527__CLASS_OBJLOCATEDEXPV; +/*iniobj dsym_529__CLASS_OBJLOCATEDEXPV*/ + /*uniqueobj*/ if (! /*_._VALDATA___V720*/ meltfptr[719]) +/*_._VALDATA___V720*/ meltfptr[719] = + (melt_ptr_t) & meltcdat->dsym_529__CLASS_OBJLOCATEDEXPV; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_527__CLASS_OBJLOCATEDEXPV", + melt_assertmsg ("iniobj check.discr isobj dsym_529__CLASS_OBJLOCATEDEXPV", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr objmagic dsym_527__CLASS_OBJLOCATEDEXPV", + ("iniobj check.discr objmagic dsym_529__CLASS_OBJLOCATEDEXPV", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_527__CLASS_OBJLOCATEDEXPV.meltobj_class = + meltcdat->dsym_529__CLASS_OBJLOCATEDEXPV.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_527__CLASS_OBJLOCATEDEXPV.obj_hash = 564704332; - meltcdat->dsym_527__CLASS_OBJLOCATEDEXPV.obj_len = 3; + meltcdat->dsym_529__CLASS_OBJLOCATEDEXPV.obj_hash = 564704332; + meltcdat->dsym_529__CLASS_OBJLOCATEDEXPV.obj_len = 3; -/*inistring dstr_528__CLASS_OBJLOCATEDEXPV*/ - /*_._VALSTR___V718*/ meltfptr[717] = - (melt_ptr_t) & meltcdat->dstr_528__CLASS_OBJLOCATEDEXPV; - meltcdat->dstr_528__CLASS_OBJLOCATEDEXPV.discr = +/*inistring dstr_530__CLASS_OBJLOCATEDEXPV*/ + /*_._VALSTR___V721*/ meltfptr[720] = + (melt_ptr_t) & meltcdat->dstr_530__CLASS_OBJLOCATEDEXPV; + meltcdat->dstr_530__CLASS_OBJLOCATEDEXPV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_528__CLASS_OBJLOCATEDEXPV.val, + /*small inistring */ strncpy (meltcdat->dstr_530__CLASS_OBJLOCATEDEXPV.val, "CLASS_OBJLOCATEDEXPV", sizeof (meltcdat-> - dstr_528__CLASS_OBJLOCATEDEXPV.val) - + dstr_530__CLASS_OBJLOCATEDEXPV.val) - 1); - meltcdat->dstr_528__CLASS_OBJLOCATEDEXPV.val[20] = (char) 0; - meltcdat->dstr_528__CLASS_OBJLOCATEDEXPV.slen = 20; + meltcdat->dstr_530__CLASS_OBJLOCATEDEXPV.val[20] = (char) 0; + meltcdat->dstr_530__CLASS_OBJLOCATEDEXPV.slen = 20; - /*inirout drout_529__OUTPUCOD_VERBATIMSTRING */ - /*_._VALROUT___V719*/ meltfptr[718] = - (melt_ptr_t) & meltcdat->drout_529__OUTPUCOD_VERBATIMSTRING; - meltcdat->drout_529__OUTPUCOD_VERBATIMSTRING.discr = + /*inirout drout_531__OUTPUCOD_VERBATIMSTRING */ + /*_._VALROUT___V722*/ meltfptr[721] = + (melt_ptr_t) & meltcdat->drout_531__OUTPUCOD_VERBATIMSTRING; + meltcdat->drout_531__OUTPUCOD_VERBATIMSTRING.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); - strncpy (meltcdat->drout_529__OUTPUCOD_VERBATIMSTRING.routdescr, + strncpy (meltcdat->drout_531__OUTPUCOD_VERBATIMSTRING.routdescr, "OUTPUCOD_VERBATIMSTRING @warmelt-outobj.melt:5182", MELT_ROUTDESCR_LEN - 1); - meltcdat->drout_529__OUTPUCOD_VERBATIMSTRING.nbval = 3; - MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_529__OUTPUCOD_VERBATIMSTRING, + meltcdat->drout_531__OUTPUCOD_VERBATIMSTRING.nbval = 3; + MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_531__OUTPUCOD_VERBATIMSTRING, meltrout_133_WARMELTmiOUTOBJ_OUTPUCOD_VERBATIMSTRING); - /*iniclos dclo_530__OUTPUCOD_VERBATIMSTRING */ - /*_._VALCLO___V720*/ meltfptr[719] = - (melt_ptr_t) & meltcdat->dclo_530__OUTPUCOD_VERBATIMSTRING; - meltcdat->dclo_530__OUTPUCOD_VERBATIMSTRING.discr = + /*iniclos dclo_532__OUTPUCOD_VERBATIMSTRING */ + /*_._VALCLO___V723*/ meltfptr[722] = + (melt_ptr_t) & meltcdat->dclo_532__OUTPUCOD_VERBATIMSTRING; + meltcdat->dclo_532__OUTPUCOD_VERBATIMSTRING.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); - meltcdat->dclo_530__OUTPUCOD_VERBATIMSTRING.nbval = 0; + meltcdat->dclo_532__OUTPUCOD_VERBATIMSTRING.nbval = 0; - /*inirout drout_531__OUTPUCOD_STRING */ - /*_._VALROUT___V721*/ meltfptr[720] = - (melt_ptr_t) & meltcdat->drout_531__OUTPUCOD_STRING; - meltcdat->drout_531__OUTPUCOD_STRING.discr = + /*inirout drout_533__OUTPUCOD_STRING */ + /*_._VALROUT___V724*/ meltfptr[723] = + (melt_ptr_t) & meltcdat->drout_533__OUTPUCOD_STRING; + meltcdat->drout_533__OUTPUCOD_STRING.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); - strncpy (meltcdat->drout_531__OUTPUCOD_STRING.routdescr, + strncpy (meltcdat->drout_533__OUTPUCOD_STRING.routdescr, "OUTPUCOD_STRING @warmelt-outobj.melt:5193", MELT_ROUTDESCR_LEN - 1); - meltcdat->drout_531__OUTPUCOD_STRING.nbval = 3; - MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_531__OUTPUCOD_STRING, + meltcdat->drout_533__OUTPUCOD_STRING.nbval = 3; + MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_533__OUTPUCOD_STRING, meltrout_134_WARMELTmiOUTOBJ_OUTPUCOD_STRING); - /*iniclos dclo_532__OUTPUCOD_STRING */ - /*_._VALCLO___V722*/ meltfptr[721] = - (melt_ptr_t) & meltcdat->dclo_532__OUTPUCOD_STRING; - meltcdat->dclo_532__OUTPUCOD_STRING.discr = + /*iniclos dclo_534__OUTPUCOD_STRING */ + /*_._VALCLO___V725*/ meltfptr[724] = + (melt_ptr_t) & meltcdat->dclo_534__OUTPUCOD_STRING; + meltcdat->dclo_534__OUTPUCOD_STRING.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); - meltcdat->dclo_532__OUTPUCOD_STRING.nbval = 0; + meltcdat->dclo_534__OUTPUCOD_STRING.nbval = 0; - /*inirout drout_533__OUTPUCOD_INTEGER */ - /*_._VALROUT___V723*/ meltfptr[722] = - (melt_ptr_t) & meltcdat->drout_533__OUTPUCOD_INTEGER; - meltcdat->drout_533__OUTPUCOD_INTEGER.discr = + /*inirout drout_535__OUTPUCOD_INTEGER */ + /*_._VALROUT___V726*/ meltfptr[725] = + (melt_ptr_t) & meltcdat->drout_535__OUTPUCOD_INTEGER; + meltcdat->drout_535__OUTPUCOD_INTEGER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); - strncpy (meltcdat->drout_533__OUTPUCOD_INTEGER.routdescr, + strncpy (meltcdat->drout_535__OUTPUCOD_INTEGER.routdescr, "OUTPUCOD_INTEGER @warmelt-outobj.melt:5206", MELT_ROUTDESCR_LEN - 1); - meltcdat->drout_533__OUTPUCOD_INTEGER.nbval = 0; - MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_533__OUTPUCOD_INTEGER, + meltcdat->drout_535__OUTPUCOD_INTEGER.nbval = 0; + MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_535__OUTPUCOD_INTEGER, meltrout_135_WARMELTmiOUTOBJ_OUTPUCOD_INTEGER); - /*iniclos dclo_534__OUTPUCOD_INTEGER */ - /*_._VALCLO___V724*/ meltfptr[723] = - (melt_ptr_t) & meltcdat->dclo_534__OUTPUCOD_INTEGER; - meltcdat->dclo_534__OUTPUCOD_INTEGER.discr = + /*iniclos dclo_536__OUTPUCOD_INTEGER */ + /*_._VALCLO___V727*/ meltfptr[726] = + (melt_ptr_t) & meltcdat->dclo_536__OUTPUCOD_INTEGER; + meltcdat->dclo_536__OUTPUCOD_INTEGER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); - meltcdat->dclo_534__OUTPUCOD_INTEGER.nbval = 0; + meltcdat->dclo_536__OUTPUCOD_INTEGER.nbval = 0; - /*inirout drout_535__OUTPUCOD_FINALRETURN */ - /*_._VALROUT___V725*/ meltfptr[724] = - (melt_ptr_t) & meltcdat->drout_535__OUTPUCOD_FINALRETURN; - meltcdat->drout_535__OUTPUCOD_FINALRETURN.discr = + /*inirout drout_537__OUTPUCOD_FINALRETURN */ + /*_._VALROUT___V728*/ meltfptr[727] = + (melt_ptr_t) & meltcdat->drout_537__OUTPUCOD_FINALRETURN; + meltcdat->drout_537__OUTPUCOD_FINALRETURN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); - strncpy (meltcdat->drout_535__OUTPUCOD_FINALRETURN.routdescr, + strncpy (meltcdat->drout_537__OUTPUCOD_FINALRETURN.routdescr, "OUTPUCOD_FINALRETURN @warmelt-outobj.melt:5213", MELT_ROUTDESCR_LEN - 1); - meltcdat->drout_535__OUTPUCOD_FINALRETURN.nbval = 4; - MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_535__OUTPUCOD_FINALRETURN, + meltcdat->drout_537__OUTPUCOD_FINALRETURN.nbval = 4; + MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_537__OUTPUCOD_FINALRETURN, meltrout_136_WARMELTmiOUTOBJ_OUTPUCOD_FINALRETURN); - /*iniclos dclo_536__OUTPUCOD_FINALRETURN */ - /*_._VALCLO___V726*/ meltfptr[725] = - (melt_ptr_t) & meltcdat->dclo_536__OUTPUCOD_FINALRETURN; - meltcdat->dclo_536__OUTPUCOD_FINALRETURN.discr = + /*iniclos dclo_538__OUTPUCOD_FINALRETURN */ + /*_._VALCLO___V729*/ meltfptr[728] = + (melt_ptr_t) & meltcdat->dclo_538__OUTPUCOD_FINALRETURN; + meltcdat->dclo_538__OUTPUCOD_FINALRETURN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); - meltcdat->dclo_536__OUTPUCOD_FINALRETURN.nbval = 0; + meltcdat->dclo_538__OUTPUCOD_FINALRETURN.nbval = 0; -/*iniobj dsym_537__CLASS_OBJFINALRETURN*/ - /*uniqueobj*/ if (! /*_._VALDATA___V727*/ meltfptr[726]) -/*_._VALDATA___V727*/ meltfptr[726] = - (melt_ptr_t) & meltcdat->dsym_537__CLASS_OBJFINALRETURN; +/*iniobj dsym_539__CLASS_OBJFINALRETURN*/ + /*uniqueobj*/ if (! /*_._VALDATA___V730*/ meltfptr[729]) +/*_._VALDATA___V730*/ meltfptr[729] = + (melt_ptr_t) & meltcdat->dsym_539__CLASS_OBJFINALRETURN; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_537__CLASS_OBJFINALRETURN", + melt_assertmsg ("iniobj check.discr isobj dsym_539__CLASS_OBJFINALRETURN", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr objmagic dsym_537__CLASS_OBJFINALRETURN", + ("iniobj check.discr objmagic dsym_539__CLASS_OBJFINALRETURN", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_537__CLASS_OBJFINALRETURN.meltobj_class = + meltcdat->dsym_539__CLASS_OBJFINALRETURN.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_537__CLASS_OBJFINALRETURN.obj_hash = 650464089; - meltcdat->dsym_537__CLASS_OBJFINALRETURN.obj_len = 3; + meltcdat->dsym_539__CLASS_OBJFINALRETURN.obj_hash = 650464089; + meltcdat->dsym_539__CLASS_OBJFINALRETURN.obj_len = 3; -/*inistring dstr_538__CLASS_OBJFINALRETURN*/ - /*_._VALSTR___V728*/ meltfptr[727] = - (melt_ptr_t) & meltcdat->dstr_538__CLASS_OBJFINALRETURN; - meltcdat->dstr_538__CLASS_OBJFINALRETURN.discr = +/*inistring dstr_540__CLASS_OBJFINALRETURN*/ + /*_._VALSTR___V731*/ meltfptr[730] = + (melt_ptr_t) & meltcdat->dstr_540__CLASS_OBJFINALRETURN; + meltcdat->dstr_540__CLASS_OBJFINALRETURN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_538__CLASS_OBJFINALRETURN.val, + /*small inistring */ strncpy (meltcdat->dstr_540__CLASS_OBJFINALRETURN.val, "CLASS_OBJFINALRETURN", sizeof (meltcdat-> - dstr_538__CLASS_OBJFINALRETURN.val) - + dstr_540__CLASS_OBJFINALRETURN.val) - 1); - meltcdat->dstr_538__CLASS_OBJFINALRETURN.val[20] = (char) 0; - meltcdat->dstr_538__CLASS_OBJFINALRETURN.slen = 20; + meltcdat->dstr_540__CLASS_OBJFINALRETURN.val[20] = (char) 0; + meltcdat->dstr_540__CLASS_OBJFINALRETURN.slen = 20; - /*inirout drout_539__SORTED_NAMED_DICT_TUPLE */ - /*_._VALROUT___V729*/ meltfptr[728] = - (melt_ptr_t) & meltcdat->drout_539__SORTED_NAMED_DICT_TUPLE; - meltcdat->drout_539__SORTED_NAMED_DICT_TUPLE.discr = + /*inirout drout_541__SORTED_NAMED_DICT_TUPLE */ + /*_._VALROUT___V732*/ meltfptr[731] = + (melt_ptr_t) & meltcdat->drout_541__SORTED_NAMED_DICT_TUPLE; + meltcdat->drout_541__SORTED_NAMED_DICT_TUPLE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); - strncpy (meltcdat->drout_539__SORTED_NAMED_DICT_TUPLE.routdescr, + strncpy (meltcdat->drout_541__SORTED_NAMED_DICT_TUPLE.routdescr, "SORTED_NAMED_DICT_TUPLE @warmelt-outobj.melt:5226", MELT_ROUTDESCR_LEN - 1); - meltcdat->drout_539__SORTED_NAMED_DICT_TUPLE.nbval = 5; - MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_539__SORTED_NAMED_DICT_TUPLE, + meltcdat->drout_541__SORTED_NAMED_DICT_TUPLE.nbval = 5; + MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_541__SORTED_NAMED_DICT_TUPLE, meltrout_137_WARMELTmiOUTOBJ_SORTED_NAMED_DICT_TUPLE); - /*iniclos dclo_540__SORTED_NAMED_DICT_TUPLE */ - /*_._VALCLO___V730*/ meltfptr[729] = - (melt_ptr_t) & meltcdat->dclo_540__SORTED_NAMED_DICT_TUPLE; - meltcdat->dclo_540__SORTED_NAMED_DICT_TUPLE.discr = + /*iniclos dclo_542__SORTED_NAMED_DICT_TUPLE */ + /*_._VALCLO___V733*/ meltfptr[732] = + (melt_ptr_t) & meltcdat->dclo_542__SORTED_NAMED_DICT_TUPLE; + meltcdat->dclo_542__SORTED_NAMED_DICT_TUPLE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); - meltcdat->dclo_540__SORTED_NAMED_DICT_TUPLE.nbval = 0; + meltcdat->dclo_542__SORTED_NAMED_DICT_TUPLE.nbval = 0; -/*iniobj dsym_541__COMPARE_NAMED_ALPHA*/ - /*uniqueobj*/ if (! /*_._VALDATA___V731*/ meltfptr[730]) -/*_._VALDATA___V731*/ meltfptr[730] = - (melt_ptr_t) & meltcdat->dsym_541__COMPARE_NAMED_ALPHA; +/*iniobj dsym_543__COMPARE_NAMED_ALPHA*/ + /*uniqueobj*/ if (! /*_._VALDATA___V734*/ meltfptr[733]) +/*_._VALDATA___V734*/ meltfptr[733] = + (melt_ptr_t) & meltcdat->dsym_543__COMPARE_NAMED_ALPHA; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_541__COMPARE_NAMED_ALPHA", + melt_assertmsg ("iniobj check.discr isobj dsym_543__COMPARE_NAMED_ALPHA", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr objmagic dsym_541__COMPARE_NAMED_ALPHA", + ("iniobj check.discr objmagic dsym_543__COMPARE_NAMED_ALPHA", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_541__COMPARE_NAMED_ALPHA.meltobj_class = + meltcdat->dsym_543__COMPARE_NAMED_ALPHA.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_541__COMPARE_NAMED_ALPHA.obj_hash = 155514911; - meltcdat->dsym_541__COMPARE_NAMED_ALPHA.obj_len = 3; + meltcdat->dsym_543__COMPARE_NAMED_ALPHA.obj_hash = 155514911; + meltcdat->dsym_543__COMPARE_NAMED_ALPHA.obj_len = 3; -/*inistring dstr_542__COMPARE_NAMED_ALPHA*/ - /*_._VALSTR___V732*/ meltfptr[731] = - (melt_ptr_t) & meltcdat->dstr_542__COMPARE_NAMED_ALPHA; - meltcdat->dstr_542__COMPARE_NAMED_ALPHA.discr = +/*inistring dstr_544__COMPARE_NAMED_ALPHA*/ + /*_._VALSTR___V735*/ meltfptr[734] = + (melt_ptr_t) & meltcdat->dstr_544__COMPARE_NAMED_ALPHA; + meltcdat->dstr_544__COMPARE_NAMED_ALPHA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_542__COMPARE_NAMED_ALPHA.val, + /*small inistring */ strncpy (meltcdat->dstr_544__COMPARE_NAMED_ALPHA.val, "COMPARE_NAMED_ALPHA", sizeof (meltcdat-> - dstr_542__COMPARE_NAMED_ALPHA.val) - + dstr_544__COMPARE_NAMED_ALPHA.val) - 1); - meltcdat->dstr_542__COMPARE_NAMED_ALPHA.val[19] = (char) 0; - meltcdat->dstr_542__COMPARE_NAMED_ALPHA.slen = 19; + meltcdat->dstr_544__COMPARE_NAMED_ALPHA.val[19] = (char) 0; + meltcdat->dstr_544__COMPARE_NAMED_ALPHA.slen = 19; - /*inirout drout_543__OUTPUT_EXPORTED_OFFSETS */ - /*_._VALROUT___V733*/ meltfptr[732] = - (melt_ptr_t) & meltcdat->drout_543__OUTPUT_EXPORTED_OFFSETS; - meltcdat->drout_543__OUTPUT_EXPORTED_OFFSETS.discr = + /*inirout drout_545__OUTPUT_EXPORTED_OFFSETS */ + /*_._VALROUT___V736*/ meltfptr[735] = + (melt_ptr_t) & meltcdat->drout_545__OUTPUT_EXPORTED_OFFSETS; + meltcdat->drout_545__OUTPUT_EXPORTED_OFFSETS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); - strncpy (meltcdat->drout_543__OUTPUT_EXPORTED_OFFSETS.routdescr, + strncpy (meltcdat->drout_545__OUTPUT_EXPORTED_OFFSETS.routdescr, "OUTPUT_EXPORTED_OFFSETS @warmelt-outobj.melt:5243", MELT_ROUTDESCR_LEN - 1); - meltcdat->drout_543__OUTPUT_EXPORTED_OFFSETS.nbval = 7; - MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_543__OUTPUT_EXPORTED_OFFSETS, + meltcdat->drout_545__OUTPUT_EXPORTED_OFFSETS.nbval = 7; + MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_545__OUTPUT_EXPORTED_OFFSETS, meltrout_138_WARMELTmiOUTOBJ_OUTPUT_EXPORTED_OFFSETS); - /*iniclos dclo_544__OUTPUT_EXPORTED_OFFSETS */ - /*_._VALCLO___V734*/ meltfptr[733] = - (melt_ptr_t) & meltcdat->dclo_544__OUTPUT_EXPORTED_OFFSETS; - meltcdat->dclo_544__OUTPUT_EXPORTED_OFFSETS.discr = + /*iniclos dclo_546__OUTPUT_EXPORTED_OFFSETS */ + /*_._VALCLO___V737*/ meltfptr[736] = + (melt_ptr_t) & meltcdat->dclo_546__OUTPUT_EXPORTED_OFFSETS; + meltcdat->dclo_546__OUTPUT_EXPORTED_OFFSETS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); - meltcdat->dclo_544__OUTPUT_EXPORTED_OFFSETS.nbval = 0; + meltcdat->dclo_546__OUTPUT_EXPORTED_OFFSETS.nbval = 0; -/*iniobj dsym_545__CLASS_ANY_MODULE_CONTEXT*/ - /*uniqueobj*/ if (! /*_._VALDATA___V735*/ meltfptr[734]) -/*_._VALDATA___V735*/ meltfptr[734] = - (melt_ptr_t) & meltcdat->dsym_545__CLASS_ANY_MODULE_CONTEXT; +/*iniobj dsym_547__CLASS_ANY_MODULE_CONTEXT*/ + /*uniqueobj*/ if (! /*_._VALDATA___V738*/ meltfptr[737]) +/*_._VALDATA___V738*/ meltfptr[737] = + (melt_ptr_t) & meltcdat->dsym_547__CLASS_ANY_MODULE_CONTEXT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr isobj dsym_545__CLASS_ANY_MODULE_CONTEXT", + ("iniobj check.discr isobj dsym_547__CLASS_ANY_MODULE_CONTEXT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr objmagic dsym_545__CLASS_ANY_MODULE_CONTEXT", + ("iniobj check.discr objmagic dsym_547__CLASS_ANY_MODULE_CONTEXT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_545__CLASS_ANY_MODULE_CONTEXT.meltobj_class = + meltcdat->dsym_547__CLASS_ANY_MODULE_CONTEXT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_545__CLASS_ANY_MODULE_CONTEXT.obj_hash = 153406004; - meltcdat->dsym_545__CLASS_ANY_MODULE_CONTEXT.obj_len = 3; + meltcdat->dsym_547__CLASS_ANY_MODULE_CONTEXT.obj_hash = 153406004; + meltcdat->dsym_547__CLASS_ANY_MODULE_CONTEXT.obj_len = 3; -/*inistring dstr_546__CLASS_ANY_MODULE_CONTEXT*/ - /*_._VALSTR___V736*/ meltfptr[735] = - (melt_ptr_t) & meltcdat->dstr_546__CLASS_ANY_MODULE_CONTEXT; - meltcdat->dstr_546__CLASS_ANY_MODULE_CONTEXT.discr = +/*inistring dstr_548__CLASS_ANY_MODULE_CONTEXT*/ + /*_._VALSTR___V739*/ meltfptr[738] = + (melt_ptr_t) & meltcdat->dstr_548__CLASS_ANY_MODULE_CONTEXT; + meltcdat->dstr_548__CLASS_ANY_MODULE_CONTEXT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_546__CLASS_ANY_MODULE_CONTEXT. + /*small inistring */ strncpy (meltcdat->dstr_548__CLASS_ANY_MODULE_CONTEXT. val, "CLASS_ANY_MODULE_CONTEXT", sizeof (meltcdat-> - dstr_546__CLASS_ANY_MODULE_CONTEXT. + dstr_548__CLASS_ANY_MODULE_CONTEXT. val) - 1); - meltcdat->dstr_546__CLASS_ANY_MODULE_CONTEXT.val[24] = (char) 0; - meltcdat->dstr_546__CLASS_ANY_MODULE_CONTEXT.slen = 24; + meltcdat->dstr_548__CLASS_ANY_MODULE_CONTEXT.val[24] = (char) 0; + meltcdat->dstr_548__CLASS_ANY_MODULE_CONTEXT.slen = 24; -/*iniobj dsym_547__CLASS_SECONDARY_C_FILE*/ - /*uniqueobj*/ if (! /*_._VALDATA___V737*/ meltfptr[736]) -/*_._VALDATA___V737*/ meltfptr[736] = - (melt_ptr_t) & meltcdat->dsym_547__CLASS_SECONDARY_C_FILE; +/*iniobj dsym_549__CLASS_SECONDARY_C_FILE*/ + /*uniqueobj*/ if (! /*_._VALDATA___V740*/ meltfptr[739]) +/*_._VALDATA___V740*/ meltfptr[739] = + (melt_ptr_t) & meltcdat->dsym_549__CLASS_SECONDARY_C_FILE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr isobj dsym_547__CLASS_SECONDARY_C_FILE", + ("iniobj check.discr isobj dsym_549__CLASS_SECONDARY_C_FILE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr objmagic dsym_547__CLASS_SECONDARY_C_FILE", + ("iniobj check.discr objmagic dsym_549__CLASS_SECONDARY_C_FILE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_547__CLASS_SECONDARY_C_FILE.meltobj_class = + meltcdat->dsym_549__CLASS_SECONDARY_C_FILE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_547__CLASS_SECONDARY_C_FILE.obj_hash = 1020651793; - meltcdat->dsym_547__CLASS_SECONDARY_C_FILE.obj_len = 3; + meltcdat->dsym_549__CLASS_SECONDARY_C_FILE.obj_hash = 1020651793; + meltcdat->dsym_549__CLASS_SECONDARY_C_FILE.obj_len = 3; -/*inistring dstr_548__CLASS_SECONDARY_C_FILE*/ - /*_._VALSTR___V738*/ meltfptr[737] = - (melt_ptr_t) & meltcdat->dstr_548__CLASS_SECONDARY_C_FILE; - meltcdat->dstr_548__CLASS_SECONDARY_C_FILE.discr = +/*inistring dstr_550__CLASS_SECONDARY_C_FILE*/ + /*_._VALSTR___V741*/ meltfptr[740] = + (melt_ptr_t) & meltcdat->dstr_550__CLASS_SECONDARY_C_FILE; + meltcdat->dstr_550__CLASS_SECONDARY_C_FILE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_548__CLASS_SECONDARY_C_FILE. + /*small inistring */ strncpy (meltcdat->dstr_550__CLASS_SECONDARY_C_FILE. val, "CLASS_SECONDARY_C_FILE", sizeof (meltcdat-> - dstr_548__CLASS_SECONDARY_C_FILE. + dstr_550__CLASS_SECONDARY_C_FILE. val) - 1); - meltcdat->dstr_548__CLASS_SECONDARY_C_FILE.val[22] = (char) 0; - meltcdat->dstr_548__CLASS_SECONDARY_C_FILE.slen = 22; + meltcdat->dstr_550__CLASS_SECONDARY_C_FILE.val[22] = (char) 0; + meltcdat->dstr_550__CLASS_SECONDARY_C_FILE.slen = 22; MELT_LOCATION ("warmelt-outobj.melt:5305:/ iniobj"); -/*iniobj dobj_549__CLASS_SECONDARY_C_FILE*/ -/*_._VALDATA___V739*/ meltfptr[738] = - (melt_ptr_t) & meltcdat->dobj_549__CLASS_SECONDARY_C_FILE; +/*iniobj dobj_551__CLASS_SECONDARY_C_FILE*/ +/*_._VALDATA___V742*/ meltfptr[741] = + (melt_ptr_t) & meltcdat->dobj_551__CLASS_SECONDARY_C_FILE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr isobj dobj_549__CLASS_SECONDARY_C_FILE", + ("iniobj check.discr isobj dobj_551__CLASS_SECONDARY_C_FILE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr objmagic dobj_549__CLASS_SECONDARY_C_FILE", + ("iniobj check.discr objmagic dobj_551__CLASS_SECONDARY_C_FILE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dobj_549__CLASS_SECONDARY_C_FILE.meltobj_class = + meltcdat->dobj_551__CLASS_SECONDARY_C_FILE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); - meltcdat->dobj_549__CLASS_SECONDARY_C_FILE.obj_num = MELTOBMAG_OBJECT; - meltcdat->dobj_549__CLASS_SECONDARY_C_FILE.obj_hash = 508027191; - meltcdat->dobj_549__CLASS_SECONDARY_C_FILE.obj_len = 8; + meltcdat->dobj_551__CLASS_SECONDARY_C_FILE.obj_num = MELTOBMAG_OBJECT; + meltcdat->dobj_551__CLASS_SECONDARY_C_FILE.obj_hash = 887375521; + meltcdat->dobj_551__CLASS_SECONDARY_C_FILE.obj_len = 8; -/*inistring dstr_550__CLASS_SECONDARY_C_FILE*/ - /*_._VALSTR___V740*/ meltfptr[739] = - (melt_ptr_t) & meltcdat->dstr_550__CLASS_SECONDARY_C_FILE; - meltcdat->dstr_550__CLASS_SECONDARY_C_FILE.discr = +/*inistring dstr_552__CLASS_SECONDARY_C_FILE*/ + /*_._VALSTR___V743*/ meltfptr[742] = + (melt_ptr_t) & meltcdat->dstr_552__CLASS_SECONDARY_C_FILE; + meltcdat->dstr_552__CLASS_SECONDARY_C_FILE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_550__CLASS_SECONDARY_C_FILE. + /*small inistring */ strncpy (meltcdat->dstr_552__CLASS_SECONDARY_C_FILE. val, "CLASS_SECONDARY_C_FILE", sizeof (meltcdat-> - dstr_550__CLASS_SECONDARY_C_FILE. + dstr_552__CLASS_SECONDARY_C_FILE. val) - 1); - meltcdat->dstr_550__CLASS_SECONDARY_C_FILE.val[22] = (char) 0; - meltcdat->dstr_550__CLASS_SECONDARY_C_FILE.slen = 22; + meltcdat->dstr_552__CLASS_SECONDARY_C_FILE.val[22] = (char) 0; + meltcdat->dstr_552__CLASS_SECONDARY_C_FILE.slen = 22; - /*inimult dtup_551_syCLASS_SECONDARY_C_FILE */ - /*_._VALTUP___V741*/ meltfptr[740] = - (melt_ptr_t) & meltcdat->dtup_551_syCLASS_SECONDARY_C_FILE; - meltcdat->dtup_551_syCLASS_SECONDARY_C_FILE.discr = + /*inimult dtup_553_syCLASS_SECONDARY_C_FILE */ + /*_._VALTUP___V744*/ meltfptr[743] = + (melt_ptr_t) & meltcdat->dtup_553_syCLASS_SECONDARY_C_FILE; + meltcdat->dtup_553_syCLASS_SECONDARY_C_FILE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLASS_SEQUENCE)))); - meltcdat->dtup_551_syCLASS_SECONDARY_C_FILE.nbval = 1; - /*inimult dtup_552_syCLASS_SECONDARY_C_FILE */ - /*_._VALTUP___V750*/ meltfptr[749] = - (melt_ptr_t) & meltcdat->dtup_552_syCLASS_SECONDARY_C_FILE; - meltcdat->dtup_552_syCLASS_SECONDARY_C_FILE.discr = + meltcdat->dtup_553_syCLASS_SECONDARY_C_FILE.nbval = 1; + /*inimult dtup_554_syCLASS_SECONDARY_C_FILE */ + /*_._VALTUP___V753*/ meltfptr[752] = + (melt_ptr_t) & meltcdat->dtup_554_syCLASS_SECONDARY_C_FILE; + meltcdat->dtup_554_syCLASS_SECONDARY_C_FILE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_FIELD_SEQUENCE)))); - meltcdat->dtup_552_syCLASS_SECONDARY_C_FILE.nbval = 4; + meltcdat->dtup_554_syCLASS_SECONDARY_C_FILE.nbval = 4; -/*iniobj dsym_553__SECFIL_MODNAM*/ - /*uniqueobj*/ if (! /*_._VALDATA___V751*/ meltfptr[750]) -/*_._VALDATA___V751*/ meltfptr[750] = - (melt_ptr_t) & meltcdat->dsym_553__SECFIL_MODNAM; +/*iniobj dsym_555__SECFIL_MODNAM*/ + /*uniqueobj*/ if (! /*_._VALDATA___V754*/ meltfptr[753]) +/*_._VALDATA___V754*/ meltfptr[753] = + (melt_ptr_t) & meltcdat->dsym_555__SECFIL_MODNAM; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_553__SECFIL_MODNAM", + melt_assertmsg ("iniobj check.discr isobj dsym_555__SECFIL_MODNAM", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr objmagic dsym_553__SECFIL_MODNAM", + melt_assertmsg ("iniobj check.discr objmagic dsym_555__SECFIL_MODNAM", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_553__SECFIL_MODNAM.meltobj_class = + meltcdat->dsym_555__SECFIL_MODNAM.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_553__SECFIL_MODNAM.obj_hash = 412289055; - meltcdat->dsym_553__SECFIL_MODNAM.obj_len = 3; + meltcdat->dsym_555__SECFIL_MODNAM.obj_hash = 412289055; + meltcdat->dsym_555__SECFIL_MODNAM.obj_len = 3; -/*inistring dstr_554__SECFIL_MODNAM*/ - /*_._VALSTR___V752*/ meltfptr[751] = - (melt_ptr_t) & meltcdat->dstr_554__SECFIL_MODNAM; - meltcdat->dstr_554__SECFIL_MODNAM.discr = +/*inistring dstr_556__SECFIL_MODNAM*/ + /*_._VALSTR___V755*/ meltfptr[754] = + (melt_ptr_t) & meltcdat->dstr_556__SECFIL_MODNAM; + meltcdat->dstr_556__SECFIL_MODNAM.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_554__SECFIL_MODNAM.val, + /*small inistring */ strncpy (meltcdat->dstr_556__SECFIL_MODNAM.val, "SECFIL_MODNAM", - sizeof (meltcdat->dstr_554__SECFIL_MODNAM. + sizeof (meltcdat->dstr_556__SECFIL_MODNAM. val) - 1); - meltcdat->dstr_554__SECFIL_MODNAM.val[13] = (char) 0; - meltcdat->dstr_554__SECFIL_MODNAM.slen = 13; + meltcdat->dstr_556__SECFIL_MODNAM.val[13] = (char) 0; + meltcdat->dstr_556__SECFIL_MODNAM.slen = 13; /*^iniobj */ -/*iniobj dobj_555__SECFIL_MODNAM*/ -/*_._VALDATA___V742*/ meltfptr[741] = - (melt_ptr_t) & meltcdat->dobj_555__SECFIL_MODNAM; +/*iniobj dobj_557__SECFIL_MODNAM*/ +/*_._VALDATA___V745*/ meltfptr[744] = + (melt_ptr_t) & meltcdat->dobj_557__SECFIL_MODNAM; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dobj_555__SECFIL_MODNAM", + melt_assertmsg ("iniobj check.discr isobj dobj_557__SECFIL_MODNAM", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr objmagic dobj_555__SECFIL_MODNAM", + melt_assertmsg ("iniobj check.discr objmagic dobj_557__SECFIL_MODNAM", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dobj_555__SECFIL_MODNAM.meltobj_class = + meltcdat->dobj_557__SECFIL_MODNAM.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); - meltcdat->dobj_555__SECFIL_MODNAM.obj_num = 0; - meltcdat->dobj_555__SECFIL_MODNAM.obj_hash = 1062338626; - meltcdat->dobj_555__SECFIL_MODNAM.obj_len = 4; + meltcdat->dobj_557__SECFIL_MODNAM.obj_num = 0; + meltcdat->dobj_557__SECFIL_MODNAM.obj_hash = 481696497; + meltcdat->dobj_557__SECFIL_MODNAM.obj_len = 4; -/*inistring dstr_556__SECFIL_MODNAM*/ - /*_._VALSTR___V743*/ meltfptr[742] = - (melt_ptr_t) & meltcdat->dstr_556__SECFIL_MODNAM; - meltcdat->dstr_556__SECFIL_MODNAM.discr = +/*inistring dstr_558__SECFIL_MODNAM*/ + /*_._VALSTR___V746*/ meltfptr[745] = + (melt_ptr_t) & meltcdat->dstr_558__SECFIL_MODNAM; + meltcdat->dstr_558__SECFIL_MODNAM.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_556__SECFIL_MODNAM.val, + /*small inistring */ strncpy (meltcdat->dstr_558__SECFIL_MODNAM.val, "SECFIL_MODNAM", - sizeof (meltcdat->dstr_556__SECFIL_MODNAM. + sizeof (meltcdat->dstr_558__SECFIL_MODNAM. val) - 1); - meltcdat->dstr_556__SECFIL_MODNAM.val[13] = (char) 0; - meltcdat->dstr_556__SECFIL_MODNAM.slen = 13; + meltcdat->dstr_558__SECFIL_MODNAM.val[13] = (char) 0; + meltcdat->dstr_558__SECFIL_MODNAM.slen = 13; -/*iniobj dsym_557__SECFIL_PATH*/ - /*uniqueobj*/ if (! /*_._VALDATA___V753*/ meltfptr[752]) -/*_._VALDATA___V753*/ meltfptr[752] = - (melt_ptr_t) & meltcdat->dsym_557__SECFIL_PATH; +/*iniobj dsym_559__SECFIL_PATH*/ + /*uniqueobj*/ if (! /*_._VALDATA___V756*/ meltfptr[755]) +/*_._VALDATA___V756*/ meltfptr[755] = + (melt_ptr_t) & meltcdat->dsym_559__SECFIL_PATH; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_557__SECFIL_PATH", + melt_assertmsg ("iniobj check.discr isobj dsym_559__SECFIL_PATH", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr objmagic dsym_557__SECFIL_PATH", + melt_assertmsg ("iniobj check.discr objmagic dsym_559__SECFIL_PATH", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_557__SECFIL_PATH.meltobj_class = + meltcdat->dsym_559__SECFIL_PATH.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_557__SECFIL_PATH.obj_hash = 1021166889; - meltcdat->dsym_557__SECFIL_PATH.obj_len = 3; + meltcdat->dsym_559__SECFIL_PATH.obj_hash = 1021166889; + meltcdat->dsym_559__SECFIL_PATH.obj_len = 3; -/*inistring dstr_558__SECFIL_PATH*/ - /*_._VALSTR___V754*/ meltfptr[753] = - (melt_ptr_t) & meltcdat->dstr_558__SECFIL_PATH; - meltcdat->dstr_558__SECFIL_PATH.discr = +/*inistring dstr_560__SECFIL_PATH*/ + /*_._VALSTR___V757*/ meltfptr[756] = + (melt_ptr_t) & meltcdat->dstr_560__SECFIL_PATH; + meltcdat->dstr_560__SECFIL_PATH.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_558__SECFIL_PATH.val, + /*small inistring */ strncpy (meltcdat->dstr_560__SECFIL_PATH.val, "SECFIL_PATH", - sizeof (meltcdat->dstr_558__SECFIL_PATH.val) - + sizeof (meltcdat->dstr_560__SECFIL_PATH.val) - 1); - meltcdat->dstr_558__SECFIL_PATH.val[11] = (char) 0; - meltcdat->dstr_558__SECFIL_PATH.slen = 11; + meltcdat->dstr_560__SECFIL_PATH.val[11] = (char) 0; + meltcdat->dstr_560__SECFIL_PATH.slen = 11; /*^iniobj */ -/*iniobj dobj_559__SECFIL_PATH*/ -/*_._VALDATA___V744*/ meltfptr[743] = - (melt_ptr_t) & meltcdat->dobj_559__SECFIL_PATH; +/*iniobj dobj_561__SECFIL_PATH*/ +/*_._VALDATA___V747*/ meltfptr[746] = + (melt_ptr_t) & meltcdat->dobj_561__SECFIL_PATH; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dobj_559__SECFIL_PATH", + melt_assertmsg ("iniobj check.discr isobj dobj_561__SECFIL_PATH", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr objmagic dobj_559__SECFIL_PATH", + melt_assertmsg ("iniobj check.discr objmagic dobj_561__SECFIL_PATH", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dobj_559__SECFIL_PATH.meltobj_class = + meltcdat->dobj_561__SECFIL_PATH.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); - meltcdat->dobj_559__SECFIL_PATH.obj_num = 1; - meltcdat->dobj_559__SECFIL_PATH.obj_hash = 887375521; - meltcdat->dobj_559__SECFIL_PATH.obj_len = 4; + meltcdat->dobj_561__SECFIL_PATH.obj_num = 1; + meltcdat->dobj_561__SECFIL_PATH.obj_hash = 407609046; + meltcdat->dobj_561__SECFIL_PATH.obj_len = 4; -/*inistring dstr_560__SECFIL_PATH*/ - /*_._VALSTR___V745*/ meltfptr[744] = - (melt_ptr_t) & meltcdat->dstr_560__SECFIL_PATH; - meltcdat->dstr_560__SECFIL_PATH.discr = +/*inistring dstr_562__SECFIL_PATH*/ + /*_._VALSTR___V748*/ meltfptr[747] = + (melt_ptr_t) & meltcdat->dstr_562__SECFIL_PATH; + meltcdat->dstr_562__SECFIL_PATH.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_560__SECFIL_PATH.val, + /*small inistring */ strncpy (meltcdat->dstr_562__SECFIL_PATH.val, "SECFIL_PATH", - sizeof (meltcdat->dstr_560__SECFIL_PATH.val) - + sizeof (meltcdat->dstr_562__SECFIL_PATH.val) - 1); - meltcdat->dstr_560__SECFIL_PATH.val[11] = (char) 0; - meltcdat->dstr_560__SECFIL_PATH.slen = 11; + meltcdat->dstr_562__SECFIL_PATH.val[11] = (char) 0; + meltcdat->dstr_562__SECFIL_PATH.slen = 11; -/*iniobj dsym_561__SECFIL_DECLBUF*/ - /*uniqueobj*/ if (! /*_._VALDATA___V755*/ meltfptr[754]) -/*_._VALDATA___V755*/ meltfptr[754] = - (melt_ptr_t) & meltcdat->dsym_561__SECFIL_DECLBUF; +/*iniobj dsym_563__SECFIL_DECLBUF*/ + /*uniqueobj*/ if (! /*_._VALDATA___V758*/ meltfptr[757]) +/*_._VALDATA___V758*/ meltfptr[757] = + (melt_ptr_t) & meltcdat->dsym_563__SECFIL_DECLBUF; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_561__SECFIL_DECLBUF", + melt_assertmsg ("iniobj check.discr isobj dsym_563__SECFIL_DECLBUF", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr objmagic dsym_561__SECFIL_DECLBUF", + melt_assertmsg ("iniobj check.discr objmagic dsym_563__SECFIL_DECLBUF", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_561__SECFIL_DECLBUF.meltobj_class = + meltcdat->dsym_563__SECFIL_DECLBUF.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_561__SECFIL_DECLBUF.obj_hash = 792503811; - meltcdat->dsym_561__SECFIL_DECLBUF.obj_len = 3; + meltcdat->dsym_563__SECFIL_DECLBUF.obj_hash = 792503811; + meltcdat->dsym_563__SECFIL_DECLBUF.obj_len = 3; -/*inistring dstr_562__SECFIL_DECLBUF*/ - /*_._VALSTR___V756*/ meltfptr[755] = - (melt_ptr_t) & meltcdat->dstr_562__SECFIL_DECLBUF; - meltcdat->dstr_562__SECFIL_DECLBUF.discr = +/*inistring dstr_564__SECFIL_DECLBUF*/ + /*_._VALSTR___V759*/ meltfptr[758] = + (melt_ptr_t) & meltcdat->dstr_564__SECFIL_DECLBUF; + meltcdat->dstr_564__SECFIL_DECLBUF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_562__SECFIL_DECLBUF.val, + /*small inistring */ strncpy (meltcdat->dstr_564__SECFIL_DECLBUF.val, "SECFIL_DECLBUF", - sizeof (meltcdat->dstr_562__SECFIL_DECLBUF. + sizeof (meltcdat->dstr_564__SECFIL_DECLBUF. val) - 1); - meltcdat->dstr_562__SECFIL_DECLBUF.val[14] = (char) 0; - meltcdat->dstr_562__SECFIL_DECLBUF.slen = 14; + meltcdat->dstr_564__SECFIL_DECLBUF.val[14] = (char) 0; + meltcdat->dstr_564__SECFIL_DECLBUF.slen = 14; /*^iniobj */ -/*iniobj dobj_563__SECFIL_DECLBUF*/ -/*_._VALDATA___V746*/ meltfptr[745] = - (melt_ptr_t) & meltcdat->dobj_563__SECFIL_DECLBUF; +/*iniobj dobj_565__SECFIL_DECLBUF*/ +/*_._VALDATA___V749*/ meltfptr[748] = + (melt_ptr_t) & meltcdat->dobj_565__SECFIL_DECLBUF; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dobj_563__SECFIL_DECLBUF", + melt_assertmsg ("iniobj check.discr isobj dobj_565__SECFIL_DECLBUF", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr objmagic dobj_563__SECFIL_DECLBUF", + melt_assertmsg ("iniobj check.discr objmagic dobj_565__SECFIL_DECLBUF", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dobj_563__SECFIL_DECLBUF.meltobj_class = + meltcdat->dobj_565__SECFIL_DECLBUF.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); - meltcdat->dobj_563__SECFIL_DECLBUF.obj_num = 2; - meltcdat->dobj_563__SECFIL_DECLBUF.obj_hash = 481696497; - meltcdat->dobj_563__SECFIL_DECLBUF.obj_len = 4; + meltcdat->dobj_565__SECFIL_DECLBUF.obj_num = 2; + meltcdat->dobj_565__SECFIL_DECLBUF.obj_hash = 650429960; + meltcdat->dobj_565__SECFIL_DECLBUF.obj_len = 4; -/*inistring dstr_564__SECFIL_DECLBUF*/ - /*_._VALSTR___V747*/ meltfptr[746] = - (melt_ptr_t) & meltcdat->dstr_564__SECFIL_DECLBUF; - meltcdat->dstr_564__SECFIL_DECLBUF.discr = +/*inistring dstr_566__SECFIL_DECLBUF*/ + /*_._VALSTR___V750*/ meltfptr[749] = + (melt_ptr_t) & meltcdat->dstr_566__SECFIL_DECLBUF; + meltcdat->dstr_566__SECFIL_DECLBUF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_564__SECFIL_DECLBUF.val, + /*small inistring */ strncpy (meltcdat->dstr_566__SECFIL_DECLBUF.val, "SECFIL_DECLBUF", - sizeof (meltcdat->dstr_564__SECFIL_DECLBUF. + sizeof (meltcdat->dstr_566__SECFIL_DECLBUF. val) - 1); - meltcdat->dstr_564__SECFIL_DECLBUF.val[14] = (char) 0; - meltcdat->dstr_564__SECFIL_DECLBUF.slen = 14; + meltcdat->dstr_566__SECFIL_DECLBUF.val[14] = (char) 0; + meltcdat->dstr_566__SECFIL_DECLBUF.slen = 14; -/*iniobj dsym_565__SECFIL_IMPLBUF*/ - /*uniqueobj*/ if (! /*_._VALDATA___V757*/ meltfptr[756]) -/*_._VALDATA___V757*/ meltfptr[756] = - (melt_ptr_t) & meltcdat->dsym_565__SECFIL_IMPLBUF; +/*iniobj dsym_567__SECFIL_IMPLBUF*/ + /*uniqueobj*/ if (! /*_._VALDATA___V760*/ meltfptr[759]) +/*_._VALDATA___V760*/ meltfptr[759] = + (melt_ptr_t) & meltcdat->dsym_567__SECFIL_IMPLBUF; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_565__SECFIL_IMPLBUF", + melt_assertmsg ("iniobj check.discr isobj dsym_567__SECFIL_IMPLBUF", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr objmagic dsym_565__SECFIL_IMPLBUF", + melt_assertmsg ("iniobj check.discr objmagic dsym_567__SECFIL_IMPLBUF", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_565__SECFIL_IMPLBUF.meltobj_class = + meltcdat->dsym_567__SECFIL_IMPLBUF.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_565__SECFIL_IMPLBUF.obj_hash = 143691030; - meltcdat->dsym_565__SECFIL_IMPLBUF.obj_len = 3; + meltcdat->dsym_567__SECFIL_IMPLBUF.obj_hash = 143691030; + meltcdat->dsym_567__SECFIL_IMPLBUF.obj_len = 3; -/*inistring dstr_566__SECFIL_IMPLBUF*/ - /*_._VALSTR___V758*/ meltfptr[757] = - (melt_ptr_t) & meltcdat->dstr_566__SECFIL_IMPLBUF; - meltcdat->dstr_566__SECFIL_IMPLBUF.discr = +/*inistring dstr_568__SECFIL_IMPLBUF*/ + /*_._VALSTR___V761*/ meltfptr[760] = + (melt_ptr_t) & meltcdat->dstr_568__SECFIL_IMPLBUF; + meltcdat->dstr_568__SECFIL_IMPLBUF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_566__SECFIL_IMPLBUF.val, + /*small inistring */ strncpy (meltcdat->dstr_568__SECFIL_IMPLBUF.val, "SECFIL_IMPLBUF", - sizeof (meltcdat->dstr_566__SECFIL_IMPLBUF. + sizeof (meltcdat->dstr_568__SECFIL_IMPLBUF. val) - 1); - meltcdat->dstr_566__SECFIL_IMPLBUF.val[14] = (char) 0; - meltcdat->dstr_566__SECFIL_IMPLBUF.slen = 14; + meltcdat->dstr_568__SECFIL_IMPLBUF.val[14] = (char) 0; + meltcdat->dstr_568__SECFIL_IMPLBUF.slen = 14; /*^iniobj */ -/*iniobj dobj_567__SECFIL_IMPLBUF*/ -/*_._VALDATA___V748*/ meltfptr[747] = - (melt_ptr_t) & meltcdat->dobj_567__SECFIL_IMPLBUF; +/*iniobj dobj_569__SECFIL_IMPLBUF*/ +/*_._VALDATA___V751*/ meltfptr[750] = + (melt_ptr_t) & meltcdat->dobj_569__SECFIL_IMPLBUF; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dobj_567__SECFIL_IMPLBUF", + melt_assertmsg ("iniobj check.discr isobj dobj_569__SECFIL_IMPLBUF", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr objmagic dobj_567__SECFIL_IMPLBUF", + melt_assertmsg ("iniobj check.discr objmagic dobj_569__SECFIL_IMPLBUF", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dobj_567__SECFIL_IMPLBUF.meltobj_class = + meltcdat->dobj_569__SECFIL_IMPLBUF.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); - meltcdat->dobj_567__SECFIL_IMPLBUF.obj_num = 3; - meltcdat->dobj_567__SECFIL_IMPLBUF.obj_hash = 407609046; - meltcdat->dobj_567__SECFIL_IMPLBUF.obj_len = 4; + meltcdat->dobj_569__SECFIL_IMPLBUF.obj_num = 3; + meltcdat->dobj_569__SECFIL_IMPLBUF.obj_hash = 463612792; + meltcdat->dobj_569__SECFIL_IMPLBUF.obj_len = 4; -/*inistring dstr_568__SECFIL_IMPLBUF*/ - /*_._VALSTR___V749*/ meltfptr[748] = - (melt_ptr_t) & meltcdat->dstr_568__SECFIL_IMPLBUF; - meltcdat->dstr_568__SECFIL_IMPLBUF.discr = +/*inistring dstr_570__SECFIL_IMPLBUF*/ + /*_._VALSTR___V752*/ meltfptr[751] = + (melt_ptr_t) & meltcdat->dstr_570__SECFIL_IMPLBUF; + meltcdat->dstr_570__SECFIL_IMPLBUF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_568__SECFIL_IMPLBUF.val, + /*small inistring */ strncpy (meltcdat->dstr_570__SECFIL_IMPLBUF.val, "SECFIL_IMPLBUF", - sizeof (meltcdat->dstr_568__SECFIL_IMPLBUF. + sizeof (meltcdat->dstr_570__SECFIL_IMPLBUF. val) - 1); - meltcdat->dstr_568__SECFIL_IMPLBUF.val[14] = (char) 0; - meltcdat->dstr_568__SECFIL_IMPLBUF.slen = 14; + meltcdat->dstr_570__SECFIL_IMPLBUF.val[14] = (char) 0; + meltcdat->dstr_570__SECFIL_IMPLBUF.slen = 14; -/*iniobj dsym_569__GENERATED_C_FILENAME*/ - /*uniqueobj*/ if (! /*_._VALDATA___V759*/ meltfptr[758]) -/*_._VALDATA___V759*/ meltfptr[758] = - (melt_ptr_t) & meltcdat->dsym_569__GENERATED_C_FILENAME; +/*iniobj dsym_571__GENERATED_C_FILENAME*/ + /*uniqueobj*/ if (! /*_._VALDATA___V762*/ meltfptr[761]) +/*_._VALDATA___V762*/ meltfptr[761] = + (melt_ptr_t) & meltcdat->dsym_571__GENERATED_C_FILENAME; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_569__GENERATED_C_FILENAME", + melt_assertmsg ("iniobj check.discr isobj dsym_571__GENERATED_C_FILENAME", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr objmagic dsym_569__GENERATED_C_FILENAME", + ("iniobj check.discr objmagic dsym_571__GENERATED_C_FILENAME", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_569__GENERATED_C_FILENAME.meltobj_class = + meltcdat->dsym_571__GENERATED_C_FILENAME.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_569__GENERATED_C_FILENAME.obj_hash = 560876936; - meltcdat->dsym_569__GENERATED_C_FILENAME.obj_len = 3; + meltcdat->dsym_571__GENERATED_C_FILENAME.obj_hash = 560876936; + meltcdat->dsym_571__GENERATED_C_FILENAME.obj_len = 3; -/*inistring dstr_570__GENERATED_C_FILENAME*/ - /*_._VALSTR___V760*/ meltfptr[759] = - (melt_ptr_t) & meltcdat->dstr_570__GENERATED_C_FILENAME; - meltcdat->dstr_570__GENERATED_C_FILENAME.discr = +/*inistring dstr_572__GENERATED_C_FILENAME*/ + /*_._VALSTR___V763*/ meltfptr[762] = + (melt_ptr_t) & meltcdat->dstr_572__GENERATED_C_FILENAME; + meltcdat->dstr_572__GENERATED_C_FILENAME.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_570__GENERATED_C_FILENAME.val, + /*small inistring */ strncpy (meltcdat->dstr_572__GENERATED_C_FILENAME.val, "GENERATED_C_FILENAME", sizeof (meltcdat-> - dstr_570__GENERATED_C_FILENAME.val) - + dstr_572__GENERATED_C_FILENAME.val) - 1); - meltcdat->dstr_570__GENERATED_C_FILENAME.val[20] = (char) 0; - meltcdat->dstr_570__GENERATED_C_FILENAME.slen = 20; + meltcdat->dstr_572__GENERATED_C_FILENAME.val[20] = (char) 0; + meltcdat->dstr_572__GENERATED_C_FILENAME.slen = 20; MELT_LOCATION ("warmelt-outobj.melt:5314:/ iniobj"); -/*iniobj dobj_571__GENERATED_C_FILENAME*/ -/*_._VALDATA___V761*/ meltfptr[760] = - (melt_ptr_t) & meltcdat->dobj_571__GENERATED_C_FILENAME; +/*iniobj dobj_573__GENERATED_C_FILENAME*/ +/*_._VALDATA___V764*/ meltfptr[763] = + (melt_ptr_t) & meltcdat->dobj_573__GENERATED_C_FILENAME; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dobj_571__GENERATED_C_FILENAME", + melt_assertmsg ("iniobj check.discr isobj dobj_573__GENERATED_C_FILENAME", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr objmagic dobj_571__GENERATED_C_FILENAME", + ("iniobj check.discr objmagic dobj_573__GENERATED_C_FILENAME", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dobj_571__GENERATED_C_FILENAME.meltobj_class = + meltcdat->dobj_573__GENERATED_C_FILENAME.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - meltcdat->dobj_571__GENERATED_C_FILENAME.obj_hash = 525586632; - meltcdat->dobj_571__GENERATED_C_FILENAME.obj_len = 5; + meltcdat->dobj_573__GENERATED_C_FILENAME.obj_hash = 767593078; + meltcdat->dobj_573__GENERATED_C_FILENAME.obj_len = 5; - /*inimult dtup_572_syGENERATED_C_FILENAME */ - /*_._VALTUP___V781*/ meltfptr[780] = - (melt_ptr_t) & meltcdat->dtup_572_syGENERATED_C_FILENAME; - meltcdat->dtup_572_syGENERATED_C_FILENAME.discr = + /*inimult dtup_574_syGENERATED_C_FILENAME */ + /*_._VALTUP___V784*/ meltfptr[783] = + (melt_ptr_t) & meltcdat->dtup_574_syGENERATED_C_FILENAME; + meltcdat->dtup_574_syGENERATED_C_FILENAME.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_MULTIPLE)))); - meltcdat->dtup_572_syGENERATED_C_FILENAME.nbval = 9; - /*inimult dtup_573_syGENERATED_C_FILENAME */ - /*_._VALTUP___V775*/ meltfptr[774] = - (melt_ptr_t) & meltcdat->dtup_573_syGENERATED_C_FILENAME; - meltcdat->dtup_573_syGENERATED_C_FILENAME.discr = + meltcdat->dtup_574_syGENERATED_C_FILENAME.nbval = 9; + /*inimult dtup_575_syGENERATED_C_FILENAME */ + /*_._VALTUP___V778*/ meltfptr[777] = + (melt_ptr_t) & meltcdat->dtup_575_syGENERATED_C_FILENAME; + meltcdat->dtup_575_syGENERATED_C_FILENAME.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_MULTIPLE)))); - meltcdat->dtup_573_syGENERATED_C_FILENAME.nbval = 4; + meltcdat->dtup_575_syGENERATED_C_FILENAME.nbval = 4; -/*iniobj dsym_574__DISCR*/ - /*uniqueobj*/ if (! /*_._VALDATA___V764*/ meltfptr[763]) -/*_._VALDATA___V764*/ meltfptr[763] = - (melt_ptr_t) & meltcdat->dsym_574__DISCR; +/*iniobj dsym_576__DISCR*/ + /*uniqueobj*/ if (! /*_._VALDATA___V767*/ meltfptr[766]) +/*_._VALDATA___V767*/ meltfptr[766] = + (melt_ptr_t) & meltcdat->dsym_576__DISCR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_574__DISCR", + melt_assertmsg ("iniobj check.discr isobj dsym_576__DISCR", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr objmagic dsym_574__DISCR", + melt_assertmsg ("iniobj check.discr objmagic dsym_576__DISCR", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_574__DISCR.meltobj_class = + meltcdat->dsym_576__DISCR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_574__DISCR.obj_hash = 95458406; - meltcdat->dsym_574__DISCR.obj_len = 3; + meltcdat->dsym_576__DISCR.obj_hash = 95458406; + meltcdat->dsym_576__DISCR.obj_len = 3; -/*inistring dstr_575__DISCR*/ - /*_._VALSTR___V765*/ meltfptr[764] = - (melt_ptr_t) & meltcdat->dstr_575__DISCR; - meltcdat->dstr_575__DISCR.discr = +/*inistring dstr_577__DISCR*/ + /*_._VALSTR___V768*/ meltfptr[767] = + (melt_ptr_t) & meltcdat->dstr_577__DISCR; + meltcdat->dstr_577__DISCR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_575__DISCR.val, "DISCR", - sizeof (meltcdat->dstr_575__DISCR.val) - 1); - meltcdat->dstr_575__DISCR.val[5] = (char) 0; - meltcdat->dstr_575__DISCR.slen = 5; + /*small inistring */ strncpy (meltcdat->dstr_577__DISCR.val, "DISCR", + sizeof (meltcdat->dstr_577__DISCR.val) - 1); + meltcdat->dstr_577__DISCR.val[5] = (char) 0; + meltcdat->dstr_577__DISCR.slen = 5; /*^iniobj */ -/*iniobj dobj_576*/ -/*_._VALDATA___V763*/ meltfptr[762] = (melt_ptr_t) & meltcdat->dobj_576; +/*iniobj dobj_578*/ +/*_._VALDATA___V766*/ meltfptr[765] = (melt_ptr_t) & meltcdat->dobj_578; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dobj_576", + melt_assertmsg ("iniobj check.discr isobj dobj_578", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr objmagic dobj_576", + melt_assertmsg ("iniobj check.discr objmagic dobj_578", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dobj_576.meltobj_class = + meltcdat->dobj_578.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); - meltcdat->dobj_576.obj_num = 0; - meltcdat->dobj_576.obj_hash = 208954991; - meltcdat->dobj_576.obj_len = 2; + meltcdat->dobj_578.obj_num = 0; + meltcdat->dobj_578.obj_hash = 183773867; + meltcdat->dobj_578.obj_len = 2; -/*iniobj dsym_577__BASE*/ - /*uniqueobj*/ if (! /*_._VALDATA___V767*/ meltfptr[766]) -/*_._VALDATA___V767*/ meltfptr[766] = - (melt_ptr_t) & meltcdat->dsym_577__BASE; +/*iniobj dsym_579__BASE*/ + /*uniqueobj*/ if (! /*_._VALDATA___V770*/ meltfptr[769]) +/*_._VALDATA___V770*/ meltfptr[769] = + (melt_ptr_t) & meltcdat->dsym_579__BASE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_577__BASE", + melt_assertmsg ("iniobj check.discr isobj dsym_579__BASE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr objmagic dsym_577__BASE", + melt_assertmsg ("iniobj check.discr objmagic dsym_579__BASE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_577__BASE.meltobj_class = + meltcdat->dsym_579__BASE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_577__BASE.obj_hash = 609649580; - meltcdat->dsym_577__BASE.obj_len = 3; + meltcdat->dsym_579__BASE.obj_hash = 609649580; + meltcdat->dsym_579__BASE.obj_len = 3; -/*inistring dstr_578__BASE*/ - /*_._VALSTR___V768*/ meltfptr[767] = - (melt_ptr_t) & meltcdat->dstr_578__BASE; - meltcdat->dstr_578__BASE.discr = +/*inistring dstr_580__BASE*/ + /*_._VALSTR___V771*/ meltfptr[770] = + (melt_ptr_t) & meltcdat->dstr_580__BASE; + meltcdat->dstr_580__BASE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_578__BASE.val, "BASE", - sizeof (meltcdat->dstr_578__BASE.val) - 1); - meltcdat->dstr_578__BASE.val[4] = (char) 0; - meltcdat->dstr_578__BASE.slen = 4; + /*small inistring */ strncpy (meltcdat->dstr_580__BASE.val, "BASE", + sizeof (meltcdat->dstr_580__BASE.val) - 1); + meltcdat->dstr_580__BASE.val[4] = (char) 0; + meltcdat->dstr_580__BASE.slen = 4; /*^iniobj */ -/*iniobj dobj_579*/ -/*_._VALDATA___V766*/ meltfptr[765] = (melt_ptr_t) & meltcdat->dobj_579; +/*iniobj dobj_581*/ +/*_._VALDATA___V769*/ meltfptr[768] = (melt_ptr_t) & meltcdat->dobj_581; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dobj_579", + melt_assertmsg ("iniobj check.discr isobj dobj_581", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr objmagic dobj_579", + melt_assertmsg ("iniobj check.discr objmagic dobj_581", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dobj_579.meltobj_class = + meltcdat->dobj_581.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); - meltcdat->dobj_579.obj_num = 1; - meltcdat->dobj_579.obj_hash = 220038275; - meltcdat->dobj_579.obj_len = 2; + meltcdat->dobj_581.obj_num = 1; + meltcdat->dobj_581.obj_hash = 1047146528; + meltcdat->dobj_581.obj_len = 2; -/*iniobj dsym_580__DIR*/ - /*uniqueobj*/ if (! /*_._VALDATA___V770*/ meltfptr[769]) -/*_._VALDATA___V770*/ meltfptr[769] = - (melt_ptr_t) & meltcdat->dsym_580__DIR; +/*iniobj dsym_582__DIR*/ + /*uniqueobj*/ if (! /*_._VALDATA___V773*/ meltfptr[772]) +/*_._VALDATA___V773*/ meltfptr[772] = + (melt_ptr_t) & meltcdat->dsym_582__DIR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_580__DIR", + melt_assertmsg ("iniobj check.discr isobj dsym_582__DIR", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr objmagic dsym_580__DIR", + melt_assertmsg ("iniobj check.discr objmagic dsym_582__DIR", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_580__DIR.meltobj_class = + meltcdat->dsym_582__DIR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_580__DIR.obj_hash = 922498881; - meltcdat->dsym_580__DIR.obj_len = 3; + meltcdat->dsym_582__DIR.obj_hash = 922498881; + meltcdat->dsym_582__DIR.obj_len = 3; -/*inistring dstr_581__DIR*/ - /*_._VALSTR___V771*/ meltfptr[770] = (melt_ptr_t) & meltcdat->dstr_581__DIR; - meltcdat->dstr_581__DIR.discr = +/*inistring dstr_583__DIR*/ + /*_._VALSTR___V774*/ meltfptr[773] = (melt_ptr_t) & meltcdat->dstr_583__DIR; + meltcdat->dstr_583__DIR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_581__DIR.val, "DIR", - sizeof (meltcdat->dstr_581__DIR.val) - 1); - meltcdat->dstr_581__DIR.val[3] = (char) 0; - meltcdat->dstr_581__DIR.slen = 3; + /*small inistring */ strncpy (meltcdat->dstr_583__DIR.val, "DIR", + sizeof (meltcdat->dstr_583__DIR.val) - 1); + meltcdat->dstr_583__DIR.val[3] = (char) 0; + meltcdat->dstr_583__DIR.slen = 3; /*^iniobj */ -/*iniobj dobj_582*/ -/*_._VALDATA___V769*/ meltfptr[768] = (melt_ptr_t) & meltcdat->dobj_582; +/*iniobj dobj_584*/ +/*_._VALDATA___V772*/ meltfptr[771] = (melt_ptr_t) & meltcdat->dobj_584; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dobj_582", + melt_assertmsg ("iniobj check.discr isobj dobj_584", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr objmagic dobj_582", + melt_assertmsg ("iniobj check.discr objmagic dobj_584", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dobj_582.meltobj_class = + meltcdat->dobj_584.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); - meltcdat->dobj_582.obj_num = 2; - meltcdat->dobj_582.obj_hash = 281445044; - meltcdat->dobj_582.obj_len = 2; + meltcdat->dobj_584.obj_num = 2; + meltcdat->dobj_584.obj_hash = 533907036; + meltcdat->dobj_584.obj_len = 2; -/*iniobj dsym_583__NUM*/ - /*uniqueobj*/ if (! /*_._VALDATA___V773*/ meltfptr[772]) -/*_._VALDATA___V773*/ meltfptr[772] = - (melt_ptr_t) & meltcdat->dsym_583__NUM; +/*iniobj dsym_585__NUM*/ + /*uniqueobj*/ if (! /*_._VALDATA___V776*/ meltfptr[775]) +/*_._VALDATA___V776*/ meltfptr[775] = + (melt_ptr_t) & meltcdat->dsym_585__NUM; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_583__NUM", + melt_assertmsg ("iniobj check.discr isobj dsym_585__NUM", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr objmagic dsym_583__NUM", + melt_assertmsg ("iniobj check.discr objmagic dsym_585__NUM", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_583__NUM.meltobj_class = + meltcdat->dsym_585__NUM.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_583__NUM.obj_hash = 129664091; - meltcdat->dsym_583__NUM.obj_len = 3; + meltcdat->dsym_585__NUM.obj_hash = 129664091; + meltcdat->dsym_585__NUM.obj_len = 3; -/*inistring dstr_584__NUM*/ - /*_._VALSTR___V774*/ meltfptr[773] = (melt_ptr_t) & meltcdat->dstr_584__NUM; - meltcdat->dstr_584__NUM.discr = +/*inistring dstr_586__NUM*/ + /*_._VALSTR___V777*/ meltfptr[776] = (melt_ptr_t) & meltcdat->dstr_586__NUM; + meltcdat->dstr_586__NUM.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_584__NUM.val, "NUM", - sizeof (meltcdat->dstr_584__NUM.val) - 1); - meltcdat->dstr_584__NUM.val[3] = (char) 0; - meltcdat->dstr_584__NUM.slen = 3; + /*small inistring */ strncpy (meltcdat->dstr_586__NUM.val, "NUM", + sizeof (meltcdat->dstr_586__NUM.val) - 1); + meltcdat->dstr_586__NUM.val[3] = (char) 0; + meltcdat->dstr_586__NUM.slen = 3; /*^iniobj */ -/*iniobj dobj_585*/ -/*_._VALDATA___V772*/ meltfptr[771] = (melt_ptr_t) & meltcdat->dobj_585; +/*iniobj dobj_587*/ +/*_._VALDATA___V775*/ meltfptr[774] = (melt_ptr_t) & meltcdat->dobj_587; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dobj_585", + melt_assertmsg ("iniobj check.discr isobj dobj_587", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr objmagic dobj_585", + melt_assertmsg ("iniobj check.discr objmagic dobj_587", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dobj_585.meltobj_class = + meltcdat->dobj_587.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); - meltcdat->dobj_585.obj_num = 3; - meltcdat->dobj_585.obj_hash = 133946191; - meltcdat->dobj_585.obj_len = 2; + meltcdat->dobj_587.obj_num = 3; + meltcdat->dobj_587.obj_hash = 681537842; + meltcdat->dobj_587.obj_len = 2; -/*inistring dstr_586__meltgc_new_string_genera*/ - /*_._VALSTR___V776*/ meltfptr[775] = - (melt_ptr_t) & meltcdat->dstr_586__meltgc_new_string_genera; - meltcdat->dstr_586__meltgc_new_string_genera.discr = +/*inistring dstr_588__meltgc_new_string_genera*/ + /*_._VALSTR___V779*/ meltfptr[778] = + (melt_ptr_t) & meltcdat->dstr_588__meltgc_new_string_genera; + meltcdat->dstr_588__meltgc_new_string_genera.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_VERBATIM_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_586__meltgc_new_string_genera.val, "meltgc_new_string_generated_c_filename /* generated_c_filename */\ + /*small inistring */ strncpy (meltcdat->dstr_588__meltgc_new_string_genera.val, "meltgc_new_string_generated_c_filename /* generated_c_filename */\ \ \n ((meltobject_ptr_t) (", sizeof - (meltcdat->dstr_586__meltgc_new_string_genera.val) - 1); - meltcdat->dstr_586__meltgc_new_string_genera.val[93] = (char) 0; - meltcdat->dstr_586__meltgc_new_string_genera.slen = 93; + (meltcdat->dstr_588__meltgc_new_string_genera.val) - 1); + meltcdat->dstr_588__meltgc_new_string_genera.val[93] = (char) 0; + meltcdat->dstr_588__meltgc_new_string_genera.slen = 93; -/*inistring dstr_587__melt_string_str*/ - /*_._VALSTR___V777*/ meltfptr[776] = - (melt_ptr_t) & meltcdat->dstr_587__melt_string_str; - meltcdat->dstr_587__melt_string_str.discr = +/*inistring dstr_589__melt_string_str*/ + /*_._VALSTR___V780*/ meltfptr[779] = + (melt_ptr_t) & meltcdat->dstr_589__melt_string_str; + meltcdat->dstr_589__melt_string_str.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_VERBATIM_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_587__melt_string_str.val, + /*small inistring */ strncpy (meltcdat->dstr_589__melt_string_str.val, "),\n melt_string_str((melt_ptr_t) (", - sizeof (meltcdat->dstr_587__melt_string_str. + sizeof (meltcdat->dstr_589__melt_string_str. val) - 1); - meltcdat->dstr_587__melt_string_str.val[39] = (char) 0; - meltcdat->dstr_587__melt_string_str.slen = 39; + meltcdat->dstr_589__melt_string_str.val[39] = (char) 0; + meltcdat->dstr_589__melt_string_str.slen = 39; -/*inistring dstr_588__melt_string_str_mel*/ - /*_._VALSTR___V778*/ meltfptr[777] = - (melt_ptr_t) & meltcdat->dstr_588__melt_string_str_mel; - meltcdat->dstr_588__melt_string_str_mel.discr = +/*inistring dstr_590__melt_string_str_mel*/ + /*_._VALSTR___V781*/ meltfptr[780] = + (melt_ptr_t) & meltcdat->dstr_590__melt_string_str_mel; + meltcdat->dstr_590__melt_string_str_mel.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_VERBATIM_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_588__melt_string_str_mel.val, + /*small inistring */ strncpy (meltcdat->dstr_590__melt_string_str_mel.val, ")), melt_string_str((melt_ptr_t) (", sizeof (meltcdat-> - dstr_588__melt_string_str_mel.val) - + dstr_590__melt_string_str_mel.val) - 1); - meltcdat->dstr_588__melt_string_str_mel.val[34] = (char) 0; - meltcdat->dstr_588__melt_string_str_mel.slen = 34; + meltcdat->dstr_590__melt_string_str_mel.val[34] = (char) 0; + meltcdat->dstr_590__melt_string_str_mel.slen = 34; -/*inistring dstr_589__*/ - /*_._VALSTR___V779*/ meltfptr[778] = (melt_ptr_t) & meltcdat->dstr_589__; - meltcdat->dstr_589__.discr = +/*inistring dstr_591__*/ + /*_._VALSTR___V782*/ meltfptr[781] = (melt_ptr_t) & meltcdat->dstr_591__; + meltcdat->dstr_591__.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_VERBATIM_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_589__.val, ")), \n (", - sizeof (meltcdat->dstr_589__.val) - 1); - meltcdat->dstr_589__.val[12] = (char) 0; - meltcdat->dstr_589__.slen = 12; + /*small inistring */ strncpy (meltcdat->dstr_591__.val, ")), \n (", + sizeof (meltcdat->dstr_591__.val) - 1); + meltcdat->dstr_591__.val[12] = (char) 0; + meltcdat->dstr_591__.slen = 12; -/*inistring dstr_590__*/ - /*_._VALSTR___V780*/ meltfptr[779] = (melt_ptr_t) & meltcdat->dstr_590__; - meltcdat->dstr_590__.discr = +/*inistring dstr_592__*/ + /*_._VALSTR___V783*/ meltfptr[782] = (melt_ptr_t) & meltcdat->dstr_592__; + meltcdat->dstr_592__.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_VERBATIM_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_590__.val, "))", - sizeof (meltcdat->dstr_590__.val) - 1); - meltcdat->dstr_590__.val[2] = (char) 0; - meltcdat->dstr_590__.slen = 2; + /*small inistring */ strncpy (meltcdat->dstr_592__.val, "))", + sizeof (meltcdat->dstr_592__.val) - 1); + meltcdat->dstr_592__.val[2] = (char) 0; + meltcdat->dstr_592__.slen = 2; -/*inistring dstr_591__GENERATED_C_FILENAME*/ - /*_._VALSTR___V762*/ meltfptr[761] = - (melt_ptr_t) & meltcdat->dstr_591__GENERATED_C_FILENAME; - meltcdat->dstr_591__GENERATED_C_FILENAME.discr = +/*inistring dstr_593__GENERATED_C_FILENAME*/ + /*_._VALSTR___V765*/ meltfptr[764] = + (melt_ptr_t) & meltcdat->dstr_593__GENERATED_C_FILENAME; + meltcdat->dstr_593__GENERATED_C_FILENAME.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_591__GENERATED_C_FILENAME.val, + /*small inistring */ strncpy (meltcdat->dstr_593__GENERATED_C_FILENAME.val, "GENERATED_C_FILENAME", sizeof (meltcdat-> - dstr_591__GENERATED_C_FILENAME.val) - + dstr_593__GENERATED_C_FILENAME.val) - 1); - meltcdat->dstr_591__GENERATED_C_FILENAME.val[20] = (char) 0; - meltcdat->dstr_591__GENERATED_C_FILENAME.slen = 20; + meltcdat->dstr_593__GENERATED_C_FILENAME.val[20] = (char) 0; + meltcdat->dstr_593__GENERATED_C_FILENAME.slen = 20; - /*inirout drout_592__NTH_SECUNDARY_FILE */ - /*_._VALROUT___V782*/ meltfptr[781] = - (melt_ptr_t) & meltcdat->drout_592__NTH_SECUNDARY_FILE; - meltcdat->drout_592__NTH_SECUNDARY_FILE.discr = + /*inirout drout_594__NTH_SECUNDARY_FILE */ + /*_._VALROUT___V785*/ meltfptr[784] = + (melt_ptr_t) & meltcdat->drout_594__NTH_SECUNDARY_FILE; + meltcdat->drout_594__NTH_SECUNDARY_FILE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); - strncpy (meltcdat->drout_592__NTH_SECUNDARY_FILE.routdescr, + strncpy (meltcdat->drout_594__NTH_SECUNDARY_FILE.routdescr, "NTH_SECUNDARY_FILE @warmelt-outobj.melt:5322", MELT_ROUTDESCR_LEN - 1); - meltcdat->drout_592__NTH_SECUNDARY_FILE.nbval = 4; - MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_592__NTH_SECUNDARY_FILE, + meltcdat->drout_594__NTH_SECUNDARY_FILE.nbval = 4; + MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_594__NTH_SECUNDARY_FILE, meltrout_139_WARMELTmiOUTOBJ_NTH_SECUNDARY_FILE); - /*iniclos dclo_593__NTH_SECUNDARY_FILE */ - /*_._VALCLO___V783*/ meltfptr[782] = - (melt_ptr_t) & meltcdat->dclo_593__NTH_SECUNDARY_FILE; - meltcdat->dclo_593__NTH_SECUNDARY_FILE.discr = + /*iniclos dclo_595__NTH_SECUNDARY_FILE */ + /*_._VALCLO___V786*/ meltfptr[785] = + (melt_ptr_t) & meltcdat->dclo_595__NTH_SECUNDARY_FILE; + meltcdat->dclo_595__NTH_SECUNDARY_FILE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); - meltcdat->dclo_593__NTH_SECUNDARY_FILE.nbval = 0; + meltcdat->dclo_595__NTH_SECUNDARY_FILE.nbval = 0; - /*inirout drout_594__OUTPUT_MELT_DESCRIPTOR */ - /*_._VALROUT___V784*/ meltfptr[783] = - (melt_ptr_t) & meltcdat->drout_594__OUTPUT_MELT_DESCRIPTOR; - meltcdat->drout_594__OUTPUT_MELT_DESCRIPTOR.discr = + /*inirout drout_596__OUTPUT_MELT_DESCRIPTOR */ + /*_._VALROUT___V787*/ meltfptr[786] = + (melt_ptr_t) & meltcdat->drout_596__OUTPUT_MELT_DESCRIPTOR; + meltcdat->drout_596__OUTPUT_MELT_DESCRIPTOR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); - strncpy (meltcdat->drout_594__OUTPUT_MELT_DESCRIPTOR.routdescr, + strncpy (meltcdat->drout_596__OUTPUT_MELT_DESCRIPTOR.routdescr, "OUTPUT_MELT_DESCRIPTOR @warmelt-outobj.melt:5356", MELT_ROUTDESCR_LEN - 1); - meltcdat->drout_594__OUTPUT_MELT_DESCRIPTOR.nbval = 17; - MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_594__OUTPUT_MELT_DESCRIPTOR, + meltcdat->drout_596__OUTPUT_MELT_DESCRIPTOR.nbval = 17; + MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_596__OUTPUT_MELT_DESCRIPTOR, meltrout_140_WARMELTmiOUTOBJ_OUTPUT_MELT_DESCRIPTOR); - /*iniclos dclo_595__OUTPUT_MELT_DESCRIPTOR */ - /*_._VALCLO___V791*/ meltfptr[790] = - (melt_ptr_t) & meltcdat->dclo_595__OUTPUT_MELT_DESCRIPTOR; - meltcdat->dclo_595__OUTPUT_MELT_DESCRIPTOR.discr = + /*iniclos dclo_597__OUTPUT_MELT_DESCRIPTOR */ + /*_._VALCLO___V794*/ meltfptr[793] = + (melt_ptr_t) & meltcdat->dclo_597__OUTPUT_MELT_DESCRIPTOR; + meltcdat->dclo_597__OUTPUT_MELT_DESCRIPTOR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); - meltcdat->dclo_595__OUTPUT_MELT_DESCRIPTOR.nbval = 0; + meltcdat->dclo_597__OUTPUT_MELT_DESCRIPTOR.nbval = 0; -/*iniobj dsym_596__CLASS_RUNNING_EXTENSION_MODULE_CONTEXT*/ - /*uniqueobj*/ if (! /*_._VALDATA___V792*/ meltfptr[791]) -/*_._VALDATA___V792*/ meltfptr[791] = +/*iniobj dsym_598__CLASS_RUNNING_EXTENSION_MODULE_CONTEXT*/ + /*uniqueobj*/ if (! /*_._VALDATA___V795*/ meltfptr[794]) +/*_._VALDATA___V795*/ meltfptr[794] = (melt_ptr_t) & meltcdat-> - dsym_596__CLASS_RUNNING_EXTENSION_MODULE_CONTEXT; + dsym_598__CLASS_RUNNING_EXTENSION_MODULE_CONTEXT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr isobj dsym_596__CLASS_RUNNING_EXTENSION_MODULE_CONTEXT", + ("iniobj check.discr isobj dsym_598__CLASS_RUNNING_EXTENSION_MODULE_CONTEXT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr objmagic dsym_596__CLASS_RUNNING_EXTENSION_MODULE_CONTEXT", + ("iniobj check.discr objmagic dsym_598__CLASS_RUNNING_EXTENSION_MODULE_CONTEXT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_596__CLASS_RUNNING_EXTENSION_MODULE_CONTEXT.meltobj_class = + meltcdat->dsym_598__CLASS_RUNNING_EXTENSION_MODULE_CONTEXT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_596__CLASS_RUNNING_EXTENSION_MODULE_CONTEXT.obj_hash = + meltcdat->dsym_598__CLASS_RUNNING_EXTENSION_MODULE_CONTEXT.obj_hash = 618245499; - meltcdat->dsym_596__CLASS_RUNNING_EXTENSION_MODULE_CONTEXT.obj_len = 3; + meltcdat->dsym_598__CLASS_RUNNING_EXTENSION_MODULE_CONTEXT.obj_len = 3; -/*inistring dstr_597__CLASS_RUNNING_EXTENSION_*/ - /*_._VALSTR___V793*/ meltfptr[792] = - (melt_ptr_t) & meltcdat->dstr_597__CLASS_RUNNING_EXTENSION_; - meltcdat->dstr_597__CLASS_RUNNING_EXTENSION_.discr = +/*inistring dstr_599__CLASS_RUNNING_EXTENSION_*/ + /*_._VALSTR___V796*/ meltfptr[795] = + (melt_ptr_t) & meltcdat->dstr_599__CLASS_RUNNING_EXTENSION_; + meltcdat->dstr_599__CLASS_RUNNING_EXTENSION_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_597__CLASS_RUNNING_EXTENSION_. + /*small inistring */ strncpy (meltcdat->dstr_599__CLASS_RUNNING_EXTENSION_. val, "CLASS_RUNNING_EXTENSION_MODULE_CONTEXT", sizeof (meltcdat-> - dstr_597__CLASS_RUNNING_EXTENSION_. + dstr_599__CLASS_RUNNING_EXTENSION_. val) - 1); - meltcdat->dstr_597__CLASS_RUNNING_EXTENSION_.val[38] = (char) 0; - meltcdat->dstr_597__CLASS_RUNNING_EXTENSION_.slen = 38; + meltcdat->dstr_599__CLASS_RUNNING_EXTENSION_.val[38] = (char) 0; + meltcdat->dstr_599__CLASS_RUNNING_EXTENSION_.slen = 38; -/*inistring dstr_598__runextend*/ - /*_._VALSTR___V785*/ meltfptr[784] = - (melt_ptr_t) & meltcdat->dstr_598__runextend; - meltcdat->dstr_598__runextend.discr = +/*inistring dstr_600__runextend*/ + /*_._VALSTR___V788*/ meltfptr[787] = + (melt_ptr_t) & meltcdat->dstr_600__runextend; + meltcdat->dstr_600__runextend.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_598__runextend.val, + /*small inistring */ strncpy (meltcdat->dstr_600__runextend.val, "runextend", - sizeof (meltcdat->dstr_598__runextend.val) - + sizeof (meltcdat->dstr_600__runextend.val) - 1); - meltcdat->dstr_598__runextend.val[9] = (char) 0; - meltcdat->dstr_598__runextend.slen = 9; + meltcdat->dstr_600__runextend.val[9] = (char) 0; + meltcdat->dstr_600__runextend.slen = 9; -/*inistring dstr_599__optimized*/ - /*_._VALSTR___V786*/ meltfptr[785] = - (melt_ptr_t) & meltcdat->dstr_599__optimized; - meltcdat->dstr_599__optimized.discr = +/*inistring dstr_601__optimized*/ + /*_._VALSTR___V789*/ meltfptr[788] = + (melt_ptr_t) & meltcdat->dstr_601__optimized; + meltcdat->dstr_601__optimized.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_599__optimized.val, + /*small inistring */ strncpy (meltcdat->dstr_601__optimized.val, "optimized", - sizeof (meltcdat->dstr_599__optimized.val) - + sizeof (meltcdat->dstr_601__optimized.val) - 1); - meltcdat->dstr_599__optimized.val[9] = (char) 0; - meltcdat->dstr_599__optimized.slen = 9; + meltcdat->dstr_601__optimized.val[9] = (char) 0; + meltcdat->dstr_601__optimized.slen = 9; -/*inistring dstr_600__quicklybuilt*/ - /*_._VALSTR___V787*/ meltfptr[786] = - (melt_ptr_t) & meltcdat->dstr_600__quicklybuilt; - meltcdat->dstr_600__quicklybuilt.discr = +/*inistring dstr_602__quicklybuilt*/ + /*_._VALSTR___V790*/ meltfptr[789] = + (melt_ptr_t) & meltcdat->dstr_602__quicklybuilt; + meltcdat->dstr_602__quicklybuilt.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_600__quicklybuilt.val, + /*small inistring */ strncpy (meltcdat->dstr_602__quicklybuilt.val, "quicklybuilt", - sizeof (meltcdat->dstr_600__quicklybuilt. + sizeof (meltcdat->dstr_602__quicklybuilt. val) - 1); - meltcdat->dstr_600__quicklybuilt.val[12] = (char) 0; - meltcdat->dstr_600__quicklybuilt.slen = 12; + meltcdat->dstr_602__quicklybuilt.val[12] = (char) 0; + meltcdat->dstr_602__quicklybuilt.slen = 12; -/*inistring dstr_601__optimized*/ - /*_._VALSTR___V788*/ meltfptr[787] = - (melt_ptr_t) & meltcdat->dstr_601__optimized; - meltcdat->dstr_601__optimized.discr = +/*inistring dstr_603__optimized*/ + /*_._VALSTR___V791*/ meltfptr[790] = + (melt_ptr_t) & meltcdat->dstr_603__optimized; + meltcdat->dstr_603__optimized.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_601__optimized.val, + /*small inistring */ strncpy (meltcdat->dstr_603__optimized.val, "optimized", - sizeof (meltcdat->dstr_601__optimized.val) - + sizeof (meltcdat->dstr_603__optimized.val) - 1); - meltcdat->dstr_601__optimized.val[9] = (char) 0; - meltcdat->dstr_601__optimized.slen = 9; + meltcdat->dstr_603__optimized.val[9] = (char) 0; + meltcdat->dstr_603__optimized.slen = 9; -/*inistring dstr_602__dynamic*/ - /*_._VALSTR___V789*/ meltfptr[788] = - (melt_ptr_t) & meltcdat->dstr_602__dynamic; - meltcdat->dstr_602__dynamic.discr = +/*inistring dstr_604__dynamic*/ + /*_._VALSTR___V792*/ meltfptr[791] = + (melt_ptr_t) & meltcdat->dstr_604__dynamic; + meltcdat->dstr_604__dynamic.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_602__dynamic.val, "dynamic", - sizeof (meltcdat->dstr_602__dynamic.val) - 1); - meltcdat->dstr_602__dynamic.val[7] = (char) 0; - meltcdat->dstr_602__dynamic.slen = 7; + /*small inistring */ strncpy (meltcdat->dstr_604__dynamic.val, "dynamic", + sizeof (meltcdat->dstr_604__dynamic.val) - 1); + meltcdat->dstr_604__dynamic.val[7] = (char) 0; + meltcdat->dstr_604__dynamic.slen = 7; -/*inistring dstr_603__debugnoline*/ - /*_._VALSTR___V790*/ meltfptr[789] = - (melt_ptr_t) & meltcdat->dstr_603__debugnoline; - meltcdat->dstr_603__debugnoline.discr = +/*inistring dstr_605__debugnoline*/ + /*_._VALSTR___V793*/ meltfptr[792] = + (melt_ptr_t) & meltcdat->dstr_605__debugnoline; + meltcdat->dstr_605__debugnoline.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_603__debugnoline.val, + /*small inistring */ strncpy (meltcdat->dstr_605__debugnoline.val, "debugnoline", - sizeof (meltcdat->dstr_603__debugnoline.val) - + sizeof (meltcdat->dstr_605__debugnoline.val) - 1); - meltcdat->dstr_603__debugnoline.val[11] = (char) 0; - meltcdat->dstr_603__debugnoline.slen = 11; + meltcdat->dstr_605__debugnoline.val[11] = (char) 0; + meltcdat->dstr_605__debugnoline.slen = 11; -/*iniobj dsym_604__SYNTAX_TEST_GENERATOR*/ - /*uniqueobj*/ if (! /*_._VALDATA___V794*/ meltfptr[793]) -/*_._VALDATA___V794*/ meltfptr[793] = - (melt_ptr_t) & meltcdat->dsym_604__SYNTAX_TEST_GENERATOR; +/*iniobj dsym_606__SYNTAX_TEST_GENERATOR*/ + /*uniqueobj*/ if (! /*_._VALDATA___V797*/ meltfptr[796]) +/*_._VALDATA___V797*/ meltfptr[796] = + (melt_ptr_t) & meltcdat->dsym_606__SYNTAX_TEST_GENERATOR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr isobj dsym_604__SYNTAX_TEST_GENERATOR", + ("iniobj check.discr isobj dsym_606__SYNTAX_TEST_GENERATOR", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr objmagic dsym_604__SYNTAX_TEST_GENERATOR", + ("iniobj check.discr objmagic dsym_606__SYNTAX_TEST_GENERATOR", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_604__SYNTAX_TEST_GENERATOR.meltobj_class = + meltcdat->dsym_606__SYNTAX_TEST_GENERATOR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_604__SYNTAX_TEST_GENERATOR.obj_hash = 803188755; - meltcdat->dsym_604__SYNTAX_TEST_GENERATOR.obj_len = 3; + meltcdat->dsym_606__SYNTAX_TEST_GENERATOR.obj_hash = 803188755; + meltcdat->dsym_606__SYNTAX_TEST_GENERATOR.obj_len = 3; -/*inistring dstr_605__SYNTAX_TEST_GENERATOR*/ - /*_._VALSTR___V795*/ meltfptr[794] = - (melt_ptr_t) & meltcdat->dstr_605__SYNTAX_TEST_GENERATOR; - meltcdat->dstr_605__SYNTAX_TEST_GENERATOR.discr = +/*inistring dstr_607__SYNTAX_TEST_GENERATOR*/ + /*_._VALSTR___V798*/ meltfptr[797] = + (melt_ptr_t) & meltcdat->dstr_607__SYNTAX_TEST_GENERATOR; + meltcdat->dstr_607__SYNTAX_TEST_GENERATOR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_605__SYNTAX_TEST_GENERATOR.val, + /*small inistring */ strncpy (meltcdat->dstr_607__SYNTAX_TEST_GENERATOR.val, "SYNTAX_TEST_GENERATOR", sizeof (meltcdat-> - dstr_605__SYNTAX_TEST_GENERATOR.val) - + dstr_607__SYNTAX_TEST_GENERATOR.val) - 1); - meltcdat->dstr_605__SYNTAX_TEST_GENERATOR.val[21] = (char) 0; - meltcdat->dstr_605__SYNTAX_TEST_GENERATOR.slen = 21; + meltcdat->dstr_607__SYNTAX_TEST_GENERATOR.val[21] = (char) 0; + meltcdat->dstr_607__SYNTAX_TEST_GENERATOR.slen = 21; -/*iniobj dsym_606__CLASS_SELECTOR*/ - /*uniqueobj*/ if (! /*_._VALDATA___V796*/ meltfptr[795]) -/*_._VALDATA___V796*/ meltfptr[795] = - (melt_ptr_t) & meltcdat->dsym_606__CLASS_SELECTOR; +/*iniobj dsym_608__CLASS_SELECTOR*/ + /*uniqueobj*/ if (! /*_._VALDATA___V799*/ meltfptr[798]) +/*_._VALDATA___V799*/ meltfptr[798] = + (melt_ptr_t) & meltcdat->dsym_608__CLASS_SELECTOR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_606__CLASS_SELECTOR", + melt_assertmsg ("iniobj check.discr isobj dsym_608__CLASS_SELECTOR", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr objmagic dsym_606__CLASS_SELECTOR", + melt_assertmsg ("iniobj check.discr objmagic dsym_608__CLASS_SELECTOR", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_606__CLASS_SELECTOR.meltobj_class = + meltcdat->dsym_608__CLASS_SELECTOR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_606__CLASS_SELECTOR.obj_hash = 100646971; - meltcdat->dsym_606__CLASS_SELECTOR.obj_len = 3; + meltcdat->dsym_608__CLASS_SELECTOR.obj_hash = 100646971; + meltcdat->dsym_608__CLASS_SELECTOR.obj_len = 3; -/*inistring dstr_607__CLASS_SELECTOR*/ - /*_._VALSTR___V797*/ meltfptr[796] = - (melt_ptr_t) & meltcdat->dstr_607__CLASS_SELECTOR; - meltcdat->dstr_607__CLASS_SELECTOR.discr = +/*inistring dstr_609__CLASS_SELECTOR*/ + /*_._VALSTR___V800*/ meltfptr[799] = + (melt_ptr_t) & meltcdat->dstr_609__CLASS_SELECTOR; + meltcdat->dstr_609__CLASS_SELECTOR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_607__CLASS_SELECTOR.val, + /*small inistring */ strncpy (meltcdat->dstr_609__CLASS_SELECTOR.val, "CLASS_SELECTOR", - sizeof (meltcdat->dstr_607__CLASS_SELECTOR. + sizeof (meltcdat->dstr_609__CLASS_SELECTOR. val) - 1); - meltcdat->dstr_607__CLASS_SELECTOR.val[14] = (char) 0; - meltcdat->dstr_607__CLASS_SELECTOR.slen = 14; + meltcdat->dstr_609__CLASS_SELECTOR.val[14] = (char) 0; + meltcdat->dstr_609__CLASS_SELECTOR.slen = 14; -/*iniobj dsym_608__RECV*/ - /*uniqueobj*/ if (! /*_._VALDATA___V798*/ meltfptr[797]) -/*_._VALDATA___V798*/ meltfptr[797] = - (melt_ptr_t) & meltcdat->dsym_608__RECV; +/*iniobj dsym_610__RECV*/ + /*uniqueobj*/ if (! /*_._VALDATA___V801*/ meltfptr[800]) +/*_._VALDATA___V801*/ meltfptr[800] = + (melt_ptr_t) & meltcdat->dsym_610__RECV; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_608__RECV", + melt_assertmsg ("iniobj check.discr isobj dsym_610__RECV", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr objmagic dsym_608__RECV", + melt_assertmsg ("iniobj check.discr objmagic dsym_610__RECV", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_608__RECV.meltobj_class = + meltcdat->dsym_610__RECV.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_608__RECV.obj_hash = 10842790; - meltcdat->dsym_608__RECV.obj_len = 3; + meltcdat->dsym_610__RECV.obj_hash = 10842790; + meltcdat->dsym_610__RECV.obj_len = 3; -/*inistring dstr_609__RECV*/ - /*_._VALSTR___V799*/ meltfptr[798] = - (melt_ptr_t) & meltcdat->dstr_609__RECV; - meltcdat->dstr_609__RECV.discr = +/*inistring dstr_611__RECV*/ + /*_._VALSTR___V802*/ meltfptr[801] = + (melt_ptr_t) & meltcdat->dstr_611__RECV; + meltcdat->dstr_611__RECV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_609__RECV.val, "RECV", - sizeof (meltcdat->dstr_609__RECV.val) - 1); - meltcdat->dstr_609__RECV.val[4] = (char) 0; - meltcdat->dstr_609__RECV.slen = 4; + /*small inistring */ strncpy (meltcdat->dstr_611__RECV.val, "RECV", + sizeof (meltcdat->dstr_611__RECV.val) - 1); + meltcdat->dstr_611__RECV.val[4] = (char) 0; + meltcdat->dstr_611__RECV.slen = 4; MELT_LOCATION ("warmelt-outobj.melt:5772:/ iniobj"); -/*iniobj dobj_610*/ -/*_._VALDATA___V800*/ meltfptr[799] = (melt_ptr_t) & meltcdat->dobj_610; +/*iniobj dobj_612*/ +/*_._VALDATA___V803*/ meltfptr[802] = (melt_ptr_t) & meltcdat->dobj_612; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dobj_610", + melt_assertmsg ("iniobj check.discr isobj dobj_612", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr objmagic dobj_610", + melt_assertmsg ("iniobj check.discr objmagic dobj_612", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dobj_610.meltobj_class = + meltcdat->dobj_612.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); - meltcdat->dobj_610.obj_num = 0; - meltcdat->dobj_610.obj_hash = 317172472; - meltcdat->dobj_610.obj_len = 2; + meltcdat->dobj_612.obj_num = 0; + meltcdat->dobj_612.obj_hash = 263314587; + meltcdat->dobj_612.obj_len = 2; -/*iniobj dsym_611__GENDEV*/ - /*uniqueobj*/ if (! /*_._VALDATA___V801*/ meltfptr[800]) -/*_._VALDATA___V801*/ meltfptr[800] = - (melt_ptr_t) & meltcdat->dsym_611__GENDEV; +/*iniobj dsym_613__GENDEV*/ + /*uniqueobj*/ if (! /*_._VALDATA___V804*/ meltfptr[803]) +/*_._VALDATA___V804*/ meltfptr[803] = + (melt_ptr_t) & meltcdat->dsym_613__GENDEV; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_611__GENDEV", + melt_assertmsg ("iniobj check.discr isobj dsym_613__GENDEV", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr objmagic dsym_611__GENDEV", + melt_assertmsg ("iniobj check.discr objmagic dsym_613__GENDEV", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_611__GENDEV.meltobj_class = + meltcdat->dsym_613__GENDEV.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_611__GENDEV.obj_hash = 608529194; - meltcdat->dsym_611__GENDEV.obj_len = 3; + meltcdat->dsym_613__GENDEV.obj_hash = 608529194; + meltcdat->dsym_613__GENDEV.obj_len = 3; -/*inistring dstr_612__GENDEV*/ - /*_._VALSTR___V802*/ meltfptr[801] = - (melt_ptr_t) & meltcdat->dstr_612__GENDEV; - meltcdat->dstr_612__GENDEV.discr = +/*inistring dstr_614__GENDEV*/ + /*_._VALSTR___V805*/ meltfptr[804] = + (melt_ptr_t) & meltcdat->dstr_614__GENDEV; + meltcdat->dstr_614__GENDEV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_612__GENDEV.val, "GENDEV", - sizeof (meltcdat->dstr_612__GENDEV.val) - 1); - meltcdat->dstr_612__GENDEV.val[6] = (char) 0; - meltcdat->dstr_612__GENDEV.slen = 6; + /*small inistring */ strncpy (meltcdat->dstr_614__GENDEV.val, "GENDEV", + sizeof (meltcdat->dstr_614__GENDEV.val) - 1); + meltcdat->dstr_614__GENDEV.val[6] = (char) 0; + meltcdat->dstr_614__GENDEV.slen = 6; /*^iniobj */ -/*iniobj dobj_613*/ -/*_._VALDATA___V803*/ meltfptr[802] = (melt_ptr_t) & meltcdat->dobj_613; +/*iniobj dobj_615*/ +/*_._VALDATA___V806*/ meltfptr[805] = (melt_ptr_t) & meltcdat->dobj_615; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dobj_613", + melt_assertmsg ("iniobj check.discr isobj dobj_615", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr objmagic dobj_613", + melt_assertmsg ("iniobj check.discr objmagic dobj_615", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dobj_613.meltobj_class = + meltcdat->dobj_615.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); - meltcdat->dobj_613.obj_num = 1; - meltcdat->dobj_613.obj_hash = 446270039; - meltcdat->dobj_613.obj_len = 2; + meltcdat->dobj_615.obj_num = 1; + meltcdat->dobj_615.obj_hash = 816763315; + meltcdat->dobj_615.obj_len = 2; -/*iniobj dsym_614__SBUF*/ - /*uniqueobj*/ if (! /*_._VALDATA___V804*/ meltfptr[803]) -/*_._VALDATA___V804*/ meltfptr[803] = - (melt_ptr_t) & meltcdat->dsym_614__SBUF; +/*iniobj dsym_616__SBUF*/ + /*uniqueobj*/ if (! /*_._VALDATA___V807*/ meltfptr[806]) +/*_._VALDATA___V807*/ meltfptr[806] = + (melt_ptr_t) & meltcdat->dsym_616__SBUF; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_614__SBUF", + melt_assertmsg ("iniobj check.discr isobj dsym_616__SBUF", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr objmagic dsym_614__SBUF", + melt_assertmsg ("iniobj check.discr objmagic dsym_616__SBUF", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_614__SBUF.meltobj_class = + meltcdat->dsym_616__SBUF.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_614__SBUF.obj_hash = 120431958; - meltcdat->dsym_614__SBUF.obj_len = 3; + meltcdat->dsym_616__SBUF.obj_hash = 120431958; + meltcdat->dsym_616__SBUF.obj_len = 3; -/*inistring dstr_615__SBUF*/ - /*_._VALSTR___V805*/ meltfptr[804] = - (melt_ptr_t) & meltcdat->dstr_615__SBUF; - meltcdat->dstr_615__SBUF.discr = +/*inistring dstr_617__SBUF*/ + /*_._VALSTR___V808*/ meltfptr[807] = + (melt_ptr_t) & meltcdat->dstr_617__SBUF; + meltcdat->dstr_617__SBUF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_615__SBUF.val, "SBUF", - sizeof (meltcdat->dstr_615__SBUF.val) - 1); - meltcdat->dstr_615__SBUF.val[4] = (char) 0; - meltcdat->dstr_615__SBUF.slen = 4; + /*small inistring */ strncpy (meltcdat->dstr_617__SBUF.val, "SBUF", + sizeof (meltcdat->dstr_617__SBUF.val) - 1); + meltcdat->dstr_617__SBUF.val[4] = (char) 0; + meltcdat->dstr_617__SBUF.slen = 4; /*^iniobj */ -/*iniobj dobj_616*/ -/*_._VALDATA___V806*/ meltfptr[805] = (melt_ptr_t) & meltcdat->dobj_616; +/*iniobj dobj_618*/ +/*_._VALDATA___V809*/ meltfptr[808] = (melt_ptr_t) & meltcdat->dobj_618; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dobj_616", + melt_assertmsg ("iniobj check.discr isobj dobj_618", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr objmagic dobj_616", + melt_assertmsg ("iniobj check.discr objmagic dobj_618", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dobj_616.meltobj_class = + meltcdat->dobj_618.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); - meltcdat->dobj_616.obj_num = 2; - meltcdat->dobj_616.obj_hash = 76177945; - meltcdat->dobj_616.obj_len = 2; + meltcdat->dobj_618.obj_num = 2; + meltcdat->dobj_618.obj_hash = 1015570108; + meltcdat->dobj_618.obj_len = 2; -/*iniobj dsym_617__MODCTX*/ - /*uniqueobj*/ if (! /*_._VALDATA___V807*/ meltfptr[806]) -/*_._VALDATA___V807*/ meltfptr[806] = - (melt_ptr_t) & meltcdat->dsym_617__MODCTX; +/*iniobj dsym_619__MODCTX*/ + /*uniqueobj*/ if (! /*_._VALDATA___V810*/ meltfptr[809]) +/*_._VALDATA___V810*/ meltfptr[809] = + (melt_ptr_t) & meltcdat->dsym_619__MODCTX; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_617__MODCTX", + melt_assertmsg ("iniobj check.discr isobj dsym_619__MODCTX", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr objmagic dsym_617__MODCTX", + melt_assertmsg ("iniobj check.discr objmagic dsym_619__MODCTX", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_617__MODCTX.meltobj_class = + meltcdat->dsym_619__MODCTX.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_617__MODCTX.obj_hash = 913240393; - meltcdat->dsym_617__MODCTX.obj_len = 3; + meltcdat->dsym_619__MODCTX.obj_hash = 913240393; + meltcdat->dsym_619__MODCTX.obj_len = 3; -/*inistring dstr_618__MODCTX*/ - /*_._VALSTR___V808*/ meltfptr[807] = - (melt_ptr_t) & meltcdat->dstr_618__MODCTX; - meltcdat->dstr_618__MODCTX.discr = +/*inistring dstr_620__MODCTX*/ + /*_._VALSTR___V811*/ meltfptr[810] = + (melt_ptr_t) & meltcdat->dstr_620__MODCTX; + meltcdat->dstr_620__MODCTX.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_618__MODCTX.val, "MODCTX", - sizeof (meltcdat->dstr_618__MODCTX.val) - 1); - meltcdat->dstr_618__MODCTX.val[6] = (char) 0; - meltcdat->dstr_618__MODCTX.slen = 6; + /*small inistring */ strncpy (meltcdat->dstr_620__MODCTX.val, "MODCTX", + sizeof (meltcdat->dstr_620__MODCTX.val) - 1); + meltcdat->dstr_620__MODCTX.val[6] = (char) 0; + meltcdat->dstr_620__MODCTX.slen = 6; /*^iniobj */ -/*iniobj dobj_619*/ -/*_._VALDATA___V809*/ meltfptr[808] = (melt_ptr_t) & meltcdat->dobj_619; +/*iniobj dobj_621*/ +/*_._VALDATA___V812*/ meltfptr[811] = (melt_ptr_t) & meltcdat->dobj_621; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dobj_619", + melt_assertmsg ("iniobj check.discr isobj dobj_621", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr objmagic dobj_619", + melt_assertmsg ("iniobj check.discr objmagic dobj_621", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dobj_619.meltobj_class = + meltcdat->dobj_621.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); - meltcdat->dobj_619.obj_num = 3; - meltcdat->dobj_619.obj_hash = 936887750; - meltcdat->dobj_619.obj_len = 2; + meltcdat->dobj_621.obj_num = 3; + meltcdat->dobj_621.obj_hash = 63547163; + meltcdat->dobj_621.obj_len = 2; -/*iniobj dsym_620__IX*/ - /*uniqueobj*/ if (! /*_._VALDATA___V810*/ meltfptr[809]) -/*_._VALDATA___V810*/ meltfptr[809] = - (melt_ptr_t) & meltcdat->dsym_620__IX; +/*iniobj dsym_622__IX*/ + /*uniqueobj*/ if (! /*_._VALDATA___V813*/ meltfptr[812]) +/*_._VALDATA___V813*/ meltfptr[812] = + (melt_ptr_t) & meltcdat->dsym_622__IX; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_620__IX", + melt_assertmsg ("iniobj check.discr isobj dsym_622__IX", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr objmagic dsym_620__IX", + melt_assertmsg ("iniobj check.discr objmagic dsym_622__IX", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_620__IX.meltobj_class = + meltcdat->dsym_622__IX.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_620__IX.obj_hash = 57004009; - meltcdat->dsym_620__IX.obj_len = 3; + meltcdat->dsym_622__IX.obj_hash = 57004009; + meltcdat->dsym_622__IX.obj_len = 3; -/*inistring dstr_621__IX*/ - /*_._VALSTR___V811*/ meltfptr[810] = (melt_ptr_t) & meltcdat->dstr_621__IX; - meltcdat->dstr_621__IX.discr = +/*inistring dstr_623__IX*/ + /*_._VALSTR___V814*/ meltfptr[813] = (melt_ptr_t) & meltcdat->dstr_623__IX; + meltcdat->dstr_623__IX.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_621__IX.val, "IX", - sizeof (meltcdat->dstr_621__IX.val) - 1); - meltcdat->dstr_621__IX.val[2] = (char) 0; - meltcdat->dstr_621__IX.slen = 2; + /*small inistring */ strncpy (meltcdat->dstr_623__IX.val, "IX", + sizeof (meltcdat->dstr_623__IX.val) - 1); + meltcdat->dstr_623__IX.val[2] = (char) 0; + meltcdat->dstr_623__IX.slen = 2; /*^iniobj */ -/*iniobj dobj_622*/ -/*_._VALDATA___V812*/ meltfptr[811] = (melt_ptr_t) & meltcdat->dobj_622; +/*iniobj dobj_624*/ +/*_._VALDATA___V815*/ meltfptr[814] = (melt_ptr_t) & meltcdat->dobj_624; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dobj_622", + melt_assertmsg ("iniobj check.discr isobj dobj_624", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr objmagic dobj_622", + melt_assertmsg ("iniobj check.discr objmagic dobj_624", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dobj_622.meltobj_class = + meltcdat->dobj_624.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); - meltcdat->dobj_622.obj_num = 4; - meltcdat->dobj_622.obj_hash = 296954620; - meltcdat->dobj_622.obj_len = 2; - - /*inimult dtup_623_sySYNTAX_TEST_GENERATOR */ - /*_._VALTUP___V813*/ meltfptr[812] = - (melt_ptr_t) & meltcdat->dtup_623_sySYNTAX_TEST_GENERATOR; - meltcdat->dtup_623_sySYNTAX_TEST_GENERATOR.discr = + meltcdat->dobj_624.obj_num = 4; + meltcdat->dobj_624.obj_hash = 759531297; + meltcdat->dobj_624.obj_len = 2; + + /*inimult dtup_625_sySYNTAX_TEST_GENERATOR */ + /*_._VALTUP___V816*/ meltfptr[815] = + (melt_ptr_t) & meltcdat->dtup_625_sySYNTAX_TEST_GENERATOR; + meltcdat->dtup_625_sySYNTAX_TEST_GENERATOR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_MULTIPLE)))); - meltcdat->dtup_623_sySYNTAX_TEST_GENERATOR.nbval = 5; + meltcdat->dtup_625_sySYNTAX_TEST_GENERATOR.nbval = 5; /*^iniobj */ -/*iniobj dobj_624__SYNTAX_TEST_GENERATOR*/ -/*_._VALDATA___V814*/ meltfptr[813] = - (melt_ptr_t) & meltcdat->dobj_624__SYNTAX_TEST_GENERATOR; +/*iniobj dobj_626__SYNTAX_TEST_GENERATOR*/ +/*_._VALDATA___V817*/ meltfptr[816] = + (melt_ptr_t) & meltcdat->dobj_626__SYNTAX_TEST_GENERATOR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr isobj dobj_624__SYNTAX_TEST_GENERATOR", + ("iniobj check.discr isobj dobj_626__SYNTAX_TEST_GENERATOR", melt_magic_discr ((melt_ptr_t) - ( /*_.CLASS_SELECTOR__V142*/ meltfptr[141])) == + ( /*_.CLASS_SELECTOR__V143*/ meltfptr[142])) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr objmagic dobj_624__SYNTAX_TEST_GENERATOR", - ((meltobject_ptr_t) ( /*_.CLASS_SELECTOR__V142*/ meltfptr[141]))-> + ("iniobj check.discr objmagic dobj_626__SYNTAX_TEST_GENERATOR", + ((meltobject_ptr_t) ( /*_.CLASS_SELECTOR__V143*/ meltfptr[142]))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dobj_624__SYNTAX_TEST_GENERATOR.meltobj_class = - (meltobject_ptr_t) ( /*_.CLASS_SELECTOR__V142*/ meltfptr[141]); - meltcdat->dobj_624__SYNTAX_TEST_GENERATOR.obj_hash = 96598281; - meltcdat->dobj_624__SYNTAX_TEST_GENERATOR.obj_len = 4; + meltcdat->dobj_626__SYNTAX_TEST_GENERATOR.meltobj_class = + (meltobject_ptr_t) ( /*_.CLASS_SELECTOR__V143*/ meltfptr[142]); + meltcdat->dobj_626__SYNTAX_TEST_GENERATOR.obj_hash = 673948823; + meltcdat->dobj_626__SYNTAX_TEST_GENERATOR.obj_len = 4; -/*inistring dstr_625__SYNTAX_TEST_GENERATOR*/ - /*_._VALSTR___V815*/ meltfptr[814] = - (melt_ptr_t) & meltcdat->dstr_625__SYNTAX_TEST_GENERATOR; - meltcdat->dstr_625__SYNTAX_TEST_GENERATOR.discr = +/*inistring dstr_627__SYNTAX_TEST_GENERATOR*/ + /*_._VALSTR___V818*/ meltfptr[817] = + (melt_ptr_t) & meltcdat->dstr_627__SYNTAX_TEST_GENERATOR; + meltcdat->dstr_627__SYNTAX_TEST_GENERATOR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_625__SYNTAX_TEST_GENERATOR.val, + /*small inistring */ strncpy (meltcdat->dstr_627__SYNTAX_TEST_GENERATOR.val, "SYNTAX_TEST_GENERATOR", sizeof (meltcdat-> - dstr_625__SYNTAX_TEST_GENERATOR.val) - + dstr_627__SYNTAX_TEST_GENERATOR.val) - 1); - meltcdat->dstr_625__SYNTAX_TEST_GENERATOR.val[21] = (char) 0; - meltcdat->dstr_625__SYNTAX_TEST_GENERATOR.slen = 21; + meltcdat->dstr_627__SYNTAX_TEST_GENERATOR.val[21] = (char) 0; + meltcdat->dstr_627__SYNTAX_TEST_GENERATOR.slen = 21; - /*inirout drout_626__SYNTESTGEN_ANY */ - /*_._VALROUT___V816*/ meltfptr[815] = - (melt_ptr_t) & meltcdat->drout_626__SYNTESTGEN_ANY; - meltcdat->drout_626__SYNTESTGEN_ANY.discr = + /*inirout drout_628__SYNTESTGEN_ANY */ + /*_._VALROUT___V819*/ meltfptr[818] = + (melt_ptr_t) & meltcdat->drout_628__SYNTESTGEN_ANY; + meltcdat->drout_628__SYNTESTGEN_ANY.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); - strncpy (meltcdat->drout_626__SYNTESTGEN_ANY.routdescr, + strncpy (meltcdat->drout_628__SYNTESTGEN_ANY.routdescr, "SYNTESTGEN_ANY @warmelt-outobj.melt:5781", MELT_ROUTDESCR_LEN - 1); - meltcdat->drout_626__SYNTESTGEN_ANY.nbval = 5; - MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_626__SYNTESTGEN_ANY, + meltcdat->drout_628__SYNTESTGEN_ANY.nbval = 5; + MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_628__SYNTESTGEN_ANY, meltrout_141_WARMELTmiOUTOBJ_SYNTESTGEN_ANY); - /*iniclos dclo_627__SYNTESTGEN_ANY */ - /*_._VALCLO___V817*/ meltfptr[816] = - (melt_ptr_t) & meltcdat->dclo_627__SYNTESTGEN_ANY; - meltcdat->dclo_627__SYNTESTGEN_ANY.discr = + /*iniclos dclo_629__SYNTESTGEN_ANY */ + /*_._VALCLO___V820*/ meltfptr[819] = + (melt_ptr_t) & meltcdat->dclo_629__SYNTESTGEN_ANY; + meltcdat->dclo_629__SYNTESTGEN_ANY.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); - meltcdat->dclo_627__SYNTESTGEN_ANY.nbval = 0; + meltcdat->dclo_629__SYNTESTGEN_ANY.nbval = 0; -/*iniobj dsym_628__CLASS_LOCATED*/ - /*uniqueobj*/ if (! /*_._VALDATA___V818*/ meltfptr[817]) -/*_._VALDATA___V818*/ meltfptr[817] = - (melt_ptr_t) & meltcdat->dsym_628__CLASS_LOCATED; +/*iniobj dsym_630__CLASS_LOCATED*/ + /*uniqueobj*/ if (! /*_._VALDATA___V821*/ meltfptr[820]) +/*_._VALDATA___V821*/ meltfptr[820] = + (melt_ptr_t) & meltcdat->dsym_630__CLASS_LOCATED; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_628__CLASS_LOCATED", + melt_assertmsg ("iniobj check.discr isobj dsym_630__CLASS_LOCATED", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr objmagic dsym_628__CLASS_LOCATED", + melt_assertmsg ("iniobj check.discr objmagic dsym_630__CLASS_LOCATED", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_628__CLASS_LOCATED.meltobj_class = + meltcdat->dsym_630__CLASS_LOCATED.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_628__CLASS_LOCATED.obj_hash = 979003; - meltcdat->dsym_628__CLASS_LOCATED.obj_len = 3; + meltcdat->dsym_630__CLASS_LOCATED.obj_hash = 979003; + meltcdat->dsym_630__CLASS_LOCATED.obj_len = 3; -/*inistring dstr_629__CLASS_LOCATED*/ - /*_._VALSTR___V819*/ meltfptr[818] = - (melt_ptr_t) & meltcdat->dstr_629__CLASS_LOCATED; - meltcdat->dstr_629__CLASS_LOCATED.discr = +/*inistring dstr_631__CLASS_LOCATED*/ + /*_._VALSTR___V822*/ meltfptr[821] = + (melt_ptr_t) & meltcdat->dstr_631__CLASS_LOCATED; + meltcdat->dstr_631__CLASS_LOCATED.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_629__CLASS_LOCATED.val, + /*small inistring */ strncpy (meltcdat->dstr_631__CLASS_LOCATED.val, "CLASS_LOCATED", - sizeof (meltcdat->dstr_629__CLASS_LOCATED. + sizeof (meltcdat->dstr_631__CLASS_LOCATED. val) - 1); - meltcdat->dstr_629__CLASS_LOCATED.val[13] = (char) 0; - meltcdat->dstr_629__CLASS_LOCATED.slen = 13; + meltcdat->dstr_631__CLASS_LOCATED.val[13] = (char) 0; + meltcdat->dstr_631__CLASS_LOCATED.slen = 13; -/*iniobj dsym_630__CLASS_SOURCE_GENERATOR_DEVICE*/ - /*uniqueobj*/ if (! /*_._VALDATA___V820*/ meltfptr[819]) -/*_._VALDATA___V820*/ meltfptr[819] = - (melt_ptr_t) & meltcdat->dsym_630__CLASS_SOURCE_GENERATOR_DEVICE; +/*iniobj dsym_632__CLASS_SOURCE_GENERATOR_DEVICE*/ + /*uniqueobj*/ if (! /*_._VALDATA___V823*/ meltfptr[822]) +/*_._VALDATA___V823*/ meltfptr[822] = + (melt_ptr_t) & meltcdat->dsym_632__CLASS_SOURCE_GENERATOR_DEVICE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr isobj dsym_630__CLASS_SOURCE_GENERATOR_DEVICE", + ("iniobj check.discr isobj dsym_632__CLASS_SOURCE_GENERATOR_DEVICE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr objmagic dsym_630__CLASS_SOURCE_GENERATOR_DEVICE", + ("iniobj check.discr objmagic dsym_632__CLASS_SOURCE_GENERATOR_DEVICE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_630__CLASS_SOURCE_GENERATOR_DEVICE.meltobj_class = + meltcdat->dsym_632__CLASS_SOURCE_GENERATOR_DEVICE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_630__CLASS_SOURCE_GENERATOR_DEVICE.obj_hash = 331634544; - meltcdat->dsym_630__CLASS_SOURCE_GENERATOR_DEVICE.obj_len = 3; + meltcdat->dsym_632__CLASS_SOURCE_GENERATOR_DEVICE.obj_hash = 331634544; + meltcdat->dsym_632__CLASS_SOURCE_GENERATOR_DEVICE.obj_len = 3; -/*inistring dstr_631__CLASS_SOURCE_GENERATOR_D*/ - /*_._VALSTR___V821*/ meltfptr[820] = - (melt_ptr_t) & meltcdat->dstr_631__CLASS_SOURCE_GENERATOR_D; - meltcdat->dstr_631__CLASS_SOURCE_GENERATOR_D.discr = +/*inistring dstr_633__CLASS_SOURCE_GENERATOR_D*/ + /*_._VALSTR___V824*/ meltfptr[823] = + (melt_ptr_t) & meltcdat->dstr_633__CLASS_SOURCE_GENERATOR_D; + meltcdat->dstr_633__CLASS_SOURCE_GENERATOR_D.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_631__CLASS_SOURCE_GENERATOR_D. + /*small inistring */ strncpy (meltcdat->dstr_633__CLASS_SOURCE_GENERATOR_D. val, "CLASS_SOURCE_GENERATOR_DEVICE", sizeof (meltcdat-> - dstr_631__CLASS_SOURCE_GENERATOR_D. + dstr_633__CLASS_SOURCE_GENERATOR_D. val) - 1); - meltcdat->dstr_631__CLASS_SOURCE_GENERATOR_D.val[29] = (char) 0; - meltcdat->dstr_631__CLASS_SOURCE_GENERATOR_D.slen = 29; + meltcdat->dstr_633__CLASS_SOURCE_GENERATOR_D.val[29] = (char) 0; + meltcdat->dstr_633__CLASS_SOURCE_GENERATOR_D.slen = 29; - /*inirout drout_632__SUBSTITUTE_FORMALS_FOR_SYNTEST */ - /*_._VALROUT___V822*/ meltfptr[821] = - (melt_ptr_t) & meltcdat->drout_632__SUBSTITUTE_FORMALS_FOR_SYNTEST; - meltcdat->drout_632__SUBSTITUTE_FORMALS_FOR_SYNTEST.discr = + /*inirout drout_634__SUBSTITUTE_FORMALS_FOR_SYNTEST */ + /*_._VALROUT___V825*/ meltfptr[824] = + (melt_ptr_t) & meltcdat->drout_634__SUBSTITUTE_FORMALS_FOR_SYNTEST; + meltcdat->drout_634__SUBSTITUTE_FORMALS_FOR_SYNTEST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); - strncpy (meltcdat->drout_632__SUBSTITUTE_FORMALS_FOR_SYNTEST.routdescr, + strncpy (meltcdat->drout_634__SUBSTITUTE_FORMALS_FOR_SYNTEST.routdescr, "SUBSTITUTE_FORMALS_FOR_SYNTEST @warmelt-outobj.melt:5801", MELT_ROUTDESCR_LEN - 1); - meltcdat->drout_632__SUBSTITUTE_FORMALS_FOR_SYNTEST.nbval = 8; + meltcdat->drout_634__SUBSTITUTE_FORMALS_FOR_SYNTEST.nbval = 8; MELT_ROUTINE_SET_ROUTCODE (&meltcdat-> - drout_632__SUBSTITUTE_FORMALS_FOR_SYNTEST, + drout_634__SUBSTITUTE_FORMALS_FOR_SYNTEST, meltrout_142_WARMELTmiOUTOBJ_SUBSTITUTE_FORMALS_FOR_SYNTEST); - /*iniclos dclo_633__SUBSTITUTE_FORMALS_FOR_SYNTEST */ - /*_._VALCLO___V823*/ meltfptr[822] = - (melt_ptr_t) & meltcdat->dclo_633__SUBSTITUTE_FORMALS_FOR_SYNTEST; - meltcdat->dclo_633__SUBSTITUTE_FORMALS_FOR_SYNTEST.discr = + /*iniclos dclo_635__SUBSTITUTE_FORMALS_FOR_SYNTEST */ + /*_._VALCLO___V826*/ meltfptr[825] = + (melt_ptr_t) & meltcdat->dclo_635__SUBSTITUTE_FORMALS_FOR_SYNTEST; + meltcdat->dclo_635__SUBSTITUTE_FORMALS_FOR_SYNTEST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); - meltcdat->dclo_633__SUBSTITUTE_FORMALS_FOR_SYNTEST.nbval = 0; + meltcdat->dclo_635__SUBSTITUTE_FORMALS_FOR_SYNTEST.nbval = 0; - /*inirout drout_634__EXPAND_TUPLE_FOR_SYNTEST */ - /*_._VALROUT___V824*/ meltfptr[823] = - (melt_ptr_t) & meltcdat->drout_634__EXPAND_TUPLE_FOR_SYNTEST; - meltcdat->drout_634__EXPAND_TUPLE_FOR_SYNTEST.discr = + /*inirout drout_636__EXPAND_TUPLE_FOR_SYNTEST */ + /*_._VALROUT___V827*/ meltfptr[826] = + (melt_ptr_t) & meltcdat->drout_636__EXPAND_TUPLE_FOR_SYNTEST; + meltcdat->drout_636__EXPAND_TUPLE_FOR_SYNTEST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); - strncpy (meltcdat->drout_634__EXPAND_TUPLE_FOR_SYNTEST.routdescr, + strncpy (meltcdat->drout_636__EXPAND_TUPLE_FOR_SYNTEST.routdescr, "EXPAND_TUPLE_FOR_SYNTEST @warmelt-outobj.melt:5827", MELT_ROUTDESCR_LEN - 1); - meltcdat->drout_634__EXPAND_TUPLE_FOR_SYNTEST.nbval = 3; - MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_634__EXPAND_TUPLE_FOR_SYNTEST, + meltcdat->drout_636__EXPAND_TUPLE_FOR_SYNTEST.nbval = 3; + MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_636__EXPAND_TUPLE_FOR_SYNTEST, meltrout_143_WARMELTmiOUTOBJ_EXPAND_TUPLE_FOR_SYNTEST); - /*iniclos dclo_635__EXPAND_TUPLE_FOR_SYNTEST */ - /*_._VALCLO___V825*/ meltfptr[824] = - (melt_ptr_t) & meltcdat->dclo_635__EXPAND_TUPLE_FOR_SYNTEST; - meltcdat->dclo_635__EXPAND_TUPLE_FOR_SYNTEST.discr = + /*iniclos dclo_637__EXPAND_TUPLE_FOR_SYNTEST */ + /*_._VALCLO___V828*/ meltfptr[827] = + (melt_ptr_t) & meltcdat->dclo_637__EXPAND_TUPLE_FOR_SYNTEST; + meltcdat->dclo_637__EXPAND_TUPLE_FOR_SYNTEST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); - meltcdat->dclo_635__EXPAND_TUPLE_FOR_SYNTEST.nbval = 0; + meltcdat->dclo_637__EXPAND_TUPLE_FOR_SYNTEST.nbval = 0; - /*inirout drout_636__SYNTESTGEN_PRIMITIVE */ - /*_._VALROUT___V826*/ meltfptr[825] = - (melt_ptr_t) & meltcdat->drout_636__SYNTESTGEN_PRIMITIVE; - meltcdat->drout_636__SYNTESTGEN_PRIMITIVE.discr = + /*inirout drout_638__SYNTESTGEN_PRIMITIVE */ + /*_._VALROUT___V829*/ meltfptr[828] = + (melt_ptr_t) & meltcdat->drout_638__SYNTESTGEN_PRIMITIVE; + meltcdat->drout_638__SYNTESTGEN_PRIMITIVE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); - strncpy (meltcdat->drout_636__SYNTESTGEN_PRIMITIVE.routdescr, + strncpy (meltcdat->drout_638__SYNTESTGEN_PRIMITIVE.routdescr, "SYNTESTGEN_PRIMITIVE @warmelt-outobj.melt:5851", MELT_ROUTDESCR_LEN - 1); - meltcdat->drout_636__SYNTESTGEN_PRIMITIVE.nbval = 14; - MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_636__SYNTESTGEN_PRIMITIVE, + meltcdat->drout_638__SYNTESTGEN_PRIMITIVE.nbval = 14; + MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_638__SYNTESTGEN_PRIMITIVE, meltrout_144_WARMELTmiOUTOBJ_SYNTESTGEN_PRIMITIVE); - /*iniclos dclo_637__SYNTESTGEN_PRIMITIVE */ - /*_._VALCLO___V827*/ meltfptr[826] = - (melt_ptr_t) & meltcdat->dclo_637__SYNTESTGEN_PRIMITIVE; - meltcdat->dclo_637__SYNTESTGEN_PRIMITIVE.discr = + /*iniclos dclo_639__SYNTESTGEN_PRIMITIVE */ + /*_._VALCLO___V830*/ meltfptr[829] = + (melt_ptr_t) & meltcdat->dclo_639__SYNTESTGEN_PRIMITIVE; + meltcdat->dclo_639__SYNTESTGEN_PRIMITIVE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); - meltcdat->dclo_637__SYNTESTGEN_PRIMITIVE.nbval = 0; + meltcdat->dclo_639__SYNTESTGEN_PRIMITIVE.nbval = 0; -/*iniobj dsym_638__CLASS_PRIMITIVE*/ - /*uniqueobj*/ if (! /*_._VALDATA___V828*/ meltfptr[827]) -/*_._VALDATA___V828*/ meltfptr[827] = - (melt_ptr_t) & meltcdat->dsym_638__CLASS_PRIMITIVE; +/*iniobj dsym_640__CLASS_PRIMITIVE*/ + /*uniqueobj*/ if (! /*_._VALDATA___V831*/ meltfptr[830]) +/*_._VALDATA___V831*/ meltfptr[830] = + (melt_ptr_t) & meltcdat->dsym_640__CLASS_PRIMITIVE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_638__CLASS_PRIMITIVE", + melt_assertmsg ("iniobj check.discr isobj dsym_640__CLASS_PRIMITIVE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr objmagic dsym_638__CLASS_PRIMITIVE", + melt_assertmsg ("iniobj check.discr objmagic dsym_640__CLASS_PRIMITIVE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_638__CLASS_PRIMITIVE.meltobj_class = + meltcdat->dsym_640__CLASS_PRIMITIVE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_638__CLASS_PRIMITIVE.obj_hash = 102527506; - meltcdat->dsym_638__CLASS_PRIMITIVE.obj_len = 3; + meltcdat->dsym_640__CLASS_PRIMITIVE.obj_hash = 102527506; + meltcdat->dsym_640__CLASS_PRIMITIVE.obj_len = 3; -/*inistring dstr_639__CLASS_PRIMITIVE*/ - /*_._VALSTR___V829*/ meltfptr[828] = - (melt_ptr_t) & meltcdat->dstr_639__CLASS_PRIMITIVE; - meltcdat->dstr_639__CLASS_PRIMITIVE.discr = +/*inistring dstr_641__CLASS_PRIMITIVE*/ + /*_._VALSTR___V832*/ meltfptr[831] = + (melt_ptr_t) & meltcdat->dstr_641__CLASS_PRIMITIVE; + meltcdat->dstr_641__CLASS_PRIMITIVE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_639__CLASS_PRIMITIVE.val, + /*small inistring */ strncpy (meltcdat->dstr_641__CLASS_PRIMITIVE.val, "CLASS_PRIMITIVE", - sizeof (meltcdat->dstr_639__CLASS_PRIMITIVE. + sizeof (meltcdat->dstr_641__CLASS_PRIMITIVE. val) - 1); - meltcdat->dstr_639__CLASS_PRIMITIVE.val[15] = (char) 0; - meltcdat->dstr_639__CLASS_PRIMITIVE.slen = 15; + meltcdat->dstr_641__CLASS_PRIMITIVE.val[15] = (char) 0; + meltcdat->dstr_641__CLASS_PRIMITIVE.slen = 15; -/*iniobj dsym_640__CLASS_SOURCE_DEFPRIMITIVE*/ - /*uniqueobj*/ if (! /*_._VALDATA___V830*/ meltfptr[829]) -/*_._VALDATA___V830*/ meltfptr[829] = - (melt_ptr_t) & meltcdat->dsym_640__CLASS_SOURCE_DEFPRIMITIVE; +/*iniobj dsym_642__CLASS_SOURCE_DEFPRIMITIVE*/ + /*uniqueobj*/ if (! /*_._VALDATA___V833*/ meltfptr[832]) +/*_._VALDATA___V833*/ meltfptr[832] = + (melt_ptr_t) & meltcdat->dsym_642__CLASS_SOURCE_DEFPRIMITIVE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr isobj dsym_640__CLASS_SOURCE_DEFPRIMITIVE", + ("iniobj check.discr isobj dsym_642__CLASS_SOURCE_DEFPRIMITIVE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr objmagic dsym_640__CLASS_SOURCE_DEFPRIMITIVE", + ("iniobj check.discr objmagic dsym_642__CLASS_SOURCE_DEFPRIMITIVE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_640__CLASS_SOURCE_DEFPRIMITIVE.meltobj_class = + meltcdat->dsym_642__CLASS_SOURCE_DEFPRIMITIVE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_640__CLASS_SOURCE_DEFPRIMITIVE.obj_hash = 89550180; - meltcdat->dsym_640__CLASS_SOURCE_DEFPRIMITIVE.obj_len = 3; + meltcdat->dsym_642__CLASS_SOURCE_DEFPRIMITIVE.obj_hash = 89550180; + meltcdat->dsym_642__CLASS_SOURCE_DEFPRIMITIVE.obj_len = 3; -/*inistring dstr_641__CLASS_SOURCE_DEFPRIMITIV*/ - /*_._VALSTR___V831*/ meltfptr[830] = - (melt_ptr_t) & meltcdat->dstr_641__CLASS_SOURCE_DEFPRIMITIV; - meltcdat->dstr_641__CLASS_SOURCE_DEFPRIMITIV.discr = +/*inistring dstr_643__CLASS_SOURCE_DEFPRIMITIV*/ + /*_._VALSTR___V834*/ meltfptr[833] = + (melt_ptr_t) & meltcdat->dstr_643__CLASS_SOURCE_DEFPRIMITIV; + meltcdat->dstr_643__CLASS_SOURCE_DEFPRIMITIV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_641__CLASS_SOURCE_DEFPRIMITIV. + /*small inistring */ strncpy (meltcdat->dstr_643__CLASS_SOURCE_DEFPRIMITIV. val, "CLASS_SOURCE_DEFPRIMITIVE", sizeof (meltcdat-> - dstr_641__CLASS_SOURCE_DEFPRIMITIV. + dstr_643__CLASS_SOURCE_DEFPRIMITIV. val) - 1); - meltcdat->dstr_641__CLASS_SOURCE_DEFPRIMITIV.val[25] = (char) 0; - meltcdat->dstr_641__CLASS_SOURCE_DEFPRIMITIV.slen = 25; + meltcdat->dstr_643__CLASS_SOURCE_DEFPRIMITIV.val[25] = (char) 0; + meltcdat->dstr_643__CLASS_SOURCE_DEFPRIMITIV.slen = 25; -/*iniobj dsym_642__DISCR_MAP_OBJECTS*/ - /*uniqueobj*/ if (! /*_._VALDATA___V832*/ meltfptr[831]) -/*_._VALDATA___V832*/ meltfptr[831] = - (melt_ptr_t) & meltcdat->dsym_642__DISCR_MAP_OBJECTS; +/*iniobj dsym_644__DISCR_MAP_OBJECTS*/ + /*uniqueobj*/ if (! /*_._VALDATA___V835*/ meltfptr[834]) +/*_._VALDATA___V835*/ meltfptr[834] = + (melt_ptr_t) & meltcdat->dsym_644__DISCR_MAP_OBJECTS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_642__DISCR_MAP_OBJECTS", + melt_assertmsg ("iniobj check.discr isobj dsym_644__DISCR_MAP_OBJECTS", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr objmagic dsym_642__DISCR_MAP_OBJECTS", + melt_assertmsg ("iniobj check.discr objmagic dsym_644__DISCR_MAP_OBJECTS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_642__DISCR_MAP_OBJECTS.meltobj_class = + meltcdat->dsym_644__DISCR_MAP_OBJECTS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_642__DISCR_MAP_OBJECTS.obj_hash = 217147088; - meltcdat->dsym_642__DISCR_MAP_OBJECTS.obj_len = 3; + meltcdat->dsym_644__DISCR_MAP_OBJECTS.obj_hash = 217147088; + meltcdat->dsym_644__DISCR_MAP_OBJECTS.obj_len = 3; -/*inistring dstr_643__DISCR_MAP_OBJECTS*/ - /*_._VALSTR___V833*/ meltfptr[832] = - (melt_ptr_t) & meltcdat->dstr_643__DISCR_MAP_OBJECTS; - meltcdat->dstr_643__DISCR_MAP_OBJECTS.discr = +/*inistring dstr_645__DISCR_MAP_OBJECTS*/ + /*_._VALSTR___V836*/ meltfptr[835] = + (melt_ptr_t) & meltcdat->dstr_645__DISCR_MAP_OBJECTS; + meltcdat->dstr_645__DISCR_MAP_OBJECTS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_643__DISCR_MAP_OBJECTS.val, + /*small inistring */ strncpy (meltcdat->dstr_645__DISCR_MAP_OBJECTS.val, "DISCR_MAP_OBJECTS", - sizeof (meltcdat->dstr_643__DISCR_MAP_OBJECTS. + sizeof (meltcdat->dstr_645__DISCR_MAP_OBJECTS. val) - 1); - meltcdat->dstr_643__DISCR_MAP_OBJECTS.val[17] = (char) 0; - meltcdat->dstr_643__DISCR_MAP_OBJECTS.slen = 17; + meltcdat->dstr_645__DISCR_MAP_OBJECTS.val[17] = (char) 0; + meltcdat->dstr_645__DISCR_MAP_OBJECTS.slen = 17; - /*inirout drout_644__SYNTESTGEN_CITERATOR */ - /*_._VALROUT___V834*/ meltfptr[833] = - (melt_ptr_t) & meltcdat->drout_644__SYNTESTGEN_CITERATOR; - meltcdat->drout_644__SYNTESTGEN_CITERATOR.discr = + /*inirout drout_646__SYNTESTGEN_CITERATOR */ + /*_._VALROUT___V837*/ meltfptr[836] = + (melt_ptr_t) & meltcdat->drout_646__SYNTESTGEN_CITERATOR; + meltcdat->drout_646__SYNTESTGEN_CITERATOR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); - strncpy (meltcdat->drout_644__SYNTESTGEN_CITERATOR.routdescr, + strncpy (meltcdat->drout_646__SYNTESTGEN_CITERATOR.routdescr, "SYNTESTGEN_CITERATOR @warmelt-outobj.melt:5911", MELT_ROUTDESCR_LEN - 1); - meltcdat->drout_644__SYNTESTGEN_CITERATOR.nbval = 15; - MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_644__SYNTESTGEN_CITERATOR, + meltcdat->drout_646__SYNTESTGEN_CITERATOR.nbval = 15; + MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_646__SYNTESTGEN_CITERATOR, meltrout_145_WARMELTmiOUTOBJ_SYNTESTGEN_CITERATOR); - /*iniclos dclo_645__SYNTESTGEN_CITERATOR */ - /*_._VALCLO___V835*/ meltfptr[834] = - (melt_ptr_t) & meltcdat->dclo_645__SYNTESTGEN_CITERATOR; - meltcdat->dclo_645__SYNTESTGEN_CITERATOR.discr = + /*iniclos dclo_647__SYNTESTGEN_CITERATOR */ + /*_._VALCLO___V838*/ meltfptr[837] = + (melt_ptr_t) & meltcdat->dclo_647__SYNTESTGEN_CITERATOR; + meltcdat->dclo_647__SYNTESTGEN_CITERATOR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); - meltcdat->dclo_645__SYNTESTGEN_CITERATOR.nbval = 0; + meltcdat->dclo_647__SYNTESTGEN_CITERATOR.nbval = 0; -/*iniobj dsym_646__CLASS_SOURCE_DEFCITERATOR*/ - /*uniqueobj*/ if (! /*_._VALDATA___V836*/ meltfptr[835]) -/*_._VALDATA___V836*/ meltfptr[835] = - (melt_ptr_t) & meltcdat->dsym_646__CLASS_SOURCE_DEFCITERATOR; +/*iniobj dsym_648__CLASS_SOURCE_DEFCITERATOR*/ + /*uniqueobj*/ if (! /*_._VALDATA___V839*/ meltfptr[838]) +/*_._VALDATA___V839*/ meltfptr[838] = + (melt_ptr_t) & meltcdat->dsym_648__CLASS_SOURCE_DEFCITERATOR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr isobj dsym_646__CLASS_SOURCE_DEFCITERATOR", + ("iniobj check.discr isobj dsym_648__CLASS_SOURCE_DEFCITERATOR", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr objmagic dsym_646__CLASS_SOURCE_DEFCITERATOR", + ("iniobj check.discr objmagic dsym_648__CLASS_SOURCE_DEFCITERATOR", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_646__CLASS_SOURCE_DEFCITERATOR.meltobj_class = + meltcdat->dsym_648__CLASS_SOURCE_DEFCITERATOR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_646__CLASS_SOURCE_DEFCITERATOR.obj_hash = 908057495; - meltcdat->dsym_646__CLASS_SOURCE_DEFCITERATOR.obj_len = 3; + meltcdat->dsym_648__CLASS_SOURCE_DEFCITERATOR.obj_hash = 908057495; + meltcdat->dsym_648__CLASS_SOURCE_DEFCITERATOR.obj_len = 3; -/*inistring dstr_647__CLASS_SOURCE_DEFCITERATO*/ - /*_._VALSTR___V837*/ meltfptr[836] = - (melt_ptr_t) & meltcdat->dstr_647__CLASS_SOURCE_DEFCITERATO; - meltcdat->dstr_647__CLASS_SOURCE_DEFCITERATO.discr = +/*inistring dstr_649__CLASS_SOURCE_DEFCITERATO*/ + /*_._VALSTR___V840*/ meltfptr[839] = + (melt_ptr_t) & meltcdat->dstr_649__CLASS_SOURCE_DEFCITERATO; + meltcdat->dstr_649__CLASS_SOURCE_DEFCITERATO.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_647__CLASS_SOURCE_DEFCITERATO. + /*small inistring */ strncpy (meltcdat->dstr_649__CLASS_SOURCE_DEFCITERATO. val, "CLASS_SOURCE_DEFCITERATOR", sizeof (meltcdat-> - dstr_647__CLASS_SOURCE_DEFCITERATO. + dstr_649__CLASS_SOURCE_DEFCITERATO. val) - 1); - meltcdat->dstr_647__CLASS_SOURCE_DEFCITERATO.val[25] = (char) 0; - meltcdat->dstr_647__CLASS_SOURCE_DEFCITERATO.slen = 25; + meltcdat->dstr_649__CLASS_SOURCE_DEFCITERATO.val[25] = (char) 0; + meltcdat->dstr_649__CLASS_SOURCE_DEFCITERATO.slen = 25; - /*inirout drout_648__SYNTESTGEN_CMATCHER */ - /*_._VALROUT___V838*/ meltfptr[837] = - (melt_ptr_t) & meltcdat->drout_648__SYNTESTGEN_CMATCHER; - meltcdat->drout_648__SYNTESTGEN_CMATCHER.discr = + /*inirout drout_650__SYNTESTGEN_CMATCHER */ + /*_._VALROUT___V841*/ meltfptr[840] = + (melt_ptr_t) & meltcdat->drout_650__SYNTESTGEN_CMATCHER; + meltcdat->drout_650__SYNTESTGEN_CMATCHER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); - strncpy (meltcdat->drout_648__SYNTESTGEN_CMATCHER.routdescr, + strncpy (meltcdat->drout_650__SYNTESTGEN_CMATCHER.routdescr, "SYNTESTGEN_CMATCHER @warmelt-outobj.melt:5979", MELT_ROUTDESCR_LEN - 1); - meltcdat->drout_648__SYNTESTGEN_CMATCHER.nbval = 18; - MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_648__SYNTESTGEN_CMATCHER, + meltcdat->drout_650__SYNTESTGEN_CMATCHER.nbval = 18; + MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_650__SYNTESTGEN_CMATCHER, meltrout_146_WARMELTmiOUTOBJ_SYNTESTGEN_CMATCHER); - /*iniclos dclo_649__SYNTESTGEN_CMATCHER */ - /*_._VALCLO___V841*/ meltfptr[840] = - (melt_ptr_t) & meltcdat->dclo_649__SYNTESTGEN_CMATCHER; - meltcdat->dclo_649__SYNTESTGEN_CMATCHER.discr = + /*iniclos dclo_651__SYNTESTGEN_CMATCHER */ + /*_._VALCLO___V844*/ meltfptr[843] = + (melt_ptr_t) & meltcdat->dclo_651__SYNTESTGEN_CMATCHER; + meltcdat->dclo_651__SYNTESTGEN_CMATCHER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); - meltcdat->dclo_649__SYNTESTGEN_CMATCHER.nbval = 0; + meltcdat->dclo_651__SYNTESTGEN_CMATCHER.nbval = 0; -/*iniobj dsym_650__CLASS_CMATCHER*/ - /*uniqueobj*/ if (! /*_._VALDATA___V842*/ meltfptr[841]) -/*_._VALDATA___V842*/ meltfptr[841] = - (melt_ptr_t) & meltcdat->dsym_650__CLASS_CMATCHER; +/*iniobj dsym_652__CLASS_CMATCHER*/ + /*uniqueobj*/ if (! /*_._VALDATA___V845*/ meltfptr[844]) +/*_._VALDATA___V845*/ meltfptr[844] = + (melt_ptr_t) & meltcdat->dsym_652__CLASS_CMATCHER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_650__CLASS_CMATCHER", + melt_assertmsg ("iniobj check.discr isobj dsym_652__CLASS_CMATCHER", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr objmagic dsym_650__CLASS_CMATCHER", + melt_assertmsg ("iniobj check.discr objmagic dsym_652__CLASS_CMATCHER", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_650__CLASS_CMATCHER.meltobj_class = + meltcdat->dsym_652__CLASS_CMATCHER.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_650__CLASS_CMATCHER.obj_hash = 544975672; - meltcdat->dsym_650__CLASS_CMATCHER.obj_len = 3; + meltcdat->dsym_652__CLASS_CMATCHER.obj_hash = 544975672; + meltcdat->dsym_652__CLASS_CMATCHER.obj_len = 3; -/*inistring dstr_651__CLASS_CMATCHER*/ - /*_._VALSTR___V843*/ meltfptr[842] = - (melt_ptr_t) & meltcdat->dstr_651__CLASS_CMATCHER; - meltcdat->dstr_651__CLASS_CMATCHER.discr = +/*inistring dstr_653__CLASS_CMATCHER*/ + /*_._VALSTR___V846*/ meltfptr[845] = + (melt_ptr_t) & meltcdat->dstr_653__CLASS_CMATCHER; + meltcdat->dstr_653__CLASS_CMATCHER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_651__CLASS_CMATCHER.val, + /*small inistring */ strncpy (meltcdat->dstr_653__CLASS_CMATCHER.val, "CLASS_CMATCHER", - sizeof (meltcdat->dstr_651__CLASS_CMATCHER. + sizeof (meltcdat->dstr_653__CLASS_CMATCHER. val) - 1); - meltcdat->dstr_651__CLASS_CMATCHER.val[14] = (char) 0; - meltcdat->dstr_651__CLASS_CMATCHER.slen = 14; + meltcdat->dstr_653__CLASS_CMATCHER.val[14] = (char) 0; + meltcdat->dstr_653__CLASS_CMATCHER.slen = 14; -/*iniobj dsym_652__CLASS_ANY_MATCHER*/ - /*uniqueobj*/ if (! /*_._VALDATA___V844*/ meltfptr[843]) -/*_._VALDATA___V844*/ meltfptr[843] = - (melt_ptr_t) & meltcdat->dsym_652__CLASS_ANY_MATCHER; +/*iniobj dsym_654__CLASS_ANY_MATCHER*/ + /*uniqueobj*/ if (! /*_._VALDATA___V847*/ meltfptr[846]) +/*_._VALDATA___V847*/ meltfptr[846] = + (melt_ptr_t) & meltcdat->dsym_654__CLASS_ANY_MATCHER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_652__CLASS_ANY_MATCHER", + melt_assertmsg ("iniobj check.discr isobj dsym_654__CLASS_ANY_MATCHER", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr objmagic dsym_652__CLASS_ANY_MATCHER", + melt_assertmsg ("iniobj check.discr objmagic dsym_654__CLASS_ANY_MATCHER", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_652__CLASS_ANY_MATCHER.meltobj_class = + meltcdat->dsym_654__CLASS_ANY_MATCHER.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_652__CLASS_ANY_MATCHER.obj_hash = 781265508; - meltcdat->dsym_652__CLASS_ANY_MATCHER.obj_len = 3; + meltcdat->dsym_654__CLASS_ANY_MATCHER.obj_hash = 781265508; + meltcdat->dsym_654__CLASS_ANY_MATCHER.obj_len = 3; -/*inistring dstr_653__CLASS_ANY_MATCHER*/ - /*_._VALSTR___V845*/ meltfptr[844] = - (melt_ptr_t) & meltcdat->dstr_653__CLASS_ANY_MATCHER; - meltcdat->dstr_653__CLASS_ANY_MATCHER.discr = +/*inistring dstr_655__CLASS_ANY_MATCHER*/ + /*_._VALSTR___V848*/ meltfptr[847] = + (melt_ptr_t) & meltcdat->dstr_655__CLASS_ANY_MATCHER; + meltcdat->dstr_655__CLASS_ANY_MATCHER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_653__CLASS_ANY_MATCHER.val, + /*small inistring */ strncpy (meltcdat->dstr_655__CLASS_ANY_MATCHER.val, "CLASS_ANY_MATCHER", - sizeof (meltcdat->dstr_653__CLASS_ANY_MATCHER. + sizeof (meltcdat->dstr_655__CLASS_ANY_MATCHER. val) - 1); - meltcdat->dstr_653__CLASS_ANY_MATCHER.val[17] = (char) 0; - meltcdat->dstr_653__CLASS_ANY_MATCHER.slen = 17; + meltcdat->dstr_655__CLASS_ANY_MATCHER.val[17] = (char) 0; + meltcdat->dstr_655__CLASS_ANY_MATCHER.slen = 17; -/*iniobj dsym_654__CLASS_SOURCE_DEFCMATCHER*/ - /*uniqueobj*/ if (! /*_._VALDATA___V846*/ meltfptr[845]) -/*_._VALDATA___V846*/ meltfptr[845] = - (melt_ptr_t) & meltcdat->dsym_654__CLASS_SOURCE_DEFCMATCHER; +/*iniobj dsym_656__CLASS_SOURCE_DEFCMATCHER*/ + /*uniqueobj*/ if (! /*_._VALDATA___V849*/ meltfptr[848]) +/*_._VALDATA___V849*/ meltfptr[848] = + (melt_ptr_t) & meltcdat->dsym_656__CLASS_SOURCE_DEFCMATCHER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr isobj dsym_654__CLASS_SOURCE_DEFCMATCHER", + ("iniobj check.discr isobj dsym_656__CLASS_SOURCE_DEFCMATCHER", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr objmagic dsym_654__CLASS_SOURCE_DEFCMATCHER", + ("iniobj check.discr objmagic dsym_656__CLASS_SOURCE_DEFCMATCHER", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_654__CLASS_SOURCE_DEFCMATCHER.meltobj_class = + meltcdat->dsym_656__CLASS_SOURCE_DEFCMATCHER.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_654__CLASS_SOURCE_DEFCMATCHER.obj_hash = 177651266; - meltcdat->dsym_654__CLASS_SOURCE_DEFCMATCHER.obj_len = 3; + meltcdat->dsym_656__CLASS_SOURCE_DEFCMATCHER.obj_hash = 177651266; + meltcdat->dsym_656__CLASS_SOURCE_DEFCMATCHER.obj_len = 3; -/*inistring dstr_655__CLASS_SOURCE_DEFCMATCHER*/ - /*_._VALSTR___V847*/ meltfptr[846] = - (melt_ptr_t) & meltcdat->dstr_655__CLASS_SOURCE_DEFCMATCHER; - meltcdat->dstr_655__CLASS_SOURCE_DEFCMATCHER.discr = +/*inistring dstr_657__CLASS_SOURCE_DEFCMATCHER*/ + /*_._VALSTR___V850*/ meltfptr[849] = + (melt_ptr_t) & meltcdat->dstr_657__CLASS_SOURCE_DEFCMATCHER; + meltcdat->dstr_657__CLASS_SOURCE_DEFCMATCHER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_655__CLASS_SOURCE_DEFCMATCHER. + /*small inistring */ strncpy (meltcdat->dstr_657__CLASS_SOURCE_DEFCMATCHER. val, "CLASS_SOURCE_DEFCMATCHER", sizeof (meltcdat-> - dstr_655__CLASS_SOURCE_DEFCMATCHER. + dstr_657__CLASS_SOURCE_DEFCMATCHER. val) - 1); - meltcdat->dstr_655__CLASS_SOURCE_DEFCMATCHER.val[24] = (char) 0; - meltcdat->dstr_655__CLASS_SOURCE_DEFCMATCHER.slen = 24; + meltcdat->dstr_657__CLASS_SOURCE_DEFCMATCHER.val[24] = (char) 0; + meltcdat->dstr_657__CLASS_SOURCE_DEFCMATCHER.slen = 24; -/*inistring dstr_656__cmatcher_oper_*/ - /*_._VALSTR___V839*/ meltfptr[838] = - (melt_ptr_t) & meltcdat->dstr_656__cmatcher_oper_; - meltcdat->dstr_656__cmatcher_oper_.discr = +/*inistring dstr_658__cmatcher_oper_*/ + /*_._VALSTR___V842*/ meltfptr[841] = + (melt_ptr_t) & meltcdat->dstr_658__cmatcher_oper_; + meltcdat->dstr_658__cmatcher_oper_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_656__cmatcher_oper_.val, + /*small inistring */ strncpy (meltcdat->dstr_658__cmatcher_oper_.val, "/*cmatcher-oper*/", - sizeof (meltcdat->dstr_656__cmatcher_oper_. + sizeof (meltcdat->dstr_658__cmatcher_oper_. val) - 1); - meltcdat->dstr_656__cmatcher_oper_.val[17] = (char) 0; - meltcdat->dstr_656__cmatcher_oper_.slen = 17; + meltcdat->dstr_658__cmatcher_oper_.val[17] = (char) 0; + meltcdat->dstr_658__cmatcher_oper_.slen = 17; -/*inistring dstr_657__*/ - /*_._VALSTR___V840*/ meltfptr[839] = (melt_ptr_t) & meltcdat->dstr_657__; - meltcdat->dstr_657__.discr = +/*inistring dstr_659__*/ + /*_._VALSTR___V843*/ meltfptr[842] = (melt_ptr_t) & meltcdat->dstr_659__; + meltcdat->dstr_659__.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_657__.val, " = ", - sizeof (meltcdat->dstr_657__.val) - 1); - meltcdat->dstr_657__.val[3] = (char) 0; - meltcdat->dstr_657__.slen = 3; - - /*inirout drout_658__EMIT_SYNTAX_TESTING_ROUTINE */ - /*_._VALROUT___V848*/ meltfptr[847] = - (melt_ptr_t) & meltcdat->drout_658__EMIT_SYNTAX_TESTING_ROUTINE; - meltcdat->drout_658__EMIT_SYNTAX_TESTING_ROUTINE.discr = + /*small inistring */ strncpy (meltcdat->dstr_659__.val, " = ", + sizeof (meltcdat->dstr_659__.val) - 1); + meltcdat->dstr_659__.val[3] = (char) 0; + meltcdat->dstr_659__.slen = 3; + + /*inirout drout_660__EMIT_SYNTAX_TESTING_ROUTINE */ + /*_._VALROUT___V851*/ meltfptr[850] = + (melt_ptr_t) & meltcdat->drout_660__EMIT_SYNTAX_TESTING_ROUTINE; + meltcdat->drout_660__EMIT_SYNTAX_TESTING_ROUTINE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); - strncpy (meltcdat->drout_658__EMIT_SYNTAX_TESTING_ROUTINE.routdescr, + strncpy (meltcdat->drout_660__EMIT_SYNTAX_TESTING_ROUTINE.routdescr, "EMIT_SYNTAX_TESTING_ROUTINE @warmelt-outobj.melt:6064", MELT_ROUTDESCR_LEN - 1); - meltcdat->drout_658__EMIT_SYNTAX_TESTING_ROUTINE.nbval = 7; + meltcdat->drout_660__EMIT_SYNTAX_TESTING_ROUTINE.nbval = 7; MELT_ROUTINE_SET_ROUTCODE (&meltcdat-> - drout_658__EMIT_SYNTAX_TESTING_ROUTINE, + drout_660__EMIT_SYNTAX_TESTING_ROUTINE, meltrout_147_WARMELTmiOUTOBJ_EMIT_SYNTAX_TESTING_ROUTINE); - /*iniclos dclo_659__EMIT_SYNTAX_TESTING_ROUTINE */ - /*_._VALCLO___V849*/ meltfptr[848] = - (melt_ptr_t) & meltcdat->dclo_659__EMIT_SYNTAX_TESTING_ROUTINE; - meltcdat->dclo_659__EMIT_SYNTAX_TESTING_ROUTINE.discr = + /*iniclos dclo_661__EMIT_SYNTAX_TESTING_ROUTINE */ + /*_._VALCLO___V852*/ meltfptr[851] = + (melt_ptr_t) & meltcdat->dclo_661__EMIT_SYNTAX_TESTING_ROUTINE; + meltcdat->dclo_661__EMIT_SYNTAX_TESTING_ROUTINE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); - meltcdat->dclo_659__EMIT_SYNTAX_TESTING_ROUTINE.nbval = 0; + meltcdat->dclo_661__EMIT_SYNTAX_TESTING_ROUTINE.nbval = 0; - /*inirout drout_660__NORMALIZE_MACROEXPANDED_LIST */ - /*_._VALROUT___V850*/ meltfptr[849] = - (melt_ptr_t) & meltcdat->drout_660__NORMALIZE_MACROEXPANDED_LIST; - meltcdat->drout_660__NORMALIZE_MACROEXPANDED_LIST.discr = + /*inirout drout_662__NORMALIZE_MACROEXPANDED_LIST */ + /*_._VALROUT___V853*/ meltfptr[852] = + (melt_ptr_t) & meltcdat->drout_662__NORMALIZE_MACROEXPANDED_LIST; + meltcdat->drout_662__NORMALIZE_MACROEXPANDED_LIST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); - strncpy (meltcdat->drout_660__NORMALIZE_MACROEXPANDED_LIST.routdescr, + strncpy (meltcdat->drout_662__NORMALIZE_MACROEXPANDED_LIST.routdescr, "NORMALIZE_MACROEXPANDED_LIST @warmelt-outobj.melt:6131", MELT_ROUTDESCR_LEN - 1); - meltcdat->drout_660__NORMALIZE_MACROEXPANDED_LIST.nbval = 14; + meltcdat->drout_662__NORMALIZE_MACROEXPANDED_LIST.nbval = 14; MELT_ROUTINE_SET_ROUTCODE (&meltcdat-> - drout_660__NORMALIZE_MACROEXPANDED_LIST, + drout_662__NORMALIZE_MACROEXPANDED_LIST, meltrout_148_WARMELTmiOUTOBJ_NORMALIZE_MACROEXPANDED_LIST); - /*iniclos dclo_661__NORMALIZE_MACROEXPANDED_LIST */ - /*_._VALCLO___V852*/ meltfptr[851] = - (melt_ptr_t) & meltcdat->dclo_661__NORMALIZE_MACROEXPANDED_LIST; - meltcdat->dclo_661__NORMALIZE_MACROEXPANDED_LIST.discr = + /*iniclos dclo_663__NORMALIZE_MACROEXPANDED_LIST */ + /*_._VALCLO___V855*/ meltfptr[854] = + (melt_ptr_t) & meltcdat->dclo_663__NORMALIZE_MACROEXPANDED_LIST; + meltcdat->dclo_663__NORMALIZE_MACROEXPANDED_LIST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); - meltcdat->dclo_661__NORMALIZE_MACROEXPANDED_LIST.nbval = 0; + meltcdat->dclo_663__NORMALIZE_MACROEXPANDED_LIST.nbval = 0; -/*iniobj dsym_662__CLASS_NORMALIZATION_CONTEXT*/ - /*uniqueobj*/ if (! /*_._VALDATA___V853*/ meltfptr[852]) -/*_._VALDATA___V853*/ meltfptr[852] = - (melt_ptr_t) & meltcdat->dsym_662__CLASS_NORMALIZATION_CONTEXT; +/*iniobj dsym_664__CLASS_NORMALIZATION_CONTEXT*/ + /*uniqueobj*/ if (! /*_._VALDATA___V856*/ meltfptr[855]) +/*_._VALDATA___V856*/ meltfptr[855] = + (melt_ptr_t) & meltcdat->dsym_664__CLASS_NORMALIZATION_CONTEXT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr isobj dsym_662__CLASS_NORMALIZATION_CONTEXT", + ("iniobj check.discr isobj dsym_664__CLASS_NORMALIZATION_CONTEXT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr objmagic dsym_662__CLASS_NORMALIZATION_CONTEXT", + ("iniobj check.discr objmagic dsym_664__CLASS_NORMALIZATION_CONTEXT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_662__CLASS_NORMALIZATION_CONTEXT.meltobj_class = + meltcdat->dsym_664__CLASS_NORMALIZATION_CONTEXT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_662__CLASS_NORMALIZATION_CONTEXT.obj_hash = 429657178; - meltcdat->dsym_662__CLASS_NORMALIZATION_CONTEXT.obj_len = 3; + meltcdat->dsym_664__CLASS_NORMALIZATION_CONTEXT.obj_hash = 429657178; + meltcdat->dsym_664__CLASS_NORMALIZATION_CONTEXT.obj_len = 3; -/*inistring dstr_663__CLASS_NORMALIZATION_CONT*/ - /*_._VALSTR___V854*/ meltfptr[853] = - (melt_ptr_t) & meltcdat->dstr_663__CLASS_NORMALIZATION_CONT; - meltcdat->dstr_663__CLASS_NORMALIZATION_CONT.discr = +/*inistring dstr_665__CLASS_NORMALIZATION_CONT*/ + /*_._VALSTR___V857*/ meltfptr[856] = + (melt_ptr_t) & meltcdat->dstr_665__CLASS_NORMALIZATION_CONT; + meltcdat->dstr_665__CLASS_NORMALIZATION_CONT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_663__CLASS_NORMALIZATION_CONT. + /*small inistring */ strncpy (meltcdat->dstr_665__CLASS_NORMALIZATION_CONT. val, "CLASS_NORMALIZATION_CONTEXT", sizeof (meltcdat-> - dstr_663__CLASS_NORMALIZATION_CONT. + dstr_665__CLASS_NORMALIZATION_CONT. val) - 1); - meltcdat->dstr_663__CLASS_NORMALIZATION_CONT.val[27] = (char) 0; - meltcdat->dstr_663__CLASS_NORMALIZATION_CONT.slen = 27; + meltcdat->dstr_665__CLASS_NORMALIZATION_CONT.val[27] = (char) 0; + meltcdat->dstr_665__CLASS_NORMALIZATION_CONT.slen = 27; -/*iniobj dsym_664__CLASS_ENVIRONMENT*/ - /*uniqueobj*/ if (! /*_._VALDATA___V855*/ meltfptr[854]) -/*_._VALDATA___V855*/ meltfptr[854] = - (melt_ptr_t) & meltcdat->dsym_664__CLASS_ENVIRONMENT; +/*iniobj dsym_666__CLASS_ENVIRONMENT*/ + /*uniqueobj*/ if (! /*_._VALDATA___V858*/ meltfptr[857]) +/*_._VALDATA___V858*/ meltfptr[857] = + (melt_ptr_t) & meltcdat->dsym_666__CLASS_ENVIRONMENT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_664__CLASS_ENVIRONMENT", + melt_assertmsg ("iniobj check.discr isobj dsym_666__CLASS_ENVIRONMENT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr objmagic dsym_664__CLASS_ENVIRONMENT", + melt_assertmsg ("iniobj check.discr objmagic dsym_666__CLASS_ENVIRONMENT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_664__CLASS_ENVIRONMENT.meltobj_class = + meltcdat->dsym_666__CLASS_ENVIRONMENT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_664__CLASS_ENVIRONMENT.obj_hash = 59212821; - meltcdat->dsym_664__CLASS_ENVIRONMENT.obj_len = 3; + meltcdat->dsym_666__CLASS_ENVIRONMENT.obj_hash = 59212821; + meltcdat->dsym_666__CLASS_ENVIRONMENT.obj_len = 3; -/*inistring dstr_665__CLASS_ENVIRONMENT*/ - /*_._VALSTR___V856*/ meltfptr[855] = - (melt_ptr_t) & meltcdat->dstr_665__CLASS_ENVIRONMENT; - meltcdat->dstr_665__CLASS_ENVIRONMENT.discr = +/*inistring dstr_667__CLASS_ENVIRONMENT*/ + /*_._VALSTR___V859*/ meltfptr[858] = + (melt_ptr_t) & meltcdat->dstr_667__CLASS_ENVIRONMENT; + meltcdat->dstr_667__CLASS_ENVIRONMENT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_665__CLASS_ENVIRONMENT.val, + /*small inistring */ strncpy (meltcdat->dstr_667__CLASS_ENVIRONMENT.val, "CLASS_ENVIRONMENT", - sizeof (meltcdat->dstr_665__CLASS_ENVIRONMENT. + sizeof (meltcdat->dstr_667__CLASS_ENVIRONMENT. val) - 1); - meltcdat->dstr_665__CLASS_ENVIRONMENT.val[17] = (char) 0; - meltcdat->dstr_665__CLASS_ENVIRONMENT.slen = 17; + meltcdat->dstr_667__CLASS_ENVIRONMENT.val[17] = (char) 0; + meltcdat->dstr_667__CLASS_ENVIRONMENT.slen = 17; -/*iniobj dsym_666__CLASS_SOURCE*/ - /*uniqueobj*/ if (! /*_._VALDATA___V857*/ meltfptr[856]) -/*_._VALDATA___V857*/ meltfptr[856] = - (melt_ptr_t) & meltcdat->dsym_666__CLASS_SOURCE; +/*iniobj dsym_668__CLASS_SOURCE*/ + /*uniqueobj*/ if (! /*_._VALDATA___V860*/ meltfptr[859]) +/*_._VALDATA___V860*/ meltfptr[859] = + (melt_ptr_t) & meltcdat->dsym_668__CLASS_SOURCE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_666__CLASS_SOURCE", + melt_assertmsg ("iniobj check.discr isobj dsym_668__CLASS_SOURCE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr objmagic dsym_666__CLASS_SOURCE", + melt_assertmsg ("iniobj check.discr objmagic dsym_668__CLASS_SOURCE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_666__CLASS_SOURCE.meltobj_class = + meltcdat->dsym_668__CLASS_SOURCE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_666__CLASS_SOURCE.obj_hash = 656628255; - meltcdat->dsym_666__CLASS_SOURCE.obj_len = 3; + meltcdat->dsym_668__CLASS_SOURCE.obj_hash = 656628255; + meltcdat->dsym_668__CLASS_SOURCE.obj_len = 3; -/*inistring dstr_667__CLASS_SOURCE*/ - /*_._VALSTR___V858*/ meltfptr[857] = - (melt_ptr_t) & meltcdat->dstr_667__CLASS_SOURCE; - meltcdat->dstr_667__CLASS_SOURCE.discr = +/*inistring dstr_669__CLASS_SOURCE*/ + /*_._VALSTR___V861*/ meltfptr[860] = + (melt_ptr_t) & meltcdat->dstr_669__CLASS_SOURCE; + meltcdat->dstr_669__CLASS_SOURCE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_667__CLASS_SOURCE.val, + /*small inistring */ strncpy (meltcdat->dstr_669__CLASS_SOURCE.val, "CLASS_SOURCE", - sizeof (meltcdat->dstr_667__CLASS_SOURCE. + sizeof (meltcdat->dstr_669__CLASS_SOURCE. val) - 1); - meltcdat->dstr_667__CLASS_SOURCE.val[12] = (char) 0; - meltcdat->dstr_667__CLASS_SOURCE.slen = 12; + meltcdat->dstr_669__CLASS_SOURCE.val[12] = (char) 0; + meltcdat->dstr_669__CLASS_SOURCE.slen = 12; -/*iniobj dsym_668__CLASS_SOURCE_UPDATE_CURRENT_MODULE_ENVIRONMENT_REFERENCE*/ - /*uniqueobj*/ if (! /*_._VALDATA___V859*/ meltfptr[858]) -/*_._VALDATA___V859*/ meltfptr[858] = +/*iniobj dsym_670__CLASS_SOURCE_UPDATE_CURRENT_MODULE_ENVIRONMENT_REFERENCE*/ + /*uniqueobj*/ if (! /*_._VALDATA___V862*/ meltfptr[861]) +/*_._VALDATA___V862*/ meltfptr[861] = (melt_ptr_t) & meltcdat-> - dsym_668__CLASS_SOURCE_UPDATE_CURRENT_MODULE_ENVIRONMENT_REFERENCE; + dsym_670__CLASS_SOURCE_UPDATE_CURRENT_MODULE_ENVIRONMENT_REFERENCE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr isobj dsym_668__CLASS_SOURCE_UPDATE_CURRENT_MODULE_ENVIRONMENT_REFERENCE", + ("iniobj check.discr isobj dsym_670__CLASS_SOURCE_UPDATE_CURRENT_MODULE_ENVIRONMENT_REFERENCE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr objmagic dsym_668__CLASS_SOURCE_UPDATE_CURRENT_MODULE_ENVIRONMENT_REFERENCE", + ("iniobj check.discr objmagic dsym_670__CLASS_SOURCE_UPDATE_CURRENT_MODULE_ENVIRONMENT_REFERENCE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); meltcdat-> - dsym_668__CLASS_SOURCE_UPDATE_CURRENT_MODULE_ENVIRONMENT_REFERENCE. + dsym_670__CLASS_SOURCE_UPDATE_CURRENT_MODULE_ENVIRONMENT_REFERENCE. meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); meltcdat-> - dsym_668__CLASS_SOURCE_UPDATE_CURRENT_MODULE_ENVIRONMENT_REFERENCE. + dsym_670__CLASS_SOURCE_UPDATE_CURRENT_MODULE_ENVIRONMENT_REFERENCE. obj_hash = 942073007; meltcdat-> - dsym_668__CLASS_SOURCE_UPDATE_CURRENT_MODULE_ENVIRONMENT_REFERENCE. + dsym_670__CLASS_SOURCE_UPDATE_CURRENT_MODULE_ENVIRONMENT_REFERENCE. obj_len = 3; -/*inistring dstr_669__CLASS_SOURCE_UPDATE_CURR*/ - /*_._VALSTR___V860*/ meltfptr[859] = - (melt_ptr_t) & meltcdat->dstr_669__CLASS_SOURCE_UPDATE_CURR; - meltcdat->dstr_669__CLASS_SOURCE_UPDATE_CURR.discr = +/*inistring dstr_671__CLASS_SOURCE_UPDATE_CURR*/ + /*_._VALSTR___V863*/ meltfptr[862] = + (melt_ptr_t) & meltcdat->dstr_671__CLASS_SOURCE_UPDATE_CURR; + meltcdat->dstr_671__CLASS_SOURCE_UPDATE_CURR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_669__CLASS_SOURCE_UPDATE_CURR. + /*small inistring */ strncpy (meltcdat->dstr_671__CLASS_SOURCE_UPDATE_CURR. val, "CLASS_SOURCE_UPDATE_CURRENT_MODULE_ENVIRONMENT_REFERENCE", sizeof (meltcdat-> - dstr_669__CLASS_SOURCE_UPDATE_CURR. + dstr_671__CLASS_SOURCE_UPDATE_CURR. val) - 1); - meltcdat->dstr_669__CLASS_SOURCE_UPDATE_CURR.val[56] = (char) 0; - meltcdat->dstr_669__CLASS_SOURCE_UPDATE_CURR.slen = 56; + meltcdat->dstr_671__CLASS_SOURCE_UPDATE_CURR.val[56] = (char) 0; + meltcdat->dstr_671__CLASS_SOURCE_UPDATE_CURR.slen = 56; -/*inistring dstr_670__at_very_start*/ - /*_._VALSTR___V851*/ meltfptr[850] = - (melt_ptr_t) & meltcdat->dstr_670__at_very_start; - meltcdat->dstr_670__at_very_start.discr = +/*inistring dstr_672__at_very_start*/ + /*_._VALSTR___V854*/ meltfptr[853] = + (melt_ptr_t) & meltcdat->dstr_672__at_very_start; + meltcdat->dstr_672__at_very_start.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_670__at_very_start.val, + /*small inistring */ strncpy (meltcdat->dstr_672__at_very_start.val, "at very start", - sizeof (meltcdat->dstr_670__at_very_start. + sizeof (meltcdat->dstr_672__at_very_start. val) - 1); - meltcdat->dstr_670__at_very_start.val[13] = (char) 0; - meltcdat->dstr_670__at_very_start.slen = 13; + meltcdat->dstr_672__at_very_start.val[13] = (char) 0; + meltcdat->dstr_672__at_very_start.slen = 13; -/*iniobj dsym_671__CLASS_SOURCE_COMMENT*/ - /*uniqueobj*/ if (! /*_._VALDATA___V861*/ meltfptr[860]) -/*_._VALDATA___V861*/ meltfptr[860] = - (melt_ptr_t) & meltcdat->dsym_671__CLASS_SOURCE_COMMENT; +/*iniobj dsym_673__CLASS_SOURCE_COMMENT*/ + /*uniqueobj*/ if (! /*_._VALDATA___V864*/ meltfptr[863]) +/*_._VALDATA___V864*/ meltfptr[863] = + (melt_ptr_t) & meltcdat->dsym_673__CLASS_SOURCE_COMMENT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_671__CLASS_SOURCE_COMMENT", + melt_assertmsg ("iniobj check.discr isobj dsym_673__CLASS_SOURCE_COMMENT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr objmagic dsym_671__CLASS_SOURCE_COMMENT", + ("iniobj check.discr objmagic dsym_673__CLASS_SOURCE_COMMENT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_671__CLASS_SOURCE_COMMENT.meltobj_class = + meltcdat->dsym_673__CLASS_SOURCE_COMMENT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_671__CLASS_SOURCE_COMMENT.obj_hash = 156677751; - meltcdat->dsym_671__CLASS_SOURCE_COMMENT.obj_len = 3; + meltcdat->dsym_673__CLASS_SOURCE_COMMENT.obj_hash = 156677751; + meltcdat->dsym_673__CLASS_SOURCE_COMMENT.obj_len = 3; -/*inistring dstr_672__CLASS_SOURCE_COMMENT*/ - /*_._VALSTR___V862*/ meltfptr[861] = - (melt_ptr_t) & meltcdat->dstr_672__CLASS_SOURCE_COMMENT; - meltcdat->dstr_672__CLASS_SOURCE_COMMENT.discr = +/*inistring dstr_674__CLASS_SOURCE_COMMENT*/ + /*_._VALSTR___V865*/ meltfptr[864] = + (melt_ptr_t) & meltcdat->dstr_674__CLASS_SOURCE_COMMENT; + meltcdat->dstr_674__CLASS_SOURCE_COMMENT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_672__CLASS_SOURCE_COMMENT.val, + /*small inistring */ strncpy (meltcdat->dstr_674__CLASS_SOURCE_COMMENT.val, "CLASS_SOURCE_COMMENT", sizeof (meltcdat-> - dstr_672__CLASS_SOURCE_COMMENT.val) - + dstr_674__CLASS_SOURCE_COMMENT.val) - 1); - meltcdat->dstr_672__CLASS_SOURCE_COMMENT.val[20] = (char) 0; - meltcdat->dstr_672__CLASS_SOURCE_COMMENT.slen = 20; + meltcdat->dstr_674__CLASS_SOURCE_COMMENT.val[20] = (char) 0; + meltcdat->dstr_674__CLASS_SOURCE_COMMENT.slen = 20; -/*iniobj dsym_673__NORMAL_EXP*/ - /*uniqueobj*/ if (! /*_._VALDATA___V863*/ meltfptr[862]) -/*_._VALDATA___V863*/ meltfptr[862] = - (melt_ptr_t) & meltcdat->dsym_673__NORMAL_EXP; +/*iniobj dsym_675__NORMAL_EXP*/ + /*uniqueobj*/ if (! /*_._VALDATA___V866*/ meltfptr[865]) +/*_._VALDATA___V866*/ meltfptr[865] = + (melt_ptr_t) & meltcdat->dsym_675__NORMAL_EXP; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_673__NORMAL_EXP", + melt_assertmsg ("iniobj check.discr isobj dsym_675__NORMAL_EXP", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr objmagic dsym_673__NORMAL_EXP", + melt_assertmsg ("iniobj check.discr objmagic dsym_675__NORMAL_EXP", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_673__NORMAL_EXP.meltobj_class = + meltcdat->dsym_675__NORMAL_EXP.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_673__NORMAL_EXP.obj_hash = 420282450; - meltcdat->dsym_673__NORMAL_EXP.obj_len = 3; + meltcdat->dsym_675__NORMAL_EXP.obj_hash = 420282450; + meltcdat->dsym_675__NORMAL_EXP.obj_len = 3; -/*inistring dstr_674__NORMAL_EXP*/ - /*_._VALSTR___V864*/ meltfptr[863] = - (melt_ptr_t) & meltcdat->dstr_674__NORMAL_EXP; - meltcdat->dstr_674__NORMAL_EXP.discr = +/*inistring dstr_676__NORMAL_EXP*/ + /*_._VALSTR___V867*/ meltfptr[866] = + (melt_ptr_t) & meltcdat->dstr_676__NORMAL_EXP; + meltcdat->dstr_676__NORMAL_EXP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_674__NORMAL_EXP.val, + /*small inistring */ strncpy (meltcdat->dstr_676__NORMAL_EXP.val, "NORMAL_EXP", - sizeof (meltcdat->dstr_674__NORMAL_EXP.val) - + sizeof (meltcdat->dstr_676__NORMAL_EXP.val) - 1); - meltcdat->dstr_674__NORMAL_EXP.val[10] = (char) 0; - meltcdat->dstr_674__NORMAL_EXP.slen = 10; + meltcdat->dstr_676__NORMAL_EXP.val[10] = (char) 0; + meltcdat->dstr_676__NORMAL_EXP.slen = 10; -/*iniobj dsym_675__CLASS_NREP_ANYPROC*/ - /*uniqueobj*/ if (! /*_._VALDATA___V865*/ meltfptr[864]) -/*_._VALDATA___V865*/ meltfptr[864] = - (melt_ptr_t) & meltcdat->dsym_675__CLASS_NREP_ANYPROC; +/*iniobj dsym_677__CLASS_NREP_ANYPROC*/ + /*uniqueobj*/ if (! /*_._VALDATA___V868*/ meltfptr[867]) +/*_._VALDATA___V868*/ meltfptr[867] = + (melt_ptr_t) & meltcdat->dsym_677__CLASS_NREP_ANYPROC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_675__CLASS_NREP_ANYPROC", + melt_assertmsg ("iniobj check.discr isobj dsym_677__CLASS_NREP_ANYPROC", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr objmagic dsym_675__CLASS_NREP_ANYPROC", + ("iniobj check.discr objmagic dsym_677__CLASS_NREP_ANYPROC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_675__CLASS_NREP_ANYPROC.meltobj_class = + meltcdat->dsym_677__CLASS_NREP_ANYPROC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_675__CLASS_NREP_ANYPROC.obj_hash = 605230702; - meltcdat->dsym_675__CLASS_NREP_ANYPROC.obj_len = 3; + meltcdat->dsym_677__CLASS_NREP_ANYPROC.obj_hash = 605230702; + meltcdat->dsym_677__CLASS_NREP_ANYPROC.obj_len = 3; -/*inistring dstr_676__CLASS_NREP_ANYPROC*/ - /*_._VALSTR___V866*/ meltfptr[865] = - (melt_ptr_t) & meltcdat->dstr_676__CLASS_NREP_ANYPROC; - meltcdat->dstr_676__CLASS_NREP_ANYPROC.discr = +/*inistring dstr_678__CLASS_NREP_ANYPROC*/ + /*_._VALSTR___V869*/ meltfptr[868] = + (melt_ptr_t) & meltcdat->dstr_678__CLASS_NREP_ANYPROC; + meltcdat->dstr_678__CLASS_NREP_ANYPROC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_676__CLASS_NREP_ANYPROC.val, + /*small inistring */ strncpy (meltcdat->dstr_678__CLASS_NREP_ANYPROC.val, "CLASS_NREP_ANYPROC", sizeof (meltcdat-> - dstr_676__CLASS_NREP_ANYPROC.val) - + dstr_678__CLASS_NREP_ANYPROC.val) - 1); - meltcdat->dstr_676__CLASS_NREP_ANYPROC.val[18] = (char) 0; - meltcdat->dstr_676__CLASS_NREP_ANYPROC.slen = 18; + meltcdat->dstr_678__CLASS_NREP_ANYPROC.val[18] = (char) 0; + meltcdat->dstr_678__CLASS_NREP_ANYPROC.slen = 18; -/*iniobj dsym_677__WRAP_NORMAL_LET1*/ - /*uniqueobj*/ if (! /*_._VALDATA___V867*/ meltfptr[866]) -/*_._VALDATA___V867*/ meltfptr[866] = - (melt_ptr_t) & meltcdat->dsym_677__WRAP_NORMAL_LET1; +/*iniobj dsym_679__WRAP_NORMAL_LET1*/ + /*uniqueobj*/ if (! /*_._VALDATA___V870*/ meltfptr[869]) +/*_._VALDATA___V870*/ meltfptr[869] = + (melt_ptr_t) & meltcdat->dsym_679__WRAP_NORMAL_LET1; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_677__WRAP_NORMAL_LET1", + melt_assertmsg ("iniobj check.discr isobj dsym_679__WRAP_NORMAL_LET1", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr objmagic dsym_677__WRAP_NORMAL_LET1", + melt_assertmsg ("iniobj check.discr objmagic dsym_679__WRAP_NORMAL_LET1", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_677__WRAP_NORMAL_LET1.meltobj_class = + meltcdat->dsym_679__WRAP_NORMAL_LET1.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_677__WRAP_NORMAL_LET1.obj_hash = 891908866; - meltcdat->dsym_677__WRAP_NORMAL_LET1.obj_len = 3; + meltcdat->dsym_679__WRAP_NORMAL_LET1.obj_hash = 891908866; + meltcdat->dsym_679__WRAP_NORMAL_LET1.obj_len = 3; -/*inistring dstr_678__WRAP_NORMAL_LET1*/ - /*_._VALSTR___V868*/ meltfptr[867] = - (melt_ptr_t) & meltcdat->dstr_678__WRAP_NORMAL_LET1; - meltcdat->dstr_678__WRAP_NORMAL_LET1.discr = +/*inistring dstr_680__WRAP_NORMAL_LET1*/ + /*_._VALSTR___V871*/ meltfptr[870] = + (melt_ptr_t) & meltcdat->dstr_680__WRAP_NORMAL_LET1; + meltcdat->dstr_680__WRAP_NORMAL_LET1.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_678__WRAP_NORMAL_LET1.val, + /*small inistring */ strncpy (meltcdat->dstr_680__WRAP_NORMAL_LET1.val, "WRAP_NORMAL_LET1", - sizeof (meltcdat->dstr_678__WRAP_NORMAL_LET1. + sizeof (meltcdat->dstr_680__WRAP_NORMAL_LET1. val) - 1); - meltcdat->dstr_678__WRAP_NORMAL_LET1.val[16] = (char) 0; - meltcdat->dstr_678__WRAP_NORMAL_LET1.slen = 16; + meltcdat->dstr_680__WRAP_NORMAL_LET1.val[16] = (char) 0; + meltcdat->dstr_680__WRAP_NORMAL_LET1.slen = 16; -/*iniobj dsym_679__CLASS_NREP_INITPROC*/ - /*uniqueobj*/ if (! /*_._VALDATA___V869*/ meltfptr[868]) -/*_._VALDATA___V869*/ meltfptr[868] = - (melt_ptr_t) & meltcdat->dsym_679__CLASS_NREP_INITPROC; +/*iniobj dsym_681__CLASS_NREP_INITPROC*/ + /*uniqueobj*/ if (! /*_._VALDATA___V872*/ meltfptr[871]) +/*_._VALDATA___V872*/ meltfptr[871] = + (melt_ptr_t) & meltcdat->dsym_681__CLASS_NREP_INITPROC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_679__CLASS_NREP_INITPROC", + melt_assertmsg ("iniobj check.discr isobj dsym_681__CLASS_NREP_INITPROC", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr objmagic dsym_679__CLASS_NREP_INITPROC", + ("iniobj check.discr objmagic dsym_681__CLASS_NREP_INITPROC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_679__CLASS_NREP_INITPROC.meltobj_class = + meltcdat->dsym_681__CLASS_NREP_INITPROC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_679__CLASS_NREP_INITPROC.obj_hash = 915122709; - meltcdat->dsym_679__CLASS_NREP_INITPROC.obj_len = 3; + meltcdat->dsym_681__CLASS_NREP_INITPROC.obj_hash = 915122709; + meltcdat->dsym_681__CLASS_NREP_INITPROC.obj_len = 3; -/*inistring dstr_680__CLASS_NREP_INITPROC*/ - /*_._VALSTR___V870*/ meltfptr[869] = - (melt_ptr_t) & meltcdat->dstr_680__CLASS_NREP_INITPROC; - meltcdat->dstr_680__CLASS_NREP_INITPROC.discr = +/*inistring dstr_682__CLASS_NREP_INITPROC*/ + /*_._VALSTR___V873*/ meltfptr[872] = + (melt_ptr_t) & meltcdat->dstr_682__CLASS_NREP_INITPROC; + meltcdat->dstr_682__CLASS_NREP_INITPROC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_680__CLASS_NREP_INITPROC.val, + /*small inistring */ strncpy (meltcdat->dstr_682__CLASS_NREP_INITPROC.val, "CLASS_NREP_INITPROC", sizeof (meltcdat-> - dstr_680__CLASS_NREP_INITPROC.val) - + dstr_682__CLASS_NREP_INITPROC.val) - 1); - meltcdat->dstr_680__CLASS_NREP_INITPROC.val[19] = (char) 0; - meltcdat->dstr_680__CLASS_NREP_INITPROC.slen = 19; + meltcdat->dstr_682__CLASS_NREP_INITPROC.val[19] = (char) 0; + meltcdat->dstr_682__CLASS_NREP_INITPROC.slen = 19; - /*inirout drout_681__OUTPUT_HOOKS_WITH_MODVAR */ - /*_._VALROUT___V871*/ meltfptr[870] = - (melt_ptr_t) & meltcdat->drout_681__OUTPUT_HOOKS_WITH_MODVAR; - meltcdat->drout_681__OUTPUT_HOOKS_WITH_MODVAR.discr = + /*inirout drout_683__OUTPUT_HOOKS_WITH_MODVAR */ + /*_._VALROUT___V874*/ meltfptr[873] = + (melt_ptr_t) & meltcdat->drout_683__OUTPUT_HOOKS_WITH_MODVAR; + meltcdat->drout_683__OUTPUT_HOOKS_WITH_MODVAR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); - strncpy (meltcdat->drout_681__OUTPUT_HOOKS_WITH_MODVAR.routdescr, + strncpy (meltcdat->drout_683__OUTPUT_HOOKS_WITH_MODVAR.routdescr, "OUTPUT_HOOKS_WITH_MODVAR @warmelt-outobj.melt:6223", MELT_ROUTDESCR_LEN - 1); - meltcdat->drout_681__OUTPUT_HOOKS_WITH_MODVAR.nbval = 11; - MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_681__OUTPUT_HOOKS_WITH_MODVAR, + meltcdat->drout_683__OUTPUT_HOOKS_WITH_MODVAR.nbval = 12; + MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_683__OUTPUT_HOOKS_WITH_MODVAR, meltrout_149_WARMELTmiOUTOBJ_OUTPUT_HOOKS_WITH_MODVAR); - /*iniclos dclo_682__OUTPUT_HOOKS_WITH_MODVAR */ - /*_._VALCLO___V872*/ meltfptr[871] = - (melt_ptr_t) & meltcdat->dclo_682__OUTPUT_HOOKS_WITH_MODVAR; - meltcdat->dclo_682__OUTPUT_HOOKS_WITH_MODVAR.discr = + /*iniclos dclo_684__OUTPUT_HOOKS_WITH_MODVAR */ + /*_._VALCLO___V875*/ meltfptr[874] = + (melt_ptr_t) & meltcdat->dclo_684__OUTPUT_HOOKS_WITH_MODVAR; + meltcdat->dclo_684__OUTPUT_HOOKS_WITH_MODVAR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); - meltcdat->dclo_682__OUTPUT_HOOKS_WITH_MODVAR.nbval = 0; + meltcdat->dclo_684__OUTPUT_HOOKS_WITH_MODVAR.nbval = 0; -/*iniobj dsym_683__CLASS_NREP_DATAHOOK*/ - /*uniqueobj*/ if (! /*_._VALDATA___V873*/ meltfptr[872]) -/*_._VALDATA___V873*/ meltfptr[872] = - (melt_ptr_t) & meltcdat->dsym_683__CLASS_NREP_DATAHOOK; +/*iniobj dsym_685__CLASS_NREP_DATAHOOK*/ + /*uniqueobj*/ if (! /*_._VALDATA___V876*/ meltfptr[875]) +/*_._VALDATA___V876*/ meltfptr[875] = + (melt_ptr_t) & meltcdat->dsym_685__CLASS_NREP_DATAHOOK; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_683__CLASS_NREP_DATAHOOK", + melt_assertmsg ("iniobj check.discr isobj dsym_685__CLASS_NREP_DATAHOOK", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr objmagic dsym_683__CLASS_NREP_DATAHOOK", + ("iniobj check.discr objmagic dsym_685__CLASS_NREP_DATAHOOK", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_683__CLASS_NREP_DATAHOOK.meltobj_class = + meltcdat->dsym_685__CLASS_NREP_DATAHOOK.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_683__CLASS_NREP_DATAHOOK.obj_hash = 22086502; - meltcdat->dsym_683__CLASS_NREP_DATAHOOK.obj_len = 3; + meltcdat->dsym_685__CLASS_NREP_DATAHOOK.obj_hash = 22086502; + meltcdat->dsym_685__CLASS_NREP_DATAHOOK.obj_len = 3; -/*inistring dstr_684__CLASS_NREP_DATAHOOK*/ - /*_._VALSTR___V874*/ meltfptr[873] = - (melt_ptr_t) & meltcdat->dstr_684__CLASS_NREP_DATAHOOK; - meltcdat->dstr_684__CLASS_NREP_DATAHOOK.discr = +/*inistring dstr_686__CLASS_NREP_DATAHOOK*/ + /*_._VALSTR___V877*/ meltfptr[876] = + (melt_ptr_t) & meltcdat->dstr_686__CLASS_NREP_DATAHOOK; + meltcdat->dstr_686__CLASS_NREP_DATAHOOK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_684__CLASS_NREP_DATAHOOK.val, + /*small inistring */ strncpy (meltcdat->dstr_686__CLASS_NREP_DATAHOOK.val, "CLASS_NREP_DATAHOOK", sizeof (meltcdat-> - dstr_684__CLASS_NREP_DATAHOOK.val) - + dstr_686__CLASS_NREP_DATAHOOK.val) - 1); - meltcdat->dstr_684__CLASS_NREP_DATAHOOK.val[19] = (char) 0; - meltcdat->dstr_684__CLASS_NREP_DATAHOOK.slen = 19; + meltcdat->dstr_686__CLASS_NREP_DATAHOOK.val[19] = (char) 0; + meltcdat->dstr_686__CLASS_NREP_DATAHOOK.slen = 19; - /*inirout drout_685__TRANSLATE_MACROEXPANDED_LIST */ - /*_._VALROUT___V875*/ meltfptr[874] = - (melt_ptr_t) & meltcdat->drout_685__TRANSLATE_MACROEXPANDED_LIST; - meltcdat->drout_685__TRANSLATE_MACROEXPANDED_LIST.discr = + /*inirout drout_687__TRANSLATE_MACROEXPANDED_LIST */ + /*_._VALROUT___V878*/ meltfptr[877] = + (melt_ptr_t) & meltcdat->drout_687__TRANSLATE_MACROEXPANDED_LIST; + meltcdat->drout_687__TRANSLATE_MACROEXPANDED_LIST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); - strncpy (meltcdat->drout_685__TRANSLATE_MACROEXPANDED_LIST.routdescr, + strncpy (meltcdat->drout_687__TRANSLATE_MACROEXPANDED_LIST.routdescr, "TRANSLATE_MACROEXPANDED_LIST @warmelt-outobj.melt:6360", MELT_ROUTDESCR_LEN - 1); - meltcdat->drout_685__TRANSLATE_MACROEXPANDED_LIST.nbval = 52; + meltcdat->drout_687__TRANSLATE_MACROEXPANDED_LIST.nbval = 52; MELT_ROUTINE_SET_ROUTCODE (&meltcdat-> - drout_685__TRANSLATE_MACROEXPANDED_LIST, + drout_687__TRANSLATE_MACROEXPANDED_LIST, meltrout_150_WARMELTmiOUTOBJ_TRANSLATE_MACROEXPANDED_LIST); - /*iniclos dclo_686__TRANSLATE_MACROEXPANDED_LIST */ - /*_._VALCLO___V880*/ meltfptr[879] = - (melt_ptr_t) & meltcdat->dclo_686__TRANSLATE_MACROEXPANDED_LIST; - meltcdat->dclo_686__TRANSLATE_MACROEXPANDED_LIST.discr = + /*iniclos dclo_688__TRANSLATE_MACROEXPANDED_LIST */ + /*_._VALCLO___V883*/ meltfptr[882] = + (melt_ptr_t) & meltcdat->dclo_688__TRANSLATE_MACROEXPANDED_LIST; + meltcdat->dclo_688__TRANSLATE_MACROEXPANDED_LIST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); - meltcdat->dclo_686__TRANSLATE_MACROEXPANDED_LIST.nbval = 0; + meltcdat->dclo_688__TRANSLATE_MACROEXPANDED_LIST.nbval = 0; -/*inistring dstr_687__MELT_translation_failed_*/ - /*_._VALSTR___V876*/ meltfptr[875] = - (melt_ptr_t) & meltcdat->dstr_687__MELT_translation_failed_; - meltcdat->dstr_687__MELT_translation_failed_.discr = +/*inistring dstr_689__MELT_translation_failed_*/ + /*_._VALSTR___V879*/ meltfptr[878] = + (melt_ptr_t) & meltcdat->dstr_689__MELT_translation_failed_; + meltcdat->dstr_689__MELT_translation_failed_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_687__MELT_translation_failed_. + /*small inistring */ strncpy (meltcdat->dstr_689__MELT_translation_failed_. val, "MELT translation failed after normalization", sizeof (meltcdat-> - dstr_687__MELT_translation_failed_. + dstr_689__MELT_translation_failed_. val) - 1); - meltcdat->dstr_687__MELT_translation_failed_.val[43] = (char) 0; - meltcdat->dstr_687__MELT_translation_failed_.slen = 43; + meltcdat->dstr_689__MELT_translation_failed_.val[43] = (char) 0; + meltcdat->dstr_689__MELT_translation_failed_.slen = 43; -/*iniobj dsym_688__COMPILE2OBJ_HOOK*/ - /*uniqueobj*/ if (! /*_._VALDATA___V881*/ meltfptr[880]) -/*_._VALDATA___V881*/ meltfptr[880] = - (melt_ptr_t) & meltcdat->dsym_688__COMPILE2OBJ_HOOK; +/*iniobj dsym_690__COMPILE2OBJ_HOOK*/ + /*uniqueobj*/ if (! /*_._VALDATA___V884*/ meltfptr[883]) +/*_._VALDATA___V884*/ meltfptr[883] = + (melt_ptr_t) & meltcdat->dsym_690__COMPILE2OBJ_HOOK; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_688__COMPILE2OBJ_HOOK", + melt_assertmsg ("iniobj check.discr isobj dsym_690__COMPILE2OBJ_HOOK", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr objmagic dsym_688__COMPILE2OBJ_HOOK", + melt_assertmsg ("iniobj check.discr objmagic dsym_690__COMPILE2OBJ_HOOK", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_688__COMPILE2OBJ_HOOK.meltobj_class = + meltcdat->dsym_690__COMPILE2OBJ_HOOK.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_688__COMPILE2OBJ_HOOK.obj_hash = 767622405; - meltcdat->dsym_688__COMPILE2OBJ_HOOK.obj_len = 3; + meltcdat->dsym_690__COMPILE2OBJ_HOOK.obj_hash = 767622405; + meltcdat->dsym_690__COMPILE2OBJ_HOOK.obj_len = 3; -/*inistring dstr_689__COMPILE2OBJ_HOOK*/ - /*_._VALSTR___V882*/ meltfptr[881] = - (melt_ptr_t) & meltcdat->dstr_689__COMPILE2OBJ_HOOK; - meltcdat->dstr_689__COMPILE2OBJ_HOOK.discr = +/*inistring dstr_691__COMPILE2OBJ_HOOK*/ + /*_._VALSTR___V885*/ meltfptr[884] = + (melt_ptr_t) & meltcdat->dstr_691__COMPILE2OBJ_HOOK; + meltcdat->dstr_691__COMPILE2OBJ_HOOK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_689__COMPILE2OBJ_HOOK.val, + /*small inistring */ strncpy (meltcdat->dstr_691__COMPILE2OBJ_HOOK.val, "COMPILE2OBJ_HOOK", - sizeof (meltcdat->dstr_689__COMPILE2OBJ_HOOK. + sizeof (meltcdat->dstr_691__COMPILE2OBJ_HOOK. val) - 1); - meltcdat->dstr_689__COMPILE2OBJ_HOOK.val[16] = (char) 0; - meltcdat->dstr_689__COMPILE2OBJ_HOOK.slen = 16; + meltcdat->dstr_691__COMPILE2OBJ_HOOK.val[16] = (char) 0; + meltcdat->dstr_691__COMPILE2OBJ_HOOK.slen = 16; -/*iniobj dsym_690__COMPILE2OBJ_PROCEDURE*/ - /*uniqueobj*/ if (! /*_._VALDATA___V883*/ meltfptr[882]) -/*_._VALDATA___V883*/ meltfptr[882] = - (melt_ptr_t) & meltcdat->dsym_690__COMPILE2OBJ_PROCEDURE; +/*iniobj dsym_692__COMPILE2OBJ_PROCEDURE*/ + /*uniqueobj*/ if (! /*_._VALDATA___V886*/ meltfptr[885]) +/*_._VALDATA___V886*/ meltfptr[885] = + (melt_ptr_t) & meltcdat->dsym_692__COMPILE2OBJ_PROCEDURE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr isobj dsym_690__COMPILE2OBJ_PROCEDURE", + ("iniobj check.discr isobj dsym_692__COMPILE2OBJ_PROCEDURE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr objmagic dsym_690__COMPILE2OBJ_PROCEDURE", + ("iniobj check.discr objmagic dsym_692__COMPILE2OBJ_PROCEDURE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_690__COMPILE2OBJ_PROCEDURE.meltobj_class = + meltcdat->dsym_692__COMPILE2OBJ_PROCEDURE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_690__COMPILE2OBJ_PROCEDURE.obj_hash = 315972622; - meltcdat->dsym_690__COMPILE2OBJ_PROCEDURE.obj_len = 3; + meltcdat->dsym_692__COMPILE2OBJ_PROCEDURE.obj_hash = 315972622; + meltcdat->dsym_692__COMPILE2OBJ_PROCEDURE.obj_len = 3; -/*inistring dstr_691__COMPILE2OBJ_PROCEDURE*/ - /*_._VALSTR___V884*/ meltfptr[883] = - (melt_ptr_t) & meltcdat->dstr_691__COMPILE2OBJ_PROCEDURE; - meltcdat->dstr_691__COMPILE2OBJ_PROCEDURE.discr = +/*inistring dstr_693__COMPILE2OBJ_PROCEDURE*/ + /*_._VALSTR___V887*/ meltfptr[886] = + (melt_ptr_t) & meltcdat->dstr_693__COMPILE2OBJ_PROCEDURE; + meltcdat->dstr_693__COMPILE2OBJ_PROCEDURE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_691__COMPILE2OBJ_PROCEDURE.val, + /*small inistring */ strncpy (meltcdat->dstr_693__COMPILE2OBJ_PROCEDURE.val, "COMPILE2OBJ_PROCEDURE", sizeof (meltcdat-> - dstr_691__COMPILE2OBJ_PROCEDURE.val) - + dstr_693__COMPILE2OBJ_PROCEDURE.val) - 1); - meltcdat->dstr_691__COMPILE2OBJ_PROCEDURE.val[21] = (char) 0; - meltcdat->dstr_691__COMPILE2OBJ_PROCEDURE.slen = 21; + meltcdat->dstr_693__COMPILE2OBJ_PROCEDURE.val[21] = (char) 0; + meltcdat->dstr_693__COMPILE2OBJ_PROCEDURE.slen = 21; -/*inistring dstr_692__MELT_translation_failed_*/ - /*_._VALSTR___V877*/ meltfptr[876] = - (melt_ptr_t) & meltcdat->dstr_692__MELT_translation_failed_; - meltcdat->dstr_692__MELT_translation_failed_.discr = +/*inistring dstr_694__MELT_translation_failed_*/ + /*_._VALSTR___V880*/ meltfptr[879] = + (melt_ptr_t) & meltcdat->dstr_694__MELT_translation_failed_; + meltcdat->dstr_694__MELT_translation_failed_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_692__MELT_translation_failed_. + /*small inistring */ strncpy (meltcdat->dstr_694__MELT_translation_failed_. val, "MELT translation failed after generation", sizeof (meltcdat-> - dstr_692__MELT_translation_failed_. + dstr_694__MELT_translation_failed_. val) - 1); - meltcdat->dstr_692__MELT_translation_failed_.val[40] = (char) 0; - meltcdat->dstr_692__MELT_translation_failed_.slen = 40; + meltcdat->dstr_694__MELT_translation_failed_.val[40] = (char) 0; + meltcdat->dstr_694__MELT_translation_failed_.slen = 40; - /*inirout drout_693__LAMBDA_ */ - /*_._VALROUT___V878*/ meltfptr[877] = - (melt_ptr_t) & meltcdat->drout_693__LAMBDA_; - meltcdat->drout_693__LAMBDA_.discr = + /*inirout drout_695__LAMBDA_ */ + /*_._VALROUT___V881*/ meltfptr[880] = + (melt_ptr_t) & meltcdat->drout_695__LAMBDA_; + meltcdat->drout_695__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); - strncpy (meltcdat->drout_693__LAMBDA_.routdescr, + strncpy (meltcdat->drout_695__LAMBDA_.routdescr, "LAMBDA_ @warmelt-outobj.melt:6508", MELT_ROUTDESCR_LEN - 1); - meltcdat->drout_693__LAMBDA_.nbval = 2; - MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_693__LAMBDA_, - meltrout_151_WARMELTmiOUTOBJ_LAMBDA_cl27); + meltcdat->drout_695__LAMBDA_.nbval = 2; + MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_695__LAMBDA_, + meltrout_151_WARMELTmiOUTOBJ); -/*iniobj dsym_694__NORMAL_IMPORT*/ - /*uniqueobj*/ if (! /*_._VALDATA___V885*/ meltfptr[884]) -/*_._VALDATA___V885*/ meltfptr[884] = - (melt_ptr_t) & meltcdat->dsym_694__NORMAL_IMPORT; +/*iniobj dsym_696__NORMAL_IMPORT*/ + /*uniqueobj*/ if (! /*_._VALDATA___V888*/ meltfptr[887]) +/*_._VALDATA___V888*/ meltfptr[887] = + (melt_ptr_t) & meltcdat->dsym_696__NORMAL_IMPORT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_694__NORMAL_IMPORT", + melt_assertmsg ("iniobj check.discr isobj dsym_696__NORMAL_IMPORT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr objmagic dsym_694__NORMAL_IMPORT", + melt_assertmsg ("iniobj check.discr objmagic dsym_696__NORMAL_IMPORT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_694__NORMAL_IMPORT.meltobj_class = + meltcdat->dsym_696__NORMAL_IMPORT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_694__NORMAL_IMPORT.obj_hash = 1018945215; - meltcdat->dsym_694__NORMAL_IMPORT.obj_len = 3; + meltcdat->dsym_696__NORMAL_IMPORT.obj_hash = 1018945215; + meltcdat->dsym_696__NORMAL_IMPORT.obj_len = 3; -/*inistring dstr_695__NORMAL_IMPORT*/ - /*_._VALSTR___V886*/ meltfptr[885] = - (melt_ptr_t) & meltcdat->dstr_695__NORMAL_IMPORT; - meltcdat->dstr_695__NORMAL_IMPORT.discr = +/*inistring dstr_697__NORMAL_IMPORT*/ + /*_._VALSTR___V889*/ meltfptr[888] = + (melt_ptr_t) & meltcdat->dstr_697__NORMAL_IMPORT; + meltcdat->dstr_697__NORMAL_IMPORT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_695__NORMAL_IMPORT.val, + /*small inistring */ strncpy (meltcdat->dstr_697__NORMAL_IMPORT.val, "NORMAL_IMPORT", - sizeof (meltcdat->dstr_695__NORMAL_IMPORT. + sizeof (meltcdat->dstr_697__NORMAL_IMPORT. val) - 1); - meltcdat->dstr_695__NORMAL_IMPORT.val[13] = (char) 0; - meltcdat->dstr_695__NORMAL_IMPORT.slen = 13; + meltcdat->dstr_697__NORMAL_IMPORT.val[13] = (char) 0; + meltcdat->dstr_697__NORMAL_IMPORT.slen = 13; -/*iniobj dsym_696__CLASS_HOOK_DESCRIPTOR*/ - /*uniqueobj*/ if (! /*_._VALDATA___V887*/ meltfptr[886]) -/*_._VALDATA___V887*/ meltfptr[886] = - (melt_ptr_t) & meltcdat->dsym_696__CLASS_HOOK_DESCRIPTOR; +/*iniobj dsym_698__CLASS_HOOK_DESCRIPTOR*/ + /*uniqueobj*/ if (! /*_._VALDATA___V890*/ meltfptr[889]) +/*_._VALDATA___V890*/ meltfptr[889] = + (melt_ptr_t) & meltcdat->dsym_698__CLASS_HOOK_DESCRIPTOR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr isobj dsym_696__CLASS_HOOK_DESCRIPTOR", + ("iniobj check.discr isobj dsym_698__CLASS_HOOK_DESCRIPTOR", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr objmagic dsym_696__CLASS_HOOK_DESCRIPTOR", + ("iniobj check.discr objmagic dsym_698__CLASS_HOOK_DESCRIPTOR", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_696__CLASS_HOOK_DESCRIPTOR.meltobj_class = + meltcdat->dsym_698__CLASS_HOOK_DESCRIPTOR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_696__CLASS_HOOK_DESCRIPTOR.obj_hash = 540244888; - meltcdat->dsym_696__CLASS_HOOK_DESCRIPTOR.obj_len = 3; + meltcdat->dsym_698__CLASS_HOOK_DESCRIPTOR.obj_hash = 540244888; + meltcdat->dsym_698__CLASS_HOOK_DESCRIPTOR.obj_len = 3; -/*inistring dstr_697__CLASS_HOOK_DESCRIPTOR*/ - /*_._VALSTR___V888*/ meltfptr[887] = - (melt_ptr_t) & meltcdat->dstr_697__CLASS_HOOK_DESCRIPTOR; - meltcdat->dstr_697__CLASS_HOOK_DESCRIPTOR.discr = +/*inistring dstr_699__CLASS_HOOK_DESCRIPTOR*/ + /*_._VALSTR___V891*/ meltfptr[890] = + (melt_ptr_t) & meltcdat->dstr_699__CLASS_HOOK_DESCRIPTOR; + meltcdat->dstr_699__CLASS_HOOK_DESCRIPTOR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_697__CLASS_HOOK_DESCRIPTOR.val, + /*small inistring */ strncpy (meltcdat->dstr_699__CLASS_HOOK_DESCRIPTOR.val, "CLASS_HOOK_DESCRIPTOR", sizeof (meltcdat-> - dstr_697__CLASS_HOOK_DESCRIPTOR.val) - + dstr_699__CLASS_HOOK_DESCRIPTOR.val) - 1); - meltcdat->dstr_697__CLASS_HOOK_DESCRIPTOR.val[21] = (char) 0; - meltcdat->dstr_697__CLASS_HOOK_DESCRIPTOR.slen = 21; + meltcdat->dstr_699__CLASS_HOOK_DESCRIPTOR.val[21] = (char) 0; + meltcdat->dstr_699__CLASS_HOOK_DESCRIPTOR.slen = 21; -/*iniobj dsym_698__SYMBOL_CNAME*/ - /*uniqueobj*/ if (! /*_._VALDATA___V889*/ meltfptr[888]) -/*_._VALDATA___V889*/ meltfptr[888] = - (melt_ptr_t) & meltcdat->dsym_698__SYMBOL_CNAME; +/*iniobj dsym_700__SYMBOL_CNAME*/ + /*uniqueobj*/ if (! /*_._VALDATA___V892*/ meltfptr[891]) +/*_._VALDATA___V892*/ meltfptr[891] = + (melt_ptr_t) & meltcdat->dsym_700__SYMBOL_CNAME; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_698__SYMBOL_CNAME", + melt_assertmsg ("iniobj check.discr isobj dsym_700__SYMBOL_CNAME", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr objmagic dsym_698__SYMBOL_CNAME", + melt_assertmsg ("iniobj check.discr objmagic dsym_700__SYMBOL_CNAME", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_698__SYMBOL_CNAME.meltobj_class = + meltcdat->dsym_700__SYMBOL_CNAME.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_698__SYMBOL_CNAME.obj_hash = 868761322; - meltcdat->dsym_698__SYMBOL_CNAME.obj_len = 3; + meltcdat->dsym_700__SYMBOL_CNAME.obj_hash = 868761322; + meltcdat->dsym_700__SYMBOL_CNAME.obj_len = 3; -/*inistring dstr_699__SYMBOL_CNAME*/ - /*_._VALSTR___V890*/ meltfptr[889] = - (melt_ptr_t) & meltcdat->dstr_699__SYMBOL_CNAME; - meltcdat->dstr_699__SYMBOL_CNAME.discr = +/*inistring dstr_701__SYMBOL_CNAME*/ + /*_._VALSTR___V893*/ meltfptr[892] = + (melt_ptr_t) & meltcdat->dstr_701__SYMBOL_CNAME; + meltcdat->dstr_701__SYMBOL_CNAME.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_699__SYMBOL_CNAME.val, + /*small inistring */ strncpy (meltcdat->dstr_701__SYMBOL_CNAME.val, "SYMBOL_CNAME", - sizeof (meltcdat->dstr_699__SYMBOL_CNAME. + sizeof (meltcdat->dstr_701__SYMBOL_CNAME. val) - 1); - meltcdat->dstr_699__SYMBOL_CNAME.val[12] = (char) 0; - meltcdat->dstr_699__SYMBOL_CNAME.slen = 12; + meltcdat->dstr_701__SYMBOL_CNAME.val[12] = (char) 0; + meltcdat->dstr_701__SYMBOL_CNAME.slen = 12; -/*iniobj dsym_700__CLASS_SOURCE_CHEADER*/ - /*uniqueobj*/ if (! /*_._VALDATA___V891*/ meltfptr[890]) -/*_._VALDATA___V891*/ meltfptr[890] = - (melt_ptr_t) & meltcdat->dsym_700__CLASS_SOURCE_CHEADER; +/*iniobj dsym_702__CLASS_SOURCE_CHEADER*/ + /*uniqueobj*/ if (! /*_._VALDATA___V894*/ meltfptr[893]) +/*_._VALDATA___V894*/ meltfptr[893] = + (melt_ptr_t) & meltcdat->dsym_702__CLASS_SOURCE_CHEADER; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_700__CLASS_SOURCE_CHEADER", + melt_assertmsg ("iniobj check.discr isobj dsym_702__CLASS_SOURCE_CHEADER", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr objmagic dsym_700__CLASS_SOURCE_CHEADER", + ("iniobj check.discr objmagic dsym_702__CLASS_SOURCE_CHEADER", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_700__CLASS_SOURCE_CHEADER.meltobj_class = + meltcdat->dsym_702__CLASS_SOURCE_CHEADER.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_700__CLASS_SOURCE_CHEADER.obj_hash = 496789791; - meltcdat->dsym_700__CLASS_SOURCE_CHEADER.obj_len = 3; + meltcdat->dsym_702__CLASS_SOURCE_CHEADER.obj_hash = 496789791; + meltcdat->dsym_702__CLASS_SOURCE_CHEADER.obj_len = 3; -/*inistring dstr_701__CLASS_SOURCE_CHEADER*/ - /*_._VALSTR___V892*/ meltfptr[891] = - (melt_ptr_t) & meltcdat->dstr_701__CLASS_SOURCE_CHEADER; - meltcdat->dstr_701__CLASS_SOURCE_CHEADER.discr = +/*inistring dstr_703__CLASS_SOURCE_CHEADER*/ + /*_._VALSTR___V895*/ meltfptr[894] = + (melt_ptr_t) & meltcdat->dstr_703__CLASS_SOURCE_CHEADER; + meltcdat->dstr_703__CLASS_SOURCE_CHEADER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_701__CLASS_SOURCE_CHEADER.val, + /*small inistring */ strncpy (meltcdat->dstr_703__CLASS_SOURCE_CHEADER.val, "CLASS_SOURCE_CHEADER", sizeof (meltcdat-> - dstr_701__CLASS_SOURCE_CHEADER.val) - + dstr_703__CLASS_SOURCE_CHEADER.val) - 1); - meltcdat->dstr_701__CLASS_SOURCE_CHEADER.val[20] = (char) 0; - meltcdat->dstr_701__CLASS_SOURCE_CHEADER.slen = 20; + meltcdat->dstr_703__CLASS_SOURCE_CHEADER.val[20] = (char) 0; + meltcdat->dstr_703__CLASS_SOURCE_CHEADER.slen = 20; -/*iniobj dsym_702__CLASS_SOURCE_CODE_STRING*/ - /*uniqueobj*/ if (! /*_._VALDATA___V893*/ meltfptr[892]) -/*_._VALDATA___V893*/ meltfptr[892] = - (melt_ptr_t) & meltcdat->dsym_702__CLASS_SOURCE_CODE_STRING; +/*iniobj dsym_704__CLASS_SOURCE_CODE_STRING*/ + /*uniqueobj*/ if (! /*_._VALDATA___V896*/ meltfptr[895]) +/*_._VALDATA___V896*/ meltfptr[895] = + (melt_ptr_t) & meltcdat->dsym_704__CLASS_SOURCE_CODE_STRING; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr isobj dsym_702__CLASS_SOURCE_CODE_STRING", + ("iniobj check.discr isobj dsym_704__CLASS_SOURCE_CODE_STRING", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr objmagic dsym_702__CLASS_SOURCE_CODE_STRING", + ("iniobj check.discr objmagic dsym_704__CLASS_SOURCE_CODE_STRING", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_702__CLASS_SOURCE_CODE_STRING.meltobj_class = + meltcdat->dsym_704__CLASS_SOURCE_CODE_STRING.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_702__CLASS_SOURCE_CODE_STRING.obj_hash = 528104845; - meltcdat->dsym_702__CLASS_SOURCE_CODE_STRING.obj_len = 3; + meltcdat->dsym_704__CLASS_SOURCE_CODE_STRING.obj_hash = 528104845; + meltcdat->dsym_704__CLASS_SOURCE_CODE_STRING.obj_len = 3; -/*inistring dstr_703__CLASS_SOURCE_CODE_STRING*/ - /*_._VALSTR___V894*/ meltfptr[893] = - (melt_ptr_t) & meltcdat->dstr_703__CLASS_SOURCE_CODE_STRING; - meltcdat->dstr_703__CLASS_SOURCE_CODE_STRING.discr = +/*inistring dstr_705__CLASS_SOURCE_CODE_STRING*/ + /*_._VALSTR___V897*/ meltfptr[896] = + (melt_ptr_t) & meltcdat->dstr_705__CLASS_SOURCE_CODE_STRING; + meltcdat->dstr_705__CLASS_SOURCE_CODE_STRING.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_703__CLASS_SOURCE_CODE_STRING. + /*small inistring */ strncpy (meltcdat->dstr_705__CLASS_SOURCE_CODE_STRING. val, "CLASS_SOURCE_CODE_STRING", sizeof (meltcdat-> - dstr_703__CLASS_SOURCE_CODE_STRING. + dstr_705__CLASS_SOURCE_CODE_STRING. val) - 1); - meltcdat->dstr_703__CLASS_SOURCE_CODE_STRING.val[24] = (char) 0; - meltcdat->dstr_703__CLASS_SOURCE_CODE_STRING.slen = 24; + meltcdat->dstr_705__CLASS_SOURCE_CODE_STRING.val[24] = (char) 0; + meltcdat->dstr_705__CLASS_SOURCE_CODE_STRING.slen = 24; -/*iniobj dsym_704__CLASS_SOURCE_CIMPLEMENT*/ - /*uniqueobj*/ if (! /*_._VALDATA___V895*/ meltfptr[894]) -/*_._VALDATA___V895*/ meltfptr[894] = - (melt_ptr_t) & meltcdat->dsym_704__CLASS_SOURCE_CIMPLEMENT; +/*iniobj dsym_706__CLASS_SOURCE_CIMPLEMENT*/ + /*uniqueobj*/ if (! /*_._VALDATA___V898*/ meltfptr[897]) +/*_._VALDATA___V898*/ meltfptr[897] = + (melt_ptr_t) & meltcdat->dsym_706__CLASS_SOURCE_CIMPLEMENT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr isobj dsym_704__CLASS_SOURCE_CIMPLEMENT", + ("iniobj check.discr isobj dsym_706__CLASS_SOURCE_CIMPLEMENT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr objmagic dsym_704__CLASS_SOURCE_CIMPLEMENT", + ("iniobj check.discr objmagic dsym_706__CLASS_SOURCE_CIMPLEMENT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_704__CLASS_SOURCE_CIMPLEMENT.meltobj_class = + meltcdat->dsym_706__CLASS_SOURCE_CIMPLEMENT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_704__CLASS_SOURCE_CIMPLEMENT.obj_hash = 343553263; - meltcdat->dsym_704__CLASS_SOURCE_CIMPLEMENT.obj_len = 3; + meltcdat->dsym_706__CLASS_SOURCE_CIMPLEMENT.obj_hash = 343553263; + meltcdat->dsym_706__CLASS_SOURCE_CIMPLEMENT.obj_len = 3; -/*inistring dstr_705__CLASS_SOURCE_CIMPLEMENT*/ - /*_._VALSTR___V896*/ meltfptr[895] = - (melt_ptr_t) & meltcdat->dstr_705__CLASS_SOURCE_CIMPLEMENT; - meltcdat->dstr_705__CLASS_SOURCE_CIMPLEMENT.discr = +/*inistring dstr_707__CLASS_SOURCE_CIMPLEMENT*/ + /*_._VALSTR___V899*/ meltfptr[898] = + (melt_ptr_t) & meltcdat->dstr_707__CLASS_SOURCE_CIMPLEMENT; + meltcdat->dstr_707__CLASS_SOURCE_CIMPLEMENT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_705__CLASS_SOURCE_CIMPLEMENT. + /*small inistring */ strncpy (meltcdat->dstr_707__CLASS_SOURCE_CIMPLEMENT. val, "CLASS_SOURCE_CIMPLEMENT", sizeof (meltcdat-> - dstr_705__CLASS_SOURCE_CIMPLEMENT. + dstr_707__CLASS_SOURCE_CIMPLEMENT. val) - 1); - meltcdat->dstr_705__CLASS_SOURCE_CIMPLEMENT.val[23] = (char) 0; - meltcdat->dstr_705__CLASS_SOURCE_CIMPLEMENT.slen = 23; + meltcdat->dstr_707__CLASS_SOURCE_CIMPLEMENT.val[23] = (char) 0; + meltcdat->dstr_707__CLASS_SOURCE_CIMPLEMENT.slen = 23; -/*inistring dstr_706__MELT_translation_failed_*/ - /*_._VALSTR___V879*/ meltfptr[878] = - (melt_ptr_t) & meltcdat->dstr_706__MELT_translation_failed_; - meltcdat->dstr_706__MELT_translation_failed_.discr = +/*inistring dstr_708__MELT_translation_failed_*/ + /*_._VALSTR___V882*/ meltfptr[881] = + (melt_ptr_t) & meltcdat->dstr_708__MELT_translation_failed_; + meltcdat->dstr_708__MELT_translation_failed_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_706__MELT_translation_failed_. + /*small inistring */ strncpy (meltcdat->dstr_708__MELT_translation_failed_. val, "MELT translation failed after C code emission", sizeof (meltcdat-> - dstr_706__MELT_translation_failed_. + dstr_708__MELT_translation_failed_. val) - 1); - meltcdat->dstr_706__MELT_translation_failed_.val[45] = (char) 0; - meltcdat->dstr_706__MELT_translation_failed_.slen = 45; + meltcdat->dstr_708__MELT_translation_failed_.val[45] = (char) 0; + meltcdat->dstr_708__MELT_translation_failed_.slen = 45; - /*inirout drout_707__FATAL_COMPILE_ERROR */ - /*_._VALROUT___V897*/ meltfptr[896] = - (melt_ptr_t) & meltcdat->drout_707__FATAL_COMPILE_ERROR; - meltcdat->drout_707__FATAL_COMPILE_ERROR.discr = + /*inirout drout_709__FATAL_COMPILE_ERROR */ + /*_._VALROUT___V900*/ meltfptr[899] = + (melt_ptr_t) & meltcdat->drout_709__FATAL_COMPILE_ERROR; + meltcdat->drout_709__FATAL_COMPILE_ERROR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); - strncpy (meltcdat->drout_707__FATAL_COMPILE_ERROR.routdescr, + strncpy (meltcdat->drout_709__FATAL_COMPILE_ERROR.routdescr, "FATAL_COMPILE_ERROR @warmelt-outobj.melt:6948", MELT_ROUTDESCR_LEN - 1); - meltcdat->drout_707__FATAL_COMPILE_ERROR.nbval = 0; - MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_707__FATAL_COMPILE_ERROR, + meltcdat->drout_709__FATAL_COMPILE_ERROR.nbval = 0; + MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_709__FATAL_COMPILE_ERROR, meltrout_152_WARMELTmiOUTOBJ_FATAL_COMPILE_ERROR); - /*iniclos dclo_708__FATAL_COMPILE_ERROR */ - /*_._VALCLO___V898*/ meltfptr[897] = - (melt_ptr_t) & meltcdat->dclo_708__FATAL_COMPILE_ERROR; - meltcdat->dclo_708__FATAL_COMPILE_ERROR.discr = + /*iniclos dclo_710__FATAL_COMPILE_ERROR */ + /*_._VALCLO___V901*/ meltfptr[900] = + (melt_ptr_t) & meltcdat->dclo_710__FATAL_COMPILE_ERROR; + meltcdat->dclo_710__FATAL_COMPILE_ERROR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); - meltcdat->dclo_708__FATAL_COMPILE_ERROR.nbval = 0; + meltcdat->dclo_710__FATAL_COMPILE_ERROR.nbval = 0; - /*inirout drout_709__COMPILE_LIST_SEXPR */ - /*_._VALROUT___V899*/ meltfptr[898] = - (melt_ptr_t) & meltcdat->drout_709__COMPILE_LIST_SEXPR; - meltcdat->drout_709__COMPILE_LIST_SEXPR.discr = + /*inirout drout_711__COMPILE_LIST_SEXPR */ + /*_._VALROUT___V902*/ meltfptr[901] = + (melt_ptr_t) & meltcdat->drout_711__COMPILE_LIST_SEXPR; + meltcdat->drout_711__COMPILE_LIST_SEXPR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); - strncpy (meltcdat->drout_709__COMPILE_LIST_SEXPR.routdescr, + strncpy (meltcdat->drout_711__COMPILE_LIST_SEXPR.routdescr, "COMPILE_LIST_SEXPR @warmelt-outobj.melt:6969", MELT_ROUTDESCR_LEN - 1); - meltcdat->drout_709__COMPILE_LIST_SEXPR.nbval = 16; - MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_709__COMPILE_LIST_SEXPR, + meltcdat->drout_711__COMPILE_LIST_SEXPR.nbval = 16; + MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_711__COMPILE_LIST_SEXPR, meltrout_153_WARMELTmiOUTOBJ_COMPILE_LIST_SEXPR); - /*iniclos dclo_710__COMPILE_LIST_SEXPR */ - /*_._VALCLO___V901*/ meltfptr[900] = - (melt_ptr_t) & meltcdat->dclo_710__COMPILE_LIST_SEXPR; - meltcdat->dclo_710__COMPILE_LIST_SEXPR.discr = + /*iniclos dclo_712__COMPILE_LIST_SEXPR */ + /*_._VALCLO___V904*/ meltfptr[903] = + (melt_ptr_t) & meltcdat->dclo_712__COMPILE_LIST_SEXPR; + meltcdat->dclo_712__COMPILE_LIST_SEXPR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); - meltcdat->dclo_710__COMPILE_LIST_SEXPR.nbval = 0; + meltcdat->dclo_712__COMPILE_LIST_SEXPR.nbval = 0; -/*iniobj dsym_711__CLASS_MODULE_CONTEXT*/ - /*uniqueobj*/ if (! /*_._VALDATA___V902*/ meltfptr[901]) -/*_._VALDATA___V902*/ meltfptr[901] = - (melt_ptr_t) & meltcdat->dsym_711__CLASS_MODULE_CONTEXT; +/*iniobj dsym_713__CLASS_MODULE_CONTEXT*/ + /*uniqueobj*/ if (! /*_._VALDATA___V905*/ meltfptr[904]) +/*_._VALDATA___V905*/ meltfptr[904] = + (melt_ptr_t) & meltcdat->dsym_713__CLASS_MODULE_CONTEXT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_711__CLASS_MODULE_CONTEXT", + melt_assertmsg ("iniobj check.discr isobj dsym_713__CLASS_MODULE_CONTEXT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr objmagic dsym_711__CLASS_MODULE_CONTEXT", + ("iniobj check.discr objmagic dsym_713__CLASS_MODULE_CONTEXT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_711__CLASS_MODULE_CONTEXT.meltobj_class = + meltcdat->dsym_713__CLASS_MODULE_CONTEXT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_711__CLASS_MODULE_CONTEXT.obj_hash = 641718839; - meltcdat->dsym_711__CLASS_MODULE_CONTEXT.obj_len = 3; + meltcdat->dsym_713__CLASS_MODULE_CONTEXT.obj_hash = 641718839; + meltcdat->dsym_713__CLASS_MODULE_CONTEXT.obj_len = 3; -/*inistring dstr_712__CLASS_MODULE_CONTEXT*/ - /*_._VALSTR___V903*/ meltfptr[902] = - (melt_ptr_t) & meltcdat->dstr_712__CLASS_MODULE_CONTEXT; - meltcdat->dstr_712__CLASS_MODULE_CONTEXT.discr = +/*inistring dstr_714__CLASS_MODULE_CONTEXT*/ + /*_._VALSTR___V906*/ meltfptr[905] = + (melt_ptr_t) & meltcdat->dstr_714__CLASS_MODULE_CONTEXT; + meltcdat->dstr_714__CLASS_MODULE_CONTEXT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_712__CLASS_MODULE_CONTEXT.val, + /*small inistring */ strncpy (meltcdat->dstr_714__CLASS_MODULE_CONTEXT.val, "CLASS_MODULE_CONTEXT", sizeof (meltcdat-> - dstr_712__CLASS_MODULE_CONTEXT.val) - + dstr_714__CLASS_MODULE_CONTEXT.val) - 1); - meltcdat->dstr_712__CLASS_MODULE_CONTEXT.val[20] = (char) 0; - meltcdat->dstr_712__CLASS_MODULE_CONTEXT.slen = 20; + meltcdat->dstr_714__CLASS_MODULE_CONTEXT.val[20] = (char) 0; + meltcdat->dstr_714__CLASS_MODULE_CONTEXT.slen = 20; -/*iniobj dsym_713__DISCR_MAP_STRINGS*/ - /*uniqueobj*/ if (! /*_._VALDATA___V904*/ meltfptr[903]) -/*_._VALDATA___V904*/ meltfptr[903] = - (melt_ptr_t) & meltcdat->dsym_713__DISCR_MAP_STRINGS; +/*iniobj dsym_715__DISCR_MAP_STRINGS*/ + /*uniqueobj*/ if (! /*_._VALDATA___V907*/ meltfptr[906]) +/*_._VALDATA___V907*/ meltfptr[906] = + (melt_ptr_t) & meltcdat->dsym_715__DISCR_MAP_STRINGS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_713__DISCR_MAP_STRINGS", + melt_assertmsg ("iniobj check.discr isobj dsym_715__DISCR_MAP_STRINGS", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr objmagic dsym_713__DISCR_MAP_STRINGS", + melt_assertmsg ("iniobj check.discr objmagic dsym_715__DISCR_MAP_STRINGS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_713__DISCR_MAP_STRINGS.meltobj_class = + meltcdat->dsym_715__DISCR_MAP_STRINGS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_713__DISCR_MAP_STRINGS.obj_hash = 344609662; - meltcdat->dsym_713__DISCR_MAP_STRINGS.obj_len = 3; + meltcdat->dsym_715__DISCR_MAP_STRINGS.obj_hash = 344609662; + meltcdat->dsym_715__DISCR_MAP_STRINGS.obj_len = 3; -/*inistring dstr_714__DISCR_MAP_STRINGS*/ - /*_._VALSTR___V905*/ meltfptr[904] = - (melt_ptr_t) & meltcdat->dstr_714__DISCR_MAP_STRINGS; - meltcdat->dstr_714__DISCR_MAP_STRINGS.discr = +/*inistring dstr_716__DISCR_MAP_STRINGS*/ + /*_._VALSTR___V908*/ meltfptr[907] = + (melt_ptr_t) & meltcdat->dstr_716__DISCR_MAP_STRINGS; + meltcdat->dstr_716__DISCR_MAP_STRINGS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_714__DISCR_MAP_STRINGS.val, + /*small inistring */ strncpy (meltcdat->dstr_716__DISCR_MAP_STRINGS.val, "DISCR_MAP_STRINGS", - sizeof (meltcdat->dstr_714__DISCR_MAP_STRINGS. + sizeof (meltcdat->dstr_716__DISCR_MAP_STRINGS. val) - 1); - meltcdat->dstr_714__DISCR_MAP_STRINGS.val[17] = (char) 0; - meltcdat->dstr_714__DISCR_MAP_STRINGS.slen = 17; + meltcdat->dstr_716__DISCR_MAP_STRINGS.val[17] = (char) 0; + meltcdat->dstr_716__DISCR_MAP_STRINGS.slen = 17; - /*inirout drout_715__LAMBDA_ */ - /*_._VALROUT___V900*/ meltfptr[899] = - (melt_ptr_t) & meltcdat->drout_715__LAMBDA_; - meltcdat->drout_715__LAMBDA_.discr = + /*inirout drout_717__LAMBDA_ */ + /*_._VALROUT___V903*/ meltfptr[902] = + (melt_ptr_t) & meltcdat->drout_717__LAMBDA_; + meltcdat->drout_717__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); - strncpy (meltcdat->drout_715__LAMBDA_.routdescr, + strncpy (meltcdat->drout_717__LAMBDA_.routdescr, "LAMBDA_ @warmelt-outobj.melt:6997", MELT_ROUTDESCR_LEN - 1); - meltcdat->drout_715__LAMBDA_.nbval = 1; - MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_715__LAMBDA_, - meltrout_154_WARMELTmiOUTOBJ_LAMBDA_cl28); + meltcdat->drout_717__LAMBDA_.nbval = 1; + MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_717__LAMBDA_, + meltrout_154_WARMELTmiOUTOBJ); -/*iniobj dsym_716__CREATE_NORMCONTEXT*/ - /*uniqueobj*/ if (! /*_._VALDATA___V906*/ meltfptr[905]) -/*_._VALDATA___V906*/ meltfptr[905] = - (melt_ptr_t) & meltcdat->dsym_716__CREATE_NORMCONTEXT; +/*iniobj dsym_718__CREATE_NORMCONTEXT*/ + /*uniqueobj*/ if (! /*_._VALDATA___V909*/ meltfptr[908]) +/*_._VALDATA___V909*/ meltfptr[908] = + (melt_ptr_t) & meltcdat->dsym_718__CREATE_NORMCONTEXT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_716__CREATE_NORMCONTEXT", + melt_assertmsg ("iniobj check.discr isobj dsym_718__CREATE_NORMCONTEXT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr objmagic dsym_716__CREATE_NORMCONTEXT", + ("iniobj check.discr objmagic dsym_718__CREATE_NORMCONTEXT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_716__CREATE_NORMCONTEXT.meltobj_class = + meltcdat->dsym_718__CREATE_NORMCONTEXT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_716__CREATE_NORMCONTEXT.obj_hash = 127778273; - meltcdat->dsym_716__CREATE_NORMCONTEXT.obj_len = 3; + meltcdat->dsym_718__CREATE_NORMCONTEXT.obj_hash = 127778273; + meltcdat->dsym_718__CREATE_NORMCONTEXT.obj_len = 3; -/*inistring dstr_717__CREATE_NORMCONTEXT*/ - /*_._VALSTR___V907*/ meltfptr[906] = - (melt_ptr_t) & meltcdat->dstr_717__CREATE_NORMCONTEXT; - meltcdat->dstr_717__CREATE_NORMCONTEXT.discr = +/*inistring dstr_719__CREATE_NORMCONTEXT*/ + /*_._VALSTR___V910*/ meltfptr[909] = + (melt_ptr_t) & meltcdat->dstr_719__CREATE_NORMCONTEXT; + meltcdat->dstr_719__CREATE_NORMCONTEXT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_717__CREATE_NORMCONTEXT.val, + /*small inistring */ strncpy (meltcdat->dstr_719__CREATE_NORMCONTEXT.val, "CREATE_NORMCONTEXT", sizeof (meltcdat-> - dstr_717__CREATE_NORMCONTEXT.val) - + dstr_719__CREATE_NORMCONTEXT.val) - 1); - meltcdat->dstr_717__CREATE_NORMCONTEXT.val[18] = (char) 0; - meltcdat->dstr_717__CREATE_NORMCONTEXT.slen = 18; + meltcdat->dstr_719__CREATE_NORMCONTEXT.val[18] = (char) 0; + meltcdat->dstr_719__CREATE_NORMCONTEXT.slen = 18; -/*iniobj dsym_718__INITIAL_ENVIRONMENT*/ - /*uniqueobj*/ if (! /*_._VALDATA___V908*/ meltfptr[907]) -/*_._VALDATA___V908*/ meltfptr[907] = - (melt_ptr_t) & meltcdat->dsym_718__INITIAL_ENVIRONMENT; +/*iniobj dsym_720__INITIAL_ENVIRONMENT*/ + /*uniqueobj*/ if (! /*_._VALDATA___V911*/ meltfptr[910]) +/*_._VALDATA___V911*/ meltfptr[910] = + (melt_ptr_t) & meltcdat->dsym_720__INITIAL_ENVIRONMENT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_718__INITIAL_ENVIRONMENT", + melt_assertmsg ("iniobj check.discr isobj dsym_720__INITIAL_ENVIRONMENT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr objmagic dsym_718__INITIAL_ENVIRONMENT", + ("iniobj check.discr objmagic dsym_720__INITIAL_ENVIRONMENT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_718__INITIAL_ENVIRONMENT.meltobj_class = + meltcdat->dsym_720__INITIAL_ENVIRONMENT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_718__INITIAL_ENVIRONMENT.obj_hash = 756729242; - meltcdat->dsym_718__INITIAL_ENVIRONMENT.obj_len = 3; + meltcdat->dsym_720__INITIAL_ENVIRONMENT.obj_hash = 756729242; + meltcdat->dsym_720__INITIAL_ENVIRONMENT.obj_len = 3; -/*inistring dstr_719__INITIAL_ENVIRONMENT*/ - /*_._VALSTR___V909*/ meltfptr[908] = - (melt_ptr_t) & meltcdat->dstr_719__INITIAL_ENVIRONMENT; - meltcdat->dstr_719__INITIAL_ENVIRONMENT.discr = +/*inistring dstr_721__INITIAL_ENVIRONMENT*/ + /*_._VALSTR___V912*/ meltfptr[911] = + (melt_ptr_t) & meltcdat->dstr_721__INITIAL_ENVIRONMENT; + meltcdat->dstr_721__INITIAL_ENVIRONMENT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_719__INITIAL_ENVIRONMENT.val, + /*small inistring */ strncpy (meltcdat->dstr_721__INITIAL_ENVIRONMENT.val, "INITIAL_ENVIRONMENT", sizeof (meltcdat-> - dstr_719__INITIAL_ENVIRONMENT.val) - + dstr_721__INITIAL_ENVIRONMENT.val) - 1); - meltcdat->dstr_719__INITIAL_ENVIRONMENT.val[19] = (char) 0; - meltcdat->dstr_719__INITIAL_ENVIRONMENT.slen = 19; + meltcdat->dstr_721__INITIAL_ENVIRONMENT.val[19] = (char) 0; + meltcdat->dstr_721__INITIAL_ENVIRONMENT.slen = 19; -/*iniobj dsym_720__MACROEXPAND_TOPLEVEL_LIST*/ - /*uniqueobj*/ if (! /*_._VALDATA___V910*/ meltfptr[909]) -/*_._VALDATA___V910*/ meltfptr[909] = - (melt_ptr_t) & meltcdat->dsym_720__MACROEXPAND_TOPLEVEL_LIST; +/*iniobj dsym_722__MACROEXPAND_TOPLEVEL_LIST*/ + /*uniqueobj*/ if (! /*_._VALDATA___V913*/ meltfptr[912]) +/*_._VALDATA___V913*/ meltfptr[912] = + (melt_ptr_t) & meltcdat->dsym_722__MACROEXPAND_TOPLEVEL_LIST; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr isobj dsym_720__MACROEXPAND_TOPLEVEL_LIST", + ("iniobj check.discr isobj dsym_722__MACROEXPAND_TOPLEVEL_LIST", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr objmagic dsym_720__MACROEXPAND_TOPLEVEL_LIST", + ("iniobj check.discr objmagic dsym_722__MACROEXPAND_TOPLEVEL_LIST", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_720__MACROEXPAND_TOPLEVEL_LIST.meltobj_class = + meltcdat->dsym_722__MACROEXPAND_TOPLEVEL_LIST.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_720__MACROEXPAND_TOPLEVEL_LIST.obj_hash = 973794411; - meltcdat->dsym_720__MACROEXPAND_TOPLEVEL_LIST.obj_len = 3; + meltcdat->dsym_722__MACROEXPAND_TOPLEVEL_LIST.obj_hash = 973794411; + meltcdat->dsym_722__MACROEXPAND_TOPLEVEL_LIST.obj_len = 3; -/*inistring dstr_721__MACROEXPAND_TOPLEVEL_LIS*/ - /*_._VALSTR___V911*/ meltfptr[910] = - (melt_ptr_t) & meltcdat->dstr_721__MACROEXPAND_TOPLEVEL_LIS; - meltcdat->dstr_721__MACROEXPAND_TOPLEVEL_LIS.discr = +/*inistring dstr_723__MACROEXPAND_TOPLEVEL_LIS*/ + /*_._VALSTR___V914*/ meltfptr[913] = + (melt_ptr_t) & meltcdat->dstr_723__MACROEXPAND_TOPLEVEL_LIS; + meltcdat->dstr_723__MACROEXPAND_TOPLEVEL_LIS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_721__MACROEXPAND_TOPLEVEL_LIS. + /*small inistring */ strncpy (meltcdat->dstr_723__MACROEXPAND_TOPLEVEL_LIS. val, "MACROEXPAND_TOPLEVEL_LIST", sizeof (meltcdat-> - dstr_721__MACROEXPAND_TOPLEVEL_LIS. + dstr_723__MACROEXPAND_TOPLEVEL_LIS. val) - 1); - meltcdat->dstr_721__MACROEXPAND_TOPLEVEL_LIS.val[25] = (char) 0; - meltcdat->dstr_721__MACROEXPAND_TOPLEVEL_LIS.slen = 25; + meltcdat->dstr_723__MACROEXPAND_TOPLEVEL_LIS.val[25] = (char) 0; + meltcdat->dstr_723__MACROEXPAND_TOPLEVEL_LIS.slen = 25; -/*iniobj dsym_722__MACROEXPAND_1*/ - /*uniqueobj*/ if (! /*_._VALDATA___V912*/ meltfptr[911]) -/*_._VALDATA___V912*/ meltfptr[911] = - (melt_ptr_t) & meltcdat->dsym_722__MACROEXPAND_1; +/*iniobj dsym_724__MACROEXPAND_1*/ + /*uniqueobj*/ if (! /*_._VALDATA___V915*/ meltfptr[914]) +/*_._VALDATA___V915*/ meltfptr[914] = + (melt_ptr_t) & meltcdat->dsym_724__MACROEXPAND_1; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_722__MACROEXPAND_1", + melt_assertmsg ("iniobj check.discr isobj dsym_724__MACROEXPAND_1", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr objmagic dsym_722__MACROEXPAND_1", + melt_assertmsg ("iniobj check.discr objmagic dsym_724__MACROEXPAND_1", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_722__MACROEXPAND_1.meltobj_class = + meltcdat->dsym_724__MACROEXPAND_1.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_722__MACROEXPAND_1.obj_hash = 858793911; - meltcdat->dsym_722__MACROEXPAND_1.obj_len = 3; + meltcdat->dsym_724__MACROEXPAND_1.obj_hash = 858793911; + meltcdat->dsym_724__MACROEXPAND_1.obj_len = 3; -/*inistring dstr_723__MACROEXPAND_1*/ - /*_._VALSTR___V913*/ meltfptr[912] = - (melt_ptr_t) & meltcdat->dstr_723__MACROEXPAND_1; - meltcdat->dstr_723__MACROEXPAND_1.discr = +/*inistring dstr_725__MACROEXPAND_1*/ + /*_._VALSTR___V916*/ meltfptr[915] = + (melt_ptr_t) & meltcdat->dstr_725__MACROEXPAND_1; + meltcdat->dstr_725__MACROEXPAND_1.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_723__MACROEXPAND_1.val, + /*small inistring */ strncpy (meltcdat->dstr_725__MACROEXPAND_1.val, "MACROEXPAND_1", - sizeof (meltcdat->dstr_723__MACROEXPAND_1. + sizeof (meltcdat->dstr_725__MACROEXPAND_1. val) - 1); - meltcdat->dstr_723__MACROEXPAND_1.val[13] = (char) 0; - meltcdat->dstr_723__MACROEXPAND_1.slen = 13; + meltcdat->dstr_725__MACROEXPAND_1.val[13] = (char) 0; + meltcdat->dstr_725__MACROEXPAND_1.slen = 13; -/*iniobj dsym_724__COMPILE2OBJ_INITPROC*/ - /*uniqueobj*/ if (! /*_._VALDATA___V914*/ meltfptr[913]) -/*_._VALDATA___V914*/ meltfptr[913] = - (melt_ptr_t) & meltcdat->dsym_724__COMPILE2OBJ_INITPROC; +/*iniobj dsym_726__COMPILE2OBJ_INITPROC*/ + /*uniqueobj*/ if (! /*_._VALDATA___V917*/ meltfptr[916]) +/*_._VALDATA___V917*/ meltfptr[916] = + (melt_ptr_t) & meltcdat->dsym_726__COMPILE2OBJ_INITPROC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_724__COMPILE2OBJ_INITPROC", + melt_assertmsg ("iniobj check.discr isobj dsym_726__COMPILE2OBJ_INITPROC", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr objmagic dsym_724__COMPILE2OBJ_INITPROC", + ("iniobj check.discr objmagic dsym_726__COMPILE2OBJ_INITPROC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_724__COMPILE2OBJ_INITPROC.meltobj_class = + meltcdat->dsym_726__COMPILE2OBJ_INITPROC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_724__COMPILE2OBJ_INITPROC.obj_hash = 795051323; - meltcdat->dsym_724__COMPILE2OBJ_INITPROC.obj_len = 3; + meltcdat->dsym_726__COMPILE2OBJ_INITPROC.obj_hash = 795051323; + meltcdat->dsym_726__COMPILE2OBJ_INITPROC.obj_len = 3; -/*inistring dstr_725__COMPILE2OBJ_INITPROC*/ - /*_._VALSTR___V915*/ meltfptr[914] = - (melt_ptr_t) & meltcdat->dstr_725__COMPILE2OBJ_INITPROC; - meltcdat->dstr_725__COMPILE2OBJ_INITPROC.discr = +/*inistring dstr_727__COMPILE2OBJ_INITPROC*/ + /*_._VALSTR___V918*/ meltfptr[917] = + (melt_ptr_t) & meltcdat->dstr_727__COMPILE2OBJ_INITPROC; + meltcdat->dstr_727__COMPILE2OBJ_INITPROC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_725__COMPILE2OBJ_INITPROC.val, + /*small inistring */ strncpy (meltcdat->dstr_727__COMPILE2OBJ_INITPROC.val, "COMPILE2OBJ_INITPROC", sizeof (meltcdat-> - dstr_725__COMPILE2OBJ_INITPROC.val) - + dstr_727__COMPILE2OBJ_INITPROC.val) - 1); - meltcdat->dstr_725__COMPILE2OBJ_INITPROC.val[20] = (char) 0; - meltcdat->dstr_725__COMPILE2OBJ_INITPROC.slen = 20; + meltcdat->dstr_727__COMPILE2OBJ_INITPROC.val[20] = (char) 0; + meltcdat->dstr_727__COMPILE2OBJ_INITPROC.slen = 20; -/*iniobj dsym_726__MELT_RUN_EXTENSION*/ - /*uniqueobj*/ if (! /*_._VALDATA___V916*/ meltfptr[915]) -/*_._VALDATA___V916*/ meltfptr[915] = - (melt_ptr_t) & meltcdat->dsym_726__MELT_RUN_EXTENSION; +/*iniobj dsym_728__MELT_RUN_EXTENSION*/ + /*uniqueobj*/ if (! /*_._VALDATA___V919*/ meltfptr[918]) +/*_._VALDATA___V919*/ meltfptr[918] = + (melt_ptr_t) & meltcdat->dsym_728__MELT_RUN_EXTENSION; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_726__MELT_RUN_EXTENSION", + melt_assertmsg ("iniobj check.discr isobj dsym_728__MELT_RUN_EXTENSION", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr objmagic dsym_726__MELT_RUN_EXTENSION", + ("iniobj check.discr objmagic dsym_728__MELT_RUN_EXTENSION", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_726__MELT_RUN_EXTENSION.meltobj_class = + meltcdat->dsym_728__MELT_RUN_EXTENSION.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_726__MELT_RUN_EXTENSION.obj_hash = 63703529; - meltcdat->dsym_726__MELT_RUN_EXTENSION.obj_len = 3; + meltcdat->dsym_728__MELT_RUN_EXTENSION.obj_hash = 63703529; + meltcdat->dsym_728__MELT_RUN_EXTENSION.obj_len = 3; -/*inistring dstr_727__MELT_RUN_EXTENSION*/ - /*_._VALSTR___V917*/ meltfptr[916] = - (melt_ptr_t) & meltcdat->dstr_727__MELT_RUN_EXTENSION; - meltcdat->dstr_727__MELT_RUN_EXTENSION.discr = +/*inistring dstr_729__MELT_RUN_EXTENSION*/ + /*_._VALSTR___V920*/ meltfptr[919] = + (melt_ptr_t) & meltcdat->dstr_729__MELT_RUN_EXTENSION; + meltcdat->dstr_729__MELT_RUN_EXTENSION.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_727__MELT_RUN_EXTENSION.val, + /*small inistring */ strncpy (meltcdat->dstr_729__MELT_RUN_EXTENSION.val, "MELT_RUN_EXTENSION", sizeof (meltcdat-> - dstr_727__MELT_RUN_EXTENSION.val) - + dstr_729__MELT_RUN_EXTENSION.val) - 1); - meltcdat->dstr_727__MELT_RUN_EXTENSION.val[18] = (char) 0; - meltcdat->dstr_727__MELT_RUN_EXTENSION.slen = 18; + meltcdat->dstr_729__MELT_RUN_EXTENSION.val[18] = (char) 0; + meltcdat->dstr_729__MELT_RUN_EXTENSION.slen = 18; MELT_LOCATION ("warmelt-outobj.melt:7044:/ iniobj"); -/*iniobj dobj_728__MELT_RUN_EXTENSION*/ -/*_._VALDATA___V918*/ meltfptr[917] = - (melt_ptr_t) & meltcdat->dobj_728__MELT_RUN_EXTENSION; +/*iniobj dobj_730__MELT_RUN_EXTENSION*/ +/*_._VALDATA___V921*/ meltfptr[920] = + (melt_ptr_t) & meltcdat->dobj_730__MELT_RUN_EXTENSION; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dobj_728__MELT_RUN_EXTENSION", + melt_assertmsg ("iniobj check.discr isobj dobj_730__MELT_RUN_EXTENSION", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr objmagic dobj_728__MELT_RUN_EXTENSION", + ("iniobj check.discr objmagic dobj_730__MELT_RUN_EXTENSION", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dobj_728__MELT_RUN_EXTENSION.meltobj_class = + meltcdat->dobj_730__MELT_RUN_EXTENSION.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - meltcdat->dobj_728__MELT_RUN_EXTENSION.obj_hash = 150709580; - meltcdat->dobj_728__MELT_RUN_EXTENSION.obj_len = 5; + meltcdat->dobj_730__MELT_RUN_EXTENSION.obj_hash = 247686870; + meltcdat->dobj_730__MELT_RUN_EXTENSION.obj_len = 5; - /*inimult dtup_729_syMELT_RUN_EXTENSION */ - /*_._VALTUP___V934*/ meltfptr[933] = - (melt_ptr_t) & meltcdat->dtup_729_syMELT_RUN_EXTENSION; - meltcdat->dtup_729_syMELT_RUN_EXTENSION.discr = + /*inimult dtup_731_syMELT_RUN_EXTENSION */ + /*_._VALTUP___V937*/ meltfptr[936] = + (melt_ptr_t) & meltcdat->dtup_731_syMELT_RUN_EXTENSION; + meltcdat->dtup_731_syMELT_RUN_EXTENSION.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_MULTIPLE)))); - meltcdat->dtup_729_syMELT_RUN_EXTENSION.nbval = 7; - /*inimult dtup_730_syMELT_RUN_EXTENSION */ - /*_._VALTUP___V929*/ meltfptr[928] = - (melt_ptr_t) & meltcdat->dtup_730_syMELT_RUN_EXTENSION; - meltcdat->dtup_730_syMELT_RUN_EXTENSION.discr = + meltcdat->dtup_731_syMELT_RUN_EXTENSION.nbval = 7; + /*inimult dtup_732_syMELT_RUN_EXTENSION */ + /*_._VALTUP___V932*/ meltfptr[931] = + (melt_ptr_t) & meltcdat->dtup_732_syMELT_RUN_EXTENSION; + meltcdat->dtup_732_syMELT_RUN_EXTENSION.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_MULTIPLE)))); - meltcdat->dtup_730_syMELT_RUN_EXTENSION.nbval = 3; + meltcdat->dtup_732_syMELT_RUN_EXTENSION.nbval = 3; -/*iniobj dsym_731__BASENAME*/ - /*uniqueobj*/ if (! /*_._VALDATA___V921*/ meltfptr[920]) -/*_._VALDATA___V921*/ meltfptr[920] = - (melt_ptr_t) & meltcdat->dsym_731__BASENAME; +/*iniobj dsym_733__BASENAME*/ + /*uniqueobj*/ if (! /*_._VALDATA___V924*/ meltfptr[923]) +/*_._VALDATA___V924*/ meltfptr[923] = + (melt_ptr_t) & meltcdat->dsym_733__BASENAME; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_731__BASENAME", + melt_assertmsg ("iniobj check.discr isobj dsym_733__BASENAME", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr objmagic dsym_731__BASENAME", + melt_assertmsg ("iniobj check.discr objmagic dsym_733__BASENAME", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_731__BASENAME.meltobj_class = + meltcdat->dsym_733__BASENAME.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_731__BASENAME.obj_hash = 716952306; - meltcdat->dsym_731__BASENAME.obj_len = 3; + meltcdat->dsym_733__BASENAME.obj_hash = 716952306; + meltcdat->dsym_733__BASENAME.obj_len = 3; -/*inistring dstr_732__BASENAME*/ - /*_._VALSTR___V922*/ meltfptr[921] = - (melt_ptr_t) & meltcdat->dstr_732__BASENAME; - meltcdat->dstr_732__BASENAME.discr = +/*inistring dstr_734__BASENAME*/ + /*_._VALSTR___V925*/ meltfptr[924] = + (melt_ptr_t) & meltcdat->dstr_734__BASENAME; + meltcdat->dstr_734__BASENAME.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_732__BASENAME.val, "BASENAME", - sizeof (meltcdat->dstr_732__BASENAME.val) - + /*small inistring */ strncpy (meltcdat->dstr_734__BASENAME.val, "BASENAME", + sizeof (meltcdat->dstr_734__BASENAME.val) - 1); - meltcdat->dstr_732__BASENAME.val[8] = (char) 0; - meltcdat->dstr_732__BASENAME.slen = 8; + meltcdat->dstr_734__BASENAME.val[8] = (char) 0; + meltcdat->dstr_734__BASENAME.slen = 8; /*^iniobj */ -/*iniobj dobj_733*/ -/*_._VALDATA___V920*/ meltfptr[919] = (melt_ptr_t) & meltcdat->dobj_733; +/*iniobj dobj_735*/ +/*_._VALDATA___V923*/ meltfptr[922] = (melt_ptr_t) & meltcdat->dobj_735; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dobj_733", + melt_assertmsg ("iniobj check.discr isobj dobj_735", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr objmagic dobj_733", + melt_assertmsg ("iniobj check.discr objmagic dobj_735", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dobj_733.meltobj_class = + meltcdat->dobj_735.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); - meltcdat->dobj_733.obj_num = 0; - meltcdat->dobj_733.obj_hash = 3583065; - meltcdat->dobj_733.obj_len = 2; + meltcdat->dobj_735.obj_num = 0; + meltcdat->dobj_735.obj_hash = 824233731; + meltcdat->dobj_735.obj_len = 2; -/*iniobj dsym_734__ENV*/ - /*uniqueobj*/ if (! /*_._VALDATA___V924*/ meltfptr[923]) -/*_._VALDATA___V924*/ meltfptr[923] = - (melt_ptr_t) & meltcdat->dsym_734__ENV; +/*iniobj dsym_736__ENV*/ + /*uniqueobj*/ if (! /*_._VALDATA___V927*/ meltfptr[926]) +/*_._VALDATA___V927*/ meltfptr[926] = + (melt_ptr_t) & meltcdat->dsym_736__ENV; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_734__ENV", + melt_assertmsg ("iniobj check.discr isobj dsym_736__ENV", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr objmagic dsym_734__ENV", + melt_assertmsg ("iniobj check.discr objmagic dsym_736__ENV", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_734__ENV.meltobj_class = + meltcdat->dsym_736__ENV.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_734__ENV.obj_hash = 127517568; - meltcdat->dsym_734__ENV.obj_len = 3; + meltcdat->dsym_736__ENV.obj_hash = 127517568; + meltcdat->dsym_736__ENV.obj_len = 3; -/*inistring dstr_735__ENV*/ - /*_._VALSTR___V925*/ meltfptr[924] = (melt_ptr_t) & meltcdat->dstr_735__ENV; - meltcdat->dstr_735__ENV.discr = +/*inistring dstr_737__ENV*/ + /*_._VALSTR___V928*/ meltfptr[927] = (melt_ptr_t) & meltcdat->dstr_737__ENV; + meltcdat->dstr_737__ENV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_735__ENV.val, "ENV", - sizeof (meltcdat->dstr_735__ENV.val) - 1); - meltcdat->dstr_735__ENV.val[3] = (char) 0; - meltcdat->dstr_735__ENV.slen = 3; + /*small inistring */ strncpy (meltcdat->dstr_737__ENV.val, "ENV", + sizeof (meltcdat->dstr_737__ENV.val) - 1); + meltcdat->dstr_737__ENV.val[3] = (char) 0; + meltcdat->dstr_737__ENV.slen = 3; /*^iniobj */ -/*iniobj dobj_736*/ -/*_._VALDATA___V923*/ meltfptr[922] = (melt_ptr_t) & meltcdat->dobj_736; +/*iniobj dobj_738*/ +/*_._VALDATA___V926*/ meltfptr[925] = (melt_ptr_t) & meltcdat->dobj_738; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dobj_736", + melt_assertmsg ("iniobj check.discr isobj dobj_738", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr objmagic dobj_736", + melt_assertmsg ("iniobj check.discr objmagic dobj_738", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dobj_736.meltobj_class = + meltcdat->dobj_738.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); - meltcdat->dobj_736.obj_num = 1; - meltcdat->dobj_736.obj_hash = 720924596; - meltcdat->dobj_736.obj_len = 2; + meltcdat->dobj_738.obj_num = 1; + meltcdat->dobj_738.obj_hash = 717895786; + meltcdat->dobj_738.obj_len = 2; -/*iniobj dsym_737__LITVAL*/ - /*uniqueobj*/ if (! /*_._VALDATA___V927*/ meltfptr[926]) -/*_._VALDATA___V927*/ meltfptr[926] = - (melt_ptr_t) & meltcdat->dsym_737__LITVAL; +/*iniobj dsym_739__LITVAL*/ + /*uniqueobj*/ if (! /*_._VALDATA___V930*/ meltfptr[929]) +/*_._VALDATA___V930*/ meltfptr[929] = + (melt_ptr_t) & meltcdat->dsym_739__LITVAL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_737__LITVAL", + melt_assertmsg ("iniobj check.discr isobj dsym_739__LITVAL", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr objmagic dsym_737__LITVAL", + melt_assertmsg ("iniobj check.discr objmagic dsym_739__LITVAL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_737__LITVAL.meltobj_class = + meltcdat->dsym_739__LITVAL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_737__LITVAL.obj_hash = 785654701; - meltcdat->dsym_737__LITVAL.obj_len = 3; + meltcdat->dsym_739__LITVAL.obj_hash = 785654701; + meltcdat->dsym_739__LITVAL.obj_len = 3; -/*inistring dstr_738__LITVAL*/ - /*_._VALSTR___V928*/ meltfptr[927] = - (melt_ptr_t) & meltcdat->dstr_738__LITVAL; - meltcdat->dstr_738__LITVAL.discr = +/*inistring dstr_740__LITVAL*/ + /*_._VALSTR___V931*/ meltfptr[930] = + (melt_ptr_t) & meltcdat->dstr_740__LITVAL; + meltcdat->dstr_740__LITVAL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_738__LITVAL.val, "LITVAL", - sizeof (meltcdat->dstr_738__LITVAL.val) - 1); - meltcdat->dstr_738__LITVAL.val[6] = (char) 0; - meltcdat->dstr_738__LITVAL.slen = 6; + /*small inistring */ strncpy (meltcdat->dstr_740__LITVAL.val, "LITVAL", + sizeof (meltcdat->dstr_740__LITVAL.val) - 1); + meltcdat->dstr_740__LITVAL.val[6] = (char) 0; + meltcdat->dstr_740__LITVAL.slen = 6; /*^iniobj */ -/*iniobj dobj_739*/ -/*_._VALDATA___V926*/ meltfptr[925] = (melt_ptr_t) & meltcdat->dobj_739; +/*iniobj dobj_741*/ +/*_._VALDATA___V929*/ meltfptr[928] = (melt_ptr_t) & meltcdat->dobj_741; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dobj_739", + melt_assertmsg ("iniobj check.discr isobj dobj_741", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr objmagic dobj_739", + melt_assertmsg ("iniobj check.discr objmagic dobj_741", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dobj_739.meltobj_class = + meltcdat->dobj_741.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); - meltcdat->dobj_739.obj_num = 2; - meltcdat->dobj_739.obj_hash = 975466024; - meltcdat->dobj_739.obj_len = 2; + meltcdat->dobj_741.obj_num = 2; + meltcdat->dobj_741.obj_hash = 491892572; + meltcdat->dobj_741.obj_len = 2; -/*inistring dstr_740__melt_run_extension_*/ - /*_._VALSTR___V930*/ meltfptr[929] = - (melt_ptr_t) & meltcdat->dstr_740__melt_run_extension_; - meltcdat->dstr_740__melt_run_extension_.discr = +/*inistring dstr_742__melt_run_extension_*/ + /*_._VALSTR___V933*/ meltfptr[932] = + (melt_ptr_t) & meltcdat->dstr_742__melt_run_extension_; + meltcdat->dstr_742__melt_run_extension_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_VERBATIM_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_740__melt_run_extension_.val, " /* melt_run_extension */ meltgc_run_c_extension\ -\n ((melt_ptr_t) ", sizeof (meltcdat->dstr_740__melt_run_extension_.val) + /*small inistring */ strncpy (meltcdat->dstr_742__melt_run_extension_.val, " /* melt_run_extension */ meltgc_run_c_extension\ +\n ((melt_ptr_t) ", sizeof (meltcdat->dstr_742__melt_run_extension_.val) - 1); - meltcdat->dstr_740__melt_run_extension_.val[69] = (char) 0; - meltcdat->dstr_740__melt_run_extension_.slen = 69; + meltcdat->dstr_742__melt_run_extension_.val[69] = (char) 0; + meltcdat->dstr_742__melt_run_extension_.slen = 69; -/*inistring dstr_741__melt_ptr_t_*/ - /*_._VALSTR___V931*/ meltfptr[930] = - (melt_ptr_t) & meltcdat->dstr_741__melt_ptr_t_; - meltcdat->dstr_741__melt_ptr_t_.discr = +/*inistring dstr_743__melt_ptr_t_*/ + /*_._VALSTR___V934*/ meltfptr[933] = + (melt_ptr_t) & meltcdat->dstr_743__melt_ptr_t_; + meltcdat->dstr_743__melt_ptr_t_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_VERBATIM_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_741__melt_ptr_t_.val, + /*small inistring */ strncpy (meltcdat->dstr_743__melt_ptr_t_.val, ",\n (melt_ptr_t) ", - sizeof (meltcdat->dstr_741__melt_ptr_t_.val) - + sizeof (meltcdat->dstr_743__melt_ptr_t_.val) - 1); - meltcdat->dstr_741__melt_ptr_t_.val[22] = (char) 0; - meltcdat->dstr_741__melt_ptr_t_.slen = 22; + meltcdat->dstr_743__melt_ptr_t_.val[22] = (char) 0; + meltcdat->dstr_743__melt_ptr_t_.slen = 22; -/*inistring dstr_742__melt_ptr_t_*/ - /*_._VALSTR___V932*/ meltfptr[931] = - (melt_ptr_t) & meltcdat->dstr_742__melt_ptr_t_; - meltcdat->dstr_742__melt_ptr_t_.discr = +/*inistring dstr_744__melt_ptr_t_*/ + /*_._VALSTR___V935*/ meltfptr[934] = + (melt_ptr_t) & meltcdat->dstr_744__melt_ptr_t_; + meltcdat->dstr_744__melt_ptr_t_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_VERBATIM_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_742__melt_ptr_t_.val, + /*small inistring */ strncpy (meltcdat->dstr_744__melt_ptr_t_.val, ",\n (melt_ptr_t) ", - sizeof (meltcdat->dstr_742__melt_ptr_t_.val) - + sizeof (meltcdat->dstr_744__melt_ptr_t_.val) - 1); - meltcdat->dstr_742__melt_ptr_t_.val[22] = (char) 0; - meltcdat->dstr_742__melt_ptr_t_.slen = 22; + meltcdat->dstr_744__melt_ptr_t_.val[22] = (char) 0; + meltcdat->dstr_744__melt_ptr_t_.slen = 22; -/*inistring dstr_743__*/ - /*_._VALSTR___V933*/ meltfptr[932] = (melt_ptr_t) & meltcdat->dstr_743__; - meltcdat->dstr_743__.discr = +/*inistring dstr_745__*/ + /*_._VALSTR___V936*/ meltfptr[935] = (melt_ptr_t) & meltcdat->dstr_745__; + meltcdat->dstr_745__.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_VERBATIM_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_743__.val, ") ", - sizeof (meltcdat->dstr_743__.val) - 1); - meltcdat->dstr_743__.val[2] = (char) 0; - meltcdat->dstr_743__.slen = 2; + /*small inistring */ strncpy (meltcdat->dstr_745__.val, ") ", + sizeof (meltcdat->dstr_745__.val) - 1); + meltcdat->dstr_745__.val[2] = (char) 0; + meltcdat->dstr_745__.slen = 2; -/*inistring dstr_744__MELT_RUN_EXTENSION*/ - /*_._VALSTR___V919*/ meltfptr[918] = - (melt_ptr_t) & meltcdat->dstr_744__MELT_RUN_EXTENSION; - meltcdat->dstr_744__MELT_RUN_EXTENSION.discr = +/*inistring dstr_746__MELT_RUN_EXTENSION*/ + /*_._VALSTR___V922*/ meltfptr[921] = + (melt_ptr_t) & meltcdat->dstr_746__MELT_RUN_EXTENSION; + meltcdat->dstr_746__MELT_RUN_EXTENSION.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_744__MELT_RUN_EXTENSION.val, + /*small inistring */ strncpy (meltcdat->dstr_746__MELT_RUN_EXTENSION.val, "MELT_RUN_EXTENSION", sizeof (meltcdat-> - dstr_744__MELT_RUN_EXTENSION.val) - + dstr_746__MELT_RUN_EXTENSION.val) - 1); - meltcdat->dstr_744__MELT_RUN_EXTENSION.val[18] = (char) 0; - meltcdat->dstr_744__MELT_RUN_EXTENSION.slen = 18; + meltcdat->dstr_746__MELT_RUN_EXTENSION.val[18] = (char) 0; + meltcdat->dstr_746__MELT_RUN_EXTENSION.slen = 18; - /*inirout drout_745__AUTOBOX_NORMAL_RETURN */ - /*_._VALROUT___V935*/ meltfptr[934] = - (melt_ptr_t) & meltcdat->drout_745__AUTOBOX_NORMAL_RETURN; - meltcdat->drout_745__AUTOBOX_NORMAL_RETURN.discr = + /*inirout drout_747__AUTOBOX_NORMAL_RETURN */ + /*_._VALROUT___V938*/ meltfptr[937] = + (melt_ptr_t) & meltcdat->drout_747__AUTOBOX_NORMAL_RETURN; + meltcdat->drout_747__AUTOBOX_NORMAL_RETURN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); - strncpy (meltcdat->drout_745__AUTOBOX_NORMAL_RETURN.routdescr, + strncpy (meltcdat->drout_747__AUTOBOX_NORMAL_RETURN.routdescr, "AUTOBOX_NORMAL_RETURN @warmelt-outobj.melt:7054", MELT_ROUTDESCR_LEN - 1); - meltcdat->drout_745__AUTOBOX_NORMAL_RETURN.nbval = 19; - MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_745__AUTOBOX_NORMAL_RETURN, + meltcdat->drout_747__AUTOBOX_NORMAL_RETURN.nbval = 19; + MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_747__AUTOBOX_NORMAL_RETURN, meltrout_155_WARMELTmiOUTOBJ_AUTOBOX_NORMAL_RETURN); - /*iniclos dclo_746__AUTOBOX_NORMAL_RETURN */ - /*_._VALCLO___V944*/ meltfptr[943] = - (melt_ptr_t) & meltcdat->dclo_746__AUTOBOX_NORMAL_RETURN; - meltcdat->dclo_746__AUTOBOX_NORMAL_RETURN.discr = + /*iniclos dclo_748__AUTOBOX_NORMAL_RETURN */ + /*_._VALCLO___V947*/ meltfptr[946] = + (melt_ptr_t) & meltcdat->dclo_748__AUTOBOX_NORMAL_RETURN; + meltcdat->dclo_748__AUTOBOX_NORMAL_RETURN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); - meltcdat->dclo_746__AUTOBOX_NORMAL_RETURN.nbval = 0; + meltcdat->dclo_748__AUTOBOX_NORMAL_RETURN.nbval = 0; -/*iniobj dsym_747__CLONE_SYMBOL*/ - /*uniqueobj*/ if (! /*_._VALDATA___V945*/ meltfptr[944]) -/*_._VALDATA___V945*/ meltfptr[944] = - (melt_ptr_t) & meltcdat->dsym_747__CLONE_SYMBOL; +/*iniobj dsym_749__CLONE_SYMBOL*/ + /*uniqueobj*/ if (! /*_._VALDATA___V948*/ meltfptr[947]) +/*_._VALDATA___V948*/ meltfptr[947] = + (melt_ptr_t) & meltcdat->dsym_749__CLONE_SYMBOL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_747__CLONE_SYMBOL", + melt_assertmsg ("iniobj check.discr isobj dsym_749__CLONE_SYMBOL", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr objmagic dsym_747__CLONE_SYMBOL", + melt_assertmsg ("iniobj check.discr objmagic dsym_749__CLONE_SYMBOL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_747__CLONE_SYMBOL.meltobj_class = + meltcdat->dsym_749__CLONE_SYMBOL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_747__CLONE_SYMBOL.obj_hash = 213258240; - meltcdat->dsym_747__CLONE_SYMBOL.obj_len = 3; + meltcdat->dsym_749__CLONE_SYMBOL.obj_hash = 213258240; + meltcdat->dsym_749__CLONE_SYMBOL.obj_len = 3; -/*inistring dstr_748__CLONE_SYMBOL*/ - /*_._VALSTR___V946*/ meltfptr[945] = - (melt_ptr_t) & meltcdat->dstr_748__CLONE_SYMBOL; - meltcdat->dstr_748__CLONE_SYMBOL.discr = +/*inistring dstr_750__CLONE_SYMBOL*/ + /*_._VALSTR___V949*/ meltfptr[948] = + (melt_ptr_t) & meltcdat->dstr_750__CLONE_SYMBOL; + meltcdat->dstr_750__CLONE_SYMBOL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_748__CLONE_SYMBOL.val, + /*small inistring */ strncpy (meltcdat->dstr_750__CLONE_SYMBOL.val, "CLONE_SYMBOL", - sizeof (meltcdat->dstr_748__CLONE_SYMBOL. + sizeof (meltcdat->dstr_750__CLONE_SYMBOL. val) - 1); - meltcdat->dstr_748__CLONE_SYMBOL.val[12] = (char) 0; - meltcdat->dstr_748__CLONE_SYMBOL.slen = 12; + meltcdat->dstr_750__CLONE_SYMBOL.val[12] = (char) 0; + meltcdat->dstr_750__CLONE_SYMBOL.slen = 12; -/*iniobj dsym_749__RETAUTOBOXVAL*/ - /*uniqueobj*/ if (! /*_._VALDATA___V936*/ meltfptr[935]) -/*_._VALDATA___V936*/ meltfptr[935] = - (melt_ptr_t) & meltcdat->dsym_749__RETAUTOBOXVAL; +/*iniobj dsym_751__RETAUTOBOXVAL*/ + /*uniqueobj*/ if (! /*_._VALDATA___V939*/ meltfptr[938]) +/*_._VALDATA___V939*/ meltfptr[938] = + (melt_ptr_t) & meltcdat->dsym_751__RETAUTOBOXVAL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_749__RETAUTOBOXVAL", + melt_assertmsg ("iniobj check.discr isobj dsym_751__RETAUTOBOXVAL", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr objmagic dsym_749__RETAUTOBOXVAL", + melt_assertmsg ("iniobj check.discr objmagic dsym_751__RETAUTOBOXVAL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_749__RETAUTOBOXVAL.meltobj_class = + meltcdat->dsym_751__RETAUTOBOXVAL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_749__RETAUTOBOXVAL.obj_hash = 301998775; - meltcdat->dsym_749__RETAUTOBOXVAL.obj_len = 3; + meltcdat->dsym_751__RETAUTOBOXVAL.obj_hash = 301998775; + meltcdat->dsym_751__RETAUTOBOXVAL.obj_len = 3; -/*inistring dstr_750__RETAUTOBOXVAL*/ - /*_._VALSTR___V937*/ meltfptr[936] = - (melt_ptr_t) & meltcdat->dstr_750__RETAUTOBOXVAL; - meltcdat->dstr_750__RETAUTOBOXVAL.discr = +/*inistring dstr_752__RETAUTOBOXVAL*/ + /*_._VALSTR___V940*/ meltfptr[939] = + (melt_ptr_t) & meltcdat->dstr_752__RETAUTOBOXVAL; + meltcdat->dstr_752__RETAUTOBOXVAL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_750__RETAUTOBOXVAL.val, + /*small inistring */ strncpy (meltcdat->dstr_752__RETAUTOBOXVAL.val, "RETAUTOBOXVAL", - sizeof (meltcdat->dstr_750__RETAUTOBOXVAL. + sizeof (meltcdat->dstr_752__RETAUTOBOXVAL. val) - 1); - meltcdat->dstr_750__RETAUTOBOXVAL.val[13] = (char) 0; - meltcdat->dstr_750__RETAUTOBOXVAL.slen = 13; + meltcdat->dstr_752__RETAUTOBOXVAL.val[13] = (char) 0; + meltcdat->dstr_752__RETAUTOBOXVAL.slen = 13; -/*iniobj dsym_751__CLASS_NORMAL_LET_BINDING*/ - /*uniqueobj*/ if (! /*_._VALDATA___V947*/ meltfptr[946]) -/*_._VALDATA___V947*/ meltfptr[946] = - (melt_ptr_t) & meltcdat->dsym_751__CLASS_NORMAL_LET_BINDING; +/*iniobj dsym_753__CLASS_NORMAL_LET_BINDING*/ + /*uniqueobj*/ if (! /*_._VALDATA___V950*/ meltfptr[949]) +/*_._VALDATA___V950*/ meltfptr[949] = + (melt_ptr_t) & meltcdat->dsym_753__CLASS_NORMAL_LET_BINDING; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr isobj dsym_751__CLASS_NORMAL_LET_BINDING", + ("iniobj check.discr isobj dsym_753__CLASS_NORMAL_LET_BINDING", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr objmagic dsym_751__CLASS_NORMAL_LET_BINDING", + ("iniobj check.discr objmagic dsym_753__CLASS_NORMAL_LET_BINDING", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_751__CLASS_NORMAL_LET_BINDING.meltobj_class = + meltcdat->dsym_753__CLASS_NORMAL_LET_BINDING.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_751__CLASS_NORMAL_LET_BINDING.obj_hash = 76320742; - meltcdat->dsym_751__CLASS_NORMAL_LET_BINDING.obj_len = 3; + meltcdat->dsym_753__CLASS_NORMAL_LET_BINDING.obj_hash = 76320742; + meltcdat->dsym_753__CLASS_NORMAL_LET_BINDING.obj_len = 3; -/*inistring dstr_752__CLASS_NORMAL_LET_BINDING*/ - /*_._VALSTR___V948*/ meltfptr[947] = - (melt_ptr_t) & meltcdat->dstr_752__CLASS_NORMAL_LET_BINDING; - meltcdat->dstr_752__CLASS_NORMAL_LET_BINDING.discr = +/*inistring dstr_754__CLASS_NORMAL_LET_BINDING*/ + /*_._VALSTR___V951*/ meltfptr[950] = + (melt_ptr_t) & meltcdat->dstr_754__CLASS_NORMAL_LET_BINDING; + meltcdat->dstr_754__CLASS_NORMAL_LET_BINDING.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_752__CLASS_NORMAL_LET_BINDING. + /*small inistring */ strncpy (meltcdat->dstr_754__CLASS_NORMAL_LET_BINDING. val, "CLASS_NORMAL_LET_BINDING", sizeof (meltcdat-> - dstr_752__CLASS_NORMAL_LET_BINDING. + dstr_754__CLASS_NORMAL_LET_BINDING. val) - 1); - meltcdat->dstr_752__CLASS_NORMAL_LET_BINDING.val[24] = (char) 0; - meltcdat->dstr_752__CLASS_NORMAL_LET_BINDING.slen = 24; + meltcdat->dstr_754__CLASS_NORMAL_LET_BINDING.val[24] = (char) 0; + meltcdat->dstr_754__CLASS_NORMAL_LET_BINDING.slen = 24; -/*iniobj dsym_753__CLASS_NREP_LOCSYMOCC*/ - /*uniqueobj*/ if (! /*_._VALDATA___V949*/ meltfptr[948]) -/*_._VALDATA___V949*/ meltfptr[948] = - (melt_ptr_t) & meltcdat->dsym_753__CLASS_NREP_LOCSYMOCC; +/*iniobj dsym_755__CLASS_NREP_LOCSYMOCC*/ + /*uniqueobj*/ if (! /*_._VALDATA___V952*/ meltfptr[951]) +/*_._VALDATA___V952*/ meltfptr[951] = + (melt_ptr_t) & meltcdat->dsym_755__CLASS_NREP_LOCSYMOCC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_753__CLASS_NREP_LOCSYMOCC", + melt_assertmsg ("iniobj check.discr isobj dsym_755__CLASS_NREP_LOCSYMOCC", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr objmagic dsym_753__CLASS_NREP_LOCSYMOCC", + ("iniobj check.discr objmagic dsym_755__CLASS_NREP_LOCSYMOCC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_753__CLASS_NREP_LOCSYMOCC.meltobj_class = + meltcdat->dsym_755__CLASS_NREP_LOCSYMOCC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_753__CLASS_NREP_LOCSYMOCC.obj_hash = 614887922; - meltcdat->dsym_753__CLASS_NREP_LOCSYMOCC.obj_len = 3; + meltcdat->dsym_755__CLASS_NREP_LOCSYMOCC.obj_hash = 614887922; + meltcdat->dsym_755__CLASS_NREP_LOCSYMOCC.obj_len = 3; -/*inistring dstr_754__CLASS_NREP_LOCSYMOCC*/ - /*_._VALSTR___V950*/ meltfptr[949] = - (melt_ptr_t) & meltcdat->dstr_754__CLASS_NREP_LOCSYMOCC; - meltcdat->dstr_754__CLASS_NREP_LOCSYMOCC.discr = +/*inistring dstr_756__CLASS_NREP_LOCSYMOCC*/ + /*_._VALSTR___V953*/ meltfptr[952] = + (melt_ptr_t) & meltcdat->dstr_756__CLASS_NREP_LOCSYMOCC; + meltcdat->dstr_756__CLASS_NREP_LOCSYMOCC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_754__CLASS_NREP_LOCSYMOCC.val, + /*small inistring */ strncpy (meltcdat->dstr_756__CLASS_NREP_LOCSYMOCC.val, "CLASS_NREP_LOCSYMOCC", sizeof (meltcdat-> - dstr_754__CLASS_NREP_LOCSYMOCC.val) - + dstr_756__CLASS_NREP_LOCSYMOCC.val) - 1); - meltcdat->dstr_754__CLASS_NREP_LOCSYMOCC.val[20] = (char) 0; - meltcdat->dstr_754__CLASS_NREP_LOCSYMOCC.slen = 20; + meltcdat->dstr_756__CLASS_NREP_LOCSYMOCC.val[20] = (char) 0; + meltcdat->dstr_756__CLASS_NREP_LOCSYMOCC.slen = 20; -/*iniobj dsym_755__CLASS_NREP_RETURN*/ - /*uniqueobj*/ if (! /*_._VALDATA___V951*/ meltfptr[950]) -/*_._VALDATA___V951*/ meltfptr[950] = - (melt_ptr_t) & meltcdat->dsym_755__CLASS_NREP_RETURN; +/*iniobj dsym_757__CLASS_NREP_RETURN*/ + /*uniqueobj*/ if (! /*_._VALDATA___V954*/ meltfptr[953]) +/*_._VALDATA___V954*/ meltfptr[953] = + (melt_ptr_t) & meltcdat->dsym_757__CLASS_NREP_RETURN; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_755__CLASS_NREP_RETURN", + melt_assertmsg ("iniobj check.discr isobj dsym_757__CLASS_NREP_RETURN", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr objmagic dsym_755__CLASS_NREP_RETURN", + melt_assertmsg ("iniobj check.discr objmagic dsym_757__CLASS_NREP_RETURN", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_755__CLASS_NREP_RETURN.meltobj_class = + meltcdat->dsym_757__CLASS_NREP_RETURN.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_755__CLASS_NREP_RETURN.obj_hash = 622944524; - meltcdat->dsym_755__CLASS_NREP_RETURN.obj_len = 3; + meltcdat->dsym_757__CLASS_NREP_RETURN.obj_hash = 622944524; + meltcdat->dsym_757__CLASS_NREP_RETURN.obj_len = 3; -/*inistring dstr_756__CLASS_NREP_RETURN*/ - /*_._VALSTR___V952*/ meltfptr[951] = - (melt_ptr_t) & meltcdat->dstr_756__CLASS_NREP_RETURN; - meltcdat->dstr_756__CLASS_NREP_RETURN.discr = +/*inistring dstr_758__CLASS_NREP_RETURN*/ + /*_._VALSTR___V955*/ meltfptr[954] = + (melt_ptr_t) & meltcdat->dstr_758__CLASS_NREP_RETURN; + meltcdat->dstr_758__CLASS_NREP_RETURN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_756__CLASS_NREP_RETURN.val, + /*small inistring */ strncpy (meltcdat->dstr_758__CLASS_NREP_RETURN.val, "CLASS_NREP_RETURN", - sizeof (meltcdat->dstr_756__CLASS_NREP_RETURN. + sizeof (meltcdat->dstr_758__CLASS_NREP_RETURN. val) - 1); - meltcdat->dstr_756__CLASS_NREP_RETURN.val[17] = (char) 0; - meltcdat->dstr_756__CLASS_NREP_RETURN.slen = 17; + meltcdat->dstr_758__CLASS_NREP_RETURN.val[17] = (char) 0; + meltcdat->dstr_758__CLASS_NREP_RETURN.slen = 17; -/*iniobj dsym_757__CLASS_NREP_CHUNK*/ - /*uniqueobj*/ if (! /*_._VALDATA___V953*/ meltfptr[952]) -/*_._VALDATA___V953*/ meltfptr[952] = - (melt_ptr_t) & meltcdat->dsym_757__CLASS_NREP_CHUNK; +/*iniobj dsym_759__CLASS_NREP_CHUNK*/ + /*uniqueobj*/ if (! /*_._VALDATA___V956*/ meltfptr[955]) +/*_._VALDATA___V956*/ meltfptr[955] = + (melt_ptr_t) & meltcdat->dsym_759__CLASS_NREP_CHUNK; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_757__CLASS_NREP_CHUNK", + melt_assertmsg ("iniobj check.discr isobj dsym_759__CLASS_NREP_CHUNK", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr objmagic dsym_757__CLASS_NREP_CHUNK", + melt_assertmsg ("iniobj check.discr objmagic dsym_759__CLASS_NREP_CHUNK", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_757__CLASS_NREP_CHUNK.meltobj_class = + meltcdat->dsym_759__CLASS_NREP_CHUNK.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_757__CLASS_NREP_CHUNK.obj_hash = 877025959; - meltcdat->dsym_757__CLASS_NREP_CHUNK.obj_len = 3; + meltcdat->dsym_759__CLASS_NREP_CHUNK.obj_hash = 877025959; + meltcdat->dsym_759__CLASS_NREP_CHUNK.obj_len = 3; -/*inistring dstr_758__CLASS_NREP_CHUNK*/ - /*_._VALSTR___V954*/ meltfptr[953] = - (melt_ptr_t) & meltcdat->dstr_758__CLASS_NREP_CHUNK; - meltcdat->dstr_758__CLASS_NREP_CHUNK.discr = +/*inistring dstr_760__CLASS_NREP_CHUNK*/ + /*_._VALSTR___V957*/ meltfptr[956] = + (melt_ptr_t) & meltcdat->dstr_760__CLASS_NREP_CHUNK; + meltcdat->dstr_760__CLASS_NREP_CHUNK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_758__CLASS_NREP_CHUNK.val, + /*small inistring */ strncpy (meltcdat->dstr_760__CLASS_NREP_CHUNK.val, "CLASS_NREP_CHUNK", - sizeof (meltcdat->dstr_758__CLASS_NREP_CHUNK. + sizeof (meltcdat->dstr_760__CLASS_NREP_CHUNK. val) - 1); - meltcdat->dstr_758__CLASS_NREP_CHUNK.val[16] = (char) 0; - meltcdat->dstr_758__CLASS_NREP_CHUNK.slen = 16; + meltcdat->dstr_760__CLASS_NREP_CHUNK.val[16] = (char) 0; + meltcdat->dstr_760__CLASS_NREP_CHUNK.slen = 16; -/*iniobj dsym_759__AUTOBOXLONG*/ - /*uniqueobj*/ if (! /*_._VALDATA___V938*/ meltfptr[937]) -/*_._VALDATA___V938*/ meltfptr[937] = - (melt_ptr_t) & meltcdat->dsym_759__AUTOBOXLONG; +/*iniobj dsym_761__AUTOBOXLONG*/ + /*uniqueobj*/ if (! /*_._VALDATA___V941*/ meltfptr[940]) +/*_._VALDATA___V941*/ meltfptr[940] = + (melt_ptr_t) & meltcdat->dsym_761__AUTOBOXLONG; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_759__AUTOBOXLONG", + melt_assertmsg ("iniobj check.discr isobj dsym_761__AUTOBOXLONG", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr objmagic dsym_759__AUTOBOXLONG", + melt_assertmsg ("iniobj check.discr objmagic dsym_761__AUTOBOXLONG", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_759__AUTOBOXLONG.meltobj_class = + meltcdat->dsym_761__AUTOBOXLONG.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_759__AUTOBOXLONG.obj_hash = 86094257; - meltcdat->dsym_759__AUTOBOXLONG.obj_len = 3; + meltcdat->dsym_761__AUTOBOXLONG.obj_hash = 86094257; + meltcdat->dsym_761__AUTOBOXLONG.obj_len = 3; -/*inistring dstr_760__AUTOBOXLONG*/ - /*_._VALSTR___V939*/ meltfptr[938] = - (melt_ptr_t) & meltcdat->dstr_760__AUTOBOXLONG; - meltcdat->dstr_760__AUTOBOXLONG.discr = +/*inistring dstr_762__AUTOBOXLONG*/ + /*_._VALSTR___V942*/ meltfptr[941] = + (melt_ptr_t) & meltcdat->dstr_762__AUTOBOXLONG; + meltcdat->dstr_762__AUTOBOXLONG.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_760__AUTOBOXLONG.val, + /*small inistring */ strncpy (meltcdat->dstr_762__AUTOBOXLONG.val, "AUTOBOXLONG", - sizeof (meltcdat->dstr_760__AUTOBOXLONG.val) - + sizeof (meltcdat->dstr_762__AUTOBOXLONG.val) - 1); - meltcdat->dstr_760__AUTOBOXLONG.val[11] = (char) 0; - meltcdat->dstr_760__AUTOBOXLONG.slen = 11; + meltcdat->dstr_762__AUTOBOXLONG.val[11] = (char) 0; + meltcdat->dstr_762__AUTOBOXLONG.slen = 11; -/*iniobj dsym_761__CLASS_LET_BINDING*/ - /*uniqueobj*/ if (! /*_._VALDATA___V955*/ meltfptr[954]) -/*_._VALDATA___V955*/ meltfptr[954] = - (melt_ptr_t) & meltcdat->dsym_761__CLASS_LET_BINDING; +/*iniobj dsym_763__CLASS_LET_BINDING*/ + /*uniqueobj*/ if (! /*_._VALDATA___V958*/ meltfptr[957]) +/*_._VALDATA___V958*/ meltfptr[957] = + (melt_ptr_t) & meltcdat->dsym_763__CLASS_LET_BINDING; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_761__CLASS_LET_BINDING", + melt_assertmsg ("iniobj check.discr isobj dsym_763__CLASS_LET_BINDING", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr objmagic dsym_761__CLASS_LET_BINDING", + melt_assertmsg ("iniobj check.discr objmagic dsym_763__CLASS_LET_BINDING", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_761__CLASS_LET_BINDING.meltobj_class = + meltcdat->dsym_763__CLASS_LET_BINDING.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_761__CLASS_LET_BINDING.obj_hash = 373730517; - meltcdat->dsym_761__CLASS_LET_BINDING.obj_len = 3; + meltcdat->dsym_763__CLASS_LET_BINDING.obj_hash = 373730517; + meltcdat->dsym_763__CLASS_LET_BINDING.obj_len = 3; -/*inistring dstr_762__CLASS_LET_BINDING*/ - /*_._VALSTR___V956*/ meltfptr[955] = - (melt_ptr_t) & meltcdat->dstr_762__CLASS_LET_BINDING; - meltcdat->dstr_762__CLASS_LET_BINDING.discr = +/*inistring dstr_764__CLASS_LET_BINDING*/ + /*_._VALSTR___V959*/ meltfptr[958] = + (melt_ptr_t) & meltcdat->dstr_764__CLASS_LET_BINDING; + meltcdat->dstr_764__CLASS_LET_BINDING.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_762__CLASS_LET_BINDING.val, + /*small inistring */ strncpy (meltcdat->dstr_764__CLASS_LET_BINDING.val, "CLASS_LET_BINDING", - sizeof (meltcdat->dstr_762__CLASS_LET_BINDING. + sizeof (meltcdat->dstr_764__CLASS_LET_BINDING. val) - 1); - meltcdat->dstr_762__CLASS_LET_BINDING.val[17] = (char) 0; - meltcdat->dstr_762__CLASS_LET_BINDING.slen = 17; + meltcdat->dstr_764__CLASS_LET_BINDING.val[17] = (char) 0; + meltcdat->dstr_764__CLASS_LET_BINDING.slen = 17; -/*iniobj dsym_763__CTYPE_CSTRING*/ - /*uniqueobj*/ if (! /*_._VALDATA___V957*/ meltfptr[956]) -/*_._VALDATA___V957*/ meltfptr[956] = - (melt_ptr_t) & meltcdat->dsym_763__CTYPE_CSTRING; +/*iniobj dsym_765__CTYPE_CSTRING*/ + /*uniqueobj*/ if (! /*_._VALDATA___V960*/ meltfptr[959]) +/*_._VALDATA___V960*/ meltfptr[959] = + (melt_ptr_t) & meltcdat->dsym_765__CTYPE_CSTRING; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_763__CTYPE_CSTRING", + melt_assertmsg ("iniobj check.discr isobj dsym_765__CTYPE_CSTRING", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr objmagic dsym_763__CTYPE_CSTRING", + melt_assertmsg ("iniobj check.discr objmagic dsym_765__CTYPE_CSTRING", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_763__CTYPE_CSTRING.meltobj_class = + meltcdat->dsym_765__CTYPE_CSTRING.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_763__CTYPE_CSTRING.obj_hash = 90196516; - meltcdat->dsym_763__CTYPE_CSTRING.obj_len = 3; + meltcdat->dsym_765__CTYPE_CSTRING.obj_hash = 90196516; + meltcdat->dsym_765__CTYPE_CSTRING.obj_len = 3; -/*inistring dstr_764__CTYPE_CSTRING*/ - /*_._VALSTR___V958*/ meltfptr[957] = - (melt_ptr_t) & meltcdat->dstr_764__CTYPE_CSTRING; - meltcdat->dstr_764__CTYPE_CSTRING.discr = +/*inistring dstr_766__CTYPE_CSTRING*/ + /*_._VALSTR___V961*/ meltfptr[960] = + (melt_ptr_t) & meltcdat->dstr_766__CTYPE_CSTRING; + meltcdat->dstr_766__CTYPE_CSTRING.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_764__CTYPE_CSTRING.val, + /*small inistring */ strncpy (meltcdat->dstr_766__CTYPE_CSTRING.val, "CTYPE_CSTRING", - sizeof (meltcdat->dstr_764__CTYPE_CSTRING. + sizeof (meltcdat->dstr_766__CTYPE_CSTRING. val) - 1); - meltcdat->dstr_764__CTYPE_CSTRING.val[13] = (char) 0; - meltcdat->dstr_764__CTYPE_CSTRING.slen = 13; + meltcdat->dstr_766__CTYPE_CSTRING.val[13] = (char) 0; + meltcdat->dstr_766__CTYPE_CSTRING.slen = 13; -/*iniobj dsym_765__AUTOBOXSTRING*/ - /*uniqueobj*/ if (! /*_._VALDATA___V940*/ meltfptr[939]) -/*_._VALDATA___V940*/ meltfptr[939] = - (melt_ptr_t) & meltcdat->dsym_765__AUTOBOXSTRING; +/*iniobj dsym_767__AUTOBOXSTRING*/ + /*uniqueobj*/ if (! /*_._VALDATA___V943*/ meltfptr[942]) +/*_._VALDATA___V943*/ meltfptr[942] = + (melt_ptr_t) & meltcdat->dsym_767__AUTOBOXSTRING; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_765__AUTOBOXSTRING", + melt_assertmsg ("iniobj check.discr isobj dsym_767__AUTOBOXSTRING", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr objmagic dsym_765__AUTOBOXSTRING", + melt_assertmsg ("iniobj check.discr objmagic dsym_767__AUTOBOXSTRING", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_765__AUTOBOXSTRING.meltobj_class = + meltcdat->dsym_767__AUTOBOXSTRING.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_765__AUTOBOXSTRING.obj_hash = 285489089; - meltcdat->dsym_765__AUTOBOXSTRING.obj_len = 3; + meltcdat->dsym_767__AUTOBOXSTRING.obj_hash = 285489089; + meltcdat->dsym_767__AUTOBOXSTRING.obj_len = 3; -/*inistring dstr_766__AUTOBOXSTRING*/ - /*_._VALSTR___V941*/ meltfptr[940] = - (melt_ptr_t) & meltcdat->dstr_766__AUTOBOXSTRING; - meltcdat->dstr_766__AUTOBOXSTRING.discr = +/*inistring dstr_768__AUTOBOXSTRING*/ + /*_._VALSTR___V944*/ meltfptr[943] = + (melt_ptr_t) & meltcdat->dstr_768__AUTOBOXSTRING; + meltcdat->dstr_768__AUTOBOXSTRING.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_766__AUTOBOXSTRING.val, + /*small inistring */ strncpy (meltcdat->dstr_768__AUTOBOXSTRING.val, "AUTOBOXSTRING", - sizeof (meltcdat->dstr_766__AUTOBOXSTRING. + sizeof (meltcdat->dstr_768__AUTOBOXSTRING. val) - 1); - meltcdat->dstr_766__AUTOBOXSTRING.val[13] = (char) 0; - meltcdat->dstr_766__AUTOBOXSTRING.slen = 13; + meltcdat->dstr_768__AUTOBOXSTRING.val[13] = (char) 0; + meltcdat->dstr_768__AUTOBOXSTRING.slen = 13; -/*iniobj dsym_767__CLASS_CTYPE_GTY*/ - /*uniqueobj*/ if (! /*_._VALDATA___V959*/ meltfptr[958]) -/*_._VALDATA___V959*/ meltfptr[958] = - (melt_ptr_t) & meltcdat->dsym_767__CLASS_CTYPE_GTY; +/*iniobj dsym_769__CLASS_CTYPE_GTY*/ + /*uniqueobj*/ if (! /*_._VALDATA___V962*/ meltfptr[961]) +/*_._VALDATA___V962*/ meltfptr[961] = + (melt_ptr_t) & meltcdat->dsym_769__CLASS_CTYPE_GTY; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_767__CLASS_CTYPE_GTY", + melt_assertmsg ("iniobj check.discr isobj dsym_769__CLASS_CTYPE_GTY", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr objmagic dsym_767__CLASS_CTYPE_GTY", + melt_assertmsg ("iniobj check.discr objmagic dsym_769__CLASS_CTYPE_GTY", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_767__CLASS_CTYPE_GTY.meltobj_class = + meltcdat->dsym_769__CLASS_CTYPE_GTY.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_767__CLASS_CTYPE_GTY.obj_hash = 167272739; - meltcdat->dsym_767__CLASS_CTYPE_GTY.obj_len = 3; + meltcdat->dsym_769__CLASS_CTYPE_GTY.obj_hash = 167272739; + meltcdat->dsym_769__CLASS_CTYPE_GTY.obj_len = 3; -/*inistring dstr_768__CLASS_CTYPE_GTY*/ - /*_._VALSTR___V960*/ meltfptr[959] = - (melt_ptr_t) & meltcdat->dstr_768__CLASS_CTYPE_GTY; - meltcdat->dstr_768__CLASS_CTYPE_GTY.discr = +/*inistring dstr_770__CLASS_CTYPE_GTY*/ + /*_._VALSTR___V963*/ meltfptr[962] = + (melt_ptr_t) & meltcdat->dstr_770__CLASS_CTYPE_GTY; + meltcdat->dstr_770__CLASS_CTYPE_GTY.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_768__CLASS_CTYPE_GTY.val, + /*small inistring */ strncpy (meltcdat->dstr_770__CLASS_CTYPE_GTY.val, "CLASS_CTYPE_GTY", - sizeof (meltcdat->dstr_768__CLASS_CTYPE_GTY. + sizeof (meltcdat->dstr_770__CLASS_CTYPE_GTY. val) - 1); - meltcdat->dstr_768__CLASS_CTYPE_GTY.val[15] = (char) 0; - meltcdat->dstr_768__CLASS_CTYPE_GTY.slen = 15; + meltcdat->dstr_770__CLASS_CTYPE_GTY.val[15] = (char) 0; + meltcdat->dstr_770__CLASS_CTYPE_GTY.slen = 15; -/*iniobj dsym_769__AUTOBOXGTY*/ - /*uniqueobj*/ if (! /*_._VALDATA___V942*/ meltfptr[941]) -/*_._VALDATA___V942*/ meltfptr[941] = - (melt_ptr_t) & meltcdat->dsym_769__AUTOBOXGTY; +/*iniobj dsym_771__AUTOBOXGTY*/ + /*uniqueobj*/ if (! /*_._VALDATA___V945*/ meltfptr[944]) +/*_._VALDATA___V945*/ meltfptr[944] = + (melt_ptr_t) & meltcdat->dsym_771__AUTOBOXGTY; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_769__AUTOBOXGTY", + melt_assertmsg ("iniobj check.discr isobj dsym_771__AUTOBOXGTY", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr objmagic dsym_769__AUTOBOXGTY", + melt_assertmsg ("iniobj check.discr objmagic dsym_771__AUTOBOXGTY", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_769__AUTOBOXGTY.meltobj_class = + meltcdat->dsym_771__AUTOBOXGTY.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_769__AUTOBOXGTY.obj_hash = 665060233; - meltcdat->dsym_769__AUTOBOXGTY.obj_len = 3; + meltcdat->dsym_771__AUTOBOXGTY.obj_hash = 665060233; + meltcdat->dsym_771__AUTOBOXGTY.obj_len = 3; -/*inistring dstr_770__AUTOBOXGTY*/ - /*_._VALSTR___V943*/ meltfptr[942] = - (melt_ptr_t) & meltcdat->dstr_770__AUTOBOXGTY; - meltcdat->dstr_770__AUTOBOXGTY.discr = +/*inistring dstr_772__AUTOBOXGTY*/ + /*_._VALSTR___V946*/ meltfptr[945] = + (melt_ptr_t) & meltcdat->dstr_772__AUTOBOXGTY; + meltcdat->dstr_772__AUTOBOXGTY.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_770__AUTOBOXGTY.val, + /*small inistring */ strncpy (meltcdat->dstr_772__AUTOBOXGTY.val, "AUTOBOXGTY", - sizeof (meltcdat->dstr_770__AUTOBOXGTY.val) - + sizeof (meltcdat->dstr_772__AUTOBOXGTY.val) - 1); - meltcdat->dstr_770__AUTOBOXGTY.val[10] = (char) 0; - meltcdat->dstr_770__AUTOBOXGTY.slen = 10; + meltcdat->dstr_772__AUTOBOXGTY.val[10] = (char) 0; + meltcdat->dstr_772__AUTOBOXGTY.slen = 10; - /*inirout drout_771__TRANSLATE_RUN_MELT_EXPRESSIONS */ - /*_._VALROUT___V961*/ meltfptr[960] = - (melt_ptr_t) & meltcdat->drout_771__TRANSLATE_RUN_MELT_EXPRESSIONS; - meltcdat->drout_771__TRANSLATE_RUN_MELT_EXPRESSIONS.discr = + /*inirout drout_773__TRANSLATE_RUN_MELT_EXPRESSIONS */ + /*_._VALROUT___V964*/ meltfptr[963] = + (melt_ptr_t) & meltcdat->drout_773__TRANSLATE_RUN_MELT_EXPRESSIONS; + meltcdat->drout_773__TRANSLATE_RUN_MELT_EXPRESSIONS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); - strncpy (meltcdat->drout_771__TRANSLATE_RUN_MELT_EXPRESSIONS.routdescr, + strncpy (meltcdat->drout_773__TRANSLATE_RUN_MELT_EXPRESSIONS.routdescr, "TRANSLATE_RUN_MELT_EXPRESSIONS @warmelt-outobj.melt:7181", MELT_ROUTDESCR_LEN - 1); - meltcdat->drout_771__TRANSLATE_RUN_MELT_EXPRESSIONS.nbval = 41; + meltcdat->drout_773__TRANSLATE_RUN_MELT_EXPRESSIONS.nbval = 41; MELT_ROUTINE_SET_ROUTCODE (&meltcdat-> - drout_771__TRANSLATE_RUN_MELT_EXPRESSIONS, + drout_773__TRANSLATE_RUN_MELT_EXPRESSIONS, meltrout_156_WARMELTmiOUTOBJ_TRANSLATE_RUN_MELT_EXPRESSIONS); - /*iniclos dclo_772__TRANSLATE_RUN_MELT_EXPRESSIONS */ - /*_._VALCLO___V973*/ meltfptr[972] = - (melt_ptr_t) & meltcdat->dclo_772__TRANSLATE_RUN_MELT_EXPRESSIONS; - meltcdat->dclo_772__TRANSLATE_RUN_MELT_EXPRESSIONS.discr = + /*iniclos dclo_774__TRANSLATE_RUN_MELT_EXPRESSIONS */ + /*_._VALCLO___V976*/ meltfptr[975] = + (melt_ptr_t) & meltcdat->dclo_774__TRANSLATE_RUN_MELT_EXPRESSIONS; + meltcdat->dclo_774__TRANSLATE_RUN_MELT_EXPRESSIONS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); - meltcdat->dclo_772__TRANSLATE_RUN_MELT_EXPRESSIONS.nbval = 0; + meltcdat->dclo_774__TRANSLATE_RUN_MELT_EXPRESSIONS.nbval = 0; - /*inirout drout_773__LAMBDA_ */ - /*_._VALROUT___V962*/ meltfptr[961] = - (melt_ptr_t) & meltcdat->drout_773__LAMBDA_; - meltcdat->drout_773__LAMBDA_.discr = + /*inirout drout_775__LAMBDA_ */ + /*_._VALROUT___V965*/ meltfptr[964] = + (melt_ptr_t) & meltcdat->drout_775__LAMBDA_; + meltcdat->drout_775__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); - strncpy (meltcdat->drout_773__LAMBDA_.routdescr, + strncpy (meltcdat->drout_775__LAMBDA_.routdescr, "LAMBDA_ @warmelt-outobj.melt:7219", MELT_ROUTDESCR_LEN - 1); - meltcdat->drout_773__LAMBDA_.nbval = 3; - MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_773__LAMBDA_, - meltrout_157_WARMELTmiOUTOBJ_LAMBDA_cl29); + meltcdat->drout_775__LAMBDA_.nbval = 3; + MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_775__LAMBDA_, + meltrout_157_WARMELTmiOUTOBJ); -/*iniobj dsym_774__TRUE*/ - /*uniqueobj*/ if (! /*_._VALDATA___V963*/ meltfptr[962]) -/*_._VALDATA___V963*/ meltfptr[962] = - (melt_ptr_t) & meltcdat->dsym_774__TRUE; +/*iniobj dsym_776__TRUE*/ + /*uniqueobj*/ if (! /*_._VALDATA___V966*/ meltfptr[965]) +/*_._VALDATA___V966*/ meltfptr[965] = + (melt_ptr_t) & meltcdat->dsym_776__TRUE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_774__TRUE", + melt_assertmsg ("iniobj check.discr isobj dsym_776__TRUE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_KEYWORD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr objmagic dsym_774__TRUE", + melt_assertmsg ("iniobj check.discr objmagic dsym_776__TRUE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_KEYWORD)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_774__TRUE.meltobj_class = + meltcdat->dsym_776__TRUE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_KEYWORD)))); - meltcdat->dsym_774__TRUE.obj_hash = 576485513; - meltcdat->dsym_774__TRUE.obj_len = 3; + meltcdat->dsym_776__TRUE.obj_hash = 576485513; + meltcdat->dsym_776__TRUE.obj_len = 3; -/*inistring dstr_775__TRUE*/ - /*_._VALSTR___V964*/ meltfptr[963] = - (melt_ptr_t) & meltcdat->dstr_775__TRUE; - meltcdat->dstr_775__TRUE.discr = +/*inistring dstr_777__TRUE*/ + /*_._VALSTR___V967*/ meltfptr[966] = + (melt_ptr_t) & meltcdat->dstr_777__TRUE; + meltcdat->dstr_777__TRUE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_775__TRUE.val, "TRUE", - sizeof (meltcdat->dstr_775__TRUE.val) - 1); - meltcdat->dstr_775__TRUE.val[4] = (char) 0; - meltcdat->dstr_775__TRUE.slen = 4; + /*small inistring */ strncpy (meltcdat->dstr_777__TRUE.val, "TRUE", + sizeof (meltcdat->dstr_777__TRUE.val) - 1); + meltcdat->dstr_777__TRUE.val[4] = (char) 0; + meltcdat->dstr_777__TRUE.slen = 4; -/*iniobj dsym_776__CREATE_NORMAL_EXTENDING_CONTEXT*/ - /*uniqueobj*/ if (! /*_._VALDATA___V974*/ meltfptr[973]) -/*_._VALDATA___V974*/ meltfptr[973] = - (melt_ptr_t) & meltcdat->dsym_776__CREATE_NORMAL_EXTENDING_CONTEXT; +/*iniobj dsym_778__CREATE_NORMAL_EXTENDING_CONTEXT*/ + /*uniqueobj*/ if (! /*_._VALDATA___V977*/ meltfptr[976]) +/*_._VALDATA___V977*/ meltfptr[976] = + (melt_ptr_t) & meltcdat->dsym_778__CREATE_NORMAL_EXTENDING_CONTEXT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr isobj dsym_776__CREATE_NORMAL_EXTENDING_CONTEXT", + ("iniobj check.discr isobj dsym_778__CREATE_NORMAL_EXTENDING_CONTEXT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr objmagic dsym_776__CREATE_NORMAL_EXTENDING_CONTEXT", + ("iniobj check.discr objmagic dsym_778__CREATE_NORMAL_EXTENDING_CONTEXT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_776__CREATE_NORMAL_EXTENDING_CONTEXT.meltobj_class = + meltcdat->dsym_778__CREATE_NORMAL_EXTENDING_CONTEXT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_776__CREATE_NORMAL_EXTENDING_CONTEXT.obj_hash = 134982425; - meltcdat->dsym_776__CREATE_NORMAL_EXTENDING_CONTEXT.obj_len = 3; + meltcdat->dsym_778__CREATE_NORMAL_EXTENDING_CONTEXT.obj_hash = 134982425; + meltcdat->dsym_778__CREATE_NORMAL_EXTENDING_CONTEXT.obj_len = 3; -/*inistring dstr_777__CREATE_NORMAL_EXTENDING_*/ - /*_._VALSTR___V975*/ meltfptr[974] = - (melt_ptr_t) & meltcdat->dstr_777__CREATE_NORMAL_EXTENDING_; - meltcdat->dstr_777__CREATE_NORMAL_EXTENDING_.discr = +/*inistring dstr_779__CREATE_NORMAL_EXTENDING_*/ + /*_._VALSTR___V978*/ meltfptr[977] = + (melt_ptr_t) & meltcdat->dstr_779__CREATE_NORMAL_EXTENDING_; + meltcdat->dstr_779__CREATE_NORMAL_EXTENDING_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_777__CREATE_NORMAL_EXTENDING_. + /*small inistring */ strncpy (meltcdat->dstr_779__CREATE_NORMAL_EXTENDING_. val, "CREATE_NORMAL_EXTENDING_CONTEXT", sizeof (meltcdat-> - dstr_777__CREATE_NORMAL_EXTENDING_. + dstr_779__CREATE_NORMAL_EXTENDING_. val) - 1); - meltcdat->dstr_777__CREATE_NORMAL_EXTENDING_.val[31] = (char) 0; - meltcdat->dstr_777__CREATE_NORMAL_EXTENDING_.slen = 31; + meltcdat->dstr_779__CREATE_NORMAL_EXTENDING_.val[31] = (char) 0; + meltcdat->dstr_779__CREATE_NORMAL_EXTENDING_.slen = 31; - /*inirout drout_778__LAMBDA_ */ - /*_._VALROUT___V965*/ meltfptr[964] = - (melt_ptr_t) & meltcdat->drout_778__LAMBDA_; - meltcdat->drout_778__LAMBDA_.discr = + /*inirout drout_780__LAMBDA_ */ + /*_._VALROUT___V968*/ meltfptr[967] = + (melt_ptr_t) & meltcdat->drout_780__LAMBDA_; + meltcdat->drout_780__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); - strncpy (meltcdat->drout_778__LAMBDA_.routdescr, + strncpy (meltcdat->drout_780__LAMBDA_.routdescr, "LAMBDA_ @warmelt-outobj.melt:7267", MELT_ROUTDESCR_LEN - 1); - meltcdat->drout_778__LAMBDA_.nbval = 5; - MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_778__LAMBDA_, - meltrout_158_WARMELTmiOUTOBJ_LAMBDA_cl30); + meltcdat->drout_780__LAMBDA_.nbval = 5; + MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_780__LAMBDA_, + meltrout_158_WARMELTmiOUTOBJ); -/*iniobj dsym_779__CLASS_SEXPR*/ - /*uniqueobj*/ if (! /*_._VALDATA___V976*/ meltfptr[975]) -/*_._VALDATA___V976*/ meltfptr[975] = - (melt_ptr_t) & meltcdat->dsym_779__CLASS_SEXPR; +/*iniobj dsym_781__CLASS_SEXPR*/ + /*uniqueobj*/ if (! /*_._VALDATA___V979*/ meltfptr[978]) +/*_._VALDATA___V979*/ meltfptr[978] = + (melt_ptr_t) & meltcdat->dsym_781__CLASS_SEXPR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_779__CLASS_SEXPR", + melt_assertmsg ("iniobj check.discr isobj dsym_781__CLASS_SEXPR", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr objmagic dsym_779__CLASS_SEXPR", + melt_assertmsg ("iniobj check.discr objmagic dsym_781__CLASS_SEXPR", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_779__CLASS_SEXPR.meltobj_class = + meltcdat->dsym_781__CLASS_SEXPR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_779__CLASS_SEXPR.obj_hash = 53411612; - meltcdat->dsym_779__CLASS_SEXPR.obj_len = 3; + meltcdat->dsym_781__CLASS_SEXPR.obj_hash = 53411612; + meltcdat->dsym_781__CLASS_SEXPR.obj_len = 3; -/*inistring dstr_780__CLASS_SEXPR*/ - /*_._VALSTR___V977*/ meltfptr[976] = - (melt_ptr_t) & meltcdat->dstr_780__CLASS_SEXPR; - meltcdat->dstr_780__CLASS_SEXPR.discr = +/*inistring dstr_782__CLASS_SEXPR*/ + /*_._VALSTR___V980*/ meltfptr[979] = + (melt_ptr_t) & meltcdat->dstr_782__CLASS_SEXPR; + meltcdat->dstr_782__CLASS_SEXPR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_780__CLASS_SEXPR.val, + /*small inistring */ strncpy (meltcdat->dstr_782__CLASS_SEXPR.val, "CLASS_SEXPR", - sizeof (meltcdat->dstr_780__CLASS_SEXPR.val) - + sizeof (meltcdat->dstr_782__CLASS_SEXPR.val) - 1); - meltcdat->dstr_780__CLASS_SEXPR.val[11] = (char) 0; - meltcdat->dstr_780__CLASS_SEXPR.slen = 11; + meltcdat->dstr_782__CLASS_SEXPR.val[11] = (char) 0; + meltcdat->dstr_782__CLASS_SEXPR.slen = 11; -/*inistring dstr_781__Bad_expression*/ - /*_._VALSTR___V966*/ meltfptr[965] = - (melt_ptr_t) & meltcdat->dstr_781__Bad_expression; - meltcdat->dstr_781__Bad_expression.discr = +/*inistring dstr_783__Bad_expression*/ + /*_._VALSTR___V969*/ meltfptr[968] = + (melt_ptr_t) & meltcdat->dstr_783__Bad_expression; + meltcdat->dstr_783__Bad_expression.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_781__Bad_expression.val, + /*small inistring */ strncpy (meltcdat->dstr_783__Bad_expression.val, "Bad expression", - sizeof (meltcdat->dstr_781__Bad_expression. + sizeof (meltcdat->dstr_783__Bad_expression. val) - 1); - meltcdat->dstr_781__Bad_expression.val[14] = (char) 0; - meltcdat->dstr_781__Bad_expression.slen = 14; + meltcdat->dstr_783__Bad_expression.val[14] = (char) 0; + meltcdat->dstr_783__Bad_expression.slen = 14; -/*inistring dstr_782__No_expressions*/ - /*_._VALSTR___V967*/ meltfptr[966] = - (melt_ptr_t) & meltcdat->dstr_782__No_expressions; - meltcdat->dstr_782__No_expressions.discr = +/*inistring dstr_784__No_expressions*/ + /*_._VALSTR___V970*/ meltfptr[969] = + (melt_ptr_t) & meltcdat->dstr_784__No_expressions; + meltcdat->dstr_784__No_expressions.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_782__No_expressions.val, + /*small inistring */ strncpy (meltcdat->dstr_784__No_expressions.val, "No expressions", - sizeof (meltcdat->dstr_782__No_expressions. + sizeof (meltcdat->dstr_784__No_expressions. val) - 1); - meltcdat->dstr_782__No_expressions.val[14] = (char) 0; - meltcdat->dstr_782__No_expressions.slen = 14; + meltcdat->dstr_784__No_expressions.val[14] = (char) 0; + meltcdat->dstr_784__No_expressions.slen = 14; -/*inistring dstr_783__runtime_invalid_expressi*/ - /*_._VALSTR___V968*/ meltfptr[967] = - (melt_ptr_t) & meltcdat->dstr_783__runtime_invalid_expressi; - meltcdat->dstr_783__runtime_invalid_expressi.discr = +/*inistring dstr_785__runtime_invalid_expressi*/ + /*_._VALSTR___V971*/ meltfptr[970] = + (melt_ptr_t) & meltcdat->dstr_785__runtime_invalid_expressi; + meltcdat->dstr_785__runtime_invalid_expressi.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_783__runtime_invalid_expressi. + /*small inistring */ strncpy (meltcdat->dstr_785__runtime_invalid_expressi. val, "runtime invalid expressions", sizeof (meltcdat-> - dstr_783__runtime_invalid_expressi. + dstr_785__runtime_invalid_expressi. val) - 1); - meltcdat->dstr_783__runtime_invalid_expressi.val[27] = (char) 0; - meltcdat->dstr_783__runtime_invalid_expressi.slen = 27; + meltcdat->dstr_785__runtime_invalid_expressi.val[27] = (char) 0; + meltcdat->dstr_785__runtime_invalid_expressi.slen = 27; - /*inirout drout_784__LAMBDA_ */ - /*_._VALROUT___V969*/ meltfptr[968] = - (melt_ptr_t) & meltcdat->drout_784__LAMBDA_; - meltcdat->drout_784__LAMBDA_.discr = + /*inirout drout_786__LAMBDA_ */ + /*_._VALROUT___V972*/ meltfptr[971] = + (melt_ptr_t) & meltcdat->drout_786__LAMBDA_; + meltcdat->drout_786__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); - strncpy (meltcdat->drout_784__LAMBDA_.routdescr, + strncpy (meltcdat->drout_786__LAMBDA_.routdescr, "LAMBDA_ @warmelt-outobj.melt:7330", MELT_ROUTDESCR_LEN - 1); - meltcdat->drout_784__LAMBDA_.nbval = 9; - MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_784__LAMBDA_, - meltrout_159_WARMELTmiOUTOBJ_LAMBDA_cl31); + meltcdat->drout_786__LAMBDA_.nbval = 9; + MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_786__LAMBDA_, + meltrout_159_WARMELTmiOUTOBJ); -/*inistring dstr_785__runtime_macroexpansion_f*/ - /*_._VALSTR___V970*/ meltfptr[969] = - (melt_ptr_t) & meltcdat->dstr_785__runtime_macroexpansion_f; - meltcdat->dstr_785__runtime_macroexpansion_f.discr = +/*inistring dstr_787__runtime_macroexpansion_f*/ + /*_._VALSTR___V973*/ meltfptr[972] = + (melt_ptr_t) & meltcdat->dstr_787__runtime_macroexpansion_f; + meltcdat->dstr_787__runtime_macroexpansion_f.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_785__runtime_macroexpansion_f. + /*small inistring */ strncpy (meltcdat->dstr_787__runtime_macroexpansion_f. val, "runtime macroexpansion failed", sizeof (meltcdat-> - dstr_785__runtime_macroexpansion_f. + dstr_787__runtime_macroexpansion_f. val) - 1); - meltcdat->dstr_785__runtime_macroexpansion_f.val[29] = (char) 0; - meltcdat->dstr_785__runtime_macroexpansion_f.slen = 29; + meltcdat->dstr_787__runtime_macroexpansion_f.val[29] = (char) 0; + meltcdat->dstr_787__runtime_macroexpansion_f.slen = 29; -/*iniobj dsym_786__COMPILE2OBJ_INITEXTENDPROC*/ - /*uniqueobj*/ if (! /*_._VALDATA___V978*/ meltfptr[977]) -/*_._VALDATA___V978*/ meltfptr[977] = - (melt_ptr_t) & meltcdat->dsym_786__COMPILE2OBJ_INITEXTENDPROC; +/*iniobj dsym_788__COMPILE2OBJ_INITEXTENDPROC*/ + /*uniqueobj*/ if (! /*_._VALDATA___V981*/ meltfptr[980]) +/*_._VALDATA___V981*/ meltfptr[980] = + (melt_ptr_t) & meltcdat->dsym_788__COMPILE2OBJ_INITEXTENDPROC; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr isobj dsym_786__COMPILE2OBJ_INITEXTENDPROC", + ("iniobj check.discr isobj dsym_788__COMPILE2OBJ_INITEXTENDPROC", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr objmagic dsym_786__COMPILE2OBJ_INITEXTENDPROC", + ("iniobj check.discr objmagic dsym_788__COMPILE2OBJ_INITEXTENDPROC", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_786__COMPILE2OBJ_INITEXTENDPROC.meltobj_class = + meltcdat->dsym_788__COMPILE2OBJ_INITEXTENDPROC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_786__COMPILE2OBJ_INITEXTENDPROC.obj_hash = 801786105; - meltcdat->dsym_786__COMPILE2OBJ_INITEXTENDPROC.obj_len = 3; + meltcdat->dsym_788__COMPILE2OBJ_INITEXTENDPROC.obj_hash = 801786105; + meltcdat->dsym_788__COMPILE2OBJ_INITEXTENDPROC.obj_len = 3; -/*inistring dstr_787__COMPILE2OBJ_INITEXTENDPR*/ - /*_._VALSTR___V979*/ meltfptr[978] = - (melt_ptr_t) & meltcdat->dstr_787__COMPILE2OBJ_INITEXTENDPR; - meltcdat->dstr_787__COMPILE2OBJ_INITEXTENDPR.discr = +/*inistring dstr_789__COMPILE2OBJ_INITEXTENDPR*/ + /*_._VALSTR___V982*/ meltfptr[981] = + (melt_ptr_t) & meltcdat->dstr_789__COMPILE2OBJ_INITEXTENDPR; + meltcdat->dstr_789__COMPILE2OBJ_INITEXTENDPR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_787__COMPILE2OBJ_INITEXTENDPR. + /*small inistring */ strncpy (meltcdat->dstr_789__COMPILE2OBJ_INITEXTENDPR. val, "COMPILE2OBJ_INITEXTENDPROC", sizeof (meltcdat-> - dstr_787__COMPILE2OBJ_INITEXTENDPR. + dstr_789__COMPILE2OBJ_INITEXTENDPR. val) - 1); - meltcdat->dstr_787__COMPILE2OBJ_INITEXTENDPR.val[26] = (char) 0; - meltcdat->dstr_787__COMPILE2OBJ_INITEXTENDPR.slen = 26; + meltcdat->dstr_789__COMPILE2OBJ_INITEXTENDPR.val[26] = (char) 0; + meltcdat->dstr_789__COMPILE2OBJ_INITEXTENDPR.slen = 26; -/*inistring dstr_788__runtime_translation_to_c*/ - /*_._VALSTR___V971*/ meltfptr[970] = - (melt_ptr_t) & meltcdat->dstr_788__runtime_translation_to_c; - meltcdat->dstr_788__runtime_translation_to_c.discr = +/*inistring dstr_790__runtime_translation_to_c*/ + /*_._VALSTR___V974*/ meltfptr[973] = + (melt_ptr_t) & meltcdat->dstr_790__runtime_translation_to_c; + meltcdat->dstr_790__runtime_translation_to_c.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_788__runtime_translation_to_c. + /*small inistring */ strncpy (meltcdat->dstr_790__runtime_translation_to_c. val, "runtime translation to code failed", sizeof (meltcdat-> - dstr_788__runtime_translation_to_c. + dstr_790__runtime_translation_to_c. val) - 1); - meltcdat->dstr_788__runtime_translation_to_c.val[34] = (char) 0; - meltcdat->dstr_788__runtime_translation_to_c.slen = 34; + meltcdat->dstr_790__runtime_translation_to_c.val[34] = (char) 0; + meltcdat->dstr_790__runtime_translation_to_c.slen = 34; -/*inistring dstr_789__runextend*/ - /*_._VALSTR___V972*/ meltfptr[971] = - (melt_ptr_t) & meltcdat->dstr_789__runextend; - meltcdat->dstr_789__runextend.discr = +/*inistring dstr_791__runextend*/ + /*_._VALSTR___V975*/ meltfptr[974] = + (melt_ptr_t) & meltcdat->dstr_791__runextend; + meltcdat->dstr_791__runextend.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_789__runextend.val, + /*small inistring */ strncpy (meltcdat->dstr_791__runextend.val, "runextend", - sizeof (meltcdat->dstr_789__runextend.val) - + sizeof (meltcdat->dstr_791__runextend.val) - 1); - meltcdat->dstr_789__runextend.val[9] = (char) 0; - meltcdat->dstr_789__runextend.slen = 9; + meltcdat->dstr_791__runextend.val[9] = (char) 0; + meltcdat->dstr_791__runextend.slen = 9; -/*iniobj dsym_790__CLASS_LITERAL_VALUE*/ - /*uniqueobj*/ if (! /*_._VALDATA___V980*/ meltfptr[979]) -/*_._VALDATA___V980*/ meltfptr[979] = - (melt_ptr_t) & meltcdat->dsym_790__CLASS_LITERAL_VALUE; +/*iniobj dsym_792__CLASS_LITERAL_VALUE*/ + /*uniqueobj*/ if (! /*_._VALDATA___V983*/ meltfptr[982]) +/*_._VALDATA___V983*/ meltfptr[982] = + (melt_ptr_t) & meltcdat->dsym_792__CLASS_LITERAL_VALUE; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_790__CLASS_LITERAL_VALUE", + melt_assertmsg ("iniobj check.discr isobj dsym_792__CLASS_LITERAL_VALUE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr objmagic dsym_790__CLASS_LITERAL_VALUE", + ("iniobj check.discr objmagic dsym_792__CLASS_LITERAL_VALUE", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_790__CLASS_LITERAL_VALUE.meltobj_class = + meltcdat->dsym_792__CLASS_LITERAL_VALUE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_790__CLASS_LITERAL_VALUE.obj_hash = 801101132; - meltcdat->dsym_790__CLASS_LITERAL_VALUE.obj_len = 3; + meltcdat->dsym_792__CLASS_LITERAL_VALUE.obj_hash = 801101132; + meltcdat->dsym_792__CLASS_LITERAL_VALUE.obj_len = 3; -/*inistring dstr_791__CLASS_LITERAL_VALUE*/ - /*_._VALSTR___V981*/ meltfptr[980] = - (melt_ptr_t) & meltcdat->dstr_791__CLASS_LITERAL_VALUE; - meltcdat->dstr_791__CLASS_LITERAL_VALUE.discr = +/*inistring dstr_793__CLASS_LITERAL_VALUE*/ + /*_._VALSTR___V984*/ meltfptr[983] = + (melt_ptr_t) & meltcdat->dstr_793__CLASS_LITERAL_VALUE; + meltcdat->dstr_793__CLASS_LITERAL_VALUE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_791__CLASS_LITERAL_VALUE.val, + /*small inistring */ strncpy (meltcdat->dstr_793__CLASS_LITERAL_VALUE.val, "CLASS_LITERAL_VALUE", sizeof (meltcdat-> - dstr_791__CLASS_LITERAL_VALUE.val) - + dstr_793__CLASS_LITERAL_VALUE.val) - 1); - meltcdat->dstr_791__CLASS_LITERAL_VALUE.val[19] = (char) 0; - meltcdat->dstr_791__CLASS_LITERAL_VALUE.slen = 19; + meltcdat->dstr_793__CLASS_LITERAL_VALUE.val[19] = (char) 0; + meltcdat->dstr_793__CLASS_LITERAL_VALUE.slen = 19; - /*inirout drout_792__READ_MELT_EXPRESSIONS */ - /*_._VALROUT___V982*/ meltfptr[981] = - (melt_ptr_t) & meltcdat->drout_792__READ_MELT_EXPRESSIONS; - meltcdat->drout_792__READ_MELT_EXPRESSIONS.discr = + /*inirout drout_794__READ_MELT_EXPRESSIONS */ + /*_._VALROUT___V985*/ meltfptr[984] = + (melt_ptr_t) & meltcdat->drout_794__READ_MELT_EXPRESSIONS; + meltcdat->drout_794__READ_MELT_EXPRESSIONS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); - strncpy (meltcdat->drout_792__READ_MELT_EXPRESSIONS.routdescr, + strncpy (meltcdat->drout_794__READ_MELT_EXPRESSIONS.routdescr, "READ_MELT_EXPRESSIONS @warmelt-outobj.melt:7470", MELT_ROUTDESCR_LEN - 1); - meltcdat->drout_792__READ_MELT_EXPRESSIONS.nbval = 6; - MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_792__READ_MELT_EXPRESSIONS, + meltcdat->drout_794__READ_MELT_EXPRESSIONS.nbval = 6; + MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_794__READ_MELT_EXPRESSIONS, meltrout_160_WARMELTmiOUTOBJ_READ_MELT_EXPRESSIONS); - /*iniclos dclo_793__READ_MELT_EXPRESSIONS */ - /*_._VALCLO___V983*/ meltfptr[982] = - (melt_ptr_t) & meltcdat->dclo_793__READ_MELT_EXPRESSIONS; - meltcdat->dclo_793__READ_MELT_EXPRESSIONS.discr = + /*iniclos dclo_795__READ_MELT_EXPRESSIONS */ + /*_._VALCLO___V986*/ meltfptr[985] = + (melt_ptr_t) & meltcdat->dclo_795__READ_MELT_EXPRESSIONS; + meltcdat->dclo_795__READ_MELT_EXPRESSIONS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); - meltcdat->dclo_793__READ_MELT_EXPRESSIONS.nbval = 0; + meltcdat->dclo_795__READ_MELT_EXPRESSIONS.nbval = 0; -/*iniobj dsym_794__LIST_APPEND2LIST*/ - /*uniqueobj*/ if (! /*_._VALDATA___V984*/ meltfptr[983]) -/*_._VALDATA___V984*/ meltfptr[983] = - (melt_ptr_t) & meltcdat->dsym_794__LIST_APPEND2LIST; +/*iniobj dsym_796__LIST_APPEND2LIST*/ + /*uniqueobj*/ if (! /*_._VALDATA___V987*/ meltfptr[986]) +/*_._VALDATA___V987*/ meltfptr[986] = + (melt_ptr_t) & meltcdat->dsym_796__LIST_APPEND2LIST; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_794__LIST_APPEND2LIST", + melt_assertmsg ("iniobj check.discr isobj dsym_796__LIST_APPEND2LIST", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr objmagic dsym_794__LIST_APPEND2LIST", + melt_assertmsg ("iniobj check.discr objmagic dsym_796__LIST_APPEND2LIST", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_794__LIST_APPEND2LIST.meltobj_class = + meltcdat->dsym_796__LIST_APPEND2LIST.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_794__LIST_APPEND2LIST.obj_hash = 744841630; - meltcdat->dsym_794__LIST_APPEND2LIST.obj_len = 3; + meltcdat->dsym_796__LIST_APPEND2LIST.obj_hash = 744841630; + meltcdat->dsym_796__LIST_APPEND2LIST.obj_len = 3; -/*inistring dstr_795__LIST_APPEND2LIST*/ - /*_._VALSTR___V985*/ meltfptr[984] = - (melt_ptr_t) & meltcdat->dstr_795__LIST_APPEND2LIST; - meltcdat->dstr_795__LIST_APPEND2LIST.discr = +/*inistring dstr_797__LIST_APPEND2LIST*/ + /*_._VALSTR___V988*/ meltfptr[987] = + (melt_ptr_t) & meltcdat->dstr_797__LIST_APPEND2LIST; + meltcdat->dstr_797__LIST_APPEND2LIST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_795__LIST_APPEND2LIST.val, + /*small inistring */ strncpy (meltcdat->dstr_797__LIST_APPEND2LIST.val, "LIST_APPEND2LIST", - sizeof (meltcdat->dstr_795__LIST_APPEND2LIST. + sizeof (meltcdat->dstr_797__LIST_APPEND2LIST. val) - 1); - meltcdat->dstr_795__LIST_APPEND2LIST.val[16] = (char) 0; - meltcdat->dstr_795__LIST_APPEND2LIST.slen = 16; + meltcdat->dstr_797__LIST_APPEND2LIST.val[16] = (char) 0; + meltcdat->dstr_797__LIST_APPEND2LIST.slen = 16; - /*inirout drout_796__TRANSLATE_TO_C_MODULE_MELT_SOURCES */ - /*_._VALROUT___V986*/ meltfptr[985] = - (melt_ptr_t) & meltcdat->drout_796__TRANSLATE_TO_C_MODULE_MELT_SOURCES; - meltcdat->drout_796__TRANSLATE_TO_C_MODULE_MELT_SOURCES.discr = + /*inirout drout_798__TRANSLATE_TO_C_MODULE_MELT_SOURCES */ + /*_._VALROUT___V989*/ meltfptr[988] = + (melt_ptr_t) & meltcdat->drout_798__TRANSLATE_TO_C_MODULE_MELT_SOURCES; + meltcdat->drout_798__TRANSLATE_TO_C_MODULE_MELT_SOURCES.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); - strncpy (meltcdat->drout_796__TRANSLATE_TO_C_MODULE_MELT_SOURCES.routdescr, + strncpy (meltcdat->drout_798__TRANSLATE_TO_C_MODULE_MELT_SOURCES.routdescr, "TRANSLATE_TO_C_MODULE_MELT_SOURCES @warmelt-outobj.melt:7508", MELT_ROUTDESCR_LEN - 1); - meltcdat->drout_796__TRANSLATE_TO_C_MODULE_MELT_SOURCES.nbval = 5; + meltcdat->drout_798__TRANSLATE_TO_C_MODULE_MELT_SOURCES.nbval = 5; MELT_ROUTINE_SET_ROUTCODE (&meltcdat-> - drout_796__TRANSLATE_TO_C_MODULE_MELT_SOURCES, + drout_798__TRANSLATE_TO_C_MODULE_MELT_SOURCES, meltrout_161_WARMELTmiOUTOBJ_TRANSLATE_TO_C_MODULE_MELT_SOURCES); - /*iniclos dclo_797__TRANSLATE_TO_C_MODULE_MELT_SOURCES */ - /*_._VALCLO___V987*/ meltfptr[986] = - (melt_ptr_t) & meltcdat->dclo_797__TRANSLATE_TO_C_MODULE_MELT_SOURCES; - meltcdat->dclo_797__TRANSLATE_TO_C_MODULE_MELT_SOURCES.discr = + /*iniclos dclo_799__TRANSLATE_TO_C_MODULE_MELT_SOURCES */ + /*_._VALCLO___V990*/ meltfptr[989] = + (melt_ptr_t) & meltcdat->dclo_799__TRANSLATE_TO_C_MODULE_MELT_SOURCES; + meltcdat->dclo_799__TRANSLATE_TO_C_MODULE_MELT_SOURCES.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); - meltcdat->dclo_797__TRANSLATE_TO_C_MODULE_MELT_SOURCES.nbval = 0; + meltcdat->dclo_799__TRANSLATE_TO_C_MODULE_MELT_SOURCES.nbval = 0; - /*inirout drout_798__EVAL */ - /*_._VALROUT___V988*/ meltfptr[987] = - (melt_ptr_t) & meltcdat->drout_798__EVAL; - meltcdat->drout_798__EVAL.discr = + /*inirout drout_800__EVAL */ + /*_._VALROUT___V991*/ meltfptr[990] = + (melt_ptr_t) & meltcdat->drout_800__EVAL; + meltcdat->drout_800__EVAL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); - strncpy (meltcdat->drout_798__EVAL.routdescr, + strncpy (meltcdat->drout_800__EVAL.routdescr, "EVAL @warmelt-outobj.melt:7552", MELT_ROUTDESCR_LEN - 1); - meltcdat->drout_798__EVAL.nbval = 6; - MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_798__EVAL, + meltcdat->drout_800__EVAL.nbval = 6; + MELT_ROUTINE_SET_ROUTCODE (&meltcdat->drout_800__EVAL, meltrout_162_WARMELTmiOUTOBJ_EVAL); - /*iniclos dclo_799__EVAL */ - /*_._VALCLO___V989*/ meltfptr[988] = - (melt_ptr_t) & meltcdat->dclo_799__EVAL; - meltcdat->dclo_799__EVAL.discr = + /*iniclos dclo_801__EVAL */ + /*_._VALCLO___V992*/ meltfptr[991] = + (melt_ptr_t) & meltcdat->dclo_801__EVAL; + meltcdat->dclo_801__EVAL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); - meltcdat->dclo_799__EVAL.nbval = 0; + meltcdat->dclo_801__EVAL.nbval = 0; -/*iniobj dsym_800__MULTIPLE_TO_LIST*/ - /*uniqueobj*/ if (! /*_._VALDATA___V990*/ meltfptr[989]) -/*_._VALDATA___V990*/ meltfptr[989] = - (melt_ptr_t) & meltcdat->dsym_800__MULTIPLE_TO_LIST; +/*iniobj dsym_802__MULTIPLE_TO_LIST*/ + /*uniqueobj*/ if (! /*_._VALDATA___V993*/ meltfptr[992]) +/*_._VALDATA___V993*/ meltfptr[992] = + (melt_ptr_t) & meltcdat->dsym_802__MULTIPLE_TO_LIST; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_800__MULTIPLE_TO_LIST", + melt_assertmsg ("iniobj check.discr isobj dsym_802__MULTIPLE_TO_LIST", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr objmagic dsym_800__MULTIPLE_TO_LIST", + melt_assertmsg ("iniobj check.discr objmagic dsym_802__MULTIPLE_TO_LIST", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_800__MULTIPLE_TO_LIST.meltobj_class = + meltcdat->dsym_802__MULTIPLE_TO_LIST.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_800__MULTIPLE_TO_LIST.obj_hash = 622139769; - meltcdat->dsym_800__MULTIPLE_TO_LIST.obj_len = 3; + meltcdat->dsym_802__MULTIPLE_TO_LIST.obj_hash = 622139769; + meltcdat->dsym_802__MULTIPLE_TO_LIST.obj_len = 3; -/*inistring dstr_801__MULTIPLE_TO_LIST*/ - /*_._VALSTR___V991*/ meltfptr[990] = - (melt_ptr_t) & meltcdat->dstr_801__MULTIPLE_TO_LIST; - meltcdat->dstr_801__MULTIPLE_TO_LIST.discr = +/*inistring dstr_803__MULTIPLE_TO_LIST*/ + /*_._VALSTR___V994*/ meltfptr[993] = + (melt_ptr_t) & meltcdat->dstr_803__MULTIPLE_TO_LIST; + meltcdat->dstr_803__MULTIPLE_TO_LIST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_801__MULTIPLE_TO_LIST.val, + /*small inistring */ strncpy (meltcdat->dstr_803__MULTIPLE_TO_LIST.val, "MULTIPLE_TO_LIST", - sizeof (meltcdat->dstr_801__MULTIPLE_TO_LIST. + sizeof (meltcdat->dstr_803__MULTIPLE_TO_LIST. val) - 1); - meltcdat->dstr_801__MULTIPLE_TO_LIST.val[16] = (char) 0; - meltcdat->dstr_801__MULTIPLE_TO_LIST.slen = 16; + meltcdat->dstr_803__MULTIPLE_TO_LIST.val[16] = (char) 0; + meltcdat->dstr_803__MULTIPLE_TO_LIST.slen = 16; - /*inirout drout_802__GENERATE_GPLV3PLUS_COPYRIGHT_NOTICE_C_COMMENT */ - /*_._VALROUT___V992*/ meltfptr[991] = + /*inirout drout_804__GENERATE_GPLV3PLUS_COPYRIGHT_NOTICE_C_COMMENT */ + /*_._VALROUT___V995*/ meltfptr[994] = (melt_ptr_t) & meltcdat-> - drout_802__GENERATE_GPLV3PLUS_COPYRIGHT_NOTICE_C_COMMENT; - meltcdat->drout_802__GENERATE_GPLV3PLUS_COPYRIGHT_NOTICE_C_COMMENT.discr = + drout_804__GENERATE_GPLV3PLUS_COPYRIGHT_NOTICE_C_COMMENT; + meltcdat->drout_804__GENERATE_GPLV3PLUS_COPYRIGHT_NOTICE_C_COMMENT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); - strncpy (meltcdat->drout_802__GENERATE_GPLV3PLUS_COPYRIGHT_NOTICE_C_COMMENT. + strncpy (meltcdat->drout_804__GENERATE_GPLV3PLUS_COPYRIGHT_NOTICE_C_COMMENT. routdescr, "GENERATE_GPLV3PLUS_COPYRIGHT_NOTICE_C_COMMENT @warmelt-outobj.melt:7583", MELT_ROUTDESCR_LEN - 1); - meltcdat->drout_802__GENERATE_GPLV3PLUS_COPYRIGHT_NOTICE_C_COMMENT.nbval = + meltcdat->drout_804__GENERATE_GPLV3PLUS_COPYRIGHT_NOTICE_C_COMMENT.nbval = 0; MELT_ROUTINE_SET_ROUTCODE (&meltcdat-> - drout_802__GENERATE_GPLV3PLUS_COPYRIGHT_NOTICE_C_COMMENT, + drout_804__GENERATE_GPLV3PLUS_COPYRIGHT_NOTICE_C_COMMENT, meltrout_163_WARMELTmiOUTOBJ_GENERATE_GPLV3PLUS_COPYRIGHT_NOTICE_C_COMMENT); - /*iniclos dclo_803__GENERATE_GPLV3PLUS_COPYRIGHT_NOTICE_C_COMMENT */ - /*_._VALCLO___V993*/ meltfptr[992] = + /*iniclos dclo_805__GENERATE_GPLV3PLUS_COPYRIGHT_NOTICE_C_COMMENT */ + /*_._VALCLO___V996*/ meltfptr[995] = (melt_ptr_t) & meltcdat-> - dclo_803__GENERATE_GPLV3PLUS_COPYRIGHT_NOTICE_C_COMMENT; - meltcdat->dclo_803__GENERATE_GPLV3PLUS_COPYRIGHT_NOTICE_C_COMMENT.discr = + dclo_805__GENERATE_GPLV3PLUS_COPYRIGHT_NOTICE_C_COMMENT; + meltcdat->dclo_805__GENERATE_GPLV3PLUS_COPYRIGHT_NOTICE_C_COMMENT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_CLOSURE)))); - meltcdat->dclo_803__GENERATE_GPLV3PLUS_COPYRIGHT_NOTICE_C_COMMENT.nbval = 0; + meltcdat->dclo_805__GENERATE_GPLV3PLUS_COPYRIGHT_NOTICE_C_COMMENT.nbval = 0; -/*iniobj dsym_804__COMPILE_LIST_SEXPR*/ - /*uniqueobj*/ if (! /*_._VALDATA___V994*/ meltfptr[993]) -/*_._VALDATA___V994*/ meltfptr[993] = - (melt_ptr_t) & meltcdat->dsym_804__COMPILE_LIST_SEXPR; +/*iniobj dsym_806__COMPILE_LIST_SEXPR*/ + /*uniqueobj*/ if (! /*_._VALDATA___V997*/ meltfptr[996]) +/*_._VALDATA___V997*/ meltfptr[996] = + (melt_ptr_t) & meltcdat->dsym_806__COMPILE_LIST_SEXPR; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_804__COMPILE_LIST_SEXPR", + melt_assertmsg ("iniobj check.discr isobj dsym_806__COMPILE_LIST_SEXPR", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr objmagic dsym_804__COMPILE_LIST_SEXPR", + ("iniobj check.discr objmagic dsym_806__COMPILE_LIST_SEXPR", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_804__COMPILE_LIST_SEXPR.meltobj_class = + meltcdat->dsym_806__COMPILE_LIST_SEXPR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_804__COMPILE_LIST_SEXPR.obj_hash = 346985953; - meltcdat->dsym_804__COMPILE_LIST_SEXPR.obj_len = 3; + meltcdat->dsym_806__COMPILE_LIST_SEXPR.obj_hash = 346985953; + meltcdat->dsym_806__COMPILE_LIST_SEXPR.obj_len = 3; -/*inistring dstr_805__COMPILE_LIST_SEXPR*/ - /*_._VALSTR___V995*/ meltfptr[994] = - (melt_ptr_t) & meltcdat->dstr_805__COMPILE_LIST_SEXPR; - meltcdat->dstr_805__COMPILE_LIST_SEXPR.discr = +/*inistring dstr_807__COMPILE_LIST_SEXPR*/ + /*_._VALSTR___V998*/ meltfptr[997] = + (melt_ptr_t) & meltcdat->dstr_807__COMPILE_LIST_SEXPR; + meltcdat->dstr_807__COMPILE_LIST_SEXPR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_805__COMPILE_LIST_SEXPR.val, + /*small inistring */ strncpy (meltcdat->dstr_807__COMPILE_LIST_SEXPR.val, "COMPILE_LIST_SEXPR", sizeof (meltcdat-> - dstr_805__COMPILE_LIST_SEXPR.val) - + dstr_807__COMPILE_LIST_SEXPR.val) - 1); - meltcdat->dstr_805__COMPILE_LIST_SEXPR.val[18] = (char) 0; - meltcdat->dstr_805__COMPILE_LIST_SEXPR.slen = 18; + meltcdat->dstr_807__COMPILE_LIST_SEXPR.val[18] = (char) 0; + meltcdat->dstr_807__COMPILE_LIST_SEXPR.slen = 18; -/*iniobj dsym_806__EVAL*/ - /*uniqueobj*/ if (! /*_._VALDATA___V996*/ meltfptr[995]) -/*_._VALDATA___V996*/ meltfptr[995] = - (melt_ptr_t) & meltcdat->dsym_806__EVAL; +/*iniobj dsym_808__EVAL*/ + /*uniqueobj*/ if (! /*_._VALDATA___V999*/ meltfptr[998]) +/*_._VALDATA___V999*/ meltfptr[998] = + (melt_ptr_t) & meltcdat->dsym_808__EVAL; if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr isobj dsym_806__EVAL", + melt_assertmsg ("iniobj check.discr isobj dsym_808__EVAL", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) - melt_assertmsg ("iniobj check.discr objmagic dsym_806__EVAL", + melt_assertmsg ("iniobj check.discr objmagic dsym_808__EVAL", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_806__EVAL.meltobj_class = + meltcdat->dsym_808__EVAL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_806__EVAL.obj_hash = 8769850; - meltcdat->dsym_806__EVAL.obj_len = 3; + meltcdat->dsym_808__EVAL.obj_hash = 8769850; + meltcdat->dsym_808__EVAL.obj_len = 3; -/*inistring dstr_807__EVAL*/ - /*_._VALSTR___V997*/ meltfptr[996] = - (melt_ptr_t) & meltcdat->dstr_807__EVAL; - meltcdat->dstr_807__EVAL.discr = +/*inistring dstr_809__EVAL*/ + /*_._VALSTR___V1000*/ meltfptr[999] = + (melt_ptr_t) & meltcdat->dstr_809__EVAL; + meltcdat->dstr_809__EVAL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_807__EVAL.val, "EVAL", - sizeof (meltcdat->dstr_807__EVAL.val) - 1); - meltcdat->dstr_807__EVAL.val[4] = (char) 0; - meltcdat->dstr_807__EVAL.slen = 4; + /*small inistring */ strncpy (meltcdat->dstr_809__EVAL.val, "EVAL", + sizeof (meltcdat->dstr_809__EVAL.val) - 1); + meltcdat->dstr_809__EVAL.val[4] = (char) 0; + meltcdat->dstr_809__EVAL.slen = 4; -/*iniobj dsym_808__GENERATE_GPLV3PLUS_COPYRIGHT_NOTICE_C_COMMENT*/ - /*uniqueobj*/ if (! /*_._VALDATA___V998*/ meltfptr[997]) -/*_._VALDATA___V998*/ meltfptr[997] = +/*iniobj dsym_810__GENERATE_GPLV3PLUS_COPYRIGHT_NOTICE_C_COMMENT*/ + /*uniqueobj*/ if (! /*_._VALDATA___V1001*/ meltfptr[1000]) +/*_._VALDATA___V1001*/ meltfptr[1000] = (melt_ptr_t) & meltcdat-> - dsym_808__GENERATE_GPLV3PLUS_COPYRIGHT_NOTICE_C_COMMENT; + dsym_810__GENERATE_GPLV3PLUS_COPYRIGHT_NOTICE_C_COMMENT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr isobj dsym_808__GENERATE_GPLV3PLUS_COPYRIGHT_NOTICE_C_COMMENT", + ("iniobj check.discr isobj dsym_810__GENERATE_GPLV3PLUS_COPYRIGHT_NOTICE_C_COMMENT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr objmagic dsym_808__GENERATE_GPLV3PLUS_COPYRIGHT_NOTICE_C_COMMENT", + ("iniobj check.discr objmagic dsym_810__GENERATE_GPLV3PLUS_COPYRIGHT_NOTICE_C_COMMENT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_808__GENERATE_GPLV3PLUS_COPYRIGHT_NOTICE_C_COMMENT. + meltcdat->dsym_810__GENERATE_GPLV3PLUS_COPYRIGHT_NOTICE_C_COMMENT. meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_808__GENERATE_GPLV3PLUS_COPYRIGHT_NOTICE_C_COMMENT.obj_hash = + meltcdat->dsym_810__GENERATE_GPLV3PLUS_COPYRIGHT_NOTICE_C_COMMENT.obj_hash = 10057023; - meltcdat->dsym_808__GENERATE_GPLV3PLUS_COPYRIGHT_NOTICE_C_COMMENT.obj_len = + meltcdat->dsym_810__GENERATE_GPLV3PLUS_COPYRIGHT_NOTICE_C_COMMENT.obj_len = 3; -/*inistring dstr_809__GENERATE_GPLV3PLUS_COPYR*/ - /*_._VALSTR___V999*/ meltfptr[998] = - (melt_ptr_t) & meltcdat->dstr_809__GENERATE_GPLV3PLUS_COPYR; - meltcdat->dstr_809__GENERATE_GPLV3PLUS_COPYR.discr = +/*inistring dstr_811__GENERATE_GPLV3PLUS_COPYR*/ + /*_._VALSTR___V1002*/ meltfptr[1001] = + (melt_ptr_t) & meltcdat->dstr_811__GENERATE_GPLV3PLUS_COPYR; + meltcdat->dstr_811__GENERATE_GPLV3PLUS_COPYR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_809__GENERATE_GPLV3PLUS_COPYR. + /*small inistring */ strncpy (meltcdat->dstr_811__GENERATE_GPLV3PLUS_COPYR. val, "GENERATE_GPLV3PLUS_COPYRIGHT_NOTICE_C_COMMENT", sizeof (meltcdat-> - dstr_809__GENERATE_GPLV3PLUS_COPYR. + dstr_811__GENERATE_GPLV3PLUS_COPYR. val) - 1); - meltcdat->dstr_809__GENERATE_GPLV3PLUS_COPYR.val[45] = (char) 0; - meltcdat->dstr_809__GENERATE_GPLV3PLUS_COPYR.slen = 45; + meltcdat->dstr_811__GENERATE_GPLV3PLUS_COPYR.val[45] = (char) 0; + meltcdat->dstr_811__GENERATE_GPLV3PLUS_COPYR.slen = 45; -/*iniobj dsym_810__GET_CODE_BUFFER_LIMIT*/ - /*uniqueobj*/ if (! /*_._VALDATA___V1000*/ meltfptr[999]) -/*_._VALDATA___V1000*/ meltfptr[999] = - (melt_ptr_t) & meltcdat->dsym_810__GET_CODE_BUFFER_LIMIT; +/*iniobj dsym_812__GET_CODE_BUFFER_LIMIT*/ + /*uniqueobj*/ if (! /*_._VALDATA___V1003*/ meltfptr[1002]) +/*_._VALDATA___V1003*/ meltfptr[1002] = + (melt_ptr_t) & meltcdat->dsym_812__GET_CODE_BUFFER_LIMIT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr isobj dsym_810__GET_CODE_BUFFER_LIMIT", + ("iniobj check.discr isobj dsym_812__GET_CODE_BUFFER_LIMIT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr objmagic dsym_810__GET_CODE_BUFFER_LIMIT", + ("iniobj check.discr objmagic dsym_812__GET_CODE_BUFFER_LIMIT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_810__GET_CODE_BUFFER_LIMIT.meltobj_class = + meltcdat->dsym_812__GET_CODE_BUFFER_LIMIT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_810__GET_CODE_BUFFER_LIMIT.obj_hash = 989433689; - meltcdat->dsym_810__GET_CODE_BUFFER_LIMIT.obj_len = 3; + meltcdat->dsym_812__GET_CODE_BUFFER_LIMIT.obj_hash = 989433689; + meltcdat->dsym_812__GET_CODE_BUFFER_LIMIT.obj_len = 3; -/*inistring dstr_811__GET_CODE_BUFFER_LIMIT*/ - /*_._VALSTR___V1001*/ meltfptr[1000] = - (melt_ptr_t) & meltcdat->dstr_811__GET_CODE_BUFFER_LIMIT; - meltcdat->dstr_811__GET_CODE_BUFFER_LIMIT.discr = +/*inistring dstr_813__GET_CODE_BUFFER_LIMIT*/ + /*_._VALSTR___V1004*/ meltfptr[1003] = + (melt_ptr_t) & meltcdat->dstr_813__GET_CODE_BUFFER_LIMIT; + meltcdat->dstr_813__GET_CODE_BUFFER_LIMIT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_811__GET_CODE_BUFFER_LIMIT.val, + /*small inistring */ strncpy (meltcdat->dstr_813__GET_CODE_BUFFER_LIMIT.val, "GET_CODE_BUFFER_LIMIT", sizeof (meltcdat-> - dstr_811__GET_CODE_BUFFER_LIMIT.val) - + dstr_813__GET_CODE_BUFFER_LIMIT.val) - 1); - meltcdat->dstr_811__GET_CODE_BUFFER_LIMIT.val[21] = (char) 0; - meltcdat->dstr_811__GET_CODE_BUFFER_LIMIT.slen = 21; + meltcdat->dstr_813__GET_CODE_BUFFER_LIMIT.val[21] = (char) 0; + meltcdat->dstr_813__GET_CODE_BUFFER_LIMIT.slen = 21; -/*iniobj dsym_812__PUT_CODE_BUFFER_LIMIT*/ - /*uniqueobj*/ if (! /*_._VALDATA___V1002*/ meltfptr[1001]) -/*_._VALDATA___V1002*/ meltfptr[1001] = - (melt_ptr_t) & meltcdat->dsym_812__PUT_CODE_BUFFER_LIMIT; +/*iniobj dsym_814__PUT_CODE_BUFFER_LIMIT*/ + /*uniqueobj*/ if (! /*_._VALDATA___V1005*/ meltfptr[1004]) +/*_._VALDATA___V1005*/ meltfptr[1004] = + (melt_ptr_t) & meltcdat->dsym_814__PUT_CODE_BUFFER_LIMIT; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr isobj dsym_812__PUT_CODE_BUFFER_LIMIT", + ("iniobj check.discr isobj dsym_814__PUT_CODE_BUFFER_LIMIT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr objmagic dsym_812__PUT_CODE_BUFFER_LIMIT", + ("iniobj check.discr objmagic dsym_814__PUT_CODE_BUFFER_LIMIT", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_812__PUT_CODE_BUFFER_LIMIT.meltobj_class = + meltcdat->dsym_814__PUT_CODE_BUFFER_LIMIT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_812__PUT_CODE_BUFFER_LIMIT.obj_hash = 553702523; - meltcdat->dsym_812__PUT_CODE_BUFFER_LIMIT.obj_len = 3; + meltcdat->dsym_814__PUT_CODE_BUFFER_LIMIT.obj_hash = 553702523; + meltcdat->dsym_814__PUT_CODE_BUFFER_LIMIT.obj_len = 3; -/*inistring dstr_813__PUT_CODE_BUFFER_LIMIT*/ - /*_._VALSTR___V1003*/ meltfptr[1002] = - (melt_ptr_t) & meltcdat->dstr_813__PUT_CODE_BUFFER_LIMIT; - meltcdat->dstr_813__PUT_CODE_BUFFER_LIMIT.discr = +/*inistring dstr_815__PUT_CODE_BUFFER_LIMIT*/ + /*_._VALSTR___V1006*/ meltfptr[1005] = + (melt_ptr_t) & meltcdat->dstr_815__PUT_CODE_BUFFER_LIMIT; + meltcdat->dstr_815__PUT_CODE_BUFFER_LIMIT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_813__PUT_CODE_BUFFER_LIMIT.val, + /*small inistring */ strncpy (meltcdat->dstr_815__PUT_CODE_BUFFER_LIMIT.val, "PUT_CODE_BUFFER_LIMIT", sizeof (meltcdat-> - dstr_813__PUT_CODE_BUFFER_LIMIT.val) - + dstr_815__PUT_CODE_BUFFER_LIMIT.val) - 1); - meltcdat->dstr_813__PUT_CODE_BUFFER_LIMIT.val[21] = (char) 0; - meltcdat->dstr_813__PUT_CODE_BUFFER_LIMIT.slen = 21; + meltcdat->dstr_815__PUT_CODE_BUFFER_LIMIT.val[21] = (char) 0; + meltcdat->dstr_815__PUT_CODE_BUFFER_LIMIT.slen = 21; -/*iniobj dsym_814__TRANSLATE_RUN_MELT_EXPRESSIONS*/ - /*uniqueobj*/ if (! /*_._VALDATA___V1004*/ meltfptr[1003]) -/*_._VALDATA___V1004*/ meltfptr[1003] = - (melt_ptr_t) & meltcdat->dsym_814__TRANSLATE_RUN_MELT_EXPRESSIONS; +/*iniobj dsym_816__TRANSLATE_RUN_MELT_EXPRESSIONS*/ + /*uniqueobj*/ if (! /*_._VALDATA___V1007*/ meltfptr[1006]) +/*_._VALDATA___V1007*/ meltfptr[1006] = + (melt_ptr_t) & meltcdat->dsym_816__TRANSLATE_RUN_MELT_EXPRESSIONS; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr isobj dsym_814__TRANSLATE_RUN_MELT_EXPRESSIONS", + ("iniobj check.discr isobj dsym_816__TRANSLATE_RUN_MELT_EXPRESSIONS", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr objmagic dsym_814__TRANSLATE_RUN_MELT_EXPRESSIONS", + ("iniobj check.discr objmagic dsym_816__TRANSLATE_RUN_MELT_EXPRESSIONS", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_814__TRANSLATE_RUN_MELT_EXPRESSIONS.meltobj_class = + meltcdat->dsym_816__TRANSLATE_RUN_MELT_EXPRESSIONS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_814__TRANSLATE_RUN_MELT_EXPRESSIONS.obj_hash = 768959791; - meltcdat->dsym_814__TRANSLATE_RUN_MELT_EXPRESSIONS.obj_len = 3; + meltcdat->dsym_816__TRANSLATE_RUN_MELT_EXPRESSIONS.obj_hash = 768959791; + meltcdat->dsym_816__TRANSLATE_RUN_MELT_EXPRESSIONS.obj_len = 3; -/*inistring dstr_815__TRANSLATE_RUN_MELT_EXPRE*/ - /*_._VALSTR___V1005*/ meltfptr[1004] = - (melt_ptr_t) & meltcdat->dstr_815__TRANSLATE_RUN_MELT_EXPRE; - meltcdat->dstr_815__TRANSLATE_RUN_MELT_EXPRE.discr = +/*inistring dstr_817__TRANSLATE_RUN_MELT_EXPRE*/ + /*_._VALSTR___V1008*/ meltfptr[1007] = + (melt_ptr_t) & meltcdat->dstr_817__TRANSLATE_RUN_MELT_EXPRE; + meltcdat->dstr_817__TRANSLATE_RUN_MELT_EXPRE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_815__TRANSLATE_RUN_MELT_EXPRE. + /*small inistring */ strncpy (meltcdat->dstr_817__TRANSLATE_RUN_MELT_EXPRE. val, "TRANSLATE_RUN_MELT_EXPRESSIONS", sizeof (meltcdat-> - dstr_815__TRANSLATE_RUN_MELT_EXPRE. + dstr_817__TRANSLATE_RUN_MELT_EXPRE. val) - 1); - meltcdat->dstr_815__TRANSLATE_RUN_MELT_EXPRE.val[30] = (char) 0; - meltcdat->dstr_815__TRANSLATE_RUN_MELT_EXPRE.slen = 30; + meltcdat->dstr_817__TRANSLATE_RUN_MELT_EXPRE.val[30] = (char) 0; + meltcdat->dstr_817__TRANSLATE_RUN_MELT_EXPRE.slen = 30; -/*iniobj dsym_816__TRANSLATE_TO_C_MODULE_MELT_SOURCES*/ - /*uniqueobj*/ if (! /*_._VALDATA___V1006*/ meltfptr[1005]) -/*_._VALDATA___V1006*/ meltfptr[1005] = - (melt_ptr_t) & meltcdat->dsym_816__TRANSLATE_TO_C_MODULE_MELT_SOURCES; +/*iniobj dsym_818__TRANSLATE_TO_C_MODULE_MELT_SOURCES*/ + /*uniqueobj*/ if (! /*_._VALDATA___V1009*/ meltfptr[1008]) +/*_._VALDATA___V1009*/ meltfptr[1008] = + (melt_ptr_t) & meltcdat->dsym_818__TRANSLATE_TO_C_MODULE_MELT_SOURCES; if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr isobj dsym_816__TRANSLATE_TO_C_MODULE_MELT_SOURCES", + ("iniobj check.discr isobj dsym_818__TRANSLATE_TO_C_MODULE_MELT_SOURCES", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY (!melt_prohibit_garbcoll)) melt_assertmsg - ("iniobj check.discr objmagic dsym_816__TRANSLATE_TO_C_MODULE_MELT_SOURCES", + ("iniobj check.discr objmagic dsym_818__TRANSLATE_TO_C_MODULE_MELT_SOURCES", ((meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))))-> meltobj_magic == MELTOBMAG_OBJECT); - meltcdat->dsym_816__TRANSLATE_TO_C_MODULE_MELT_SOURCES.meltobj_class = + meltcdat->dsym_818__TRANSLATE_TO_C_MODULE_MELT_SOURCES.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_SYMBOL)))); - meltcdat->dsym_816__TRANSLATE_TO_C_MODULE_MELT_SOURCES.obj_hash = 241206510; - meltcdat->dsym_816__TRANSLATE_TO_C_MODULE_MELT_SOURCES.obj_len = 3; + meltcdat->dsym_818__TRANSLATE_TO_C_MODULE_MELT_SOURCES.obj_hash = 241206510; + meltcdat->dsym_818__TRANSLATE_TO_C_MODULE_MELT_SOURCES.obj_len = 3; -/*inistring dstr_817__TRANSLATE_TO_C_MODULE_ME*/ - /*_._VALSTR___V1007*/ meltfptr[1006] = - (melt_ptr_t) & meltcdat->dstr_817__TRANSLATE_TO_C_MODULE_ME; - meltcdat->dstr_817__TRANSLATE_TO_C_MODULE_ME.discr = +/*inistring dstr_819__TRANSLATE_TO_C_MODULE_ME*/ + /*_._VALSTR___V1010*/ meltfptr[1009] = + (melt_ptr_t) & meltcdat->dstr_819__TRANSLATE_TO_C_MODULE_ME; + meltcdat->dstr_819__TRANSLATE_TO_C_MODULE_ME.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); - /*small inistring */ strncpy (meltcdat->dstr_817__TRANSLATE_TO_C_MODULE_ME. + /*small inistring */ strncpy (meltcdat->dstr_819__TRANSLATE_TO_C_MODULE_ME. val, "TRANSLATE_TO_C_MODULE_MELT_SOURCES", sizeof (meltcdat-> - dstr_817__TRANSLATE_TO_C_MODULE_ME. + dstr_819__TRANSLATE_TO_C_MODULE_ME. val) - 1); - meltcdat->dstr_817__TRANSLATE_TO_C_MODULE_ME.val[34] = (char) 0; - meltcdat->dstr_817__TRANSLATE_TO_C_MODULE_ME.slen = 34; + meltcdat->dstr_819__TRANSLATE_TO_C_MODULE_ME.val[34] = (char) 0; + meltcdat->dstr_819__TRANSLATE_TO_C_MODULE_ME.slen = 34; meltcdat = NULL; melt_prohibit_garbcoll = FALSE; @@ -18798,14 +18770,13 @@ 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 2938*/ +/* declstructinit initial routine melt_start_this_module minihash 761*/ 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 */ -2938; + ((struct melt_callframe_st *) &meltfram__)->mcfr_nbvar = /*minihash */ -761; ((struct melt_callframe_st *) &meltfram__)->mcfr_forwmarkrout = meltmod__WARMELTmiOUTOBJ__forward_or_mark_module_start_frame; /**COMMENT: get previous environment **/ ; @@ -18848,7 +18819,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:HOOK_FRESH_ENVIRONMENT_REFERENCE_MAKER */ - if (NULL == /*_._VALDATA___V191*/ meltfptr[190]) + if (NULL == /*_._VALDATA___V192*/ meltfptr[191]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol HOOK_FRESH_ENVIRONMENT_REFERENCE_MAKER without initial environment @@ -18856,7 +18827,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_HOOK_FRESH_ENVIRONMENT_REFERENCE_MAKER = melthookproc_HOOK_NAMED_SYMBOL ("HOOK_FRESH_ENVIRONMENT_REFERENCE_MAKER", (long) MELT_GET); - /*_._VALDATA___V191*/ meltfptr[190] = + /*_._VALDATA___V192*/ meltfptr[191] = (melt_ptr_t) meltsy_HOOK_FRESH_ENVIRONMENT_REFERENCE_MAKER; } /*endgetnamedsym HOOK_FRESH_ENVIRONMENT_REFERENCE_MAKER */ @@ -18864,14 +18835,14 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:BUFFER_LIMIT_CONT */ - if (NULL == /*_._VALDATA___V193*/ meltfptr[192]) + if (NULL == /*_._VALDATA___V194*/ meltfptr[193]) { #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___V193*/ meltfptr[192] = + /*_._VALDATA___V194*/ meltfptr[193] = (melt_ptr_t) meltsy_BUFFER_LIMIT_CONT; } /*endgetnamedsym BUFFER_LIMIT_CONT */ @@ -18879,14 +18850,14 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_REFERENCE */ - if (NULL == /*_._VALDATA___V195*/ meltfptr[194]) + if (NULL == /*_._VALDATA___V196*/ meltfptr[195]) { #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___V195*/ meltfptr[194] = + /*_._VALDATA___V196*/ meltfptr[195] = (melt_ptr_t) meltsy_CLASS_REFERENCE; } /*endgetnamedsym CLASS_REFERENCE */ @@ -18894,14 +18865,14 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:MELT_DEBUG_FUN */ - if (NULL == /*_._VALDATA___V203*/ meltfptr[202]) + if (NULL == /*_._VALDATA___V204*/ meltfptr[203]) { #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___V203*/ meltfptr[202] = + /*_._VALDATA___V204*/ meltfptr[203] = (melt_ptr_t) meltsy_MELT_DEBUG_FUN; } /*endgetnamedsym MELT_DEBUG_FUN */ @@ -18909,7 +18880,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:DISCR_CONSTANT_INTEGER */ - if (NULL == /*_._VALDATA___V205*/ meltfptr[204]) + if (NULL == /*_._VALDATA___V206*/ meltfptr[205]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol DISCR_CONSTANT_INTEGER without initial environment @@ -18917,7 +18888,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___V205*/ meltfptr[204] = + /*_._VALDATA___V206*/ meltfptr[205] = (melt_ptr_t) meltsy_DISCR_CONSTANT_INTEGER; } /*endgetnamedsym DISCR_CONSTANT_INTEGER */ @@ -18925,14 +18896,14 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:REGISTER_OPTION */ - if (NULL == /*_._VALDATA___V209*/ meltfptr[208]) + if (NULL == /*_._VALDATA___V210*/ meltfptr[209]) { #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___V209*/ meltfptr[208] = + /*_._VALDATA___V210*/ meltfptr[209] = (melt_ptr_t) meltsy_REGISTER_OPTION; } /*endgetnamedsym REGISTER_OPTION */ @@ -18940,14 +18911,14 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CODE_BUFFER_LIMIT */ - if (NULL == /*_._VALDATA___V211*/ meltfptr[210]) + if (NULL == /*_._VALDATA___V212*/ meltfptr[211]) { #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___V211*/ meltfptr[210] = + /*_._VALDATA___V212*/ meltfptr[211] = (melt_ptr_t) meltsy_CODE_BUFFER_LIMIT; } /*endgetnamedsym CODE_BUFFER_LIMIT */ @@ -18955,7 +18926,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_NORMAL_MODULE_VARIABLE_BINDING */ - if (NULL == /*_._VALDATA___V217*/ meltfptr[216]) + if (NULL == /*_._VALDATA___V218*/ meltfptr[217]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_NORMAL_MODULE_VARIABLE_BINDING without initial environment @@ -18963,7 +18934,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___V217*/ meltfptr[216] = + /*_._VALDATA___V218*/ meltfptr[217] = (melt_ptr_t) meltsy_CLASS_NORMAL_MODULE_VARIABLE_BINDING; } /*endgetnamedsym CLASS_NORMAL_MODULE_VARIABLE_BINDING */ @@ -18971,14 +18942,14 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_ANY_BINDING */ - if (NULL == /*_._VALDATA___V219*/ meltfptr[218]) + if (NULL == /*_._VALDATA___V220*/ meltfptr[219]) { #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___V219*/ meltfptr[218] = + /*_._VALDATA___V220*/ meltfptr[219] = (melt_ptr_t) meltsy_CLASS_ANY_BINDING; } /*endgetnamedsym CLASS_ANY_BINDING */ @@ -18986,7 +18957,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_CLONED_SYMBOL */ - if (NULL == /*_._VALDATA___V221*/ meltfptr[220]) + if (NULL == /*_._VALDATA___V222*/ meltfptr[221]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_CLONED_SYMBOL without initial environment @@ -18994,7 +18965,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___V221*/ meltfptr[220] = + /*_._VALDATA___V222*/ meltfptr[221] = (melt_ptr_t) meltsy_CLASS_CLONED_SYMBOL; } /*endgetnamedsym CLASS_CLONED_SYMBOL */ @@ -19002,56 +18973,56 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_NAMED */ - if (NULL == /*_._VALDATA___V223*/ meltfptr[222]) + if (NULL == /*_._VALDATA___V224*/ meltfptr[223]) { #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___V223*/ meltfptr[222] = (melt_ptr_t) meltsy_CLASS_NAMED; + /*_._VALDATA___V224*/ meltfptr[223] = (melt_ptr_t) meltsy_CLASS_NAMED; } /*endgetnamedsym CLASS_NAMED */ /*^getnamedsymbol */ /*getnamedsym:ADD2OUT */ - if (NULL == /*_._VALDATA___V225*/ meltfptr[224]) + if (NULL == /*_._VALDATA___V226*/ meltfptr[225]) { #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___V225*/ meltfptr[224] = (melt_ptr_t) meltsy_ADD2OUT; + /*_._VALDATA___V226*/ meltfptr[225] = (melt_ptr_t) meltsy_ADD2OUT; } /*endgetnamedsym ADD2OUT */ /*^getnamedsymbol */ /*getnamedsym:CLASS_SYMBOL */ - if (NULL == /*_._VALDATA___V227*/ meltfptr[226]) + if (NULL == /*_._VALDATA___V228*/ meltfptr[227]) { #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___V227*/ meltfptr[226] = (melt_ptr_t) meltsy_CLASS_SYMBOL; + /*_._VALDATA___V228*/ meltfptr[227] = (melt_ptr_t) meltsy_CLASS_SYMBOL; } /*endgetnamedsym CLASS_SYMBOL */ /*^getnamedsymbol */ /*getnamedsym:INSTALL_METHOD */ - if (NULL == /*_._VALDATA___V231*/ meltfptr[230]) + if (NULL == /*_._VALDATA___V232*/ meltfptr[231]) { #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___V231*/ meltfptr[230] = + /*_._VALDATA___V232*/ meltfptr[231] = (melt_ptr_t) meltsy_INSTALL_METHOD; } /*endgetnamedsym INSTALL_METHOD */ @@ -19059,28 +19030,28 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_ROOT */ - if (NULL == /*_._VALDATA___V233*/ meltfptr[232]) + if (NULL == /*_._VALDATA___V234*/ meltfptr[233]) { #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___V233*/ meltfptr[232] = (melt_ptr_t) meltsy_CLASS_ROOT; + /*_._VALDATA___V234*/ meltfptr[233] = (melt_ptr_t) meltsy_CLASS_ROOT; } /*endgetnamedsym CLASS_ROOT */ /*^getnamedsymbol */ /*getnamedsym:OUTPUT_C_DECLINIT */ - if (NULL == /*_._VALDATA___V235*/ meltfptr[234]) + if (NULL == /*_._VALDATA___V236*/ meltfptr[235]) { #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___V235*/ meltfptr[234] = + /*_._VALDATA___V236*/ meltfptr[235] = (melt_ptr_t) meltsy_OUTPUT_C_DECLINIT; } /*endgetnamedsym OUTPUT_C_DECLINIT */ @@ -19088,14 +19059,14 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJINITELEM */ - if (NULL == /*_._VALDATA___V239*/ meltfptr[238]) + if (NULL == /*_._VALDATA___V240*/ meltfptr[239]) { #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___V239*/ meltfptr[238] = + /*_._VALDATA___V240*/ meltfptr[239] = (melt_ptr_t) meltsy_CLASS_OBJINITELEM; } /*endgetnamedsym CLASS_OBJINITELEM */ @@ -19103,21 +19074,21 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:OUTPUT_C_CODE */ - if (NULL == /*_._VALDATA___V241*/ meltfptr[240]) + if (NULL == /*_._VALDATA___V242*/ meltfptr[241]) { #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___V241*/ meltfptr[240] = (melt_ptr_t) meltsy_OUTPUT_C_CODE; + /*_._VALDATA___V242*/ meltfptr[241] = (melt_ptr_t) meltsy_OUTPUT_C_CODE; } /*endgetnamedsym OUTPUT_C_CODE */ /*^getnamedsymbol */ /*getnamedsym:OUTPUT_C_INITIAL_FILL */ - if (NULL == /*_._VALDATA___V245*/ meltfptr[244]) + if (NULL == /*_._VALDATA___V246*/ meltfptr[245]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol OUTPUT_C_INITIAL_FILL without initial environment @@ -19125,7 +19096,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___V245*/ meltfptr[244] = + /*_._VALDATA___V246*/ meltfptr[245] = (melt_ptr_t) meltsy_OUTPUT_C_INITIAL_FILL; } /*endgetnamedsym OUTPUT_C_INITIAL_FILL */ @@ -19133,7 +19104,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:OUTPUT_C_INITIAL_PREDEF */ - if (NULL == /*_._VALDATA___V249*/ meltfptr[248]) + if (NULL == /*_._VALDATA___V250*/ meltfptr[249]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol OUTPUT_C_INITIAL_PREDEF without initial environment @@ -19141,7 +19112,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___V249*/ meltfptr[248] = + /*_._VALDATA___V250*/ meltfptr[249] = (melt_ptr_t) meltsy_OUTPUT_C_INITIAL_PREDEF; } /*endgetnamedsym OUTPUT_C_INITIAL_PREDEF */ @@ -19149,28 +19120,28 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:OBPREDEF */ - if (NULL == /*_._VALDATA___V253*/ meltfptr[252]) + if (NULL == /*_._VALDATA___V254*/ meltfptr[253]) { #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___V253*/ meltfptr[252] = (melt_ptr_t) meltsy_OBPREDEF; + /*_._VALDATA___V254*/ meltfptr[253] = (melt_ptr_t) meltsy_OBPREDEF; } /*endgetnamedsym OBPREDEF */ /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJPREDEF */ - if (NULL == /*_._VALDATA___V257*/ meltfptr[256]) + if (NULL == /*_._VALDATA___V258*/ meltfptr[257]) { #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___V257*/ meltfptr[256] = + /*_._VALDATA___V258*/ meltfptr[257] = (melt_ptr_t) meltsy_CLASS_OBJPREDEF; } /*endgetnamedsym CLASS_OBJPREDEF */ @@ -19178,21 +19149,21 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJNIL */ - if (NULL == /*_._VALDATA___V261*/ meltfptr[260]) + if (NULL == /*_._VALDATA___V262*/ meltfptr[261]) { #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___V261*/ meltfptr[260] = (melt_ptr_t) meltsy_CLASS_OBJNIL; + /*_._VALDATA___V262*/ meltfptr[261] = (melt_ptr_t) meltsy_CLASS_OBJNIL; } /*endgetnamedsym CLASS_OBJNIL */ /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJEXPANDPUREVAL */ - if (NULL == /*_._VALDATA___V271*/ meltfptr[270]) + if (NULL == /*_._VALDATA___V272*/ meltfptr[271]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJEXPANDPUREVAL without initial environment @@ -19200,7 +19171,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_OBJEXPANDPUREVAL = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJEXPANDPUREVAL", (long) MELT_GET); - /*_._VALDATA___V271*/ meltfptr[270] = + /*_._VALDATA___V272*/ meltfptr[271] = (melt_ptr_t) meltsy_CLASS_OBJEXPANDPUREVAL; } /*endgetnamedsym CLASS_OBJEXPANDPUREVAL */ @@ -19208,14 +19179,14 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJVALUE */ - if (NULL == /*_._VALDATA___V273*/ meltfptr[272]) + if (NULL == /*_._VALDATA___V274*/ meltfptr[273]) { #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___V273*/ meltfptr[272] = + /*_._VALDATA___V274*/ meltfptr[273] = (melt_ptr_t) meltsy_CLASS_OBJVALUE; } /*endgetnamedsym CLASS_OBJVALUE */ @@ -19223,42 +19194,42 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_CTYPE */ - if (NULL == /*_._VALDATA___V275*/ meltfptr[274]) + if (NULL == /*_._VALDATA___V276*/ meltfptr[275]) { #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___V275*/ meltfptr[274] = (melt_ptr_t) meltsy_CLASS_CTYPE; + /*_._VALDATA___V276*/ meltfptr[275] = (melt_ptr_t) meltsy_CLASS_CTYPE; } /*endgetnamedsym CLASS_CTYPE */ /*^getnamedsymbol */ /*getnamedsym:CTYPE_VOID */ - if (NULL == /*_._VALDATA___V277*/ meltfptr[276]) + if (NULL == /*_._VALDATA___V278*/ meltfptr[277]) { #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___V277*/ meltfptr[276] = (melt_ptr_t) meltsy_CTYPE_VOID; + /*_._VALDATA___V278*/ meltfptr[277] = (melt_ptr_t) meltsy_CTYPE_VOID; } /*endgetnamedsym CTYPE_VOID */ /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJHOOKNTH */ - if (NULL == /*_._VALDATA___V281*/ meltfptr[280]) + if (NULL == /*_._VALDATA___V282*/ meltfptr[281]) { #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___V281*/ meltfptr[280] = + /*_._VALDATA___V282*/ meltfptr[281] = (melt_ptr_t) meltsy_CLASS_OBJHOOKNTH; } /*endgetnamedsym CLASS_OBJHOOKNTH */ @@ -19266,21 +19237,21 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CTYPE_VALUE */ - if (NULL == /*_._VALDATA___V283*/ meltfptr[282]) + if (NULL == /*_._VALDATA___V284*/ meltfptr[283]) { #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___V283*/ meltfptr[282] = (melt_ptr_t) meltsy_CTYPE_VALUE; + /*_._VALDATA___V284*/ meltfptr[283] = (melt_ptr_t) meltsy_CTYPE_VALUE; } /*endgetnamedsym CTYPE_VALUE */ /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJINITOBJECT */ - if (NULL == /*_._VALDATA___V287*/ meltfptr[286]) + if (NULL == /*_._VALDATA___V288*/ meltfptr[287]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJINITOBJECT without initial environment @@ -19288,7 +19259,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_OBJINITOBJECT = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJINITOBJECT", (long) MELT_GET); - /*_._VALDATA___V287*/ meltfptr[286] = + /*_._VALDATA___V288*/ meltfptr[287] = (melt_ptr_t) meltsy_CLASS_OBJINITOBJECT; } /*endgetnamedsym CLASS_OBJINITOBJECT */ @@ -19296,7 +19267,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_DATAINSTANCE */ - if (NULL == /*_._VALDATA___V291*/ meltfptr[290]) + if (NULL == /*_._VALDATA___V292*/ meltfptr[291]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_NREP_DATAINSTANCE without initial environment @@ -19304,7 +19275,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___V291*/ meltfptr[290] = + /*_._VALDATA___V292*/ meltfptr[291] = (melt_ptr_t) meltsy_CLASS_NREP_DATAINSTANCE; } /*endgetnamedsym CLASS_NREP_DATAINSTANCE */ @@ -19312,21 +19283,21 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_CLASS */ - if (NULL == /*_._VALDATA___V293*/ meltfptr[292]) + if (NULL == /*_._VALDATA___V294*/ meltfptr[293]) { #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___V293*/ meltfptr[292] = (melt_ptr_t) meltsy_CLASS_CLASS; + /*_._VALDATA___V294*/ meltfptr[293] = (melt_ptr_t) meltsy_CLASS_CLASS; } /*endgetnamedsym CLASS_CLASS */ /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJINITUNIQUEOBJECT */ - if (NULL == /*_._VALDATA___V295*/ meltfptr[294]) + if (NULL == /*_._VALDATA___V296*/ meltfptr[295]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJINITUNIQUEOBJECT without initial environment @@ -19334,7 +19305,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_OBJINITUNIQUEOBJECT = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJINITUNIQUEOBJECT", (long) MELT_GET); - /*_._VALDATA___V295*/ meltfptr[294] = + /*_._VALDATA___V296*/ meltfptr[295] = (melt_ptr_t) meltsy_CLASS_OBJINITUNIQUEOBJECT; } /*endgetnamedsym CLASS_OBJINITUNIQUEOBJECT */ @@ -19342,14 +19313,14 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_NIL */ - if (NULL == /*_._VALDATA___V299*/ meltfptr[298]) + if (NULL == /*_._VALDATA___V300*/ meltfptr[299]) { #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___V299*/ meltfptr[298] = + /*_._VALDATA___V300*/ meltfptr[299] = (melt_ptr_t) meltsy_CLASS_NREP_NIL; } /*endgetnamedsym CLASS_NREP_NIL */ @@ -19357,14 +19328,14 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJINITHOOK */ - if (NULL == /*_._VALDATA___V303*/ meltfptr[302]) + if (NULL == /*_._VALDATA___V304*/ meltfptr[303]) { #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___V303*/ meltfptr[302] = + /*_._VALDATA___V304*/ meltfptr[303] = (melt_ptr_t) meltsy_CLASS_OBJINITHOOK; } /*endgetnamedsym CLASS_OBJINITHOOK */ @@ -19372,21 +19343,21 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP */ - if (NULL == /*_._VALDATA___V305*/ meltfptr[304]) + if (NULL == /*_._VALDATA___V306*/ meltfptr[305]) { #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___V305*/ meltfptr[304] = (melt_ptr_t) meltsy_CLASS_NREP; + /*_._VALDATA___V306*/ meltfptr[305] = (melt_ptr_t) meltsy_CLASS_NREP; } /*endgetnamedsym CLASS_NREP */ /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJINITMULTIPLE */ - if (NULL == /*_._VALDATA___V309*/ meltfptr[308]) + if (NULL == /*_._VALDATA___V310*/ meltfptr[309]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJINITMULTIPLE without initial environment @@ -19394,7 +19365,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_OBJINITMULTIPLE = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJINITMULTIPLE", (long) MELT_GET); - /*_._VALDATA___V309*/ meltfptr[308] = + /*_._VALDATA___V310*/ meltfptr[309] = (melt_ptr_t) meltsy_CLASS_OBJINITMULTIPLE; } /*endgetnamedsym CLASS_OBJINITMULTIPLE */ @@ -19402,7 +19373,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJINITCLOSURE */ - if (NULL == /*_._VALDATA___V315*/ meltfptr[314]) + if (NULL == /*_._VALDATA___V316*/ meltfptr[315]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJINITCLOSURE without initial environment @@ -19410,7 +19381,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_OBJINITCLOSURE = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJINITCLOSURE", (long) MELT_GET); - /*_._VALDATA___V315*/ meltfptr[314] = + /*_._VALDATA___V316*/ meltfptr[315] = (melt_ptr_t) meltsy_CLASS_OBJINITCLOSURE; } /*endgetnamedsym CLASS_OBJINITCLOSURE */ @@ -19418,7 +19389,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJINITROUTINE */ - if (NULL == /*_._VALDATA___V321*/ meltfptr[320]) + if (NULL == /*_._VALDATA___V322*/ meltfptr[321]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJINITROUTINE without initial environment @@ -19426,7 +19397,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_OBJINITROUTINE = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJINITROUTINE", (long) MELT_GET); - /*_._VALDATA___V321*/ meltfptr[320] = + /*_._VALDATA___V322*/ meltfptr[321] = (melt_ptr_t) meltsy_CLASS_OBJINITROUTINE; } /*endgetnamedsym CLASS_OBJINITROUTINE */ @@ -19434,7 +19405,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_DATAROUTINE */ - if (NULL == /*_._VALDATA___V325*/ meltfptr[324]) + if (NULL == /*_._VALDATA___V326*/ meltfptr[325]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_NREP_DATAROUTINE without initial environment @@ -19442,7 +19413,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___V325*/ meltfptr[324] = + /*_._VALDATA___V326*/ meltfptr[325] = (melt_ptr_t) meltsy_CLASS_NREP_DATAROUTINE; } /*endgetnamedsym CLASS_NREP_DATAROUTINE */ @@ -19450,7 +19421,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_ROUTPROC */ - if (NULL == /*_._VALDATA___V327*/ meltfptr[326]) + if (NULL == /*_._VALDATA___V328*/ meltfptr[327]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_NREP_ROUTPROC without initial environment @@ -19458,31 +19429,31 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_NREP_ROUTPROC = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_NREP_ROUTPROC", (long) MELT_GET); - /*_._VALDATA___V327*/ meltfptr[326] = + /*_._VALDATA___V328*/ meltfptr[327] = (melt_ptr_t) meltsy_CLASS_NREP_ROUTPROC; } /*endgetnamedsym CLASS_NREP_ROUTPROC */ /*^getnamedsymbol */ - /*getnamedsym:CLASS_NREP_HOOKPROC */ + /*getnamedsym:CLASS_NREP_CLOSPROC */ - if (NULL == /*_._VALDATA___V333*/ meltfptr[332]) + if (NULL == /*_._VALDATA___V334*/ meltfptr[333]) { #if !MELT_HAS_INITIAL_ENVIRONMENT -#error MELT getting named symbol CLASS_NREP_HOOKPROC without initial environment +#error MELT getting named symbol CLASS_NREP_CLOSPROC without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ - melt_ptr_t meltsy_CLASS_NREP_HOOKPROC = - melthookproc_HOOK_NAMED_SYMBOL ("CLASS_NREP_HOOKPROC", + melt_ptr_t meltsy_CLASS_NREP_CLOSPROC = + melthookproc_HOOK_NAMED_SYMBOL ("CLASS_NREP_CLOSPROC", (long) MELT_GET); - /*_._VALDATA___V333*/ meltfptr[332] = - (melt_ptr_t) meltsy_CLASS_NREP_HOOKPROC; - } /*endgetnamedsym CLASS_NREP_HOOKPROC */ + /*_._VALDATA___V334*/ meltfptr[333] = + (melt_ptr_t) meltsy_CLASS_NREP_CLOSPROC; + } /*endgetnamedsym CLASS_NREP_CLOSPROC */ /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJINITSTRING */ - if (NULL == /*_._VALDATA___V337*/ meltfptr[336]) + if (NULL == /*_._VALDATA___V338*/ meltfptr[337]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJINITSTRING without initial environment @@ -19490,7 +19461,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_OBJINITSTRING = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJINITSTRING", (long) MELT_GET); - /*_._VALDATA___V337*/ meltfptr[336] = + /*_._VALDATA___V338*/ meltfptr[337] = (melt_ptr_t) meltsy_CLASS_OBJINITSTRING; } /*endgetnamedsym CLASS_OBJINITSTRING */ @@ -19498,7 +19469,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJINITBOXINTEGER */ - if (NULL == /*_._VALDATA___V343*/ meltfptr[342]) + if (NULL == /*_._VALDATA___V344*/ meltfptr[343]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJINITBOXINTEGER without initial environment @@ -19506,7 +19477,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_OBJINITBOXINTEGER = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJINITBOXINTEGER", (long) MELT_GET); - /*_._VALDATA___V343*/ meltfptr[342] = + /*_._VALDATA___V344*/ meltfptr[343] = (melt_ptr_t) meltsy_CLASS_OBJINITBOXINTEGER; } /*endgetnamedsym CLASS_OBJINITBOXINTEGER */ @@ -19514,14 +19485,14 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJINITPAIR */ - if (NULL == /*_._VALDATA___V349*/ meltfptr[348]) + if (NULL == /*_._VALDATA___V350*/ meltfptr[349]) { #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___V349*/ meltfptr[348] = + /*_._VALDATA___V350*/ meltfptr[349] = (melt_ptr_t) meltsy_CLASS_OBJINITPAIR; } /*endgetnamedsym CLASS_OBJINITPAIR */ @@ -19529,14 +19500,14 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJINITLIST */ - if (NULL == /*_._VALDATA___V355*/ meltfptr[354]) + if (NULL == /*_._VALDATA___V356*/ meltfptr[355]) { #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___V355*/ meltfptr[354] = + /*_._VALDATA___V356*/ meltfptr[355] = (melt_ptr_t) meltsy_CLASS_OBJINITLIST; } /*endgetnamedsym CLASS_OBJINITLIST */ @@ -19544,7 +19515,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:DISCR_ANY_RECEIVER */ - if (NULL == /*_._VALDATA___V361*/ meltfptr[360]) + if (NULL == /*_._VALDATA___V362*/ meltfptr[361]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol DISCR_ANY_RECEIVER without initial environment @@ -19552,7 +19523,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___V361*/ meltfptr[360] = + /*_._VALDATA___V362*/ meltfptr[361] = (melt_ptr_t) meltsy_DISCR_ANY_RECEIVER; } /*endgetnamedsym DISCR_ANY_RECEIVER */ @@ -19560,7 +19531,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:DISCR_NULL_RECEIVER */ - if (NULL == /*_._VALDATA___V365*/ meltfptr[364]) + if (NULL == /*_._VALDATA___V366*/ meltfptr[365]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol DISCR_NULL_RECEIVER without initial environment @@ -19568,7 +19539,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___V365*/ meltfptr[364] = + /*_._VALDATA___V366*/ meltfptr[365] = (melt_ptr_t) meltsy_DISCR_NULL_RECEIVER; } /*endgetnamedsym DISCR_NULL_RECEIVER */ @@ -19576,7 +19547,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:DISPLAY_DEBUG_MESSAGE */ - if (NULL == /*_._VALDATA___V369*/ meltfptr[368]) + if (NULL == /*_._VALDATA___V370*/ meltfptr[369]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol DISPLAY_DEBUG_MESSAGE without initial environment @@ -19584,7 +19555,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___V369*/ meltfptr[368] = + /*_._VALDATA___V370*/ meltfptr[369] = (melt_ptr_t) meltsy_DISPLAY_DEBUG_MESSAGE; } /*endgetnamedsym DISPLAY_DEBUG_MESSAGE */ @@ -19592,14 +19563,14 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:PREVLOC_CONTAINER */ - if (NULL == /*_._VALDATA___V371*/ meltfptr[370]) + if (NULL == /*_._VALDATA___V372*/ meltfptr[371]) { #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___V371*/ meltfptr[370] = + /*_._VALDATA___V372*/ meltfptr[371] = (melt_ptr_t) meltsy_PREVLOC_CONTAINER; } /*endgetnamedsym PREVLOC_CONTAINER */ @@ -19607,7 +19578,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:PREVIMPLBUF_CONTAINER */ - if (NULL == /*_._VALDATA___V373*/ meltfptr[372]) + if (NULL == /*_._VALDATA___V374*/ meltfptr[373]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol PREVIMPLBUF_CONTAINER without initial environment @@ -19615,7 +19586,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_PREVIMPLBUF_CONTAINER = melthookproc_HOOK_NAMED_SYMBOL ("PREVIMPLBUF_CONTAINER", (long) MELT_GET); - /*_._VALDATA___V373*/ meltfptr[372] = + /*_._VALDATA___V374*/ meltfptr[373] = (melt_ptr_t) meltsy_PREVIMPLBUF_CONTAINER; } /*endgetnamedsym PREVIMPLBUF_CONTAINER */ @@ -19623,35 +19594,35 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:DISCR_INTEGER */ - if (NULL == /*_._VALDATA___V377*/ meltfptr[376]) + if (NULL == /*_._VALDATA___V378*/ meltfptr[377]) { #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___V377*/ meltfptr[376] = (melt_ptr_t) meltsy_DISCR_INTEGER; + /*_._VALDATA___V378*/ meltfptr[377] = (melt_ptr_t) meltsy_DISCR_INTEGER; } /*endgetnamedsym DISCR_INTEGER */ /*^getnamedsymbol */ /*getnamedsym:DISCR_STRING */ - if (NULL == /*_._VALDATA___V379*/ meltfptr[378]) + if (NULL == /*_._VALDATA___V380*/ meltfptr[379]) { #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___V379*/ meltfptr[378] = (melt_ptr_t) meltsy_DISCR_STRING; + /*_._VALDATA___V380*/ meltfptr[379] = (melt_ptr_t) meltsy_DISCR_STRING; } /*endgetnamedsym DISCR_STRING */ /*^getnamedsymbol */ /*getnamedsym:CLASS_INITIAL_EXTENSION_ROUTINEOBJ */ - if (NULL == /*_._VALDATA___V384*/ meltfptr[383]) + if (NULL == /*_._VALDATA___V385*/ meltfptr[384]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_INITIAL_EXTENSION_ROUTINEOBJ without initial environment @@ -19659,7 +19630,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___V384*/ meltfptr[383] = + /*_._VALDATA___V385*/ meltfptr[384] = (melt_ptr_t) meltsy_CLASS_INITIAL_EXTENSION_ROUTINEOBJ; } /*endgetnamedsym CLASS_INITIAL_EXTENSION_ROUTINEOBJ */ @@ -19667,7 +19638,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_INITIALROUTINEOBJ */ - if (NULL == /*_._VALDATA___V386*/ meltfptr[385]) + if (NULL == /*_._VALDATA___V387*/ meltfptr[386]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_INITIALROUTINEOBJ without initial environment @@ -19675,7 +19646,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_INITIALROUTINEOBJ = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_INITIALROUTINEOBJ", (long) MELT_GET); - /*_._VALDATA___V386*/ meltfptr[385] = + /*_._VALDATA___V387*/ meltfptr[386] = (melt_ptr_t) meltsy_CLASS_INITIALROUTINEOBJ; } /*endgetnamedsym CLASS_INITIALROUTINEOBJ */ @@ -19683,42 +19654,42 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:LIST_EVERY */ - if (NULL == /*_._VALDATA___V388*/ meltfptr[387]) + if (NULL == /*_._VALDATA___V389*/ meltfptr[388]) { #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___V388*/ meltfptr[387] = (melt_ptr_t) meltsy_LIST_EVERY; + /*_._VALDATA___V389*/ meltfptr[388] = (melt_ptr_t) meltsy_LIST_EVERY; } /*endgetnamedsym LIST_EVERY */ /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJLOCV */ - if (NULL == /*_._VALDATA___V390*/ meltfptr[389]) + if (NULL == /*_._VALDATA___V391*/ meltfptr[390]) { #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___V390*/ meltfptr[389] = (melt_ptr_t) meltsy_CLASS_OBJLOCV; + /*_._VALDATA___V391*/ meltfptr[390] = (melt_ptr_t) meltsy_CLASS_OBJLOCV; } /*endgetnamedsym CLASS_OBJLOCV */ /*^getnamedsymbol */ /*getnamedsym:CLASS_ROUTINEOBJ */ - if (NULL == /*_._VALDATA___V395*/ meltfptr[394]) + if (NULL == /*_._VALDATA___V396*/ meltfptr[395]) { #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___V395*/ meltfptr[394] = + /*_._VALDATA___V396*/ meltfptr[395] = (melt_ptr_t) meltsy_CLASS_ROUTINEOBJ; } /*endgetnamedsym CLASS_ROUTINEOBJ */ @@ -19726,7 +19697,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_PROCROUTINEOBJ */ - if (NULL == /*_._VALDATA___V397*/ meltfptr[396]) + if (NULL == /*_._VALDATA___V398*/ meltfptr[397]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_PROCROUTINEOBJ without initial environment @@ -19734,7 +19705,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_PROCROUTINEOBJ = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_PROCROUTINEOBJ", (long) MELT_GET); - /*_._VALDATA___V397*/ meltfptr[396] = + /*_._VALDATA___V398*/ meltfptr[397] = (melt_ptr_t) meltsy_CLASS_PROCROUTINEOBJ; } /*endgetnamedsym CLASS_PROCROUTINEOBJ */ @@ -19742,7 +19713,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_HOOKROUTINEOBJ */ - if (NULL == /*_._VALDATA___V401*/ meltfptr[400]) + if (NULL == /*_._VALDATA___V402*/ meltfptr[401]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_HOOKROUTINEOBJ without initial environment @@ -19750,7 +19721,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_HOOKROUTINEOBJ = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_HOOKROUTINEOBJ", (long) MELT_GET); - /*_._VALDATA___V401*/ meltfptr[400] = + /*_._VALDATA___V402*/ meltfptr[401] = (melt_ptr_t) meltsy_CLASS_HOOKROUTINEOBJ; } /*endgetnamedsym CLASS_HOOKROUTINEOBJ */ @@ -19758,7 +19729,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:VARIADIC_INDEX_IDSTR */ - if (NULL == /*_._VALDATA___V407*/ meltfptr[406]) + if (NULL == /*_._VALDATA___V408*/ meltfptr[407]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol VARIADIC_INDEX_IDSTR without initial environment @@ -19766,7 +19737,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___V407*/ meltfptr[406] = + /*_._VALDATA___V408*/ meltfptr[407] = (melt_ptr_t) meltsy_VARIADIC_INDEX_IDSTR; } /*endgetnamedsym VARIADIC_INDEX_IDSTR */ @@ -19774,7 +19745,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:VARIADIC_LENGTH_IDSTR */ - if (NULL == /*_._VALDATA___V409*/ meltfptr[408]) + if (NULL == /*_._VALDATA___V410*/ meltfptr[409]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol VARIADIC_LENGTH_IDSTR without initial environment @@ -19782,7 +19753,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___V409*/ meltfptr[408] = + /*_._VALDATA___V410*/ meltfptr[409] = (melt_ptr_t) meltsy_VARIADIC_LENGTH_IDSTR; } /*endgetnamedsym VARIADIC_LENGTH_IDSTR */ @@ -19790,7 +19761,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJPUREVALUE */ - if (NULL == /*_._VALDATA___V411*/ meltfptr[410]) + if (NULL == /*_._VALDATA___V412*/ meltfptr[411]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJPUREVALUE without initial environment @@ -19798,7 +19769,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_OBJPUREVALUE = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJPUREVALUE", (long) MELT_GET); - /*_._VALDATA___V411*/ meltfptr[410] = + /*_._VALDATA___V412*/ meltfptr[411] = (melt_ptr_t) meltsy_CLASS_OBJPUREVALUE; } /*endgetnamedsym CLASS_OBJPUREVALUE */ @@ -19806,7 +19777,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_INITIAL_MODULE_ROUTINEOBJ */ - if (NULL == /*_._VALDATA___V422*/ meltfptr[421]) + if (NULL == /*_._VALDATA___V423*/ meltfptr[422]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_INITIAL_MODULE_ROUTINEOBJ without initial environment @@ -19814,7 +19785,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___V422*/ meltfptr[421] = + /*_._VALDATA___V423*/ meltfptr[422] = (melt_ptr_t) meltsy_CLASS_INITIAL_MODULE_ROUTINEOBJ; } /*endgetnamedsym CLASS_INITIAL_MODULE_ROUTINEOBJ */ @@ -19822,28 +19793,28 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:DISCR_LIST */ - if (NULL == /*_._VALDATA___V424*/ meltfptr[423]) + if (NULL == /*_._VALDATA___V425*/ meltfptr[424]) { #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___V424*/ meltfptr[423] = (melt_ptr_t) meltsy_DISCR_LIST; + /*_._VALDATA___V425*/ meltfptr[424] = (melt_ptr_t) meltsy_DISCR_LIST; } /*endgetnamedsym DISCR_LIST */ /*^getnamedsymbol */ /*getnamedsym:LIST_TO_MULTIPLE */ - if (NULL == /*_._VALDATA___V426*/ meltfptr[425]) + if (NULL == /*_._VALDATA___V427*/ meltfptr[426]) { #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___V426*/ meltfptr[425] = + /*_._VALDATA___V427*/ meltfptr[426] = (melt_ptr_t) meltsy_LIST_TO_MULTIPLE; } /*endgetnamedsym LIST_TO_MULTIPLE */ @@ -19851,14 +19822,14 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:DISCR_MULTIPLE */ - if (NULL == /*_._VALDATA___V428*/ meltfptr[427]) + if (NULL == /*_._VALDATA___V429*/ meltfptr[428]) { #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___V428*/ meltfptr[427] = + /*_._VALDATA___V429*/ meltfptr[428] = (melt_ptr_t) meltsy_DISCR_MULTIPLE; } /*endgetnamedsym DISCR_MULTIPLE */ @@ -19866,43 +19837,59 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:DISCR_STRBUF */ - if (NULL == /*_._VALDATA___V430*/ meltfptr[429]) + if (NULL == /*_._VALDATA___V431*/ meltfptr[430]) { #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___V430*/ meltfptr[429] = (melt_ptr_t) meltsy_DISCR_STRBUF; + /*_._VALDATA___V431*/ meltfptr[430] = (melt_ptr_t) meltsy_DISCR_STRBUF; } /*endgetnamedsym DISCR_STRBUF */ /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJINSTR */ - if (NULL == /*_._VALDATA___V432*/ meltfptr[431]) + if (NULL == /*_._VALDATA___V433*/ meltfptr[432]) { #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___V432*/ meltfptr[431] = + /*_._VALDATA___V433*/ meltfptr[432] = (melt_ptr_t) meltsy_CLASS_OBJINSTR; } /*endgetnamedsym CLASS_OBJINSTR */ /*^getnamedsymbol */ + /*getnamedsym:CLASS_NREP_HOOKPROC */ + + if (NULL == /*_._VALDATA___V437*/ meltfptr[436]) + { +#if !MELT_HAS_INITIAL_ENVIRONMENT +#error MELT getting named symbol CLASS_NREP_HOOKPROC without initial environment +#endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ + melt_ptr_t meltsy_CLASS_NREP_HOOKPROC = + melthookproc_HOOK_NAMED_SYMBOL ("CLASS_NREP_HOOKPROC", + (long) MELT_GET); + /*_._VALDATA___V437*/ meltfptr[436] = + (melt_ptr_t) meltsy_CLASS_NREP_HOOKPROC; + } /*endgetnamedsym CLASS_NREP_HOOKPROC */ + + + /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJCFORMAL */ - if (NULL == /*_._VALDATA___V436*/ meltfptr[435]) + if (NULL == /*_._VALDATA___V439*/ meltfptr[438]) { #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___V436*/ meltfptr[435] = + /*_._VALDATA___V439*/ meltfptr[438] = (melt_ptr_t) meltsy_CLASS_OBJCFORMAL; } /*endgetnamedsym CLASS_OBJCFORMAL */ @@ -19910,14 +19897,14 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJGETARG */ - if (NULL == /*_._VALDATA___V445*/ meltfptr[444]) + if (NULL == /*_._VALDATA___V448*/ meltfptr[447]) { #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___V445*/ meltfptr[444] = + /*_._VALDATA___V448*/ meltfptr[447] = (melt_ptr_t) meltsy_CLASS_OBJGETARG; } /*endgetnamedsym CLASS_OBJGETARG */ @@ -19925,7 +19912,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_FORMAL_BINDING */ - if (NULL == /*_._VALDATA___V447*/ meltfptr[446]) + if (NULL == /*_._VALDATA___V450*/ meltfptr[449]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_FORMAL_BINDING without initial environment @@ -19933,7 +19920,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___V447*/ meltfptr[446] = + /*_._VALDATA___V450*/ meltfptr[449] = (melt_ptr_t) meltsy_CLASS_FORMAL_BINDING; } /*endgetnamedsym CLASS_FORMAL_BINDING */ @@ -19941,7 +19928,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJGETARGREST */ - if (NULL == /*_._VALDATA___V451*/ meltfptr[450]) + if (NULL == /*_._VALDATA___V454*/ meltfptr[453]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJGETARGREST without initial environment @@ -19949,7 +19936,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_OBJGETARGREST = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJGETARGREST", (long) MELT_GET); - /*_._VALDATA___V451*/ meltfptr[450] = + /*_._VALDATA___V454*/ meltfptr[453] = (melt_ptr_t) meltsy_CLASS_OBJGETARGREST; } /*endgetnamedsym CLASS_OBJGETARGREST */ @@ -19957,7 +19944,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJFETCHMODVAR */ - if (NULL == /*_._VALDATA___V457*/ meltfptr[456]) + if (NULL == /*_._VALDATA___V460*/ meltfptr[459]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJFETCHMODVAR without initial environment @@ -19965,7 +19952,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_OBJFETCHMODVAR = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJFETCHMODVAR", (long) MELT_GET); - /*_._VALDATA___V457*/ meltfptr[456] = + /*_._VALDATA___V460*/ meltfptr[459] = (melt_ptr_t) meltsy_CLASS_OBJFETCHMODVAR; } /*endgetnamedsym CLASS_OBJFETCHMODVAR */ @@ -19973,7 +19960,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJPUTMODVAR */ - if (NULL == /*_._VALDATA___V461*/ meltfptr[460]) + if (NULL == /*_._VALDATA___V464*/ meltfptr[463]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJPUTMODVAR without initial environment @@ -19981,7 +19968,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_OBJPUTMODVAR = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJPUTMODVAR", (long) MELT_GET); - /*_._VALDATA___V461*/ meltfptr[460] = + /*_._VALDATA___V464*/ meltfptr[463] = (melt_ptr_t) meltsy_CLASS_OBJPUTMODVAR; } /*endgetnamedsym CLASS_OBJPUTMODVAR */ @@ -19989,7 +19976,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJPUTOUTARG */ - if (NULL == /*_._VALDATA___V465*/ meltfptr[464]) + if (NULL == /*_._VALDATA___V468*/ meltfptr[467]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJPUTOUTARG without initial environment @@ -19997,7 +19984,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_OBJPUTOUTARG = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJPUTOUTARG", (long) MELT_GET); - /*_._VALDATA___V465*/ meltfptr[464] = + /*_._VALDATA___V468*/ meltfptr[467] = (melt_ptr_t) meltsy_CLASS_OBJPUTOUTARG; } /*endgetnamedsym CLASS_OBJPUTOUTARG */ @@ -20005,28 +19992,28 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CTYPE_LONG */ - if (NULL == /*_._VALDATA___V469*/ meltfptr[468]) + if (NULL == /*_._VALDATA___V472*/ meltfptr[471]) { #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___V469*/ meltfptr[468] = (melt_ptr_t) meltsy_CTYPE_LONG; + /*_._VALDATA___V472*/ meltfptr[471] = (melt_ptr_t) meltsy_CTYPE_LONG; } /*endgetnamedsym CTYPE_LONG */ /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJCLOCCV */ - if (NULL == /*_._VALDATA___V473*/ meltfptr[472]) + if (NULL == /*_._VALDATA___V476*/ meltfptr[475]) { #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___V473*/ meltfptr[472] = + /*_._VALDATA___V476*/ meltfptr[475] = (melt_ptr_t) meltsy_CLASS_OBJCLOCCV; } /*endgetnamedsym CLASS_OBJCLOCCV */ @@ -20034,14 +20021,14 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJCLOHOOKV */ - if (NULL == /*_._VALDATA___V477*/ meltfptr[476]) + if (NULL == /*_._VALDATA___V480*/ meltfptr[479]) { #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___V477*/ meltfptr[476] = + /*_._VALDATA___V480*/ meltfptr[479] = (melt_ptr_t) meltsy_CLASS_OBJCLOHOOKV; } /*endgetnamedsym CLASS_OBJCLOHOOKV */ @@ -20049,14 +20036,14 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJCONSTV */ - if (NULL == /*_._VALDATA___V481*/ meltfptr[480]) + if (NULL == /*_._VALDATA___V484*/ meltfptr[483]) { #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___V481*/ meltfptr[480] = + /*_._VALDATA___V484*/ meltfptr[483] = (melt_ptr_t) meltsy_CLASS_OBJCONSTV; } /*endgetnamedsym CLASS_OBJCONSTV */ @@ -20064,7 +20051,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJPLAINBLOCK */ - if (NULL == /*_._VALDATA___V485*/ meltfptr[484]) + if (NULL == /*_._VALDATA___V488*/ meltfptr[487]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJPLAINBLOCK without initial environment @@ -20072,7 +20059,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_OBJPLAINBLOCK = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJPLAINBLOCK", (long) MELT_GET); - /*_._VALDATA___V485*/ meltfptr[484] = + /*_._VALDATA___V488*/ meltfptr[487] = (melt_ptr_t) meltsy_CLASS_OBJPLAINBLOCK; } /*endgetnamedsym CLASS_OBJPLAINBLOCK */ @@ -20080,7 +20067,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJCHECKSIGNAL */ - if (NULL == /*_._VALDATA___V489*/ meltfptr[488]) + if (NULL == /*_._VALDATA___V492*/ meltfptr[491]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJCHECKSIGNAL without initial environment @@ -20088,7 +20075,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_OBJCHECKSIGNAL = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJCHECKSIGNAL", (long) MELT_GET); - /*_._VALDATA___V489*/ meltfptr[488] = + /*_._VALDATA___V492*/ meltfptr[491] = (melt_ptr_t) meltsy_CLASS_OBJCHECKSIGNAL; } /*endgetnamedsym CLASS_OBJCHECKSIGNAL */ @@ -20096,14 +20083,14 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJANYBLOCK */ - if (NULL == /*_._VALDATA___V493*/ meltfptr[492]) + if (NULL == /*_._VALDATA___V496*/ meltfptr[495]) { #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___V493*/ meltfptr[492] = + /*_._VALDATA___V496*/ meltfptr[495] = (melt_ptr_t) meltsy_CLASS_OBJANYBLOCK; } /*endgetnamedsym CLASS_OBJANYBLOCK */ @@ -20111,21 +20098,21 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJFLAG */ - if (NULL == /*_._VALDATA___V497*/ meltfptr[496]) + if (NULL == /*_._VALDATA___V500*/ meltfptr[499]) { #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___V497*/ meltfptr[496] = (melt_ptr_t) meltsy_CLASS_OBJFLAG; + /*_._VALDATA___V500*/ meltfptr[499] = (melt_ptr_t) meltsy_CLASS_OBJFLAG; } /*endgetnamedsym CLASS_OBJFLAG */ /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJMATCHFLAGBLOCK */ - if (NULL == /*_._VALDATA___V501*/ meltfptr[500]) + if (NULL == /*_._VALDATA___V504*/ meltfptr[503]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJMATCHFLAGBLOCK without initial environment @@ -20133,7 +20120,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_OBJMATCHFLAGBLOCK = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJMATCHFLAGBLOCK", (long) MELT_GET); - /*_._VALDATA___V501*/ meltfptr[500] = + /*_._VALDATA___V504*/ meltfptr[503] = (melt_ptr_t) meltsy_CLASS_OBJMATCHFLAGBLOCK; } /*endgetnamedsym CLASS_OBJMATCHFLAGBLOCK */ @@ -20141,7 +20128,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJMULTIALLOCBLOCK */ - if (NULL == /*_._VALDATA___V505*/ meltfptr[504]) + if (NULL == /*_._VALDATA___V508*/ meltfptr[507]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJMULTIALLOCBLOCK without initial environment @@ -20149,7 +20136,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_OBJMULTIALLOCBLOCK = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJMULTIALLOCBLOCK", (long) MELT_GET); - /*_._VALDATA___V505*/ meltfptr[504] = + /*_._VALDATA___V508*/ meltfptr[507] = (melt_ptr_t) meltsy_CLASS_OBJMULTIALLOCBLOCK; } /*endgetnamedsym CLASS_OBJMULTIALLOCBLOCK */ @@ -20157,7 +20144,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:DISCR_VERBATIM_STRING */ - if (NULL == /*_._VALDATA___V507*/ meltfptr[506]) + if (NULL == /*_._VALDATA___V510*/ meltfptr[509]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol DISCR_VERBATIM_STRING without initial environment @@ -20165,7 +20152,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___V507*/ meltfptr[506] = + /*_._VALDATA___V510*/ meltfptr[509] = (melt_ptr_t) meltsy_DISCR_VERBATIM_STRING; } /*endgetnamedsym DISCR_VERBATIM_STRING */ @@ -20173,7 +20160,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJCITERBLOCK */ - if (NULL == /*_._VALDATA___V511*/ meltfptr[510]) + if (NULL == /*_._VALDATA___V514*/ meltfptr[513]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJCITERBLOCK without initial environment @@ -20181,7 +20168,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_OBJCITERBLOCK = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJCITERBLOCK", (long) MELT_GET); - /*_._VALDATA___V511*/ meltfptr[510] = + /*_._VALDATA___V514*/ meltfptr[513] = (melt_ptr_t) meltsy_CLASS_OBJCITERBLOCK; } /*endgetnamedsym CLASS_OBJCITERBLOCK */ @@ -20189,14 +20176,14 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_CITERATOR */ - if (NULL == /*_._VALDATA___V513*/ meltfptr[512]) + if (NULL == /*_._VALDATA___V516*/ meltfptr[515]) { #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___V513*/ meltfptr[512] = + /*_._VALDATA___V516*/ meltfptr[515] = (melt_ptr_t) meltsy_CLASS_CITERATOR; } /*endgetnamedsym CLASS_CITERATOR */ @@ -20204,7 +20191,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJCOMMENTINSTR */ - if (NULL == /*_._VALDATA___V517*/ meltfptr[516]) + if (NULL == /*_._VALDATA___V520*/ meltfptr[519]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJCOMMENTINSTR without initial environment @@ -20212,7 +20199,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_OBJCOMMENTINSTR = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJCOMMENTINSTR", (long) MELT_GET); - /*_._VALDATA___V517*/ meltfptr[516] = + /*_._VALDATA___V520*/ meltfptr[519] = (melt_ptr_t) meltsy_CLASS_OBJCOMMENTINSTR; } /*endgetnamedsym CLASS_OBJCOMMENTINSTR */ @@ -20220,7 +20207,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJCOMMENTEDBLOCK */ - if (NULL == /*_._VALDATA___V521*/ meltfptr[520]) + if (NULL == /*_._VALDATA___V524*/ meltfptr[523]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJCOMMENTEDBLOCK without initial environment @@ -20228,7 +20215,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_OBJCOMMENTEDBLOCK = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJCOMMENTEDBLOCK", (long) MELT_GET); - /*_._VALDATA___V521*/ meltfptr[520] = + /*_._VALDATA___V524*/ meltfptr[523] = (melt_ptr_t) meltsy_CLASS_OBJCOMMENTEDBLOCK; } /*endgetnamedsym CLASS_OBJCOMMENTEDBLOCK */ @@ -20236,21 +20223,21 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:LABELCOUNTREF */ - if (NULL == /*_._VALDATA___V523*/ meltfptr[522]) + if (NULL == /*_._VALDATA___V526*/ meltfptr[525]) { #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___V523*/ meltfptr[522] = (melt_ptr_t) meltsy_LABELCOUNTREF; + /*_._VALDATA___V526*/ meltfptr[525] = (melt_ptr_t) meltsy_LABELCOUNTREF; } /*endgetnamedsym LABELCOUNTREF */ /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJLABELINSTR */ - if (NULL == /*_._VALDATA___V529*/ meltfptr[528]) + if (NULL == /*_._VALDATA___V532*/ meltfptr[531]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJLABELINSTR without initial environment @@ -20258,7 +20245,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_OBJLABELINSTR = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJLABELINSTR", (long) MELT_GET); - /*_._VALDATA___V529*/ meltfptr[528] = + /*_._VALDATA___V532*/ meltfptr[531] = (melt_ptr_t) meltsy_CLASS_OBJLABELINSTR; } /*endgetnamedsym CLASS_OBJLABELINSTR */ @@ -20266,35 +20253,35 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:SET_CONTENT */ - if (NULL == /*_._VALDATA___V531*/ meltfptr[530]) + if (NULL == /*_._VALDATA___V534*/ meltfptr[533]) { #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___V531*/ meltfptr[530] = (melt_ptr_t) meltsy_SET_CONTENT; + /*_._VALDATA___V534*/ meltfptr[533] = (melt_ptr_t) meltsy_SET_CONTENT; } /*endgetnamedsym SET_CONTENT */ /*^getnamedsymbol */ /*getnamedsym:STRING4OUT */ - if (NULL == /*_._VALDATA___V533*/ meltfptr[532]) + if (NULL == /*_._VALDATA___V536*/ meltfptr[535]) { #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___V533*/ meltfptr[532] = (melt_ptr_t) meltsy_STRING4OUT; + /*_._VALDATA___V536*/ meltfptr[535] = (melt_ptr_t) meltsy_STRING4OUT; } /*endgetnamedsym STRING4OUT */ /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJGOTOINSTR */ - if (NULL == /*_._VALDATA___V537*/ meltfptr[536]) + if (NULL == /*_._VALDATA___V540*/ meltfptr[539]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJGOTOINSTR without initial environment @@ -20302,7 +20289,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_OBJGOTOINSTR = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJGOTOINSTR", (long) MELT_GET); - /*_._VALDATA___V537*/ meltfptr[536] = + /*_._VALDATA___V540*/ meltfptr[539] = (melt_ptr_t) meltsy_CLASS_OBJGOTOINSTR; } /*endgetnamedsym CLASS_OBJGOTOINSTR */ @@ -20310,42 +20297,42 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJLOOP */ - if (NULL == /*_._VALDATA___V545*/ meltfptr[544]) + if (NULL == /*_._VALDATA___V548*/ meltfptr[547]) { #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___V545*/ meltfptr[544] = (melt_ptr_t) meltsy_CLASS_OBJLOOP; + /*_._VALDATA___V548*/ meltfptr[547] = (melt_ptr_t) meltsy_CLASS_OBJLOOP; } /*endgetnamedsym CLASS_OBJLOOP */ /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJEXIT */ - if (NULL == /*_._VALDATA___V549*/ meltfptr[548]) + if (NULL == /*_._VALDATA___V552*/ meltfptr[551]) { #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___V549*/ meltfptr[548] = (melt_ptr_t) meltsy_CLASS_OBJEXIT; + /*_._VALDATA___V552*/ meltfptr[551] = (melt_ptr_t) meltsy_CLASS_OBJEXIT; } /*endgetnamedsym CLASS_OBJEXIT */ /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJAGAIN */ - if (NULL == /*_._VALDATA___V553*/ meltfptr[552]) + if (NULL == /*_._VALDATA___V556*/ meltfptr[555]) { #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___V553*/ meltfptr[552] = + /*_._VALDATA___V556*/ meltfptr[555] = (melt_ptr_t) meltsy_CLASS_OBJAGAIN; } /*endgetnamedsym CLASS_OBJAGAIN */ @@ -20353,14 +20340,14 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJCOMPUTE */ - if (NULL == /*_._VALDATA___V560*/ meltfptr[559]) + if (NULL == /*_._VALDATA___V563*/ meltfptr[562]) { #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___V560*/ meltfptr[559] = + /*_._VALDATA___V563*/ meltfptr[562] = (melt_ptr_t) meltsy_CLASS_OBJCOMPUTE; } /*endgetnamedsym CLASS_OBJCOMPUTE */ @@ -20368,14 +20355,14 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:MULTIPLE_EVERY */ - if (NULL == /*_._VALDATA___V562*/ meltfptr[561]) + if (NULL == /*_._VALDATA___V565*/ meltfptr[564]) { #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___V562*/ meltfptr[561] = + /*_._VALDATA___V565*/ meltfptr[564] = (melt_ptr_t) meltsy_MULTIPLE_EVERY; } /*endgetnamedsym MULTIPLE_EVERY */ @@ -20383,28 +20370,28 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJCOND */ - if (NULL == /*_._VALDATA___V566*/ meltfptr[565]) + if (NULL == /*_._VALDATA___V569*/ meltfptr[568]) { #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___V566*/ meltfptr[565] = (melt_ptr_t) meltsy_CLASS_OBJCOND; + /*_._VALDATA___V569*/ meltfptr[568] = (melt_ptr_t) meltsy_CLASS_OBJCOND; } /*endgetnamedsym CLASS_OBJCOND */ /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJCPPIF */ - if (NULL == /*_._VALDATA___V570*/ meltfptr[569]) + if (NULL == /*_._VALDATA___V573*/ meltfptr[572]) { #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___V570*/ meltfptr[569] = + /*_._VALDATA___V573*/ meltfptr[572] = (melt_ptr_t) meltsy_CLASS_OBJCPPIF; } /*endgetnamedsym CLASS_OBJCPPIF */ @@ -20412,7 +20399,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJINTERNSYMBOL */ - if (NULL == /*_._VALDATA___V574*/ meltfptr[573]) + if (NULL == /*_._VALDATA___V577*/ meltfptr[576]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJINTERNSYMBOL without initial environment @@ -20420,7 +20407,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_OBJINTERNSYMBOL = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJINTERNSYMBOL", (long) MELT_GET); - /*_._VALDATA___V574*/ meltfptr[573] = + /*_._VALDATA___V577*/ meltfptr[576] = (melt_ptr_t) meltsy_CLASS_OBJINTERNSYMBOL; } /*endgetnamedsym CLASS_OBJINTERNSYMBOL */ @@ -20428,7 +20415,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_DATASYMBOL */ - if (NULL == /*_._VALDATA___V576*/ meltfptr[575]) + if (NULL == /*_._VALDATA___V579*/ meltfptr[578]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_NREP_DATASYMBOL without initial environment @@ -20436,7 +20423,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___V576*/ meltfptr[575] = + /*_._VALDATA___V579*/ meltfptr[578] = (melt_ptr_t) meltsy_CLASS_NREP_DATASYMBOL; } /*endgetnamedsym CLASS_NREP_DATASYMBOL */ @@ -20444,7 +20431,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJINTERNKEYWORD */ - if (NULL == /*_._VALDATA___V580*/ meltfptr[579]) + if (NULL == /*_._VALDATA___V583*/ meltfptr[582]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJINTERNKEYWORD without initial environment @@ -20452,7 +20439,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_OBJINTERNKEYWORD = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJINTERNKEYWORD", (long) MELT_GET); - /*_._VALDATA___V580*/ meltfptr[579] = + /*_._VALDATA___V583*/ meltfptr[582] = (melt_ptr_t) meltsy_CLASS_OBJINTERNKEYWORD; } /*endgetnamedsym CLASS_OBJINTERNKEYWORD */ @@ -20460,7 +20447,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_DATAKEYWORD */ - if (NULL == /*_._VALDATA___V582*/ meltfptr[581]) + if (NULL == /*_._VALDATA___V585*/ meltfptr[584]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_NREP_DATAKEYWORD without initial environment @@ -20468,7 +20455,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___V582*/ meltfptr[581] = + /*_._VALDATA___V585*/ meltfptr[584] = (melt_ptr_t) meltsy_CLASS_NREP_DATAKEYWORD; } /*endgetnamedsym CLASS_NREP_DATAKEYWORD */ @@ -20476,7 +20463,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJGETNAMEDSYMBOL */ - if (NULL == /*_._VALDATA___V586*/ meltfptr[585]) + if (NULL == /*_._VALDATA___V589*/ meltfptr[588]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJGETNAMEDSYMBOL without initial environment @@ -20484,7 +20471,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_OBJGETNAMEDSYMBOL = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJGETNAMEDSYMBOL", (long) MELT_GET); - /*_._VALDATA___V586*/ meltfptr[585] = + /*_._VALDATA___V589*/ meltfptr[588] = (melt_ptr_t) meltsy_CLASS_OBJGETNAMEDSYMBOL; } /*endgetnamedsym CLASS_OBJGETNAMEDSYMBOL */ @@ -20492,7 +20479,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJGETNAMEDKEYWORD */ - if (NULL == /*_._VALDATA___V590*/ meltfptr[589]) + if (NULL == /*_._VALDATA___V593*/ meltfptr[592]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJGETNAMEDKEYWORD without initial environment @@ -20500,7 +20487,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_OBJGETNAMEDKEYWORD = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJGETNAMEDKEYWORD", (long) MELT_GET); - /*_._VALDATA___V590*/ meltfptr[589] = + /*_._VALDATA___V593*/ meltfptr[592] = (melt_ptr_t) meltsy_CLASS_OBJGETNAMEDKEYWORD; } /*endgetnamedsym CLASS_OBJGETNAMEDKEYWORD */ @@ -20508,14 +20495,14 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJAPPLY */ - if (NULL == /*_._VALDATA___V596*/ meltfptr[595]) + if (NULL == /*_._VALDATA___V599*/ meltfptr[598]) { #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___V596*/ meltfptr[595] = + /*_._VALDATA___V599*/ meltfptr[598] = (melt_ptr_t) meltsy_CLASS_OBJAPPLY; } /*endgetnamedsym CLASS_OBJAPPLY */ @@ -20523,28 +20510,28 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:GET_CTYPE */ - if (NULL == /*_._VALDATA___V598*/ meltfptr[597]) + if (NULL == /*_._VALDATA___V601*/ meltfptr[600]) { #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___V598*/ meltfptr[597] = (melt_ptr_t) meltsy_GET_CTYPE; + /*_._VALDATA___V601*/ meltfptr[600] = (melt_ptr_t) meltsy_GET_CTYPE; } /*endgetnamedsym GET_CTYPE */ /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJMSEND */ - if (NULL == /*_._VALDATA___V603*/ meltfptr[602]) + if (NULL == /*_._VALDATA___V606*/ meltfptr[605]) { #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___V603*/ meltfptr[602] = + /*_._VALDATA___V606*/ meltfptr[605] = (melt_ptr_t) meltsy_CLASS_OBJMSEND; } /*endgetnamedsym CLASS_OBJMSEND */ @@ -20552,7 +20539,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJMULTIAPPLY */ - if (NULL == /*_._VALDATA___V612*/ meltfptr[611]) + if (NULL == /*_._VALDATA___V615*/ meltfptr[614]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJMULTIAPPLY without initial environment @@ -20560,7 +20547,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_OBJMULTIAPPLY = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJMULTIAPPLY", (long) MELT_GET); - /*_._VALDATA___V612*/ meltfptr[611] = + /*_._VALDATA___V615*/ meltfptr[614] = (melt_ptr_t) meltsy_CLASS_OBJMULTIAPPLY; } /*endgetnamedsym CLASS_OBJMULTIAPPLY */ @@ -20568,7 +20555,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJMULTIMSEND */ - if (NULL == /*_._VALDATA___V621*/ meltfptr[620]) + if (NULL == /*_._VALDATA___V624*/ meltfptr[623]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJMULTIMSEND without initial environment @@ -20576,7 +20563,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_OBJMULTIMSEND = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJMULTIMSEND", (long) MELT_GET); - /*_._VALDATA___V621*/ meltfptr[620] = + /*_._VALDATA___V624*/ meltfptr[623] = (melt_ptr_t) meltsy_CLASS_OBJMULTIMSEND; } /*endgetnamedsym CLASS_OBJMULTIMSEND */ @@ -20584,14 +20571,14 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJCLEAR */ - if (NULL == /*_._VALDATA___V625*/ meltfptr[624]) + if (NULL == /*_._VALDATA___V628*/ meltfptr[627]) { #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___V625*/ meltfptr[624] = + /*_._VALDATA___V628*/ meltfptr[627] = (melt_ptr_t) meltsy_CLASS_OBJCLEAR; } /*endgetnamedsym CLASS_OBJCLEAR */ @@ -20599,7 +20586,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJRAWALLOCOBJ */ - if (NULL == /*_._VALDATA___V629*/ meltfptr[628]) + if (NULL == /*_._VALDATA___V632*/ meltfptr[631]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJRAWALLOCOBJ without initial environment @@ -20607,7 +20594,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_OBJRAWALLOCOBJ = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJRAWALLOCOBJ", (long) MELT_GET); - /*_._VALDATA___V629*/ meltfptr[628] = + /*_._VALDATA___V632*/ meltfptr[631] = (melt_ptr_t) meltsy_CLASS_OBJRAWALLOCOBJ; } /*endgetnamedsym CLASS_OBJRAWALLOCOBJ */ @@ -20615,7 +20602,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJNEWCLOSURE */ - if (NULL == /*_._VALDATA___V634*/ meltfptr[633]) + if (NULL == /*_._VALDATA___V637*/ meltfptr[636]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJNEWCLOSURE without initial environment @@ -20623,7 +20610,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_OBJNEWCLOSURE = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJNEWCLOSURE", (long) MELT_GET); - /*_._VALDATA___V634*/ meltfptr[633] = + /*_._VALDATA___V637*/ meltfptr[636] = (melt_ptr_t) meltsy_CLASS_OBJNEWCLOSURE; } /*endgetnamedsym CLASS_OBJNEWCLOSURE */ @@ -20631,14 +20618,14 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJTOUCH */ - if (NULL == /*_._VALDATA___V638*/ meltfptr[637]) + if (NULL == /*_._VALDATA___V641*/ meltfptr[640]) { #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___V638*/ meltfptr[637] = + /*_._VALDATA___V641*/ meltfptr[640] = (melt_ptr_t) meltsy_CLASS_OBJTOUCH; } /*endgetnamedsym CLASS_OBJTOUCH */ @@ -20646,7 +20633,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJDBGTRACEWRITEOBJ */ - if (NULL == /*_._VALDATA___V642*/ meltfptr[641]) + if (NULL == /*_._VALDATA___V645*/ meltfptr[644]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJDBGTRACEWRITEOBJ without initial environment @@ -20654,7 +20641,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_OBJDBGTRACEWRITEOBJ = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJDBGTRACEWRITEOBJ", (long) MELT_GET); - /*_._VALDATA___V642*/ meltfptr[641] = + /*_._VALDATA___V645*/ meltfptr[644] = (melt_ptr_t) meltsy_CLASS_OBJDBGTRACEWRITEOBJ; } /*endgetnamedsym CLASS_OBJDBGTRACEWRITEOBJ */ @@ -20662,14 +20649,14 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJPUTUPLE */ - if (NULL == /*_._VALDATA___V646*/ meltfptr[645]) + if (NULL == /*_._VALDATA___V649*/ meltfptr[648]) { #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___V646*/ meltfptr[645] = + /*_._VALDATA___V649*/ meltfptr[648] = (melt_ptr_t) meltsy_CLASS_OBJPUTUPLE; } /*endgetnamedsym CLASS_OBJPUTUPLE */ @@ -20677,7 +20664,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:OBJPUTPAIRHEAD_COUNTER */ - if (NULL == /*_._VALDATA___V648*/ meltfptr[647]) + if (NULL == /*_._VALDATA___V651*/ meltfptr[650]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol OBJPUTPAIRHEAD_COUNTER without initial environment @@ -20685,7 +20672,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_OBJPUTPAIRHEAD_COUNTER = melthookproc_HOOK_NAMED_SYMBOL ("OBJPUTPAIRHEAD_COUNTER", (long) MELT_GET); - /*_._VALDATA___V648*/ meltfptr[647] = + /*_._VALDATA___V651*/ meltfptr[650] = (melt_ptr_t) meltsy_OBJPUTPAIRHEAD_COUNTER; } /*endgetnamedsym OBJPUTPAIRHEAD_COUNTER */ @@ -20693,14 +20680,14 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJPUTPAIR */ - if (NULL == /*_._VALDATA___V654*/ meltfptr[653]) + if (NULL == /*_._VALDATA___V657*/ meltfptr[656]) { #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___V654*/ meltfptr[653] = + /*_._VALDATA___V657*/ meltfptr[656] = (melt_ptr_t) meltsy_CLASS_OBJPUTPAIR; } /*endgetnamedsym CLASS_OBJPUTPAIR */ @@ -20708,7 +20695,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJPUTPAIRHEAD */ - if (NULL == /*_._VALDATA___V656*/ meltfptr[655]) + if (NULL == /*_._VALDATA___V659*/ meltfptr[658]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJPUTPAIRHEAD without initial environment @@ -20716,7 +20703,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_OBJPUTPAIRHEAD = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJPUTPAIRHEAD", (long) MELT_GET); - /*_._VALDATA___V656*/ meltfptr[655] = + /*_._VALDATA___V659*/ meltfptr[658] = (melt_ptr_t) meltsy_CLASS_OBJPUTPAIRHEAD; } /*endgetnamedsym CLASS_OBJPUTPAIRHEAD */ @@ -20724,7 +20711,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJPUTPAIRTAIL */ - if (NULL == /*_._VALDATA___V660*/ meltfptr[659]) + if (NULL == /*_._VALDATA___V663*/ meltfptr[662]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJPUTPAIRTAIL without initial environment @@ -20732,7 +20719,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_OBJPUTPAIRTAIL = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJPUTPAIRTAIL", (long) MELT_GET); - /*_._VALDATA___V660*/ meltfptr[659] = + /*_._VALDATA___V663*/ meltfptr[662] = (melt_ptr_t) meltsy_CLASS_OBJPUTPAIRTAIL; } /*endgetnamedsym CLASS_OBJPUTPAIRTAIL */ @@ -20740,14 +20727,14 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJPUTLIST */ - if (NULL == /*_._VALDATA___V664*/ meltfptr[663]) + if (NULL == /*_._VALDATA___V667*/ meltfptr[666]) { #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___V664*/ meltfptr[663] = + /*_._VALDATA___V667*/ meltfptr[666] = (melt_ptr_t) meltsy_CLASS_OBJPUTLIST; } /*endgetnamedsym CLASS_OBJPUTLIST */ @@ -20755,14 +20742,14 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJGETSLOT */ - if (NULL == /*_._VALDATA___V669*/ meltfptr[668]) + if (NULL == /*_._VALDATA___V672*/ meltfptr[671]) { #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___V669*/ meltfptr[668] = + /*_._VALDATA___V672*/ meltfptr[671] = (melt_ptr_t) meltsy_CLASS_OBJGETSLOT; } /*endgetnamedsym CLASS_OBJGETSLOT */ @@ -20770,28 +20757,28 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_FIELD */ - if (NULL == /*_._VALDATA___V671*/ meltfptr[670]) + if (NULL == /*_._VALDATA___V674*/ meltfptr[673]) { #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___V671*/ meltfptr[670] = (melt_ptr_t) meltsy_CLASS_FIELD; + /*_._VALDATA___V674*/ meltfptr[673] = (melt_ptr_t) meltsy_CLASS_FIELD; } /*endgetnamedsym CLASS_FIELD */ /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJPUTSLOT */ - if (NULL == /*_._VALDATA___V675*/ meltfptr[674]) + if (NULL == /*_._VALDATA___V678*/ meltfptr[677]) { #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___V675*/ meltfptr[674] = + /*_._VALDATA___V678*/ meltfptr[677] = (melt_ptr_t) meltsy_CLASS_OBJPUTSLOT; } /*endgetnamedsym CLASS_OBJPUTSLOT */ @@ -20799,7 +20786,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJPUTCLOSUROUT */ - if (NULL == /*_._VALDATA___V679*/ meltfptr[678]) + if (NULL == /*_._VALDATA___V682*/ meltfptr[681]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJPUTCLOSUROUT without initial environment @@ -20807,7 +20794,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_OBJPUTCLOSUROUT = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJPUTCLOSUROUT", (long) MELT_GET); - /*_._VALDATA___V679*/ meltfptr[678] = + /*_._VALDATA___V682*/ meltfptr[681] = (melt_ptr_t) meltsy_CLASS_OBJPUTCLOSUROUT; } /*endgetnamedsym CLASS_OBJPUTCLOSUROUT */ @@ -20815,7 +20802,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJPUTCLOSEDV */ - if (NULL == /*_._VALDATA___V683*/ meltfptr[682]) + if (NULL == /*_._VALDATA___V686*/ meltfptr[685]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJPUTCLOSEDV without initial environment @@ -20823,7 +20810,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_OBJPUTCLOSEDV = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJPUTCLOSEDV", (long) MELT_GET); - /*_._VALDATA___V683*/ meltfptr[682] = + /*_._VALDATA___V686*/ meltfptr[685] = (melt_ptr_t) meltsy_CLASS_OBJPUTCLOSEDV; } /*endgetnamedsym CLASS_OBJPUTCLOSEDV */ @@ -20831,7 +20818,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJPUTCLOSEDNOTNULLV */ - if (NULL == /*_._VALDATA___V687*/ meltfptr[686]) + if (NULL == /*_._VALDATA___V690*/ meltfptr[689]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJPUTCLOSEDNOTNULLV without initial environment @@ -20839,7 +20826,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_OBJPUTCLOSEDNOTNULLV = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJPUTCLOSEDNOTNULLV", (long) MELT_GET); - /*_._VALDATA___V687*/ meltfptr[686] = + /*_._VALDATA___V690*/ meltfptr[689] = (melt_ptr_t) meltsy_CLASS_OBJPUTCLOSEDNOTNULLV; } /*endgetnamedsym CLASS_OBJPUTCLOSEDNOTNULLV */ @@ -20847,7 +20834,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJPUTROUTCONST */ - if (NULL == /*_._VALDATA___V691*/ meltfptr[690]) + if (NULL == /*_._VALDATA___V694*/ meltfptr[693]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJPUTROUTCONST without initial environment @@ -20855,7 +20842,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_OBJPUTROUTCONST = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJPUTROUTCONST", (long) MELT_GET); - /*_._VALDATA___V691*/ meltfptr[690] = + /*_._VALDATA___V694*/ meltfptr[693] = (melt_ptr_t) meltsy_CLASS_OBJPUTROUTCONST; } /*endgetnamedsym CLASS_OBJPUTROUTCONST */ @@ -20863,7 +20850,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJPUTROUTCONSTNOTNULL */ - if (NULL == /*_._VALDATA___V695*/ meltfptr[694]) + if (NULL == /*_._VALDATA___V698*/ meltfptr[697]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJPUTROUTCONSTNOTNULL without initial environment @@ -20871,7 +20858,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_OBJPUTROUTCONSTNOTNULL = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJPUTROUTCONSTNOTNULL", (long) MELT_GET); - /*_._VALDATA___V695*/ meltfptr[694] = + /*_._VALDATA___V698*/ meltfptr[697] = (melt_ptr_t) meltsy_CLASS_OBJPUTROUTCONSTNOTNULL; } /*endgetnamedsym CLASS_OBJPUTROUTCONSTNOTNULL */ @@ -20879,7 +20866,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJPUTHOOKCONST */ - if (NULL == /*_._VALDATA___V699*/ meltfptr[698]) + if (NULL == /*_._VALDATA___V702*/ meltfptr[701]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJPUTHOOKCONST without initial environment @@ -20887,7 +20874,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_OBJPUTHOOKCONST = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJPUTHOOKCONST", (long) MELT_GET); - /*_._VALDATA___V699*/ meltfptr[698] = + /*_._VALDATA___V702*/ meltfptr[701] = (melt_ptr_t) meltsy_CLASS_OBJPUTHOOKCONST; } /*endgetnamedsym CLASS_OBJPUTHOOKCONST */ @@ -20895,7 +20882,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_BOUND_DATA */ - if (NULL == /*_._VALDATA___V701*/ meltfptr[700]) + if (NULL == /*_._VALDATA___V704*/ meltfptr[703]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_NREP_BOUND_DATA without initial environment @@ -20903,7 +20890,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___V701*/ meltfptr[700] = + /*_._VALDATA___V704*/ meltfptr[703] = (melt_ptr_t) meltsy_CLASS_NREP_BOUND_DATA; } /*endgetnamedsym CLASS_NREP_BOUND_DATA */ @@ -20911,7 +20898,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJPUTHOOKDATA */ - if (NULL == /*_._VALDATA___V705*/ meltfptr[704]) + if (NULL == /*_._VALDATA___V708*/ meltfptr[707]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJPUTHOOKDATA without initial environment @@ -20919,7 +20906,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_OBJPUTHOOKDATA = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJPUTHOOKDATA", (long) MELT_GET); - /*_._VALDATA___V705*/ meltfptr[704] = + /*_._VALDATA___V708*/ meltfptr[707] = (melt_ptr_t) meltsy_CLASS_OBJPUTHOOKDATA; } /*endgetnamedsym CLASS_OBJPUTHOOKDATA */ @@ -20927,7 +20914,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJPUTXTRARESULT */ - if (NULL == /*_._VALDATA___V709*/ meltfptr[708]) + if (NULL == /*_._VALDATA___V712*/ meltfptr[711]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJPUTXTRARESULT without initial environment @@ -20935,7 +20922,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_OBJPUTXTRARESULT = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJPUTXTRARESULT", (long) MELT_GET); - /*_._VALDATA___V709*/ meltfptr[708] = + /*_._VALDATA___V712*/ meltfptr[711] = (melt_ptr_t) meltsy_CLASS_OBJPUTXTRARESULT; } /*endgetnamedsym CLASS_OBJPUTXTRARESULT */ @@ -20943,21 +20930,21 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJEXPV */ - if (NULL == /*_._VALDATA___V713*/ meltfptr[712]) + if (NULL == /*_._VALDATA___V716*/ meltfptr[715]) { #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___V713*/ meltfptr[712] = (melt_ptr_t) meltsy_CLASS_OBJEXPV; + /*_._VALDATA___V716*/ meltfptr[715] = (melt_ptr_t) meltsy_CLASS_OBJEXPV; } /*endgetnamedsym CLASS_OBJEXPV */ /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJLOCATEDEXPV */ - if (NULL == /*_._VALDATA___V717*/ meltfptr[716]) + if (NULL == /*_._VALDATA___V720*/ meltfptr[719]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJLOCATEDEXPV without initial environment @@ -20965,7 +20952,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_OBJLOCATEDEXPV = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJLOCATEDEXPV", (long) MELT_GET); - /*_._VALDATA___V717*/ meltfptr[716] = + /*_._VALDATA___V720*/ meltfptr[719] = (melt_ptr_t) meltsy_CLASS_OBJLOCATEDEXPV; } /*endgetnamedsym CLASS_OBJLOCATEDEXPV */ @@ -20973,7 +20960,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_OBJFINALRETURN */ - if (NULL == /*_._VALDATA___V727*/ meltfptr[726]) + if (NULL == /*_._VALDATA___V730*/ meltfptr[729]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_OBJFINALRETURN without initial environment @@ -20981,7 +20968,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_OBJFINALRETURN = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_OBJFINALRETURN", (long) MELT_GET); - /*_._VALDATA___V727*/ meltfptr[726] = + /*_._VALDATA___V730*/ meltfptr[729] = (melt_ptr_t) meltsy_CLASS_OBJFINALRETURN; } /*endgetnamedsym CLASS_OBJFINALRETURN */ @@ -20989,7 +20976,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:COMPARE_NAMED_ALPHA */ - if (NULL == /*_._VALDATA___V731*/ meltfptr[730]) + if (NULL == /*_._VALDATA___V734*/ meltfptr[733]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol COMPARE_NAMED_ALPHA without initial environment @@ -20997,7 +20984,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___V731*/ meltfptr[730] = + /*_._VALDATA___V734*/ meltfptr[733] = (melt_ptr_t) meltsy_COMPARE_NAMED_ALPHA; } /*endgetnamedsym COMPARE_NAMED_ALPHA */ @@ -21005,7 +20992,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_ANY_MODULE_CONTEXT */ - if (NULL == /*_._VALDATA___V735*/ meltfptr[734]) + if (NULL == /*_._VALDATA___V738*/ meltfptr[737]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_ANY_MODULE_CONTEXT without initial environment @@ -21013,7 +21000,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___V735*/ meltfptr[734] = + /*_._VALDATA___V738*/ meltfptr[737] = (melt_ptr_t) meltsy_CLASS_ANY_MODULE_CONTEXT; } /*endgetnamedsym CLASS_ANY_MODULE_CONTEXT */ @@ -21021,7 +21008,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_SECONDARY_C_FILE */ - if (NULL == /*_._VALDATA___V737*/ meltfptr[736]) + if (NULL == /*_._VALDATA___V740*/ meltfptr[739]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_SECONDARY_C_FILE without initial environment @@ -21029,7 +21016,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___V737*/ meltfptr[736] = + /*_._VALDATA___V740*/ meltfptr[739] = (melt_ptr_t) meltsy_CLASS_SECONDARY_C_FILE; } /*endgetnamedsym CLASS_SECONDARY_C_FILE */ @@ -21037,42 +21024,42 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:SECFIL_MODNAM */ - if (NULL == /*_._VALDATA___V751*/ meltfptr[750]) + if (NULL == /*_._VALDATA___V754*/ meltfptr[753]) { #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___V751*/ meltfptr[750] = (melt_ptr_t) meltsy_SECFIL_MODNAM; + /*_._VALDATA___V754*/ meltfptr[753] = (melt_ptr_t) meltsy_SECFIL_MODNAM; } /*endgetnamedsym SECFIL_MODNAM */ /*^getnamedsymbol */ /*getnamedsym:SECFIL_PATH */ - if (NULL == /*_._VALDATA___V753*/ meltfptr[752]) + if (NULL == /*_._VALDATA___V756*/ meltfptr[755]) { #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___V753*/ meltfptr[752] = (melt_ptr_t) meltsy_SECFIL_PATH; + /*_._VALDATA___V756*/ meltfptr[755] = (melt_ptr_t) meltsy_SECFIL_PATH; } /*endgetnamedsym SECFIL_PATH */ /*^getnamedsymbol */ /*getnamedsym:SECFIL_DECLBUF */ - if (NULL == /*_._VALDATA___V755*/ meltfptr[754]) + if (NULL == /*_._VALDATA___V758*/ meltfptr[757]) { #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___V755*/ meltfptr[754] = + /*_._VALDATA___V758*/ meltfptr[757] = (melt_ptr_t) meltsy_SECFIL_DECLBUF; } /*endgetnamedsym SECFIL_DECLBUF */ @@ -21080,14 +21067,14 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:SECFIL_IMPLBUF */ - if (NULL == /*_._VALDATA___V757*/ meltfptr[756]) + if (NULL == /*_._VALDATA___V760*/ meltfptr[759]) { #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___V757*/ meltfptr[756] = + /*_._VALDATA___V760*/ meltfptr[759] = (melt_ptr_t) meltsy_SECFIL_IMPLBUF; } /*endgetnamedsym SECFIL_IMPLBUF */ @@ -21095,7 +21082,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:GENERATED_C_FILENAME */ - if (NULL == /*_._VALDATA___V759*/ meltfptr[758]) + if (NULL == /*_._VALDATA___V762*/ meltfptr[761]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol GENERATED_C_FILENAME without initial environment @@ -21103,7 +21090,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___V759*/ meltfptr[758] = + /*_._VALDATA___V762*/ meltfptr[761] = (melt_ptr_t) meltsy_GENERATED_C_FILENAME; } /*endgetnamedsym GENERATED_C_FILENAME */ @@ -21111,63 +21098,63 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:DISCR */ - if (NULL == /*_._VALDATA___V764*/ meltfptr[763]) + if (NULL == /*_._VALDATA___V767*/ meltfptr[766]) { #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___V764*/ meltfptr[763] = (melt_ptr_t) meltsy_DISCR; + /*_._VALDATA___V767*/ meltfptr[766] = (melt_ptr_t) meltsy_DISCR; } /*endgetnamedsym DISCR */ /*^getnamedsymbol */ /*getnamedsym:BASE */ - if (NULL == /*_._VALDATA___V767*/ meltfptr[766]) + if (NULL == /*_._VALDATA___V770*/ meltfptr[769]) { #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___V767*/ meltfptr[766] = (melt_ptr_t) meltsy_BASE; + /*_._VALDATA___V770*/ meltfptr[769] = (melt_ptr_t) meltsy_BASE; } /*endgetnamedsym BASE */ /*^getnamedsymbol */ /*getnamedsym:DIR */ - if (NULL == /*_._VALDATA___V770*/ meltfptr[769]) + if (NULL == /*_._VALDATA___V773*/ meltfptr[772]) { #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___V770*/ meltfptr[769] = (melt_ptr_t) meltsy_DIR; + /*_._VALDATA___V773*/ meltfptr[772] = (melt_ptr_t) meltsy_DIR; } /*endgetnamedsym DIR */ /*^getnamedsymbol */ /*getnamedsym:NUM */ - if (NULL == /*_._VALDATA___V773*/ meltfptr[772]) + if (NULL == /*_._VALDATA___V776*/ meltfptr[775]) { #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___V773*/ meltfptr[772] = (melt_ptr_t) meltsy_NUM; + /*_._VALDATA___V776*/ meltfptr[775] = (melt_ptr_t) meltsy_NUM; } /*endgetnamedsym NUM */ /*^getnamedsymbol */ /*getnamedsym:CLASS_RUNNING_EXTENSION_MODULE_CONTEXT */ - if (NULL == /*_._VALDATA___V792*/ meltfptr[791]) + if (NULL == /*_._VALDATA___V795*/ meltfptr[794]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_RUNNING_EXTENSION_MODULE_CONTEXT without initial environment @@ -21175,7 +21162,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___V792*/ meltfptr[791] = + /*_._VALDATA___V795*/ meltfptr[794] = (melt_ptr_t) meltsy_CLASS_RUNNING_EXTENSION_MODULE_CONTEXT; } /*endgetnamedsym CLASS_RUNNING_EXTENSION_MODULE_CONTEXT */ @@ -21183,7 +21170,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:SYNTAX_TEST_GENERATOR */ - if (NULL == /*_._VALDATA___V794*/ meltfptr[793]) + if (NULL == /*_._VALDATA___V797*/ meltfptr[796]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol SYNTAX_TEST_GENERATOR without initial environment @@ -21191,7 +21178,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___V794*/ meltfptr[793] = + /*_._VALDATA___V797*/ meltfptr[796] = (melt_ptr_t) meltsy_SYNTAX_TEST_GENERATOR; } /*endgetnamedsym SYNTAX_TEST_GENERATOR */ @@ -21199,14 +21186,14 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_SELECTOR */ - if (NULL == /*_._VALDATA___V796*/ meltfptr[795]) + if (NULL == /*_._VALDATA___V799*/ meltfptr[798]) { #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___V796*/ meltfptr[795] = + /*_._VALDATA___V799*/ meltfptr[798] = (melt_ptr_t) meltsy_CLASS_SELECTOR; } /*endgetnamedsym CLASS_SELECTOR */ @@ -21214,91 +21201,91 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:RECV */ - if (NULL == /*_._VALDATA___V798*/ meltfptr[797]) + if (NULL == /*_._VALDATA___V801*/ meltfptr[800]) { #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___V798*/ meltfptr[797] = (melt_ptr_t) meltsy_RECV; + /*_._VALDATA___V801*/ meltfptr[800] = (melt_ptr_t) meltsy_RECV; } /*endgetnamedsym RECV */ /*^getnamedsymbol */ /*getnamedsym:GENDEV */ - if (NULL == /*_._VALDATA___V801*/ meltfptr[800]) + if (NULL == /*_._VALDATA___V804*/ meltfptr[803]) { #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___V801*/ meltfptr[800] = (melt_ptr_t) meltsy_GENDEV; + /*_._VALDATA___V804*/ meltfptr[803] = (melt_ptr_t) meltsy_GENDEV; } /*endgetnamedsym GENDEV */ /*^getnamedsymbol */ /*getnamedsym:SBUF */ - if (NULL == /*_._VALDATA___V804*/ meltfptr[803]) + if (NULL == /*_._VALDATA___V807*/ meltfptr[806]) { #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___V804*/ meltfptr[803] = (melt_ptr_t) meltsy_SBUF; + /*_._VALDATA___V807*/ meltfptr[806] = (melt_ptr_t) meltsy_SBUF; } /*endgetnamedsym SBUF */ /*^getnamedsymbol */ /*getnamedsym:MODCTX */ - if (NULL == /*_._VALDATA___V807*/ meltfptr[806]) + if (NULL == /*_._VALDATA___V810*/ meltfptr[809]) { #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___V807*/ meltfptr[806] = (melt_ptr_t) meltsy_MODCTX; + /*_._VALDATA___V810*/ meltfptr[809] = (melt_ptr_t) meltsy_MODCTX; } /*endgetnamedsym MODCTX */ /*^getnamedsymbol */ /*getnamedsym:IX */ - if (NULL == /*_._VALDATA___V810*/ meltfptr[809]) + if (NULL == /*_._VALDATA___V813*/ meltfptr[812]) { #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___V810*/ meltfptr[809] = (melt_ptr_t) meltsy_IX; + /*_._VALDATA___V813*/ meltfptr[812] = (melt_ptr_t) meltsy_IX; } /*endgetnamedsym IX */ /*^getnamedsymbol */ /*getnamedsym:CLASS_LOCATED */ - if (NULL == /*_._VALDATA___V818*/ meltfptr[817]) + if (NULL == /*_._VALDATA___V821*/ meltfptr[820]) { #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___V818*/ meltfptr[817] = (melt_ptr_t) meltsy_CLASS_LOCATED; + /*_._VALDATA___V821*/ meltfptr[820] = (melt_ptr_t) meltsy_CLASS_LOCATED; } /*endgetnamedsym CLASS_LOCATED */ /*^getnamedsymbol */ /*getnamedsym:CLASS_SOURCE_GENERATOR_DEVICE */ - if (NULL == /*_._VALDATA___V820*/ meltfptr[819]) + if (NULL == /*_._VALDATA___V823*/ meltfptr[822]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_SOURCE_GENERATOR_DEVICE without initial environment @@ -21306,7 +21293,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___V820*/ meltfptr[819] = + /*_._VALDATA___V823*/ meltfptr[822] = (melt_ptr_t) meltsy_CLASS_SOURCE_GENERATOR_DEVICE; } /*endgetnamedsym CLASS_SOURCE_GENERATOR_DEVICE */ @@ -21314,14 +21301,14 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_PRIMITIVE */ - if (NULL == /*_._VALDATA___V828*/ meltfptr[827]) + if (NULL == /*_._VALDATA___V831*/ meltfptr[830]) { #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___V828*/ meltfptr[827] = + /*_._VALDATA___V831*/ meltfptr[830] = (melt_ptr_t) meltsy_CLASS_PRIMITIVE; } /*endgetnamedsym CLASS_PRIMITIVE */ @@ -21329,7 +21316,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_SOURCE_DEFPRIMITIVE */ - if (NULL == /*_._VALDATA___V830*/ meltfptr[829]) + if (NULL == /*_._VALDATA___V833*/ meltfptr[832]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_SOURCE_DEFPRIMITIVE without initial environment @@ -21337,7 +21324,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___V830*/ meltfptr[829] = + /*_._VALDATA___V833*/ meltfptr[832] = (melt_ptr_t) meltsy_CLASS_SOURCE_DEFPRIMITIVE; } /*endgetnamedsym CLASS_SOURCE_DEFPRIMITIVE */ @@ -21345,14 +21332,14 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:DISCR_MAP_OBJECTS */ - if (NULL == /*_._VALDATA___V832*/ meltfptr[831]) + if (NULL == /*_._VALDATA___V835*/ meltfptr[834]) { #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___V832*/ meltfptr[831] = + /*_._VALDATA___V835*/ meltfptr[834] = (melt_ptr_t) meltsy_DISCR_MAP_OBJECTS; } /*endgetnamedsym DISCR_MAP_OBJECTS */ @@ -21360,7 +21347,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_SOURCE_DEFCITERATOR */ - if (NULL == /*_._VALDATA___V836*/ meltfptr[835]) + if (NULL == /*_._VALDATA___V839*/ meltfptr[838]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_SOURCE_DEFCITERATOR without initial environment @@ -21368,7 +21355,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___V836*/ meltfptr[835] = + /*_._VALDATA___V839*/ meltfptr[838] = (melt_ptr_t) meltsy_CLASS_SOURCE_DEFCITERATOR; } /*endgetnamedsym CLASS_SOURCE_DEFCITERATOR */ @@ -21376,14 +21363,14 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_CMATCHER */ - if (NULL == /*_._VALDATA___V842*/ meltfptr[841]) + if (NULL == /*_._VALDATA___V845*/ meltfptr[844]) { #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___V842*/ meltfptr[841] = + /*_._VALDATA___V845*/ meltfptr[844] = (melt_ptr_t) meltsy_CLASS_CMATCHER; } /*endgetnamedsym CLASS_CMATCHER */ @@ -21391,14 +21378,14 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_ANY_MATCHER */ - if (NULL == /*_._VALDATA___V844*/ meltfptr[843]) + if (NULL == /*_._VALDATA___V847*/ meltfptr[846]) { #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___V844*/ meltfptr[843] = + /*_._VALDATA___V847*/ meltfptr[846] = (melt_ptr_t) meltsy_CLASS_ANY_MATCHER; } /*endgetnamedsym CLASS_ANY_MATCHER */ @@ -21406,7 +21393,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_SOURCE_DEFCMATCHER */ - if (NULL == /*_._VALDATA___V846*/ meltfptr[845]) + if (NULL == /*_._VALDATA___V849*/ meltfptr[848]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_SOURCE_DEFCMATCHER without initial environment @@ -21414,7 +21401,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___V846*/ meltfptr[845] = + /*_._VALDATA___V849*/ meltfptr[848] = (melt_ptr_t) meltsy_CLASS_SOURCE_DEFCMATCHER; } /*endgetnamedsym CLASS_SOURCE_DEFCMATCHER */ @@ -21422,7 +21409,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_NORMALIZATION_CONTEXT */ - if (NULL == /*_._VALDATA___V853*/ meltfptr[852]) + if (NULL == /*_._VALDATA___V856*/ meltfptr[855]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_NORMALIZATION_CONTEXT without initial environment @@ -21430,7 +21417,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___V853*/ meltfptr[852] = + /*_._VALDATA___V856*/ meltfptr[855] = (melt_ptr_t) meltsy_CLASS_NORMALIZATION_CONTEXT; } /*endgetnamedsym CLASS_NORMALIZATION_CONTEXT */ @@ -21438,14 +21425,14 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_ENVIRONMENT */ - if (NULL == /*_._VALDATA___V855*/ meltfptr[854]) + if (NULL == /*_._VALDATA___V858*/ meltfptr[857]) { #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___V855*/ meltfptr[854] = + /*_._VALDATA___V858*/ meltfptr[857] = (melt_ptr_t) meltsy_CLASS_ENVIRONMENT; } /*endgetnamedsym CLASS_ENVIRONMENT */ @@ -21453,21 +21440,21 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_SOURCE */ - if (NULL == /*_._VALDATA___V857*/ meltfptr[856]) + if (NULL == /*_._VALDATA___V860*/ meltfptr[859]) { #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___V857*/ meltfptr[856] = (melt_ptr_t) meltsy_CLASS_SOURCE; + /*_._VALDATA___V860*/ meltfptr[859] = (melt_ptr_t) meltsy_CLASS_SOURCE; } /*endgetnamedsym CLASS_SOURCE */ /*^getnamedsymbol */ /*getnamedsym:CLASS_SOURCE_UPDATE_CURRENT_MODULE_ENVIRONMENT_REFERENCE */ - if (NULL == /*_._VALDATA___V859*/ meltfptr[858]) + if (NULL == /*_._VALDATA___V862*/ meltfptr[861]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_SOURCE_UPDATE_CURRENT_MODULE_ENVIRONMENT_REFERENCE without initial environment @@ -21477,7 +21464,7 @@ melt_start_this_module (void *modargp_) melthookproc_HOOK_NAMED_SYMBOL ("CLASS_SOURCE_UPDATE_CURRENT_MODULE_ENVIRONMENT_REFERENCE", (long) MELT_GET); - /*_._VALDATA___V859*/ meltfptr[858] = + /*_._VALDATA___V862*/ meltfptr[861] = (melt_ptr_t) meltsy_CLASS_SOURCE_UPDATE_CURRENT_MODULE_ENVIRONMENT_REFERENCE; } /*endgetnamedsym CLASS_SOURCE_UPDATE_CURRENT_MODULE_ENVIRONMENT_REFERENCE */ @@ -21486,7 +21473,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_SOURCE_COMMENT */ - if (NULL == /*_._VALDATA___V861*/ meltfptr[860]) + if (NULL == /*_._VALDATA___V864*/ meltfptr[863]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_SOURCE_COMMENT without initial environment @@ -21494,7 +21481,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___V861*/ meltfptr[860] = + /*_._VALDATA___V864*/ meltfptr[863] = (melt_ptr_t) meltsy_CLASS_SOURCE_COMMENT; } /*endgetnamedsym CLASS_SOURCE_COMMENT */ @@ -21502,21 +21489,21 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:NORMAL_EXP */ - if (NULL == /*_._VALDATA___V863*/ meltfptr[862]) + if (NULL == /*_._VALDATA___V866*/ meltfptr[865]) { #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___V863*/ meltfptr[862] = (melt_ptr_t) meltsy_NORMAL_EXP; + /*_._VALDATA___V866*/ meltfptr[865] = (melt_ptr_t) meltsy_NORMAL_EXP; } /*endgetnamedsym NORMAL_EXP */ /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_ANYPROC */ - if (NULL == /*_._VALDATA___V865*/ meltfptr[864]) + if (NULL == /*_._VALDATA___V868*/ meltfptr[867]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_NREP_ANYPROC without initial environment @@ -21524,7 +21511,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___V865*/ meltfptr[864] = + /*_._VALDATA___V868*/ meltfptr[867] = (melt_ptr_t) meltsy_CLASS_NREP_ANYPROC; } /*endgetnamedsym CLASS_NREP_ANYPROC */ @@ -21532,14 +21519,14 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:WRAP_NORMAL_LET1 */ - if (NULL == /*_._VALDATA___V867*/ meltfptr[866]) + if (NULL == /*_._VALDATA___V870*/ meltfptr[869]) { #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___V867*/ meltfptr[866] = + /*_._VALDATA___V870*/ meltfptr[869] = (melt_ptr_t) meltsy_WRAP_NORMAL_LET1; } /*endgetnamedsym WRAP_NORMAL_LET1 */ @@ -21547,7 +21534,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_INITPROC */ - if (NULL == /*_._VALDATA___V869*/ meltfptr[868]) + if (NULL == /*_._VALDATA___V872*/ meltfptr[871]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_NREP_INITPROC without initial environment @@ -21555,7 +21542,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___V869*/ meltfptr[868] = + /*_._VALDATA___V872*/ meltfptr[871] = (melt_ptr_t) meltsy_CLASS_NREP_INITPROC; } /*endgetnamedsym CLASS_NREP_INITPROC */ @@ -21563,7 +21550,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_DATAHOOK */ - if (NULL == /*_._VALDATA___V873*/ meltfptr[872]) + if (NULL == /*_._VALDATA___V876*/ meltfptr[875]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_NREP_DATAHOOK without initial environment @@ -21571,7 +21558,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___V873*/ meltfptr[872] = + /*_._VALDATA___V876*/ meltfptr[875] = (melt_ptr_t) meltsy_CLASS_NREP_DATAHOOK; } /*endgetnamedsym CLASS_NREP_DATAHOOK */ @@ -21579,14 +21566,14 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:COMPILE2OBJ_HOOK */ - if (NULL == /*_._VALDATA___V881*/ meltfptr[880]) + if (NULL == /*_._VALDATA___V884*/ meltfptr[883]) { #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___V881*/ meltfptr[880] = + /*_._VALDATA___V884*/ meltfptr[883] = (melt_ptr_t) meltsy_COMPILE2OBJ_HOOK; } /*endgetnamedsym COMPILE2OBJ_HOOK */ @@ -21594,7 +21581,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:COMPILE2OBJ_PROCEDURE */ - if (NULL == /*_._VALDATA___V883*/ meltfptr[882]) + if (NULL == /*_._VALDATA___V886*/ meltfptr[885]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol COMPILE2OBJ_PROCEDURE without initial environment @@ -21602,7 +21589,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_COMPILE2OBJ_PROCEDURE = melthookproc_HOOK_NAMED_SYMBOL ("COMPILE2OBJ_PROCEDURE", (long) MELT_GET); - /*_._VALDATA___V883*/ meltfptr[882] = + /*_._VALDATA___V886*/ meltfptr[885] = (melt_ptr_t) meltsy_COMPILE2OBJ_PROCEDURE; } /*endgetnamedsym COMPILE2OBJ_PROCEDURE */ @@ -21610,21 +21597,21 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:NORMAL_IMPORT */ - if (NULL == /*_._VALDATA___V885*/ meltfptr[884]) + if (NULL == /*_._VALDATA___V888*/ meltfptr[887]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol NORMAL_IMPORT without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_NORMAL_IMPORT = melthookproc_HOOK_NAMED_SYMBOL ("NORMAL_IMPORT", (long) MELT_GET); - /*_._VALDATA___V885*/ meltfptr[884] = (melt_ptr_t) meltsy_NORMAL_IMPORT; + /*_._VALDATA___V888*/ meltfptr[887] = (melt_ptr_t) meltsy_NORMAL_IMPORT; } /*endgetnamedsym NORMAL_IMPORT */ /*^getnamedsymbol */ /*getnamedsym:CLASS_HOOK_DESCRIPTOR */ - if (NULL == /*_._VALDATA___V887*/ meltfptr[886]) + if (NULL == /*_._VALDATA___V890*/ meltfptr[889]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_HOOK_DESCRIPTOR without initial environment @@ -21632,7 +21619,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CLASS_HOOK_DESCRIPTOR = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_HOOK_DESCRIPTOR", (long) MELT_GET); - /*_._VALDATA___V887*/ meltfptr[886] = + /*_._VALDATA___V890*/ meltfptr[889] = (melt_ptr_t) meltsy_CLASS_HOOK_DESCRIPTOR; } /*endgetnamedsym CLASS_HOOK_DESCRIPTOR */ @@ -21640,21 +21627,21 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:SYMBOL_CNAME */ - if (NULL == /*_._VALDATA___V889*/ meltfptr[888]) + if (NULL == /*_._VALDATA___V892*/ meltfptr[891]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol SYMBOL_CNAME without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_SYMBOL_CNAME = melthookproc_HOOK_NAMED_SYMBOL ("SYMBOL_CNAME", (long) MELT_GET); - /*_._VALDATA___V889*/ meltfptr[888] = (melt_ptr_t) meltsy_SYMBOL_CNAME; + /*_._VALDATA___V892*/ meltfptr[891] = (melt_ptr_t) meltsy_SYMBOL_CNAME; } /*endgetnamedsym SYMBOL_CNAME */ /*^getnamedsymbol */ /*getnamedsym:CLASS_SOURCE_CHEADER */ - if (NULL == /*_._VALDATA___V891*/ meltfptr[890]) + if (NULL == /*_._VALDATA___V894*/ meltfptr[893]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_SOURCE_CHEADER without initial environment @@ -21662,7 +21649,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___V891*/ meltfptr[890] = + /*_._VALDATA___V894*/ meltfptr[893] = (melt_ptr_t) meltsy_CLASS_SOURCE_CHEADER; } /*endgetnamedsym CLASS_SOURCE_CHEADER */ @@ -21670,7 +21657,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_SOURCE_CODE_STRING */ - if (NULL == /*_._VALDATA___V893*/ meltfptr[892]) + if (NULL == /*_._VALDATA___V896*/ meltfptr[895]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_SOURCE_CODE_STRING without initial environment @@ -21678,7 +21665,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___V893*/ meltfptr[892] = + /*_._VALDATA___V896*/ meltfptr[895] = (melt_ptr_t) meltsy_CLASS_SOURCE_CODE_STRING; } /*endgetnamedsym CLASS_SOURCE_CODE_STRING */ @@ -21686,7 +21673,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_SOURCE_CIMPLEMENT */ - if (NULL == /*_._VALDATA___V895*/ meltfptr[894]) + if (NULL == /*_._VALDATA___V898*/ meltfptr[897]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_SOURCE_CIMPLEMENT without initial environment @@ -21694,7 +21681,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___V895*/ meltfptr[894] = + /*_._VALDATA___V898*/ meltfptr[897] = (melt_ptr_t) meltsy_CLASS_SOURCE_CIMPLEMENT; } /*endgetnamedsym CLASS_SOURCE_CIMPLEMENT */ @@ -21702,7 +21689,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_MODULE_CONTEXT */ - if (NULL == /*_._VALDATA___V902*/ meltfptr[901]) + if (NULL == /*_._VALDATA___V905*/ meltfptr[904]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_MODULE_CONTEXT without initial environment @@ -21710,7 +21697,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___V902*/ meltfptr[901] = + /*_._VALDATA___V905*/ meltfptr[904] = (melt_ptr_t) meltsy_CLASS_MODULE_CONTEXT; } /*endgetnamedsym CLASS_MODULE_CONTEXT */ @@ -21718,14 +21705,14 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:DISCR_MAP_STRINGS */ - if (NULL == /*_._VALDATA___V904*/ meltfptr[903]) + if (NULL == /*_._VALDATA___V907*/ meltfptr[906]) { #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___V904*/ meltfptr[903] = + /*_._VALDATA___V907*/ meltfptr[906] = (melt_ptr_t) meltsy_DISCR_MAP_STRINGS; } /*endgetnamedsym DISCR_MAP_STRINGS */ @@ -21733,7 +21720,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CREATE_NORMCONTEXT */ - if (NULL == /*_._VALDATA___V906*/ meltfptr[905]) + if (NULL == /*_._VALDATA___V909*/ meltfptr[908]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CREATE_NORMCONTEXT without initial environment @@ -21741,7 +21728,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_CREATE_NORMCONTEXT = melthookproc_HOOK_NAMED_SYMBOL ("CREATE_NORMCONTEXT", (long) MELT_GET); - /*_._VALDATA___V906*/ meltfptr[905] = + /*_._VALDATA___V909*/ meltfptr[908] = (melt_ptr_t) meltsy_CREATE_NORMCONTEXT; } /*endgetnamedsym CREATE_NORMCONTEXT */ @@ -21749,7 +21736,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:INITIAL_ENVIRONMENT */ - if (NULL == /*_._VALDATA___V908*/ meltfptr[907]) + if (NULL == /*_._VALDATA___V911*/ meltfptr[910]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol INITIAL_ENVIRONMENT without initial environment @@ -21757,7 +21744,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_INITIAL_ENVIRONMENT = melthookproc_HOOK_NAMED_SYMBOL ("INITIAL_ENVIRONMENT", (long) MELT_GET); - /*_._VALDATA___V908*/ meltfptr[907] = + /*_._VALDATA___V911*/ meltfptr[910] = (melt_ptr_t) meltsy_INITIAL_ENVIRONMENT; } /*endgetnamedsym INITIAL_ENVIRONMENT */ @@ -21765,7 +21752,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:MACROEXPAND_TOPLEVEL_LIST */ - if (NULL == /*_._VALDATA___V910*/ meltfptr[909]) + if (NULL == /*_._VALDATA___V913*/ meltfptr[912]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol MACROEXPAND_TOPLEVEL_LIST without initial environment @@ -21773,7 +21760,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___V910*/ meltfptr[909] = + /*_._VALDATA___V913*/ meltfptr[912] = (melt_ptr_t) meltsy_MACROEXPAND_TOPLEVEL_LIST; } /*endgetnamedsym MACROEXPAND_TOPLEVEL_LIST */ @@ -21781,21 +21768,21 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:MACROEXPAND_1 */ - if (NULL == /*_._VALDATA___V912*/ meltfptr[911]) + if (NULL == /*_._VALDATA___V915*/ meltfptr[914]) { #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___V912*/ meltfptr[911] = (melt_ptr_t) meltsy_MACROEXPAND_1; + /*_._VALDATA___V915*/ meltfptr[914] = (melt_ptr_t) meltsy_MACROEXPAND_1; } /*endgetnamedsym MACROEXPAND_1 */ /*^getnamedsymbol */ /*getnamedsym:COMPILE2OBJ_INITPROC */ - if (NULL == /*_._VALDATA___V914*/ meltfptr[913]) + if (NULL == /*_._VALDATA___V917*/ meltfptr[916]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol COMPILE2OBJ_INITPROC without initial environment @@ -21803,7 +21790,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_COMPILE2OBJ_INITPROC = melthookproc_HOOK_NAMED_SYMBOL ("COMPILE2OBJ_INITPROC", (long) MELT_GET); - /*_._VALDATA___V914*/ meltfptr[913] = + /*_._VALDATA___V917*/ meltfptr[916] = (melt_ptr_t) meltsy_COMPILE2OBJ_INITPROC; } /*endgetnamedsym COMPILE2OBJ_INITPROC */ @@ -21811,7 +21798,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:MELT_RUN_EXTENSION */ - if (NULL == /*_._VALDATA___V916*/ meltfptr[915]) + if (NULL == /*_._VALDATA___V919*/ meltfptr[918]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol MELT_RUN_EXTENSION without initial environment @@ -21819,7 +21806,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___V916*/ meltfptr[915] = + /*_._VALDATA___V919*/ meltfptr[918] = (melt_ptr_t) meltsy_MELT_RUN_EXTENSION; } /*endgetnamedsym MELT_RUN_EXTENSION */ @@ -21827,77 +21814,77 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:BASENAME */ - if (NULL == /*_._VALDATA___V921*/ meltfptr[920]) + if (NULL == /*_._VALDATA___V924*/ meltfptr[923]) { #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___V921*/ meltfptr[920] = (melt_ptr_t) meltsy_BASENAME; + /*_._VALDATA___V924*/ meltfptr[923] = (melt_ptr_t) meltsy_BASENAME; } /*endgetnamedsym BASENAME */ /*^getnamedsymbol */ /*getnamedsym:ENV */ - if (NULL == /*_._VALDATA___V924*/ meltfptr[923]) + if (NULL == /*_._VALDATA___V927*/ meltfptr[926]) { #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___V924*/ meltfptr[923] = (melt_ptr_t) meltsy_ENV; + /*_._VALDATA___V927*/ meltfptr[926] = (melt_ptr_t) meltsy_ENV; } /*endgetnamedsym ENV */ /*^getnamedsymbol */ /*getnamedsym:LITVAL */ - if (NULL == /*_._VALDATA___V927*/ meltfptr[926]) + if (NULL == /*_._VALDATA___V930*/ meltfptr[929]) { #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___V927*/ meltfptr[926] = (melt_ptr_t) meltsy_LITVAL; + /*_._VALDATA___V930*/ meltfptr[929] = (melt_ptr_t) meltsy_LITVAL; } /*endgetnamedsym LITVAL */ /*^getnamedsymbol */ /*getnamedsym:CLONE_SYMBOL */ - if (NULL == /*_._VALDATA___V945*/ meltfptr[944]) + if (NULL == /*_._VALDATA___V948*/ meltfptr[947]) { #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___V945*/ meltfptr[944] = (melt_ptr_t) meltsy_CLONE_SYMBOL; + /*_._VALDATA___V948*/ meltfptr[947] = (melt_ptr_t) meltsy_CLONE_SYMBOL; } /*endgetnamedsym CLONE_SYMBOL */ /*^getnamedsymbol */ /*getnamedsym:RETAUTOBOXVAL */ - if (NULL == /*_._VALDATA___V936*/ meltfptr[935]) + if (NULL == /*_._VALDATA___V939*/ meltfptr[938]) { #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___V936*/ meltfptr[935] = (melt_ptr_t) meltsy_RETAUTOBOXVAL; + /*_._VALDATA___V939*/ meltfptr[938] = (melt_ptr_t) meltsy_RETAUTOBOXVAL; } /*endgetnamedsym RETAUTOBOXVAL */ /*^getnamedsymbol */ /*getnamedsym:CLASS_NORMAL_LET_BINDING */ - if (NULL == /*_._VALDATA___V947*/ meltfptr[946]) + if (NULL == /*_._VALDATA___V950*/ meltfptr[949]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_NORMAL_LET_BINDING without initial environment @@ -21905,7 +21892,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___V947*/ meltfptr[946] = + /*_._VALDATA___V950*/ meltfptr[949] = (melt_ptr_t) meltsy_CLASS_NORMAL_LET_BINDING; } /*endgetnamedsym CLASS_NORMAL_LET_BINDING */ @@ -21913,7 +21900,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_LOCSYMOCC */ - if (NULL == /*_._VALDATA___V949*/ meltfptr[948]) + if (NULL == /*_._VALDATA___V952*/ meltfptr[951]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_NREP_LOCSYMOCC without initial environment @@ -21921,7 +21908,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___V949*/ meltfptr[948] = + /*_._VALDATA___V952*/ meltfptr[951] = (melt_ptr_t) meltsy_CLASS_NREP_LOCSYMOCC; } /*endgetnamedsym CLASS_NREP_LOCSYMOCC */ @@ -21929,14 +21916,14 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_RETURN */ - if (NULL == /*_._VALDATA___V951*/ meltfptr[950]) + if (NULL == /*_._VALDATA___V954*/ meltfptr[953]) { #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___V951*/ meltfptr[950] = + /*_._VALDATA___V954*/ meltfptr[953] = (melt_ptr_t) meltsy_CLASS_NREP_RETURN; } /*endgetnamedsym CLASS_NREP_RETURN */ @@ -21944,14 +21931,14 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_NREP_CHUNK */ - if (NULL == /*_._VALDATA___V953*/ meltfptr[952]) + if (NULL == /*_._VALDATA___V956*/ meltfptr[955]) { #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___V953*/ meltfptr[952] = + /*_._VALDATA___V956*/ meltfptr[955] = (melt_ptr_t) meltsy_CLASS_NREP_CHUNK; } /*endgetnamedsym CLASS_NREP_CHUNK */ @@ -21959,28 +21946,28 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:AUTOBOXLONG */ - if (NULL == /*_._VALDATA___V938*/ meltfptr[937]) + if (NULL == /*_._VALDATA___V941*/ meltfptr[940]) { #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___V938*/ meltfptr[937] = (melt_ptr_t) meltsy_AUTOBOXLONG; + /*_._VALDATA___V941*/ meltfptr[940] = (melt_ptr_t) meltsy_AUTOBOXLONG; } /*endgetnamedsym AUTOBOXLONG */ /*^getnamedsymbol */ /*getnamedsym:CLASS_LET_BINDING */ - if (NULL == /*_._VALDATA___V955*/ meltfptr[954]) + if (NULL == /*_._VALDATA___V958*/ meltfptr[957]) { #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___V955*/ meltfptr[954] = + /*_._VALDATA___V958*/ meltfptr[957] = (melt_ptr_t) meltsy_CLASS_LET_BINDING; } /*endgetnamedsym CLASS_LET_BINDING */ @@ -21988,42 +21975,42 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CTYPE_CSTRING */ - if (NULL == /*_._VALDATA___V957*/ meltfptr[956]) + if (NULL == /*_._VALDATA___V960*/ meltfptr[959]) { #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___V957*/ meltfptr[956] = (melt_ptr_t) meltsy_CTYPE_CSTRING; + /*_._VALDATA___V960*/ meltfptr[959] = (melt_ptr_t) meltsy_CTYPE_CSTRING; } /*endgetnamedsym CTYPE_CSTRING */ /*^getnamedsymbol */ /*getnamedsym:AUTOBOXSTRING */ - if (NULL == /*_._VALDATA___V940*/ meltfptr[939]) + if (NULL == /*_._VALDATA___V943*/ meltfptr[942]) { #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___V940*/ meltfptr[939] = (melt_ptr_t) meltsy_AUTOBOXSTRING; + /*_._VALDATA___V943*/ meltfptr[942] = (melt_ptr_t) meltsy_AUTOBOXSTRING; } /*endgetnamedsym AUTOBOXSTRING */ /*^getnamedsymbol */ /*getnamedsym:CLASS_CTYPE_GTY */ - if (NULL == /*_._VALDATA___V959*/ meltfptr[958]) + if (NULL == /*_._VALDATA___V962*/ meltfptr[961]) { #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___V959*/ meltfptr[958] = + /*_._VALDATA___V962*/ meltfptr[961] = (melt_ptr_t) meltsy_CLASS_CTYPE_GTY; } /*endgetnamedsym CLASS_CTYPE_GTY */ @@ -22031,14 +22018,14 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:AUTOBOXGTY */ - if (NULL == /*_._VALDATA___V942*/ meltfptr[941]) + if (NULL == /*_._VALDATA___V945*/ meltfptr[944]) { #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___V942*/ meltfptr[941] = (melt_ptr_t) meltsy_AUTOBOXGTY; + /*_._VALDATA___V945*/ meltfptr[944] = (melt_ptr_t) meltsy_AUTOBOXGTY; } /*endgetnamedsym AUTOBOXGTY */ @@ -22048,14 +22035,14 @@ melt_start_this_module (void *modargp_) melt_ptr_t kw_TRUE = melthookproc_HOOK_NAMED_KEYWORD ("TRUE", (long) MELT_GET); if (kw_TRUE) - /*_._VALDATA___V963*/ - meltfptr[962] = (melt_ptr_t) kw_TRUE; + /*_._VALDATA___V966*/ + meltfptr[965] = (melt_ptr_t) kw_TRUE; } /*^getnamedsymbol */ /*getnamedsym:CREATE_NORMAL_EXTENDING_CONTEXT */ - if (NULL == /*_._VALDATA___V974*/ meltfptr[973]) + if (NULL == /*_._VALDATA___V977*/ meltfptr[976]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CREATE_NORMAL_EXTENDING_CONTEXT without initial environment @@ -22063,7 +22050,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___V974*/ meltfptr[973] = + /*_._VALDATA___V977*/ meltfptr[976] = (melt_ptr_t) meltsy_CREATE_NORMAL_EXTENDING_CONTEXT; } /*endgetnamedsym CREATE_NORMAL_EXTENDING_CONTEXT */ @@ -22071,21 +22058,21 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_SEXPR */ - if (NULL == /*_._VALDATA___V976*/ meltfptr[975]) + if (NULL == /*_._VALDATA___V979*/ meltfptr[978]) { #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___V976*/ meltfptr[975] = (melt_ptr_t) meltsy_CLASS_SEXPR; + /*_._VALDATA___V979*/ meltfptr[978] = (melt_ptr_t) meltsy_CLASS_SEXPR; } /*endgetnamedsym CLASS_SEXPR */ /*^getnamedsymbol */ /*getnamedsym:COMPILE2OBJ_INITEXTENDPROC */ - if (NULL == /*_._VALDATA___V978*/ meltfptr[977]) + if (NULL == /*_._VALDATA___V981*/ meltfptr[980]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol COMPILE2OBJ_INITEXTENDPROC without initial environment @@ -22093,7 +22080,7 @@ melt_start_this_module (void *modargp_) melt_ptr_t meltsy_COMPILE2OBJ_INITEXTENDPROC = melthookproc_HOOK_NAMED_SYMBOL ("COMPILE2OBJ_INITEXTENDPROC", (long) MELT_GET); - /*_._VALDATA___V978*/ meltfptr[977] = + /*_._VALDATA___V981*/ meltfptr[980] = (melt_ptr_t) meltsy_COMPILE2OBJ_INITEXTENDPROC; } /*endgetnamedsym COMPILE2OBJ_INITEXTENDPROC */ @@ -22101,7 +22088,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:CLASS_LITERAL_VALUE */ - if (NULL == /*_._VALDATA___V980*/ meltfptr[979]) + if (NULL == /*_._VALDATA___V983*/ meltfptr[982]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol CLASS_LITERAL_VALUE without initial environment @@ -22109,7 +22096,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___V980*/ meltfptr[979] = + /*_._VALDATA___V983*/ meltfptr[982] = (melt_ptr_t) meltsy_CLASS_LITERAL_VALUE; } /*endgetnamedsym CLASS_LITERAL_VALUE */ @@ -22117,14 +22104,14 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:LIST_APPEND2LIST */ - if (NULL == /*_._VALDATA___V984*/ meltfptr[983]) + if (NULL == /*_._VALDATA___V987*/ meltfptr[986]) { #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___V984*/ meltfptr[983] = + /*_._VALDATA___V987*/ meltfptr[986] = (melt_ptr_t) meltsy_LIST_APPEND2LIST; } /*endgetnamedsym LIST_APPEND2LIST */ @@ -22132,14 +22119,14 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:MULTIPLE_TO_LIST */ - if (NULL == /*_._VALDATA___V990*/ meltfptr[989]) + if (NULL == /*_._VALDATA___V993*/ meltfptr[992]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol MULTIPLE_TO_LIST without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_MULTIPLE_TO_LIST = melthookproc_HOOK_NAMED_SYMBOL ("MULTIPLE_TO_LIST", (long) MELT_GET); - /*_._VALDATA___V990*/ meltfptr[989] = + /*_._VALDATA___V993*/ meltfptr[992] = (melt_ptr_t) meltsy_MULTIPLE_TO_LIST; } /*endgetnamedsym MULTIPLE_TO_LIST */ @@ -22147,7 +22134,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:COMPILE_LIST_SEXPR */ - if (NULL == /*_._VALDATA___V994*/ meltfptr[993]) + if (NULL == /*_._VALDATA___V997*/ meltfptr[996]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol COMPILE_LIST_SEXPR without initial environment @@ -22155,7 +22142,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___V994*/ meltfptr[993] = + /*_._VALDATA___V997*/ meltfptr[996] = (melt_ptr_t) meltsy_COMPILE_LIST_SEXPR; } /*endgetnamedsym COMPILE_LIST_SEXPR */ @@ -22163,21 +22150,21 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:EVAL */ - if (NULL == /*_._VALDATA___V996*/ meltfptr[995]) + if (NULL == /*_._VALDATA___V999*/ meltfptr[998]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol EVAL without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT */ melt_ptr_t meltsy_EVAL = melthookproc_HOOK_NAMED_SYMBOL ("EVAL", (long) MELT_GET); - /*_._VALDATA___V996*/ meltfptr[995] = (melt_ptr_t) meltsy_EVAL; + /*_._VALDATA___V999*/ meltfptr[998] = (melt_ptr_t) meltsy_EVAL; } /*endgetnamedsym EVAL */ /*^getnamedsymbol */ /*getnamedsym:GENERATE_GPLV3PLUS_COPYRIGHT_NOTICE_C_COMMENT */ - if (NULL == /*_._VALDATA___V998*/ meltfptr[997]) + if (NULL == /*_._VALDATA___V1001*/ meltfptr[1000]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol GENERATE_GPLV3PLUS_COPYRIGHT_NOTICE_C_COMMENT without initial environment @@ -22185,7 +22172,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___V998*/ meltfptr[997] = + /*_._VALDATA___V1001*/ meltfptr[1000] = (melt_ptr_t) meltsy_GENERATE_GPLV3PLUS_COPYRIGHT_NOTICE_C_COMMENT; } /*endgetnamedsym GENERATE_GPLV3PLUS_COPYRIGHT_NOTICE_C_COMMENT */ @@ -22193,7 +22180,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:GET_CODE_BUFFER_LIMIT */ - if (NULL == /*_._VALDATA___V1000*/ meltfptr[999]) + if (NULL == /*_._VALDATA___V1003*/ meltfptr[1002]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol GET_CODE_BUFFER_LIMIT without initial environment @@ -22201,7 +22188,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___V1000*/ meltfptr[999] = + /*_._VALDATA___V1003*/ meltfptr[1002] = (melt_ptr_t) meltsy_GET_CODE_BUFFER_LIMIT; } /*endgetnamedsym GET_CODE_BUFFER_LIMIT */ @@ -22209,7 +22196,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:PUT_CODE_BUFFER_LIMIT */ - if (NULL == /*_._VALDATA___V1002*/ meltfptr[1001]) + if (NULL == /*_._VALDATA___V1005*/ meltfptr[1004]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol PUT_CODE_BUFFER_LIMIT without initial environment @@ -22217,7 +22204,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___V1002*/ meltfptr[1001] = + /*_._VALDATA___V1005*/ meltfptr[1004] = (melt_ptr_t) meltsy_PUT_CODE_BUFFER_LIMIT; } /*endgetnamedsym PUT_CODE_BUFFER_LIMIT */ @@ -22225,7 +22212,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:TRANSLATE_RUN_MELT_EXPRESSIONS */ - if (NULL == /*_._VALDATA___V1004*/ meltfptr[1003]) + if (NULL == /*_._VALDATA___V1007*/ meltfptr[1006]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol TRANSLATE_RUN_MELT_EXPRESSIONS without initial environment @@ -22233,7 +22220,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___V1004*/ meltfptr[1003] = + /*_._VALDATA___V1007*/ meltfptr[1006] = (melt_ptr_t) meltsy_TRANSLATE_RUN_MELT_EXPRESSIONS; } /*endgetnamedsym TRANSLATE_RUN_MELT_EXPRESSIONS */ @@ -22241,7 +22228,7 @@ melt_start_this_module (void *modargp_) /*^getnamedsymbol */ /*getnamedsym:TRANSLATE_TO_C_MODULE_MELT_SOURCES */ - if (NULL == /*_._VALDATA___V1006*/ meltfptr[1005]) + if (NULL == /*_._VALDATA___V1009*/ meltfptr[1008]) { #if !MELT_HAS_INITIAL_ENVIRONMENT #error MELT getting named symbol TRANSLATE_TO_C_MODULE_MELT_SOURCES without initial environment @@ -22249,7 +22236,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___V1006*/ meltfptr[1005] = + /*_._VALDATA___V1009*/ meltfptr[1008] = (melt_ptr_t) meltsy_TRANSLATE_TO_C_MODULE_MELT_SOURCES; } /*endgetnamedsym TRANSLATE_TO_C_MODULE_MELT_SOURCES */ @@ -22575,12 +22562,12 @@ melt_start_this_module (void *modargp_) "CLASS_NREP_ROUTPROC", "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:877:/ compute"); - /*_.CLASS_NREP_HOOKPROC__V44*/ meltfptr[43] = + /*_.CLASS_NREP_CLOSPROC__V44*/ meltfptr[43] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) (MELT_PREDEF (HOOK_SYMBOL_IMPORTER))), - "CLASS_NREP_HOOKPROC", "warmelt-outobj", + "CLASS_NREP_CLOSPROC", "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:934:/ compute"); /*_.CLASS_OBJINITSTRING__V45*/ meltfptr[44] = @@ -22786,8 +22773,16 @@ melt_start_this_module (void *modargp_) (MELT_PREDEF (HOOK_SYMBOL_IMPORTER))), "CLASS_OBJINSTR", "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); + MELT_LOCATION ("warmelt-outobj.melt:2412:/ compute"); + /*_.CLASS_NREP_HOOKPROC__V70*/ meltfptr[69] = + /*hookcall */ + melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) + ((melt_ptr_t) + (MELT_PREDEF (HOOK_SYMBOL_IMPORTER))), + "CLASS_NREP_HOOKPROC", "warmelt-outobj", + /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:2415:/ compute"); - /*_.CLASS_OBJCFORMAL__V70*/ meltfptr[69] = + /*_.CLASS_OBJCFORMAL__V71*/ meltfptr[70] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -22795,7 +22790,7 @@ melt_start_this_module (void *modargp_) "CLASS_OBJCFORMAL", "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:2848:/ compute"); - /*_.CLASS_OBJGETARG__V71*/ meltfptr[70] = + /*_.CLASS_OBJGETARG__V72*/ meltfptr[71] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -22803,7 +22798,7 @@ melt_start_this_module (void *modargp_) "CLASS_OBJGETARG", "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:2855:/ compute"); - /*_.CLASS_FORMAL_BINDING__V72*/ meltfptr[71] = + /*_.CLASS_FORMAL_BINDING__V73*/ meltfptr[72] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -22811,7 +22806,7 @@ melt_start_this_module (void *modargp_) "CLASS_FORMAL_BINDING", "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:2913:/ compute"); - /*_.CLASS_OBJGETARGREST__V73*/ meltfptr[72] = + /*_.CLASS_OBJGETARGREST__V74*/ meltfptr[73] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -22819,7 +22814,7 @@ melt_start_this_module (void *modargp_) "CLASS_OBJGETARGREST", "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:3011:/ compute"); - /*_.CLASS_OBJFETCHMODVAR__V74*/ meltfptr[73] = + /*_.CLASS_OBJFETCHMODVAR__V75*/ meltfptr[74] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -22827,7 +22822,7 @@ melt_start_this_module (void *modargp_) "CLASS_OBJFETCHMODVAR", "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:3025:/ compute"); - /*_.CLASS_OBJPUTMODVAR__V75*/ meltfptr[74] = + /*_.CLASS_OBJPUTMODVAR__V76*/ meltfptr[75] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -22835,7 +22830,7 @@ melt_start_this_module (void *modargp_) "CLASS_OBJPUTMODVAR", "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:3046:/ compute"); - /*_.CLASS_OBJPUTOUTARG__V76*/ meltfptr[75] = + /*_.CLASS_OBJPUTOUTARG__V77*/ meltfptr[76] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -22843,7 +22838,7 @@ melt_start_this_module (void *modargp_) "CLASS_OBJPUTOUTARG", "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:3084:/ compute"); - /*_.CTYPE_LONG__V77*/ meltfptr[76] = + /*_.CTYPE_LONG__V78*/ meltfptr[77] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -22851,7 +22846,7 @@ melt_start_this_module (void *modargp_) "CTYPE_LONG", "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:3102:/ compute"); - /*_.CLASS_OBJCLOCCV__V78*/ meltfptr[77] = + /*_.CLASS_OBJCLOCCV__V79*/ meltfptr[78] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -22859,7 +22854,7 @@ melt_start_this_module (void *modargp_) "CLASS_OBJCLOCCV", "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:3121:/ compute"); - /*_.CLASS_OBJCLOHOOKV__V79*/ meltfptr[78] = + /*_.CLASS_OBJCLOHOOKV__V80*/ meltfptr[79] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -22867,7 +22862,7 @@ melt_start_this_module (void *modargp_) "CLASS_OBJCLOHOOKV", "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:3140:/ compute"); - /*_.CLASS_OBJCONSTV__V80*/ meltfptr[79] = + /*_.CLASS_OBJCONSTV__V81*/ meltfptr[80] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -22875,7 +22870,7 @@ melt_start_this_module (void *modargp_) "CLASS_OBJCONSTV", "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:3167:/ compute"); - /*_.CLASS_OBJPLAINBLOCK__V81*/ meltfptr[80] = + /*_.CLASS_OBJPLAINBLOCK__V82*/ meltfptr[81] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -22883,7 +22878,7 @@ melt_start_this_module (void *modargp_) "CLASS_OBJPLAINBLOCK", "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:3193:/ compute"); - /*_.CLASS_OBJCHECKSIGNAL__V82*/ meltfptr[81] = + /*_.CLASS_OBJCHECKSIGNAL__V83*/ meltfptr[82] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -22891,7 +22886,7 @@ melt_start_this_module (void *modargp_) "CLASS_OBJCHECKSIGNAL", "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:3206:/ compute"); - /*_.CLASS_OBJANYBLOCK__V83*/ meltfptr[82] = + /*_.CLASS_OBJANYBLOCK__V84*/ meltfptr[83] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -22899,7 +22894,7 @@ melt_start_this_module (void *modargp_) "CLASS_OBJANYBLOCK", "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:3232:/ compute"); - /*_.CLASS_OBJFLAG__V84*/ meltfptr[83] = + /*_.CLASS_OBJFLAG__V85*/ meltfptr[84] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -22907,7 +22902,7 @@ melt_start_this_module (void *modargp_) "CLASS_OBJFLAG", "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:3243:/ compute"); - /*_.CLASS_OBJMATCHFLAGBLOCK__V85*/ meltfptr[84] = + /*_.CLASS_OBJMATCHFLAGBLOCK__V86*/ meltfptr[85] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -22916,7 +22911,7 @@ melt_start_this_module (void *modargp_) "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:3294:/ compute"); - /*_.CLASS_OBJMULTIALLOCBLOCK__V86*/ meltfptr[85] = + /*_.CLASS_OBJMULTIALLOCBLOCK__V87*/ meltfptr[86] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -22925,7 +22920,7 @@ melt_start_this_module (void *modargp_) "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:3305:/ compute"); - /*_.DISCR_VERBATIM_STRING__V87*/ meltfptr[86] = + /*_.DISCR_VERBATIM_STRING__V88*/ meltfptr[87] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -22933,7 +22928,7 @@ melt_start_this_module (void *modargp_) "DISCR_VERBATIM_STRING", "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:3366:/ compute"); - /*_.CLASS_OBJCITERBLOCK__V88*/ meltfptr[87] = + /*_.CLASS_OBJCITERBLOCK__V89*/ meltfptr[88] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -22941,7 +22936,7 @@ melt_start_this_module (void *modargp_) "CLASS_OBJCITERBLOCK", "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:3375:/ compute"); - /*_.CLASS_CITERATOR__V89*/ meltfptr[88] = + /*_.CLASS_CITERATOR__V90*/ meltfptr[89] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -22949,7 +22944,7 @@ melt_start_this_module (void *modargp_) "CLASS_CITERATOR", "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:3421:/ compute"); - /*_.CLASS_OBJCOMMENTINSTR__V90*/ meltfptr[89] = + /*_.CLASS_OBJCOMMENTINSTR__V91*/ meltfptr[90] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -22957,7 +22952,7 @@ melt_start_this_module (void *modargp_) "CLASS_OBJCOMMENTINSTR", "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:3442:/ compute"); - /*_.CLASS_OBJCOMMENTEDBLOCK__V91*/ meltfptr[90] = + /*_.CLASS_OBJCOMMENTEDBLOCK__V92*/ meltfptr[91] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -22966,7 +22961,7 @@ melt_start_this_module (void *modargp_) "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:3482:/ compute"); - /*_.CLASS_OBJLABELINSTR__V92*/ meltfptr[91] = + /*_.CLASS_OBJLABELINSTR__V93*/ meltfptr[92] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -22974,7 +22969,7 @@ melt_start_this_module (void *modargp_) "CLASS_OBJLABELINSTR", "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:3489:/ compute"); - /*_.SET_CONTENT__V93*/ meltfptr[92] = + /*_.SET_CONTENT__V94*/ meltfptr[93] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -22982,7 +22977,7 @@ melt_start_this_module (void *modargp_) "SET_CONTENT", "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:3493:/ compute"); - /*_.STRING4OUT__V94*/ meltfptr[93] = + /*_.STRING4OUT__V95*/ meltfptr[94] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -22990,7 +22985,7 @@ melt_start_this_module (void *modargp_) "STRING4OUT", "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:3516:/ compute"); - /*_.CLASS_OBJGOTOINSTR__V95*/ meltfptr[94] = + /*_.CLASS_OBJGOTOINSTR__V96*/ meltfptr[95] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -22998,7 +22993,7 @@ melt_start_this_module (void *modargp_) "CLASS_OBJGOTOINSTR", "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:3546:/ compute"); - /*_.CLASS_OBJLOOP__V96*/ meltfptr[95] = + /*_.CLASS_OBJLOOP__V97*/ meltfptr[96] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -23006,7 +23001,7 @@ melt_start_this_module (void *modargp_) "CLASS_OBJLOOP", "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:3605:/ compute"); - /*_.CLASS_OBJEXIT__V97*/ meltfptr[96] = + /*_.CLASS_OBJEXIT__V98*/ meltfptr[97] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -23014,7 +23009,7 @@ melt_start_this_module (void *modargp_) "CLASS_OBJEXIT", "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:3625:/ compute"); - /*_.CLASS_OBJAGAIN__V98*/ meltfptr[97] = + /*_.CLASS_OBJAGAIN__V99*/ meltfptr[98] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -23022,7 +23017,7 @@ melt_start_this_module (void *modargp_) "CLASS_OBJAGAIN", "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:3644:/ compute"); - /*_.CLASS_OBJCOMPUTE__V99*/ meltfptr[98] = + /*_.CLASS_OBJCOMPUTE__V100*/ meltfptr[99] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -23030,7 +23025,7 @@ melt_start_this_module (void *modargp_) "CLASS_OBJCOMPUTE", "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:3671:/ compute"); - /*_.MULTIPLE_EVERY__V100*/ meltfptr[99] = + /*_.MULTIPLE_EVERY__V101*/ meltfptr[100] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -23038,7 +23033,7 @@ melt_start_this_module (void *modargp_) "MULTIPLE_EVERY", "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:3690:/ compute"); - /*_.CLASS_OBJCOND__V101*/ meltfptr[100] = + /*_.CLASS_OBJCOND__V102*/ meltfptr[101] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -23046,7 +23041,7 @@ melt_start_this_module (void *modargp_) "CLASS_OBJCOND", "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:3732:/ compute"); - /*_.CLASS_OBJCPPIF__V102*/ meltfptr[101] = + /*_.CLASS_OBJCPPIF__V103*/ meltfptr[102] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -23054,7 +23049,7 @@ melt_start_this_module (void *modargp_) "CLASS_OBJCPPIF", "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:3765:/ compute"); - /*_.CLASS_OBJINTERNSYMBOL__V103*/ meltfptr[102] = + /*_.CLASS_OBJINTERNSYMBOL__V104*/ meltfptr[103] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -23062,7 +23057,7 @@ melt_start_this_module (void *modargp_) "CLASS_OBJINTERNSYMBOL", "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:3772:/ compute"); - /*_.CLASS_NREP_DATASYMBOL__V104*/ meltfptr[103] = + /*_.CLASS_NREP_DATASYMBOL__V105*/ meltfptr[104] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -23070,7 +23065,7 @@ melt_start_this_module (void *modargp_) "CLASS_NREP_DATASYMBOL", "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:3790:/ compute"); - /*_.CLASS_OBJINTERNKEYWORD__V105*/ meltfptr[104] = + /*_.CLASS_OBJINTERNKEYWORD__V106*/ meltfptr[105] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -23078,7 +23073,7 @@ melt_start_this_module (void *modargp_) "CLASS_OBJINTERNKEYWORD", "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:3796:/ compute"); - /*_.CLASS_NREP_DATAKEYWORD__V106*/ meltfptr[105] = + /*_.CLASS_NREP_DATAKEYWORD__V107*/ meltfptr[106] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -23086,7 +23081,7 @@ melt_start_this_module (void *modargp_) "CLASS_NREP_DATAKEYWORD", "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:3814:/ compute"); - /*_.CLASS_OBJGETNAMEDSYMBOL__V107*/ meltfptr[106] = + /*_.CLASS_OBJGETNAMEDSYMBOL__V108*/ meltfptr[107] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -23095,7 +23090,7 @@ melt_start_this_module (void *modargp_) "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:3865:/ compute"); - /*_.CLASS_OBJGETNAMEDKEYWORD__V108*/ meltfptr[107] = + /*_.CLASS_OBJGETNAMEDKEYWORD__V109*/ meltfptr[108] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -23104,7 +23099,7 @@ melt_start_this_module (void *modargp_) "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:3901:/ compute"); - /*_.CLASS_OBJAPPLY__V109*/ meltfptr[108] = + /*_.CLASS_OBJAPPLY__V110*/ meltfptr[109] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -23112,7 +23107,7 @@ melt_start_this_module (void *modargp_) "CLASS_OBJAPPLY", "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:3928:/ compute"); - /*_.GET_CTYPE__V110*/ meltfptr[109] = + /*_.GET_CTYPE__V111*/ meltfptr[110] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -23120,7 +23115,7 @@ melt_start_this_module (void *modargp_) "GET_CTYPE", "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:3998:/ compute"); - /*_.CLASS_OBJMSEND__V111*/ meltfptr[110] = + /*_.CLASS_OBJMSEND__V112*/ meltfptr[111] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -23128,7 +23123,7 @@ melt_start_this_module (void *modargp_) "CLASS_OBJMSEND", "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:4096:/ compute"); - /*_.CLASS_OBJMULTIAPPLY__V112*/ meltfptr[111] = + /*_.CLASS_OBJMULTIAPPLY__V113*/ meltfptr[112] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -23136,7 +23131,7 @@ melt_start_this_module (void *modargp_) "CLASS_OBJMULTIAPPLY", "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:4261:/ compute"); - /*_.CLASS_OBJMULTIMSEND__V113*/ meltfptr[112] = + /*_.CLASS_OBJMULTIMSEND__V114*/ meltfptr[113] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -23144,7 +23139,7 @@ melt_start_this_module (void *modargp_) "CLASS_OBJMULTIMSEND", "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:4416:/ compute"); - /*_.CLASS_OBJCLEAR__V114*/ meltfptr[113] = + /*_.CLASS_OBJCLEAR__V115*/ meltfptr[114] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -23152,7 +23147,7 @@ melt_start_this_module (void *modargp_) "CLASS_OBJCLEAR", "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:4432:/ compute"); - /*_.CLASS_OBJRAWALLOCOBJ__V115*/ meltfptr[114] = + /*_.CLASS_OBJRAWALLOCOBJ__V116*/ meltfptr[115] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -23160,7 +23155,7 @@ melt_start_this_module (void *modargp_) "CLASS_OBJRAWALLOCOBJ", "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:4470:/ compute"); - /*_.CLASS_OBJNEWCLOSURE__V116*/ meltfptr[115] = + /*_.CLASS_OBJNEWCLOSURE__V117*/ meltfptr[116] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -23168,7 +23163,7 @@ melt_start_this_module (void *modargp_) "CLASS_OBJNEWCLOSURE", "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:4503:/ compute"); - /*_.CLASS_OBJTOUCH__V117*/ meltfptr[116] = + /*_.CLASS_OBJTOUCH__V118*/ meltfptr[117] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -23176,7 +23171,7 @@ melt_start_this_module (void *modargp_) "CLASS_OBJTOUCH", "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:4528:/ compute"); - /*_.CLASS_OBJDBGTRACEWRITEOBJ__V118*/ meltfptr[117] = + /*_.CLASS_OBJDBGTRACEWRITEOBJ__V119*/ meltfptr[118] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -23185,7 +23180,7 @@ melt_start_this_module (void *modargp_) "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:4548:/ compute"); - /*_.CLASS_OBJPUTUPLE__V119*/ meltfptr[118] = + /*_.CLASS_OBJPUTUPLE__V120*/ meltfptr[119] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -23193,7 +23188,7 @@ melt_start_this_module (void *modargp_) "CLASS_OBJPUTUPLE", "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:4624:/ compute"); - /*_.CLASS_OBJPUTPAIR__V120*/ meltfptr[119] = + /*_.CLASS_OBJPUTPAIR__V121*/ meltfptr[120] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -23201,7 +23196,7 @@ melt_start_this_module (void *modargp_) "CLASS_OBJPUTPAIR", "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:4625:/ compute"); - /*_.CLASS_OBJPUTPAIRHEAD__V121*/ meltfptr[120] = + /*_.CLASS_OBJPUTPAIRHEAD__V122*/ meltfptr[121] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -23209,7 +23204,7 @@ melt_start_this_module (void *modargp_) "CLASS_OBJPUTPAIRHEAD", "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:4654:/ compute"); - /*_.CLASS_OBJPUTPAIRTAIL__V122*/ meltfptr[121] = + /*_.CLASS_OBJPUTPAIRTAIL__V123*/ meltfptr[122] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -23217,7 +23212,7 @@ melt_start_this_module (void *modargp_) "CLASS_OBJPUTPAIRTAIL", "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:4679:/ compute"); - /*_.CLASS_OBJPUTLIST__V123*/ meltfptr[122] = + /*_.CLASS_OBJPUTLIST__V124*/ meltfptr[123] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -23225,7 +23220,7 @@ melt_start_this_module (void *modargp_) "CLASS_OBJPUTLIST", "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:4709:/ compute"); - /*_.CLASS_OBJGETSLOT__V124*/ meltfptr[123] = + /*_.CLASS_OBJGETSLOT__V125*/ meltfptr[124] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -23233,7 +23228,7 @@ melt_start_this_module (void *modargp_) "CLASS_OBJGETSLOT", "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:4716:/ compute"); - /*_.CLASS_FIELD__V125*/ meltfptr[124] = + /*_.CLASS_FIELD__V126*/ meltfptr[125] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -23241,7 +23236,7 @@ melt_start_this_module (void *modargp_) "CLASS_FIELD", "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:4749:/ compute"); - /*_.CLASS_OBJPUTSLOT__V126*/ meltfptr[125] = + /*_.CLASS_OBJPUTSLOT__V127*/ meltfptr[126] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -23249,7 +23244,7 @@ melt_start_this_module (void *modargp_) "CLASS_OBJPUTSLOT", "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:4824:/ compute"); - /*_.CLASS_OBJPUTCLOSUROUT__V127*/ meltfptr[126] = + /*_.CLASS_OBJPUTCLOSUROUT__V128*/ meltfptr[127] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -23257,7 +23252,7 @@ melt_start_this_module (void *modargp_) "CLASS_OBJPUTCLOSUROUT", "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:4868:/ compute"); - /*_.CLASS_OBJPUTCLOSEDV__V128*/ meltfptr[127] = + /*_.CLASS_OBJPUTCLOSEDV__V129*/ meltfptr[128] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -23265,7 +23260,7 @@ melt_start_this_module (void *modargp_) "CLASS_OBJPUTCLOSEDV", "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:4904:/ compute"); - /*_.CLASS_OBJPUTCLOSEDNOTNULLV__V129*/ meltfptr[128] = + /*_.CLASS_OBJPUTCLOSEDNOTNULLV__V130*/ meltfptr[129] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -23274,7 +23269,7 @@ melt_start_this_module (void *modargp_) "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:4944:/ compute"); - /*_.CLASS_OBJPUTROUTCONST__V130*/ meltfptr[129] = + /*_.CLASS_OBJPUTROUTCONST__V131*/ meltfptr[130] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -23282,7 +23277,7 @@ melt_start_this_module (void *modargp_) "CLASS_OBJPUTROUTCONST", "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:4983:/ compute"); - /*_.CLASS_OBJPUTROUTCONSTNOTNULL__V131*/ meltfptr[130] = + /*_.CLASS_OBJPUTROUTCONSTNOTNULL__V132*/ meltfptr[131] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -23291,7 +23286,7 @@ melt_start_this_module (void *modargp_) "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:5017:/ compute"); - /*_.CLASS_OBJPUTHOOKCONST__V132*/ meltfptr[131] = + /*_.CLASS_OBJPUTHOOKCONST__V133*/ meltfptr[132] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -23299,7 +23294,7 @@ melt_start_this_module (void *modargp_) "CLASS_OBJPUTHOOKCONST", "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:5023:/ compute"); - /*_.CLASS_NREP_BOUND_DATA__V133*/ meltfptr[132] = + /*_.CLASS_NREP_BOUND_DATA__V134*/ meltfptr[133] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -23307,7 +23302,7 @@ melt_start_this_module (void *modargp_) "CLASS_NREP_BOUND_DATA", "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:5057:/ compute"); - /*_.CLASS_OBJPUTHOOKDATA__V134*/ meltfptr[133] = + /*_.CLASS_OBJPUTHOOKDATA__V135*/ meltfptr[134] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -23315,7 +23310,7 @@ melt_start_this_module (void *modargp_) "CLASS_OBJPUTHOOKDATA", "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:5085:/ compute"); - /*_.CLASS_OBJPUTXTRARESULT__V135*/ meltfptr[134] = + /*_.CLASS_OBJPUTXTRARESULT__V136*/ meltfptr[135] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -23323,7 +23318,7 @@ melt_start_this_module (void *modargp_) "CLASS_OBJPUTXTRARESULT", "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:5126:/ compute"); - /*_.CLASS_OBJEXPV__V136*/ meltfptr[135] = + /*_.CLASS_OBJEXPV__V137*/ meltfptr[136] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -23331,7 +23326,7 @@ melt_start_this_module (void *modargp_) "CLASS_OBJEXPV", "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:5143:/ compute"); - /*_.CLASS_OBJLOCATEDEXPV__V137*/ meltfptr[136] = + /*_.CLASS_OBJLOCATEDEXPV__V138*/ meltfptr[137] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -23339,7 +23334,7 @@ melt_start_this_module (void *modargp_) "CLASS_OBJLOCATEDEXPV", "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:5214:/ compute"); - /*_.CLASS_OBJFINALRETURN__V138*/ meltfptr[137] = + /*_.CLASS_OBJFINALRETURN__V139*/ meltfptr[138] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -23347,7 +23342,7 @@ melt_start_this_module (void *modargp_) "CLASS_OBJFINALRETURN", "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:5239:/ compute"); - /*_.COMPARE_NAMED_ALPHA__V139*/ meltfptr[138] = + /*_.COMPARE_NAMED_ALPHA__V140*/ meltfptr[139] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -23355,7 +23350,7 @@ melt_start_this_module (void *modargp_) "COMPARE_NAMED_ALPHA", "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:5244:/ compute"); - /*_.CLASS_ANY_MODULE_CONTEXT__V140*/ meltfptr[139] = + /*_.CLASS_ANY_MODULE_CONTEXT__V141*/ meltfptr[140] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -23364,7 +23359,7 @@ melt_start_this_module (void *modargp_) "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:5382:/ compute"); - /*_.CLASS_RUNNING_EXTENSION_MODULE_CONTEXT__V141*/ meltfptr[140] = + /*_.CLASS_RUNNING_EXTENSION_MODULE_CONTEXT__V142*/ meltfptr[141] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -23373,7 +23368,7 @@ melt_start_this_module (void *modargp_) "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:5772:/ compute"); - /*_.CLASS_SELECTOR__V142*/ meltfptr[141] = + /*_.CLASS_SELECTOR__V143*/ meltfptr[142] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -23381,7 +23376,7 @@ melt_start_this_module (void *modargp_) "CLASS_SELECTOR", "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:5784:/ compute"); - /*_.CLASS_LOCATED__V143*/ meltfptr[142] = + /*_.CLASS_LOCATED__V144*/ meltfptr[143] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -23389,7 +23384,7 @@ melt_start_this_module (void *modargp_) "CLASS_LOCATED", "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:5792:/ compute"); - /*_.CLASS_SOURCE_GENERATOR_DEVICE__V144*/ meltfptr[143] = + /*_.CLASS_SOURCE_GENERATOR_DEVICE__V145*/ meltfptr[144] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -23398,7 +23393,7 @@ melt_start_this_module (void *modargp_) "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:5853:/ compute"); - /*_.CLASS_PRIMITIVE__V145*/ meltfptr[144] = + /*_.CLASS_PRIMITIVE__V146*/ meltfptr[145] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -23406,7 +23401,7 @@ melt_start_this_module (void *modargp_) "CLASS_PRIMITIVE", "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:5862:/ compute"); - /*_.CLASS_SOURCE_DEFPRIMITIVE__V146*/ meltfptr[145] = + /*_.CLASS_SOURCE_DEFPRIMITIVE__V147*/ meltfptr[146] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -23415,7 +23410,7 @@ melt_start_this_module (void *modargp_) "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:5865:/ compute"); - /*_.DISCR_MAP_OBJECTS__V147*/ meltfptr[146] = + /*_.DISCR_MAP_OBJECTS__V148*/ meltfptr[147] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -23423,7 +23418,7 @@ melt_start_this_module (void *modargp_) "DISCR_MAP_OBJECTS", "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:5932:/ compute"); - /*_.CLASS_SOURCE_DEFCITERATOR__V148*/ meltfptr[147] = + /*_.CLASS_SOURCE_DEFCITERATOR__V149*/ meltfptr[148] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -23432,7 +23427,7 @@ melt_start_this_module (void *modargp_) "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:5981:/ compute"); - /*_.CLASS_CMATCHER__V149*/ meltfptr[148] = + /*_.CLASS_CMATCHER__V150*/ meltfptr[149] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -23440,7 +23435,7 @@ melt_start_this_module (void *modargp_) "CLASS_CMATCHER", "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:5989:/ compute"); - /*_.CLASS_ANY_MATCHER__V150*/ meltfptr[149] = + /*_.CLASS_ANY_MATCHER__V151*/ meltfptr[150] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -23448,7 +23443,7 @@ melt_start_this_module (void *modargp_) "CLASS_ANY_MATCHER", "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:5996:/ compute"); - /*_.CLASS_SOURCE_DEFCMATCHER__V151*/ meltfptr[150] = + /*_.CLASS_SOURCE_DEFCMATCHER__V152*/ meltfptr[151] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -23457,7 +23452,7 @@ melt_start_this_module (void *modargp_) "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:6140:/ compute"); - /*_.CLASS_NORMALIZATION_CONTEXT__V152*/ meltfptr[151] = + /*_.CLASS_NORMALIZATION_CONTEXT__V153*/ meltfptr[152] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -23466,7 +23461,7 @@ melt_start_this_module (void *modargp_) "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:6141:/ compute"); - /*_.CLASS_ENVIRONMENT__V153*/ meltfptr[152] = + /*_.CLASS_ENVIRONMENT__V154*/ meltfptr[153] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -23474,7 +23469,7 @@ melt_start_this_module (void *modargp_) "CLASS_ENVIRONMENT", "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:6148:/ compute"); - /*_.CLASS_SOURCE__V154*/ meltfptr[153] = + /*_.CLASS_SOURCE__V155*/ meltfptr[154] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -23482,8 +23477,8 @@ melt_start_this_module (void *modargp_) "CLASS_SOURCE", "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:6153:/ compute"); - /*_.CLASS_SOURCE_UPDATE_CURRENT_MODULE_ENVIRONMENT_REFERENCE__V155*/ - meltfptr[154] = + /*_.CLASS_SOURCE_UPDATE_CURRENT_MODULE_ENVIRONMENT_REFERENCE__V156*/ + meltfptr[155] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -23492,7 +23487,7 @@ melt_start_this_module (void *modargp_) "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:6177:/ compute"); - /*_.CLASS_SOURCE_COMMENT__V156*/ meltfptr[155] = + /*_.CLASS_SOURCE_COMMENT__V157*/ meltfptr[156] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -23500,7 +23495,7 @@ melt_start_this_module (void *modargp_) "CLASS_SOURCE_COMMENT", "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:6199:/ compute"); - /*_.NORMAL_EXP__V157*/ meltfptr[156] = + /*_.NORMAL_EXP__V158*/ meltfptr[157] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -23508,7 +23503,7 @@ melt_start_this_module (void *modargp_) "NORMAL_EXP", "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:6202:/ compute"); - /*_.CLASS_NREP_ANYPROC__V158*/ meltfptr[157] = + /*_.CLASS_NREP_ANYPROC__V159*/ meltfptr[158] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -23516,7 +23511,7 @@ melt_start_this_module (void *modargp_) "CLASS_NREP_ANYPROC", "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:6203:/ compute"); - /*_.WRAP_NORMAL_LET1__V159*/ meltfptr[158] = + /*_.WRAP_NORMAL_LET1__V160*/ meltfptr[159] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -23524,7 +23519,7 @@ melt_start_this_module (void *modargp_) "WRAP_NORMAL_LET1", "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:6212:/ compute"); - /*_.CLASS_NREP_INITPROC__V160*/ meltfptr[159] = + /*_.CLASS_NREP_INITPROC__V161*/ meltfptr[160] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -23532,7 +23527,7 @@ melt_start_this_module (void *modargp_) "CLASS_NREP_INITPROC", "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:6237:/ compute"); - /*_.CLASS_NREP_DATAHOOK__V161*/ meltfptr[160] = + /*_.CLASS_NREP_DATAHOOK__V162*/ meltfptr[161] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -23540,7 +23535,7 @@ melt_start_this_module (void *modargp_) "CLASS_NREP_DATAHOOK", "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:6457:/ compute"); - /*_.COMPILE2OBJ_HOOK__V162*/ meltfptr[161] = + /*_.COMPILE2OBJ_HOOK__V163*/ meltfptr[162] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -23548,7 +23543,7 @@ melt_start_this_module (void *modargp_) "COMPILE2OBJ_HOOK", "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:6466:/ compute"); - /*_.COMPILE2OBJ_PROCEDURE__V163*/ meltfptr[162] = + /*_.COMPILE2OBJ_PROCEDURE__V164*/ meltfptr[163] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -23556,7 +23551,7 @@ melt_start_this_module (void *modargp_) "COMPILE2OBJ_PROCEDURE", "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:6510:/ compute"); - /*_.NORMAL_IMPORT__V164*/ meltfptr[163] = + /*_.NORMAL_IMPORT__V165*/ meltfptr[164] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -23564,7 +23559,7 @@ melt_start_this_module (void *modargp_) "NORMAL_IMPORT", "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:6689:/ compute"); - /*_.CLASS_HOOK_DESCRIPTOR__V165*/ meltfptr[164] = + /*_.CLASS_HOOK_DESCRIPTOR__V166*/ meltfptr[165] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -23572,7 +23567,7 @@ melt_start_this_module (void *modargp_) "CLASS_HOOK_DESCRIPTOR", "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:6702:/ compute"); - /*_.SYMBOL_CNAME__V166*/ meltfptr[165] = + /*_.SYMBOL_CNAME__V167*/ meltfptr[166] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -23580,7 +23575,7 @@ melt_start_this_module (void *modargp_) "SYMBOL_CNAME", "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:6728:/ compute"); - /*_.CLASS_SOURCE_CHEADER__V167*/ meltfptr[166] = + /*_.CLASS_SOURCE_CHEADER__V168*/ meltfptr[167] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -23588,7 +23583,7 @@ melt_start_this_module (void *modargp_) "CLASS_SOURCE_CHEADER", "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:6731:/ compute"); - /*_.CLASS_SOURCE_CODE_STRING__V168*/ meltfptr[167] = + /*_.CLASS_SOURCE_CODE_STRING__V169*/ meltfptr[168] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -23597,7 +23592,7 @@ melt_start_this_module (void *modargp_) "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:6751:/ compute"); - /*_.CLASS_SOURCE_CIMPLEMENT__V169*/ meltfptr[168] = + /*_.CLASS_SOURCE_CIMPLEMENT__V170*/ meltfptr[169] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -23606,7 +23601,7 @@ melt_start_this_module (void *modargp_) "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:6984:/ compute"); - /*_.CLASS_MODULE_CONTEXT__V170*/ meltfptr[169] = + /*_.CLASS_MODULE_CONTEXT__V171*/ meltfptr[170] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -23614,7 +23609,7 @@ melt_start_this_module (void *modargp_) "CLASS_MODULE_CONTEXT", "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:6986:/ compute"); - /*_.DISCR_MAP_STRINGS__V171*/ meltfptr[170] = + /*_.DISCR_MAP_STRINGS__V172*/ meltfptr[171] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -23622,7 +23617,7 @@ melt_start_this_module (void *modargp_) "DISCR_MAP_STRINGS", "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:7002:/ compute"); - /*_.CREATE_NORMCONTEXT__V172*/ meltfptr[171] = + /*_.CREATE_NORMCONTEXT__V173*/ meltfptr[172] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -23630,7 +23625,7 @@ melt_start_this_module (void *modargp_) "CREATE_NORMCONTEXT", "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:7017:/ compute"); - /*_.INITIAL_ENVIRONMENT__V173*/ meltfptr[172] = + /*_.INITIAL_ENVIRONMENT__V174*/ meltfptr[173] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -23638,7 +23633,7 @@ melt_start_this_module (void *modargp_) "INITIAL_ENVIRONMENT", "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:7020:/ compute"); - /*_.MACROEXPAND_TOPLEVEL_LIST__V174*/ meltfptr[173] = + /*_.MACROEXPAND_TOPLEVEL_LIST__V175*/ meltfptr[174] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -23647,7 +23642,7 @@ melt_start_this_module (void *modargp_) "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); /*^compute */ - /*_.MACROEXPAND_1__V175*/ meltfptr[174] = + /*_.MACROEXPAND_1__V176*/ meltfptr[175] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -23655,7 +23650,7 @@ melt_start_this_module (void *modargp_) "MACROEXPAND_1", "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:7032:/ compute"); - /*_.COMPILE2OBJ_INITPROC__V176*/ meltfptr[175] = + /*_.COMPILE2OBJ_INITPROC__V177*/ meltfptr[176] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -23663,7 +23658,7 @@ melt_start_this_module (void *modargp_) "COMPILE2OBJ_INITPROC", "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:7059:/ compute"); - /*_.CLONE_SYMBOL__V177*/ meltfptr[176] = + /*_.CLONE_SYMBOL__V178*/ meltfptr[177] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -23671,7 +23666,7 @@ melt_start_this_module (void *modargp_) "CLONE_SYMBOL", "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:7060:/ compute"); - /*_.CLASS_NORMAL_LET_BINDING__V178*/ meltfptr[177] = + /*_.CLASS_NORMAL_LET_BINDING__V179*/ meltfptr[178] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -23680,7 +23675,7 @@ melt_start_this_module (void *modargp_) "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:7066:/ compute"); - /*_.CLASS_NREP_LOCSYMOCC__V179*/ meltfptr[178] = + /*_.CLASS_NREP_LOCSYMOCC__V180*/ meltfptr[179] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -23688,7 +23683,7 @@ melt_start_this_module (void *modargp_) "CLASS_NREP_LOCSYMOCC", "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:7075:/ compute"); - /*_.CLASS_NREP_RETURN__V180*/ meltfptr[179] = + /*_.CLASS_NREP_RETURN__V181*/ meltfptr[180] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -23696,7 +23691,7 @@ melt_start_this_module (void *modargp_) "CLASS_NREP_RETURN", "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:7085:/ compute"); - /*_.CLASS_NREP_CHUNK__V181*/ meltfptr[180] = + /*_.CLASS_NREP_CHUNK__V182*/ meltfptr[181] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -23704,7 +23699,7 @@ melt_start_this_module (void *modargp_) "CLASS_NREP_CHUNK", "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:7103:/ compute"); - /*_.CLASS_LET_BINDING__V182*/ meltfptr[181] = + /*_.CLASS_LET_BINDING__V183*/ meltfptr[182] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -23712,7 +23707,7 @@ melt_start_this_module (void *modargp_) "CLASS_LET_BINDING", "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:7109:/ compute"); - /*_.CTYPE_CSTRING__V183*/ meltfptr[182] = + /*_.CTYPE_CSTRING__V184*/ meltfptr[183] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -23720,7 +23715,7 @@ melt_start_this_module (void *modargp_) "CTYPE_CSTRING", "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:7134:/ compute"); - /*_.CLASS_CTYPE_GTY__V184*/ meltfptr[183] = + /*_.CLASS_CTYPE_GTY__V185*/ meltfptr[184] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -23728,7 +23723,7 @@ melt_start_this_module (void *modargp_) "CLASS_CTYPE_GTY", "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:7262:/ compute"); - /*_.CREATE_NORMAL_EXTENDING_CONTEXT__V185*/ meltfptr[184] = + /*_.CREATE_NORMAL_EXTENDING_CONTEXT__V186*/ meltfptr[185] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -23737,7 +23732,7 @@ melt_start_this_module (void *modargp_) "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:7271:/ compute"); - /*_.CLASS_SEXPR__V186*/ meltfptr[185] = + /*_.CLASS_SEXPR__V187*/ meltfptr[186] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -23745,7 +23740,7 @@ melt_start_this_module (void *modargp_) "CLASS_SEXPR", "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:7419:/ compute"); - /*_.COMPILE2OBJ_INITEXTENDPROC__V187*/ meltfptr[186] = + /*_.COMPILE2OBJ_INITEXTENDPROC__V188*/ meltfptr[187] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -23754,7 +23749,7 @@ melt_start_this_module (void *modargp_) "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:7448:/ compute"); - /*_.CLASS_LITERAL_VALUE__V188*/ meltfptr[187] = + /*_.CLASS_LITERAL_VALUE__V189*/ meltfptr[188] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -23762,7 +23757,7 @@ melt_start_this_module (void *modargp_) "CLASS_LITERAL_VALUE", "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:7479:/ compute"); - /*_.LIST_APPEND2LIST__V189*/ meltfptr[188] = + /*_.LIST_APPEND2LIST__V190*/ meltfptr[189] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -23770,7 +23765,7 @@ melt_start_this_module (void *modargp_) "LIST_APPEND2LIST", "warmelt-outobj", /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:7570:/ compute"); - /*_.MULTIPLE_TO_LIST__V190*/ meltfptr[189] = + /*_.MULTIPLE_TO_LIST__V191*/ meltfptr[190] = /*hookcall */ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t) @@ -23857,7 +23852,7 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_0 (meltinitial_frame_t * /*putslot */ melt_assertmsg ("checkobj putslot ~dsym_1__HOOK_FRESH_ENVIRONMENT_REFERENCE_MAKER @#1", - melt_magic_discr ((melt_ptr_t) ( /*_._VALDATA___V191*/ meltfptr[190])) == + melt_magic_discr ((melt_ptr_t) ( /*_._VALDATA___V192*/ meltfptr[191])) == MELTOBMAG_OBJECT); melt_assertmsg @@ -23865,62 +23860,62 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_0 (meltinitial_frame_t * (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V191*/ meltfptr[190])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V191*/ meltfptr[190]))->obj_vartab[1] = + ( /*_._VALDATA___V192*/ meltfptr[191])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V192*/ meltfptr[191]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V192*/ meltfptr[191]); + /*_._VALSTR___V193*/ meltfptr[192]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V191*/ meltfptr[190]); + meltgc_touch ( /*_._VALDATA___V192*/ meltfptr[191]); - melt_dbgtrace_written_object ( /*_._VALDATA___V191*/ meltfptr[190], + melt_dbgtrace_written_object ( /*_._VALDATA___V192*/ meltfptr[191], "new static instance"); /*putslot */ melt_assertmsg ("checkobj putslot ~dsym_3__BUFFER_LIMIT_CONT @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V193*/ meltfptr[192])) == + ( /*_._VALDATA___V194*/ meltfptr[193])) == MELTOBMAG_OBJECT); melt_assertmsg ("checkoff putslot ~dsym_3__BUFFER_LIMIT_CONT @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V193*/ - meltfptr[192])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V193*/ meltfptr[192]))->obj_vartab[1] = + ( /*_._VALDATA___V194*/ + meltfptr[193])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V194*/ meltfptr[193]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V194*/ meltfptr[193]); + /*_._VALSTR___V195*/ meltfptr[194]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V193*/ meltfptr[192]); + meltgc_touch ( /*_._VALDATA___V194*/ meltfptr[193]); - melt_dbgtrace_written_object ( /*_._VALDATA___V193*/ meltfptr[192], + melt_dbgtrace_written_object ( /*_._VALDATA___V194*/ meltfptr[193], "new static instance"); /*putslot */ melt_assertmsg ("checkobj putslot ~dsym_5__CLASS_REFERENCE @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V195*/ meltfptr[194])) == + ( /*_._VALDATA___V196*/ meltfptr[195])) == MELTOBMAG_OBJECT); melt_assertmsg ("checkoff putslot ~dsym_5__CLASS_REFERENCE @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V195*/ - meltfptr[194])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V195*/ meltfptr[194]))->obj_vartab[1] = + ( /*_._VALDATA___V196*/ + meltfptr[195])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V196*/ meltfptr[195]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V196*/ meltfptr[195]); + /*_._VALSTR___V197*/ meltfptr[196]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V195*/ meltfptr[194]); + meltgc_touch ( /*_._VALDATA___V196*/ meltfptr[195]); - melt_dbgtrace_written_object ( /*_._VALDATA___V195*/ meltfptr[194], + melt_dbgtrace_written_object ( /*_._VALDATA___V196*/ meltfptr[195], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:37:/ initchunk"); @@ -23928,28 +23923,28 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_0 (meltinitial_frame_t * /*putslot */ melt_assertmsg ("checkobj putslot ~dobj_7__BUFFER_LIMIT_CONT @#0", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V197*/ meltfptr[196])) == + ( /*_._VALDATA___V198*/ meltfptr[197])) == MELTOBMAG_OBJECT); melt_assertmsg ("checkoff putslot ~dobj_7__BUFFER_LIMIT_CONT @#0", (0 >= 0 && 0 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V197*/ - meltfptr[196])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V197*/ meltfptr[196]))->obj_vartab[0] = + ( /*_._VALDATA___V198*/ + meltfptr[197])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V198*/ meltfptr[197]))->obj_vartab[0] = (melt_ptr_t) ( - /*_._VALBXINT___V198*/ meltfptr[197]); + /*_._VALBXINT___V199*/ meltfptr[198]); MELT_LOCATION ("warmelt-outobj.melt:37:/ initchunk"); /*^touch */ /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V197*/ meltfptr[196]); + meltgc_touch ( /*_._VALDATA___V198*/ meltfptr[197]); MELT_LOCATION ("warmelt-outobj.melt:37:/ initchunk"); /*^touchobj */ - melt_dbgtrace_written_object ( /*_._VALDATA___V197*/ meltfptr[196], + melt_dbgtrace_written_object ( /*_._VALDATA___V198*/ meltfptr[197], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:41:/ initchunk"); @@ -23957,12 +23952,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_0 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V199*/ meltfptr[198])) == + ( /*_._VALROUT___V200*/ meltfptr[199])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALDATA___V197*/ meltfptr[196]); - ((meltroutine_ptr_t) /*_._VALROUT___V199*/ meltfptr[198])->tabval[0] = - (melt_ptr_t) ( /*_._VALDATA___V197*/ meltfptr[196]); + NULL != /*_._VALDATA___V198*/ meltfptr[197]); + ((meltroutine_ptr_t) /*_._VALROUT___V200*/ meltfptr[199])->tabval[0] = + (melt_ptr_t) ( /*_._VALDATA___V198*/ meltfptr[197]); MELT_LOCATION ("warmelt-outobj.melt:41:/ initchunk"); /*^putroutconst */ @@ -23970,33 +23965,33 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_0 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V199*/ meltfptr[198])) + ( /*_._VALROUT___V200*/ meltfptr[199])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_9__GET_CODE_BUFFER_LIMIT#1", NULL != ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5])); - ((meltroutine_ptr_t) /*_._VALROUT___V199*/ meltfptr[198])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V200*/ meltfptr[199])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5]); MELT_LOCATION ("warmelt-outobj.melt:41:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V199*/ meltfptr[198]); + meltgc_touch ( /*_._VALROUT___V200*/ meltfptr[199]); /*putclosurout#1 */ melt_assertmsg ("putclosrout#1 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V200*/ meltfptr[199])) == + ( /*_._VALCLO___V201*/ meltfptr[200])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#1 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V199*/ meltfptr[198])) == + ( /*_._VALROUT___V200*/ meltfptr[199])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V200*/ meltfptr[199])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V199*/ meltfptr[198]); + ((meltclosure_ptr_t) /*_._VALCLO___V201*/ meltfptr[200])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V200*/ meltfptr[199]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V200*/ meltfptr[199]); + meltgc_touch ( /*_._VALCLO___V201*/ meltfptr[200]); MELT_LOCATION ("warmelt-outobj.melt:46:/ initchunk"); /*^putroutconst */ @@ -24004,12 +23999,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_0 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V201*/ meltfptr[200])) + ( /*_._VALROUT___V202*/ meltfptr[201])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_11__PUT_CODE_BUFFER_LIMIT#0", NULL != ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_._VALROUT___V201*/ meltfptr[200])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V202*/ meltfptr[201])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:46:/ initchunk"); @@ -24018,12 +24013,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_0 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V201*/ meltfptr[200])) + ( /*_._VALROUT___V202*/ meltfptr[201])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_11__PUT_CODE_BUFFER_LIMIT#1", NULL != ( /*_.DISCR_CONSTANT_INTEGER__V8*/ meltfptr[7])); - ((meltroutine_ptr_t) /*_._VALROUT___V201*/ meltfptr[200])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V202*/ meltfptr[201])->tabval[1] = (melt_ptr_t) ( /*_.DISCR_CONSTANT_INTEGER__V8*/ meltfptr[7]); MELT_LOCATION ("warmelt-outobj.melt:46:/ initchunk"); @@ -24031,12 +24026,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_0 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V201*/ meltfptr[200])) == + ( /*_._VALROUT___V202*/ meltfptr[201])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALDATA___V197*/ meltfptr[196]); - ((meltroutine_ptr_t) /*_._VALROUT___V201*/ meltfptr[200])->tabval[2] = - (melt_ptr_t) ( /*_._VALDATA___V197*/ meltfptr[196]); + NULL != /*_._VALDATA___V198*/ meltfptr[197]); + ((meltroutine_ptr_t) /*_._VALROUT___V202*/ meltfptr[201])->tabval[2] = + (melt_ptr_t) ( /*_._VALDATA___V198*/ meltfptr[197]); MELT_LOCATION ("warmelt-outobj.melt:46:/ initchunk"); /*^putroutconst */ @@ -24044,78 +24039,78 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_0 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V201*/ meltfptr[200])) + ( /*_._VALROUT___V202*/ meltfptr[201])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_11__PUT_CODE_BUFFER_LIMIT#3", NULL != ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5])); - ((meltroutine_ptr_t) /*_._VALROUT___V201*/ meltfptr[200])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V202*/ meltfptr[201])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5]); MELT_LOCATION ("warmelt-outobj.melt:46:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V201*/ meltfptr[200]); + meltgc_touch ( /*_._VALROUT___V202*/ meltfptr[201]); /*putclosurout#2 */ melt_assertmsg ("putclosrout#2 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V202*/ meltfptr[201])) == + ( /*_._VALCLO___V203*/ meltfptr[202])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#2 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V201*/ meltfptr[200])) == + ( /*_._VALROUT___V202*/ meltfptr[201])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V202*/ meltfptr[201])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V201*/ meltfptr[200]); + ((meltclosure_ptr_t) /*_._VALCLO___V203*/ meltfptr[202])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V202*/ meltfptr[201]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V202*/ meltfptr[201]); + meltgc_touch ( /*_._VALCLO___V203*/ meltfptr[202]); /*putslot */ melt_assertmsg ("checkobj putslot ~dsym_13__MELT_DEBUG_FUN @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V203*/ meltfptr[202])) == + ( /*_._VALDATA___V204*/ meltfptr[203])) == MELTOBMAG_OBJECT); melt_assertmsg ("checkoff putslot ~dsym_13__MELT_DEBUG_FUN @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V203*/ - meltfptr[202])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V203*/ meltfptr[202]))->obj_vartab[1] = + ( /*_._VALDATA___V204*/ + meltfptr[203])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V204*/ meltfptr[203]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V204*/ meltfptr[203]); + /*_._VALSTR___V205*/ meltfptr[204]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V203*/ meltfptr[202]); + meltgc_touch ( /*_._VALDATA___V204*/ meltfptr[203]); - melt_dbgtrace_written_object ( /*_._VALDATA___V203*/ meltfptr[202], + melt_dbgtrace_written_object ( /*_._VALDATA___V204*/ meltfptr[203], "new static instance"); /*putslot */ melt_assertmsg ("checkobj putslot ~dsym_15__DISCR_CONSTANT_INTEGER @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V205*/ meltfptr[204])) == + ( /*_._VALDATA___V206*/ meltfptr[205])) == MELTOBMAG_OBJECT); melt_assertmsg ("checkoff putslot ~dsym_15__DISCR_CONSTANT_INTEGER @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V205*/ - meltfptr[204])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V205*/ meltfptr[204]))->obj_vartab[1] = + ( /*_._VALDATA___V206*/ + meltfptr[205])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V206*/ meltfptr[205]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V206*/ meltfptr[205]); + /*_._VALSTR___V207*/ meltfptr[206]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V205*/ meltfptr[204]); + meltgc_touch ( /*_._VALDATA___V206*/ meltfptr[205]); - melt_dbgtrace_written_object ( /*_._VALDATA___V205*/ meltfptr[204], + melt_dbgtrace_written_object ( /*_._VALDATA___V206*/ meltfptr[205], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:68:/ initchunk"); @@ -24123,12 +24118,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_0 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V207*/ meltfptr[206])) == + ( /*_._VALROUT___V208*/ meltfptr[207])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V202*/ meltfptr[201]); - ((meltroutine_ptr_t) /*_._VALROUT___V207*/ meltfptr[206])->tabval[0] = - (melt_ptr_t) ( /*_._VALCLO___V202*/ meltfptr[201]); + NULL != /*_._VALCLO___V203*/ meltfptr[202]); + ((meltroutine_ptr_t) /*_._VALROUT___V208*/ meltfptr[207])->tabval[0] = + (melt_ptr_t) ( /*_._VALCLO___V203*/ meltfptr[202]); MELT_LOCATION ("warmelt-outobj.melt:68:/ initchunk"); /*^putroutconst */ @@ -24136,79 +24131,79 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_0 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V207*/ meltfptr[206])) + ( /*_._VALROUT___V208*/ meltfptr[207])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_17__CODE_BUFFER_LIMIT_OPTSET#1", NULL != ( /*_.DISCR_CONSTANT_INTEGER__V8*/ meltfptr[7])); - ((meltroutine_ptr_t) /*_._VALROUT___V207*/ meltfptr[206])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V208*/ meltfptr[207])->tabval[1] = (melt_ptr_t) ( /*_.DISCR_CONSTANT_INTEGER__V8*/ meltfptr[7]); MELT_LOCATION ("warmelt-outobj.melt:68:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V207*/ meltfptr[206]); + meltgc_touch ( /*_._VALROUT___V208*/ meltfptr[207]); /*putclosurout#3 */ melt_assertmsg ("putclosrout#3 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V208*/ meltfptr[207])) == + ( /*_._VALCLO___V209*/ meltfptr[208])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#3 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V207*/ meltfptr[206])) == + ( /*_._VALROUT___V208*/ meltfptr[207])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V208*/ meltfptr[207])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V207*/ meltfptr[206]); + ((meltclosure_ptr_t) /*_._VALCLO___V209*/ meltfptr[208])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V208*/ meltfptr[207]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V208*/ meltfptr[207]); + meltgc_touch ( /*_._VALCLO___V209*/ meltfptr[208]); /*putslot */ melt_assertmsg ("checkobj putslot ~dsym_19__REGISTER_OPTION @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V209*/ meltfptr[208])) == + ( /*_._VALDATA___V210*/ meltfptr[209])) == MELTOBMAG_OBJECT); melt_assertmsg ("checkoff putslot ~dsym_19__REGISTER_OPTION @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V209*/ - meltfptr[208])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V209*/ meltfptr[208]))->obj_vartab[1] = + ( /*_._VALDATA___V210*/ + meltfptr[209])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V210*/ meltfptr[209]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V210*/ meltfptr[209]); + /*_._VALSTR___V211*/ meltfptr[210]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V209*/ meltfptr[208]); + meltgc_touch ( /*_._VALDATA___V210*/ meltfptr[209]); - melt_dbgtrace_written_object ( /*_._VALDATA___V209*/ meltfptr[208], + melt_dbgtrace_written_object ( /*_._VALDATA___V210*/ meltfptr[209], "new static instance"); /*putslot */ melt_assertmsg ("checkobj putslot ~dsym_21__CODE_BUFFER_LIMIT @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V211*/ meltfptr[210])) == + ( /*_._VALDATA___V212*/ meltfptr[211])) == MELTOBMAG_OBJECT); melt_assertmsg ("checkoff putslot ~dsym_21__CODE_BUFFER_LIMIT @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V211*/ - meltfptr[210])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V211*/ meltfptr[210]))->obj_vartab[1] = + ( /*_._VALDATA___V212*/ + meltfptr[211])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V212*/ meltfptr[211]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V212*/ meltfptr[211]); + /*_._VALSTR___V213*/ meltfptr[212]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V211*/ meltfptr[210]); + meltgc_touch ( /*_._VALDATA___V212*/ meltfptr[211]); - melt_dbgtrace_written_object ( /*_._VALDATA___V211*/ meltfptr[210], + melt_dbgtrace_written_object ( /*_._VALDATA___V212*/ meltfptr[211], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:85:/ initchunk"); @@ -24217,14 +24212,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_0 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V214*/ meltfptr[213])) + ( /*_._VALROUT___V215*/ meltfptr[214])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_24__OUT_ENUMIX_MODVARBIND#0", NULL != ( /*_.CLASS_NORMAL_MODULE_VARIABLE_BINDING__V10*/ meltfptr[9])); - ((meltroutine_ptr_t) /*_._VALROUT___V214*/ meltfptr[213])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V215*/ meltfptr[214])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_NORMAL_MODULE_VARIABLE_BINDING__V10*/ meltfptr[9]); @@ -24234,12 +24229,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_0 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V214*/ meltfptr[213])) + ( /*_._VALROUT___V215*/ meltfptr[214])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_24__OUT_ENUMIX_MODVARBIND#1", NULL != ( /*_.CLASS_ANY_BINDING__V11*/ meltfptr[10])); - ((meltroutine_ptr_t) /*_._VALROUT___V214*/ meltfptr[213])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V215*/ meltfptr[214])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_ANY_BINDING__V11*/ meltfptr[10]); MELT_LOCATION ("warmelt-outobj.melt:85:/ initchunk"); @@ -24248,13 +24243,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_0 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V214*/ meltfptr[213])) + ( /*_._VALROUT___V215*/ meltfptr[214])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_24__OUT_ENUMIX_MODVARBIND#2", - NULL != ( /*_._VALROUT___V215*/ meltfptr[214])); - ((meltroutine_ptr_t) /*_._VALROUT___V214*/ meltfptr[213])->tabval[2] = - (melt_ptr_t) ( /*_._VALROUT___V215*/ meltfptr[214]); + NULL != ( /*_._VALROUT___V216*/ meltfptr[215])); + ((meltroutine_ptr_t) /*_._VALROUT___V215*/ meltfptr[214])->tabval[2] = + (melt_ptr_t) ( /*_._VALROUT___V216*/ meltfptr[215]); MELT_LOCATION ("warmelt-outobj.melt:85:/ initchunk"); /*^putroutconst */ @@ -24262,12 +24257,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_0 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V214*/ meltfptr[213])) + ( /*_._VALROUT___V215*/ meltfptr[214])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_24__OUT_ENUMIX_MODVARBIND#3", NULL != ( /*_.CLASS_CLONED_SYMBOL__V12*/ meltfptr[11])); - ((meltroutine_ptr_t) /*_._VALROUT___V214*/ meltfptr[213])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V215*/ meltfptr[214])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_CLONED_SYMBOL__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-outobj.melt:85:/ initchunk"); @@ -24276,12 +24271,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_0 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V214*/ meltfptr[213])) + ( /*_._VALROUT___V215*/ meltfptr[214])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_24__OUT_ENUMIX_MODVARBIND#4", NULL != ( /*_.CLASS_NAMED__V13*/ meltfptr[12])); - ((meltroutine_ptr_t) /*_._VALROUT___V214*/ meltfptr[213])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V215*/ meltfptr[214])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_NAMED__V13*/ meltfptr[12]); MELT_LOCATION ("warmelt-outobj.melt:85:/ initchunk"); @@ -24290,12 +24285,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_0 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V214*/ meltfptr[213])) + ( /*_._VALROUT___V215*/ meltfptr[214])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_24__OUT_ENUMIX_MODVARBIND#5", NULL != ( /*_.ADD2OUT__V14*/ meltfptr[13])); - ((meltroutine_ptr_t) /*_._VALROUT___V214*/ meltfptr[213])->tabval[5] = + ((meltroutine_ptr_t) /*_._VALROUT___V215*/ meltfptr[214])->tabval[5] = (melt_ptr_t) ( /*_.ADD2OUT__V14*/ meltfptr[13]); MELT_LOCATION ("warmelt-outobj.melt:85:/ initchunk"); @@ -24304,12 +24299,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_0 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V214*/ meltfptr[213])) + ( /*_._VALROUT___V215*/ meltfptr[214])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_24__OUT_ENUMIX_MODVARBIND#6", NULL != ( /*_.CLASS_SYMBOL__V15*/ meltfptr[14])); - ((meltroutine_ptr_t) /*_._VALROUT___V214*/ meltfptr[213])->tabval[6] = + ((meltroutine_ptr_t) /*_._VALROUT___V215*/ meltfptr[214])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_SYMBOL__V15*/ meltfptr[14]); MELT_LOCATION ("warmelt-outobj.melt:85:/ initchunk"); @@ -24318,38 +24313,38 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_0 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V214*/ meltfptr[213])) + ( /*_._VALROUT___V215*/ meltfptr[214])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_24__OUT_ENUMIX_MODVARBIND#7", NULL != ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_._VALROUT___V214*/ meltfptr[213])->tabval[7] = + ((meltroutine_ptr_t) /*_._VALROUT___V215*/ meltfptr[214])->tabval[7] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:85:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V214*/ meltfptr[213]); + meltgc_touch ( /*_._VALROUT___V215*/ meltfptr[214]); /*putclosurout#4 */ melt_assertmsg ("putclosrout#4 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V216*/ meltfptr[215])) == + ( /*_._VALCLO___V217*/ meltfptr[216])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#4 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V214*/ meltfptr[213])) == + ( /*_._VALROUT___V215*/ meltfptr[214])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V216*/ meltfptr[215])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V214*/ meltfptr[213]); + ((meltclosure_ptr_t) /*_._VALCLO___V217*/ meltfptr[216])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V215*/ meltfptr[214]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V216*/ meltfptr[215]); + meltgc_touch ( /*_._VALCLO___V217*/ meltfptr[216]); /*putslot */ melt_assertmsg ("checkobj putslot ~dsym_26__CLASS_NORMAL_MODULE_VARIABLE_BINDING @#1", - melt_magic_discr ((melt_ptr_t) ( /*_._VALDATA___V217*/ meltfptr[216])) == + melt_magic_discr ((melt_ptr_t) ( /*_._VALDATA___V218*/ meltfptr[217])) == MELTOBMAG_OBJECT); melt_assertmsg @@ -24357,131 +24352,131 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_0 (meltinitial_frame_t * (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V217*/ meltfptr[216])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V217*/ meltfptr[216]))->obj_vartab[1] = + ( /*_._VALDATA___V218*/ meltfptr[217])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V218*/ meltfptr[217]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V218*/ meltfptr[217]); + /*_._VALSTR___V219*/ meltfptr[218]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V217*/ meltfptr[216]); + meltgc_touch ( /*_._VALDATA___V218*/ meltfptr[217]); - melt_dbgtrace_written_object ( /*_._VALDATA___V217*/ meltfptr[216], + melt_dbgtrace_written_object ( /*_._VALDATA___V218*/ meltfptr[217], "new static instance"); /*putslot */ melt_assertmsg ("checkobj putslot ~dsym_28__CLASS_ANY_BINDING @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V219*/ meltfptr[218])) == + ( /*_._VALDATA___V220*/ meltfptr[219])) == MELTOBMAG_OBJECT); melt_assertmsg ("checkoff putslot ~dsym_28__CLASS_ANY_BINDING @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V219*/ - meltfptr[218])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V219*/ meltfptr[218]))->obj_vartab[1] = + ( /*_._VALDATA___V220*/ + meltfptr[219])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V220*/ meltfptr[219]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V220*/ meltfptr[219]); + /*_._VALSTR___V221*/ meltfptr[220]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V219*/ meltfptr[218]); + meltgc_touch ( /*_._VALDATA___V220*/ meltfptr[219]); - melt_dbgtrace_written_object ( /*_._VALDATA___V219*/ meltfptr[218], + melt_dbgtrace_written_object ( /*_._VALDATA___V220*/ meltfptr[219], "new static instance"); /*putslot */ melt_assertmsg ("checkobj putslot ~dsym_31__CLASS_CLONED_SYMBOL @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V221*/ meltfptr[220])) == + ( /*_._VALDATA___V222*/ meltfptr[221])) == MELTOBMAG_OBJECT); melt_assertmsg ("checkoff putslot ~dsym_31__CLASS_CLONED_SYMBOL @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V221*/ - meltfptr[220])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V221*/ meltfptr[220]))->obj_vartab[1] = + ( /*_._VALDATA___V222*/ + meltfptr[221])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V222*/ meltfptr[221]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V222*/ meltfptr[221]); + /*_._VALSTR___V223*/ meltfptr[222]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V221*/ meltfptr[220]); + meltgc_touch ( /*_._VALDATA___V222*/ meltfptr[221]); - melt_dbgtrace_written_object ( /*_._VALDATA___V221*/ meltfptr[220], + melt_dbgtrace_written_object ( /*_._VALDATA___V222*/ meltfptr[221], "new static instance"); /*putslot */ melt_assertmsg ("checkobj putslot ~dsym_33__CLASS_NAMED @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V223*/ meltfptr[222])) == + ( /*_._VALDATA___V224*/ meltfptr[223])) == MELTOBMAG_OBJECT); melt_assertmsg ("checkoff putslot ~dsym_33__CLASS_NAMED @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V223*/ - meltfptr[222])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V223*/ meltfptr[222]))->obj_vartab[1] = + ( /*_._VALDATA___V224*/ + meltfptr[223])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V224*/ meltfptr[223]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V224*/ meltfptr[223]); + /*_._VALSTR___V225*/ meltfptr[224]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V223*/ meltfptr[222]); + meltgc_touch ( /*_._VALDATA___V224*/ meltfptr[223]); - melt_dbgtrace_written_object ( /*_._VALDATA___V223*/ meltfptr[222], + melt_dbgtrace_written_object ( /*_._VALDATA___V224*/ meltfptr[223], "new static instance"); /*putslot */ melt_assertmsg ("checkobj putslot ~dsym_35__ADD2OUT @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V225*/ meltfptr[224])) == + ( /*_._VALDATA___V226*/ meltfptr[225])) == MELTOBMAG_OBJECT); melt_assertmsg ("checkoff putslot ~dsym_35__ADD2OUT @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V225*/ - meltfptr[224])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V225*/ meltfptr[224]))->obj_vartab[1] = + ( /*_._VALDATA___V226*/ + meltfptr[225])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V226*/ meltfptr[225]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V226*/ meltfptr[225]); + /*_._VALSTR___V227*/ meltfptr[226]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V225*/ meltfptr[224]); + meltgc_touch ( /*_._VALDATA___V226*/ meltfptr[225]); - melt_dbgtrace_written_object ( /*_._VALDATA___V225*/ meltfptr[224], + melt_dbgtrace_written_object ( /*_._VALDATA___V226*/ meltfptr[225], "new static instance"); /*putslot */ melt_assertmsg ("checkobj putslot ~dsym_37__CLASS_SYMBOL @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V227*/ meltfptr[226])) == + ( /*_._VALDATA___V228*/ meltfptr[227])) == MELTOBMAG_OBJECT); melt_assertmsg ("checkoff putslot ~dsym_37__CLASS_SYMBOL @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V227*/ - meltfptr[226])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V227*/ meltfptr[226]))->obj_vartab[1] = + ( /*_._VALDATA___V228*/ + meltfptr[227])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V228*/ meltfptr[227]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V228*/ meltfptr[227]); + /*_._VALSTR___V229*/ meltfptr[228]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V227*/ meltfptr[226]); + meltgc_touch ( /*_._VALDATA___V228*/ meltfptr[227]); - melt_dbgtrace_written_object ( /*_._VALDATA___V227*/ meltfptr[226], + melt_dbgtrace_written_object ( /*_._VALDATA___V228*/ meltfptr[227], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:112:/ initchunk"); @@ -24490,101 +24485,101 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_0 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V229*/ meltfptr[228])) + ( /*_._VALROUT___V230*/ meltfptr[229])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_39__OUTDECLINIT_ROOT#0", NULL != ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_._VALROUT___V229*/ meltfptr[228])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V230*/ meltfptr[229])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:112:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V229*/ meltfptr[228]); + meltgc_touch ( /*_._VALROUT___V230*/ meltfptr[229]); /*putclosurout#5 */ melt_assertmsg ("putclosrout#5 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V230*/ meltfptr[229])) == + ( /*_._VALCLO___V231*/ meltfptr[230])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#5 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V229*/ meltfptr[228])) == + ( /*_._VALROUT___V230*/ meltfptr[229])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V230*/ meltfptr[229])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V229*/ meltfptr[228]); + ((meltclosure_ptr_t) /*_._VALCLO___V231*/ meltfptr[230])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V230*/ meltfptr[229]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V230*/ meltfptr[229]); + meltgc_touch ( /*_._VALCLO___V231*/ meltfptr[230]); /*putslot */ melt_assertmsg ("checkobj putslot ~dsym_41__INSTALL_METHOD @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V231*/ meltfptr[230])) == + ( /*_._VALDATA___V232*/ meltfptr[231])) == MELTOBMAG_OBJECT); melt_assertmsg ("checkoff putslot ~dsym_41__INSTALL_METHOD @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V231*/ - meltfptr[230])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V231*/ meltfptr[230]))->obj_vartab[1] = + ( /*_._VALDATA___V232*/ + meltfptr[231])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V232*/ meltfptr[231]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V232*/ meltfptr[231]); + /*_._VALSTR___V233*/ meltfptr[232]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V231*/ meltfptr[230]); + meltgc_touch ( /*_._VALDATA___V232*/ meltfptr[231]); - melt_dbgtrace_written_object ( /*_._VALDATA___V231*/ meltfptr[230], + melt_dbgtrace_written_object ( /*_._VALDATA___V232*/ meltfptr[231], "new static instance"); /*putslot */ melt_assertmsg ("checkobj putslot ~dsym_43__CLASS_ROOT @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V233*/ meltfptr[232])) == + ( /*_._VALDATA___V234*/ meltfptr[233])) == MELTOBMAG_OBJECT); melt_assertmsg ("checkoff putslot ~dsym_43__CLASS_ROOT @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V233*/ - meltfptr[232])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V233*/ meltfptr[232]))->obj_vartab[1] = + ( /*_._VALDATA___V234*/ + meltfptr[233])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V234*/ meltfptr[233]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V234*/ meltfptr[233]); + /*_._VALSTR___V235*/ meltfptr[234]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V233*/ meltfptr[232]); + meltgc_touch ( /*_._VALDATA___V234*/ meltfptr[233]); - melt_dbgtrace_written_object ( /*_._VALDATA___V233*/ meltfptr[232], + melt_dbgtrace_written_object ( /*_._VALDATA___V234*/ meltfptr[233], "new static instance"); /*putslot */ melt_assertmsg ("checkobj putslot ~dsym_45__OUTPUT_C_DECLINIT @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V235*/ meltfptr[234])) == + ( /*_._VALDATA___V236*/ meltfptr[235])) == MELTOBMAG_OBJECT); melt_assertmsg ("checkoff putslot ~dsym_45__OUTPUT_C_DECLINIT @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V235*/ - meltfptr[234])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V235*/ meltfptr[234]))->obj_vartab[1] = + ( /*_._VALDATA___V236*/ + meltfptr[235])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V236*/ meltfptr[235]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V236*/ meltfptr[235]); + /*_._VALSTR___V237*/ meltfptr[236]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V235*/ meltfptr[234]); + meltgc_touch ( /*_._VALDATA___V236*/ meltfptr[235]); - melt_dbgtrace_written_object ( /*_._VALDATA___V235*/ meltfptr[234], + melt_dbgtrace_written_object ( /*_._VALDATA___V236*/ meltfptr[235], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:119:/ initchunk"); @@ -24593,12 +24588,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_0 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V237*/ meltfptr[236])) + ( /*_._VALROUT___V238*/ meltfptr[237])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_47__OUTPUCOD_OBJINIELEM#0", NULL != ( /*_.CLASS_OBJINITELEM__V19*/ meltfptr[18])); - ((meltroutine_ptr_t) /*_._VALROUT___V237*/ meltfptr[236])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V238*/ meltfptr[237])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJINITELEM__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-outobj.melt:119:/ initchunk"); @@ -24607,12 +24602,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_0 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V237*/ meltfptr[236])) + ( /*_._VALROUT___V238*/ meltfptr[237])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_47__OUTPUCOD_OBJINIELEM#1", NULL != ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19])); - ((meltroutine_ptr_t) /*_._VALROUT___V237*/ meltfptr[236])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V238*/ meltfptr[237])->tabval[1] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]); MELT_LOCATION ("warmelt-outobj.melt:119:/ initchunk"); @@ -24620,12 +24615,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_0 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V237*/ meltfptr[236])) == + ( /*_._VALROUT___V238*/ meltfptr[237])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALDATA___V197*/ meltfptr[196]); - ((meltroutine_ptr_t) /*_._VALROUT___V237*/ meltfptr[236])->tabval[2] = - (melt_ptr_t) ( /*_._VALDATA___V197*/ meltfptr[196]); + NULL != /*_._VALDATA___V198*/ meltfptr[197]); + ((meltroutine_ptr_t) /*_._VALROUT___V238*/ meltfptr[237])->tabval[2] = + (melt_ptr_t) ( /*_._VALDATA___V198*/ meltfptr[197]); MELT_LOCATION ("warmelt-outobj.melt:119:/ initchunk"); /*^putroutconst */ @@ -24633,12 +24628,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_0 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V237*/ meltfptr[236])) + ( /*_._VALROUT___V238*/ meltfptr[237])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_47__OUTPUCOD_OBJINIELEM#3", NULL != ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5])); - ((meltroutine_ptr_t) /*_._VALROUT___V237*/ meltfptr[236])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V238*/ meltfptr[237])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5]); MELT_LOCATION ("warmelt-outobj.melt:119:/ initchunk"); @@ -24647,78 +24642,78 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_0 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V237*/ meltfptr[236])) + ( /*_._VALROUT___V238*/ meltfptr[237])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_47__OUTPUCOD_OBJINIELEM#4", NULL != ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_._VALROUT___V237*/ meltfptr[236])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V238*/ meltfptr[237])->tabval[4] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:119:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V237*/ meltfptr[236]); + meltgc_touch ( /*_._VALROUT___V238*/ meltfptr[237]); /*putclosurout#6 */ melt_assertmsg ("putclosrout#6 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V238*/ meltfptr[237])) == + ( /*_._VALCLO___V239*/ meltfptr[238])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#6 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V237*/ meltfptr[236])) == + ( /*_._VALROUT___V238*/ meltfptr[237])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V238*/ meltfptr[237])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V237*/ meltfptr[236]); + ((meltclosure_ptr_t) /*_._VALCLO___V239*/ meltfptr[238])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V238*/ meltfptr[237]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V238*/ meltfptr[237]); + meltgc_touch ( /*_._VALCLO___V239*/ meltfptr[238]); /*putslot */ melt_assertmsg ("checkobj putslot ~dsym_49__CLASS_OBJINITELEM @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V239*/ meltfptr[238])) == + ( /*_._VALDATA___V240*/ meltfptr[239])) == MELTOBMAG_OBJECT); melt_assertmsg ("checkoff putslot ~dsym_49__CLASS_OBJINITELEM @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V239*/ - meltfptr[238])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V239*/ meltfptr[238]))->obj_vartab[1] = + ( /*_._VALDATA___V240*/ + meltfptr[239])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V240*/ meltfptr[239]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V240*/ meltfptr[239]); + /*_._VALSTR___V241*/ meltfptr[240]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V239*/ meltfptr[238]); + meltgc_touch ( /*_._VALDATA___V240*/ meltfptr[239]); - melt_dbgtrace_written_object ( /*_._VALDATA___V239*/ meltfptr[238], + melt_dbgtrace_written_object ( /*_._VALDATA___V240*/ meltfptr[239], "new static instance"); /*putslot */ melt_assertmsg ("checkobj putslot ~dsym_51__OUTPUT_C_CODE @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V241*/ meltfptr[240])) == + ( /*_._VALDATA___V242*/ meltfptr[241])) == MELTOBMAG_OBJECT); melt_assertmsg ("checkoff putslot ~dsym_51__OUTPUT_C_CODE @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V241*/ - meltfptr[240])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V241*/ meltfptr[240]))->obj_vartab[1] = + ( /*_._VALDATA___V242*/ + meltfptr[241])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V242*/ meltfptr[241]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V242*/ meltfptr[241]); + /*_._VALSTR___V243*/ meltfptr[242]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V241*/ meltfptr[240]); + meltgc_touch ( /*_._VALDATA___V242*/ meltfptr[241]); - melt_dbgtrace_written_object ( /*_._VALDATA___V241*/ meltfptr[240], + melt_dbgtrace_written_object ( /*_._VALDATA___V242*/ meltfptr[241], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:142:/ initchunk"); @@ -24727,55 +24722,55 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_0 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V243*/ meltfptr[242])) + ( /*_._VALROUT___V244*/ meltfptr[243])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_53__OUTCINITFILL_ROOT#0", NULL != ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_._VALROUT___V243*/ meltfptr[242])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V244*/ meltfptr[243])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:142:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V243*/ meltfptr[242]); + meltgc_touch ( /*_._VALROUT___V244*/ meltfptr[243]); /*putclosurout#7 */ melt_assertmsg ("putclosrout#7 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V244*/ meltfptr[243])) == + ( /*_._VALCLO___V245*/ meltfptr[244])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#7 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V243*/ meltfptr[242])) == + ( /*_._VALROUT___V244*/ meltfptr[243])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V244*/ meltfptr[243])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V243*/ meltfptr[242]); + ((meltclosure_ptr_t) /*_._VALCLO___V245*/ meltfptr[244])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V244*/ meltfptr[243]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V244*/ meltfptr[243]); + meltgc_touch ( /*_._VALCLO___V245*/ meltfptr[244]); /*putslot */ melt_assertmsg ("checkobj putslot ~dsym_55__OUTPUT_C_INITIAL_FILL @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V245*/ meltfptr[244])) == + ( /*_._VALDATA___V246*/ meltfptr[245])) == MELTOBMAG_OBJECT); melt_assertmsg ("checkoff putslot ~dsym_55__OUTPUT_C_INITIAL_FILL @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V245*/ - meltfptr[244])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V245*/ meltfptr[244]))->obj_vartab[1] = + ( /*_._VALDATA___V246*/ + meltfptr[245])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V246*/ meltfptr[245]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V246*/ meltfptr[245]); + /*_._VALSTR___V247*/ meltfptr[246]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V245*/ meltfptr[244]); + meltgc_touch ( /*_._VALDATA___V246*/ meltfptr[245]); - melt_dbgtrace_written_object ( /*_._VALDATA___V245*/ meltfptr[244], + melt_dbgtrace_written_object ( /*_._VALDATA___V246*/ meltfptr[245], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:150:/ initchunk"); @@ -24784,55 +24779,55 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_0 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V247*/ meltfptr[246])) + ( /*_._VALROUT___V248*/ meltfptr[247])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_57__OUTCINITPREDEF_ROOT#0", NULL != ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_._VALROUT___V247*/ meltfptr[246])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V248*/ meltfptr[247])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:150:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V247*/ meltfptr[246]); + meltgc_touch ( /*_._VALROUT___V248*/ meltfptr[247]); /*putclosurout#8 */ melt_assertmsg ("putclosrout#8 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V248*/ meltfptr[247])) == + ( /*_._VALCLO___V249*/ meltfptr[248])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#8 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V247*/ meltfptr[246])) == + ( /*_._VALROUT___V248*/ meltfptr[247])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V248*/ meltfptr[247])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V247*/ meltfptr[246]); + ((meltclosure_ptr_t) /*_._VALCLO___V249*/ meltfptr[248])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V248*/ meltfptr[247]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V248*/ meltfptr[247]); + meltgc_touch ( /*_._VALCLO___V249*/ meltfptr[248]); /*putslot */ melt_assertmsg ("checkobj putslot ~dsym_59__OUTPUT_C_INITIAL_PREDEF @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V249*/ meltfptr[248])) == + ( /*_._VALDATA___V250*/ meltfptr[249])) == MELTOBMAG_OBJECT); melt_assertmsg ("checkoff putslot ~dsym_59__OUTPUT_C_INITIAL_PREDEF @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V249*/ - meltfptr[248])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V249*/ meltfptr[248]))->obj_vartab[1] = + ( /*_._VALDATA___V250*/ + meltfptr[249])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V250*/ meltfptr[249]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V250*/ meltfptr[249]); + /*_._VALSTR___V251*/ meltfptr[250]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V249*/ meltfptr[248]); + meltgc_touch ( /*_._VALDATA___V250*/ meltfptr[249]); - melt_dbgtrace_written_object ( /*_._VALDATA___V249*/ meltfptr[248], + melt_dbgtrace_written_object ( /*_._VALDATA___V250*/ meltfptr[249], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:157:/ initchunk"); @@ -24841,12 +24836,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_0 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V251*/ meltfptr[250])) + ( /*_._VALROUT___V252*/ meltfptr[251])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_61__OUTPUT_PREDEF#0", NULL != ( /*_.CLASS_SYMBOL__V15*/ meltfptr[14])); - ((meltroutine_ptr_t) /*_._VALROUT___V251*/ meltfptr[250])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V252*/ meltfptr[251])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_SYMBOL__V15*/ meltfptr[14]); MELT_LOCATION ("warmelt-outobj.melt:157:/ initchunk"); @@ -24855,12 +24850,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_0 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V251*/ meltfptr[250])) + ( /*_._VALROUT___V252*/ meltfptr[251])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_61__OUTPUT_PREDEF#1", NULL != ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_._VALROUT___V251*/ meltfptr[250])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V252*/ meltfptr[251])->tabval[1] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:157:/ initchunk"); @@ -24869,12 +24864,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_0 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V251*/ meltfptr[250])) + ( /*_._VALROUT___V252*/ meltfptr[251])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_61__OUTPUT_PREDEF#2", NULL != ( /*_.OBPREDEF__V23*/ meltfptr[22])); - ((meltroutine_ptr_t) /*_._VALROUT___V251*/ meltfptr[250])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V252*/ meltfptr[251])->tabval[2] = (melt_ptr_t) ( /*_.OBPREDEF__V23*/ meltfptr[22]); MELT_LOCATION ("warmelt-outobj.melt:157:/ initchunk"); @@ -24882,12 +24877,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_0 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V251*/ meltfptr[250])) == + ( /*_._VALROUT___V252*/ meltfptr[251])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALDATA___V197*/ meltfptr[196]); - ((meltroutine_ptr_t) /*_._VALROUT___V251*/ meltfptr[250])->tabval[3] = - (melt_ptr_t) ( /*_._VALDATA___V197*/ meltfptr[196]); + NULL != /*_._VALDATA___V198*/ meltfptr[197]); + ((meltroutine_ptr_t) /*_._VALROUT___V252*/ meltfptr[251])->tabval[3] = + (melt_ptr_t) ( /*_._VALDATA___V198*/ meltfptr[197]); MELT_LOCATION ("warmelt-outobj.melt:157:/ initchunk"); /*^putroutconst */ @@ -24895,55 +24890,55 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_0 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V251*/ meltfptr[250])) + ( /*_._VALROUT___V252*/ meltfptr[251])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_61__OUTPUT_PREDEF#4", NULL != ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5])); - ((meltroutine_ptr_t) /*_._VALROUT___V251*/ meltfptr[250])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V252*/ meltfptr[251])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5]); MELT_LOCATION ("warmelt-outobj.melt:157:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V251*/ meltfptr[250]); + meltgc_touch ( /*_._VALROUT___V252*/ meltfptr[251]); /*putclosurout#9 */ melt_assertmsg ("putclosrout#9 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V252*/ meltfptr[251])) == + ( /*_._VALCLO___V253*/ meltfptr[252])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#9 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V251*/ meltfptr[250])) == + ( /*_._VALROUT___V252*/ meltfptr[251])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V252*/ meltfptr[251])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V251*/ meltfptr[250]); + ((meltclosure_ptr_t) /*_._VALCLO___V253*/ meltfptr[252])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V252*/ meltfptr[251]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V252*/ meltfptr[251]); + meltgc_touch ( /*_._VALCLO___V253*/ meltfptr[252]); /*putslot */ melt_assertmsg ("checkobj putslot ~dsym_63__OBPREDEF @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V253*/ meltfptr[252])) == + ( /*_._VALDATA___V254*/ meltfptr[253])) == MELTOBMAG_OBJECT); melt_assertmsg ("checkoff putslot ~dsym_63__OBPREDEF @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V253*/ - meltfptr[252])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V253*/ meltfptr[252]))->obj_vartab[1] = + ( /*_._VALDATA___V254*/ + meltfptr[253])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V254*/ meltfptr[253]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V254*/ meltfptr[253]); + /*_._VALSTR___V255*/ meltfptr[254]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V253*/ meltfptr[252]); + meltgc_touch ( /*_._VALDATA___V254*/ meltfptr[253]); - melt_dbgtrace_written_object ( /*_._VALDATA___V253*/ meltfptr[252], + melt_dbgtrace_written_object ( /*_._VALDATA___V254*/ meltfptr[253], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:183:/ initchunk"); @@ -24952,12 +24947,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_0 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V255*/ meltfptr[254])) + ( /*_._VALROUT___V256*/ meltfptr[255])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_65__OUTPUCOD_PREDEF#0", NULL != ( /*_.CLASS_OBJPREDEF__V24*/ meltfptr[23])); - ((meltroutine_ptr_t) /*_._VALROUT___V255*/ meltfptr[254])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V256*/ meltfptr[255])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJPREDEF__V24*/ meltfptr[23]); MELT_LOCATION ("warmelt-outobj.melt:183:/ initchunk"); @@ -24965,32 +24960,32 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_0 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V255*/ meltfptr[254])) == + ( /*_._VALROUT___V256*/ meltfptr[255])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V252*/ meltfptr[251]); - ((meltroutine_ptr_t) /*_._VALROUT___V255*/ meltfptr[254])->tabval[1] = - (melt_ptr_t) ( /*_._VALCLO___V252*/ meltfptr[251]); + NULL != /*_._VALCLO___V253*/ meltfptr[252]); + ((meltroutine_ptr_t) /*_._VALROUT___V256*/ meltfptr[255])->tabval[1] = + (melt_ptr_t) ( /*_._VALCLO___V253*/ meltfptr[252]); MELT_LOCATION ("warmelt-outobj.melt:183:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V255*/ meltfptr[254]); + meltgc_touch ( /*_._VALROUT___V256*/ meltfptr[255]); /*putclosurout#10 */ melt_assertmsg ("putclosrout#10 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V256*/ meltfptr[255])) == + ( /*_._VALCLO___V257*/ meltfptr[256])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#10 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V255*/ meltfptr[254])) == + ( /*_._VALROUT___V256*/ meltfptr[255])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V256*/ meltfptr[255])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V255*/ meltfptr[254]); + ((meltclosure_ptr_t) /*_._VALCLO___V257*/ meltfptr[256])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V256*/ meltfptr[255]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V256*/ meltfptr[255]); + meltgc_touch ( /*_._VALCLO___V257*/ meltfptr[256]); #undef meltfram__ @@ -25008,24 +25003,24 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_1 (meltinitial_frame_t * /*putslot*/ melt_assertmsg ("checkobj putslot ~dsym_67__CLASS_OBJPREDEF @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V257*/ meltfptr[256])) == + ( /*_._VALDATA___V258*/ meltfptr[257])) == MELTOBMAG_OBJECT); melt_assertmsg ("checkoff putslot ~dsym_67__CLASS_OBJPREDEF @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V257*/ - meltfptr[256])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V257*/ meltfptr[256]))->obj_vartab[1] = + ( /*_._VALDATA___V258*/ + meltfptr[257])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V258*/ meltfptr[257]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V258*/ meltfptr[257]); + /*_._VALSTR___V259*/ meltfptr[258]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V257*/ meltfptr[256]); + meltgc_touch ( /*_._VALDATA___V258*/ meltfptr[257]); - melt_dbgtrace_written_object ( /*_._VALDATA___V257*/ meltfptr[256], + melt_dbgtrace_written_object ( /*_._VALDATA___V258*/ meltfptr[257], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:190:/ initchunk"); @@ -25034,55 +25029,55 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_1 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V259*/ meltfptr[258])) + ( /*_._VALROUT___V260*/ meltfptr[259])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_69__OUTPUCOD_NIL#0", NULL != ( /*_.CLASS_OBJNIL__V25*/ meltfptr[24])); - ((meltroutine_ptr_t) /*_._VALROUT___V259*/ meltfptr[258])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V260*/ meltfptr[259])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJNIL__V25*/ meltfptr[24]); MELT_LOCATION ("warmelt-outobj.melt:190:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V259*/ meltfptr[258]); + meltgc_touch ( /*_._VALROUT___V260*/ meltfptr[259]); /*putclosurout#11 */ melt_assertmsg ("putclosrout#11 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V260*/ meltfptr[259])) == + ( /*_._VALCLO___V261*/ meltfptr[260])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#11 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V259*/ meltfptr[258])) == + ( /*_._VALROUT___V260*/ meltfptr[259])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V260*/ meltfptr[259])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V259*/ meltfptr[258]); + ((meltclosure_ptr_t) /*_._VALCLO___V261*/ meltfptr[260])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V260*/ meltfptr[259]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V260*/ meltfptr[259]); + meltgc_touch ( /*_._VALCLO___V261*/ meltfptr[260]); /*putslot */ melt_assertmsg ("checkobj putslot ~dsym_71__CLASS_OBJNIL @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V261*/ meltfptr[260])) == + ( /*_._VALDATA___V262*/ meltfptr[261])) == MELTOBMAG_OBJECT); melt_assertmsg ("checkoff putslot ~dsym_71__CLASS_OBJNIL @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V261*/ - meltfptr[260])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V261*/ meltfptr[260]))->obj_vartab[1] = + ( /*_._VALDATA___V262*/ + meltfptr[261])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V262*/ meltfptr[261]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V262*/ meltfptr[261]); + /*_._VALSTR___V263*/ meltfptr[262]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V261*/ meltfptr[260]); + meltgc_touch ( /*_._VALDATA___V262*/ meltfptr[261]); - melt_dbgtrace_written_object ( /*_._VALDATA___V261*/ meltfptr[260], + melt_dbgtrace_written_object ( /*_._VALDATA___V262*/ meltfptr[261], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:196:/ initchunk"); @@ -25091,13 +25086,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_1 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V263*/ meltfptr[262])) + ( /*_._VALROUT___V264*/ meltfptr[263])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_73__OUTPUCOD_OBJEXPANDPUREVAL#0", NULL != ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_._VALROUT___V263*/ meltfptr[262])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V264*/ meltfptr[263])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:196:/ initchunk"); @@ -25106,13 +25101,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_1 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V263*/ meltfptr[262])) + ( /*_._VALROUT___V264*/ meltfptr[263])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_73__OUTPUCOD_OBJEXPANDPUREVAL#1", NULL != ( /*_.CLASS_OBJEXPANDPUREVAL__V26*/ meltfptr[25])); - ((meltroutine_ptr_t) /*_._VALROUT___V263*/ meltfptr[262])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V264*/ meltfptr[263])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_OBJEXPANDPUREVAL__V26*/ meltfptr[25]); MELT_LOCATION ("warmelt-outobj.melt:196:/ initchunk"); @@ -25121,13 +25116,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_1 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V263*/ meltfptr[262])) + ( /*_._VALROUT___V264*/ meltfptr[263])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_73__OUTPUCOD_OBJEXPANDPUREVAL#2", NULL != ( /*_.CLASS_OBJVALUE__V27*/ meltfptr[26])); - ((meltroutine_ptr_t) /*_._VALROUT___V263*/ meltfptr[262])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V264*/ meltfptr[263])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_OBJVALUE__V27*/ meltfptr[26]); MELT_LOCATION ("warmelt-outobj.melt:196:/ initchunk"); @@ -25136,13 +25131,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_1 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V263*/ meltfptr[262])) + ( /*_._VALROUT___V264*/ meltfptr[263])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_73__OUTPUCOD_OBJEXPANDPUREVAL#3", NULL != ( /*_.CLASS_CTYPE__V28*/ meltfptr[27])); - ((meltroutine_ptr_t) /*_._VALROUT___V263*/ meltfptr[262])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V264*/ meltfptr[263])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_CTYPE__V28*/ meltfptr[27]); MELT_LOCATION ("warmelt-outobj.melt:196:/ initchunk"); @@ -25151,24 +25146,24 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_1 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V263*/ meltfptr[262])) + ( /*_._VALROUT___V264*/ meltfptr[263])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_73__OUTPUCOD_OBJEXPANDPUREVAL#4", NULL != ( /*_.CTYPE_VOID__V29*/ meltfptr[28])); - ((meltroutine_ptr_t) /*_._VALROUT___V263*/ meltfptr[262])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V264*/ meltfptr[263])->tabval[4] = (melt_ptr_t) ( /*_.CTYPE_VOID__V29*/ meltfptr[28]); MELT_LOCATION ("warmelt-outobj.melt:1373:/ initchunk"); /*^touch */ /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V266*/ meltfptr[265]); + meltgc_touch ( /*_._VALDATA___V267*/ meltfptr[266]); MELT_LOCATION ("warmelt-outobj.melt:1373:/ initchunk"); /*^touchobj */ - melt_dbgtrace_written_object ( /*_._VALDATA___V266*/ meltfptr[265], + melt_dbgtrace_written_object ( /*_._VALDATA___V267*/ meltfptr[266], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:1392:/ initchunk"); @@ -25176,22 +25171,22 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_1 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V265*/ meltfptr[264])) == + ( /*_._VALROUT___V266*/ meltfptr[265])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALDATA___V266*/ meltfptr[265]); - ((meltroutine_ptr_t) /*_._VALROUT___V265*/ meltfptr[264])->tabval[0] = - (melt_ptr_t) ( /*_._VALDATA___V266*/ meltfptr[265]); + NULL != /*_._VALDATA___V267*/ meltfptr[266]); + ((meltroutine_ptr_t) /*_._VALROUT___V266*/ meltfptr[265])->tabval[0] = + (melt_ptr_t) ( /*_._VALDATA___V267*/ meltfptr[266]); MELT_LOCATION ("warmelt-outobj.melt:1374:/ initchunk"); /*^touch */ /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V267*/ meltfptr[266]); + meltgc_touch ( /*_._VALDATA___V268*/ meltfptr[267]); MELT_LOCATION ("warmelt-outobj.melt:1374:/ initchunk"); /*^touchobj */ - melt_dbgtrace_written_object ( /*_._VALDATA___V267*/ meltfptr[266], + melt_dbgtrace_written_object ( /*_._VALDATA___V268*/ meltfptr[267], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:1392:/ initchunk"); @@ -25199,24 +25194,24 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_1 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V265*/ meltfptr[264])) == + ( /*_._VALROUT___V266*/ meltfptr[265])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALDATA___V267*/ meltfptr[266]); - ((meltroutine_ptr_t) /*_._VALROUT___V265*/ meltfptr[264])->tabval[1] = - (melt_ptr_t) ( /*_._VALDATA___V267*/ meltfptr[266]); + NULL != /*_._VALDATA___V268*/ meltfptr[267]); + ((meltroutine_ptr_t) /*_._VALROUT___V266*/ meltfptr[265])->tabval[1] = + (melt_ptr_t) ( /*_._VALDATA___V268*/ meltfptr[267]); MELT_LOCATION ("warmelt-outobj.melt:1392:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V265*/ meltfptr[264])) == + ( /*_._VALROUT___V266*/ meltfptr[265])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALDATA___V197*/ meltfptr[196]); - ((meltroutine_ptr_t) /*_._VALROUT___V265*/ meltfptr[264])->tabval[2] = - (melt_ptr_t) ( /*_._VALDATA___V197*/ meltfptr[196]); + NULL != /*_._VALDATA___V198*/ meltfptr[197]); + ((meltroutine_ptr_t) /*_._VALROUT___V266*/ meltfptr[265])->tabval[2] = + (melt_ptr_t) ( /*_._VALDATA___V198*/ meltfptr[197]); MELT_LOCATION ("warmelt-outobj.melt:1392:/ initchunk"); /*^putroutconst */ @@ -25224,12 +25219,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_1 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V265*/ meltfptr[264])) + ( /*_._VALROUT___V266*/ meltfptr[265])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_189__OUTPUT_LOCATION#3", NULL != ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5])); - ((meltroutine_ptr_t) /*_._VALROUT___V265*/ meltfptr[264])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V266*/ meltfptr[265])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5]); MELT_LOCATION ("warmelt-outobj.melt:1392:/ initchunk"); @@ -25238,12 +25233,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_1 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V265*/ meltfptr[264])) + ( /*_._VALROUT___V266*/ meltfptr[265])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_189__OUTPUT_LOCATION#4", NULL != ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_._VALROUT___V265*/ meltfptr[264])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V266*/ meltfptr[265])->tabval[4] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:1329:/ initchunk"); @@ -25251,12 +25246,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_1 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V269*/ meltfptr[268])) == + ( /*_._VALROUT___V270*/ meltfptr[269])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALDATA___V197*/ meltfptr[196]); - ((meltroutine_ptr_t) /*_._VALROUT___V269*/ meltfptr[268])->tabval[0] = - (melt_ptr_t) ( /*_._VALDATA___V197*/ meltfptr[196]); + NULL != /*_._VALDATA___V198*/ meltfptr[197]); + ((meltroutine_ptr_t) /*_._VALROUT___V270*/ meltfptr[269])->tabval[0] = + (melt_ptr_t) ( /*_._VALDATA___V198*/ meltfptr[197]); MELT_LOCATION ("warmelt-outobj.melt:1329:/ initchunk"); /*^putroutconst */ @@ -25264,12 +25259,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_1 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V269*/ meltfptr[268])) + ( /*_._VALROUT___V270*/ meltfptr[269])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_175__OUTPUT_RAW_LOCATION#1", NULL != ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5])); - ((meltroutine_ptr_t) /*_._VALROUT___V269*/ meltfptr[268])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V270*/ meltfptr[269])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5]); MELT_LOCATION ("warmelt-outobj.melt:1329:/ initchunk"); @@ -25278,77 +25273,77 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_1 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V269*/ meltfptr[268])) + ( /*_._VALROUT___V270*/ meltfptr[269])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_175__OUTPUT_RAW_LOCATION#2", NULL != ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_._VALROUT___V269*/ meltfptr[268])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V270*/ meltfptr[269])->tabval[2] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:1329:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V269*/ meltfptr[268]); + meltgc_touch ( /*_._VALROUT___V270*/ meltfptr[269]); /*putclosurout#12 */ melt_assertmsg ("putclosrout#12 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V268*/ meltfptr[267])) == + ( /*_._VALCLO___V269*/ meltfptr[268])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#12 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V269*/ meltfptr[268])) == + ( /*_._VALROUT___V270*/ meltfptr[269])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V268*/ meltfptr[267])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V269*/ meltfptr[268]); + ((meltclosure_ptr_t) /*_._VALCLO___V269*/ meltfptr[268])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V270*/ meltfptr[269]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V268*/ meltfptr[267]); + meltgc_touch ( /*_._VALCLO___V269*/ meltfptr[268]); MELT_LOCATION ("warmelt-outobj.melt:1392:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V265*/ meltfptr[264])) == + ( /*_._VALROUT___V266*/ meltfptr[265])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V268*/ meltfptr[267]); - ((meltroutine_ptr_t) /*_._VALROUT___V265*/ meltfptr[264])->tabval[5] = - (melt_ptr_t) ( /*_._VALCLO___V268*/ meltfptr[267]); + NULL != /*_._VALCLO___V269*/ meltfptr[268]); + ((meltroutine_ptr_t) /*_._VALROUT___V266*/ meltfptr[265])->tabval[5] = + (melt_ptr_t) ( /*_._VALCLO___V269*/ meltfptr[268]); MELT_LOCATION ("warmelt-outobj.melt:1392:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V265*/ meltfptr[264]); + meltgc_touch ( /*_._VALROUT___V266*/ meltfptr[265]); /*putclosurout#13 */ melt_assertmsg ("putclosrout#13 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V264*/ meltfptr[263])) == + ( /*_._VALCLO___V265*/ meltfptr[264])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#13 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V265*/ meltfptr[264])) == + ( /*_._VALROUT___V266*/ meltfptr[265])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V264*/ meltfptr[263])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V265*/ meltfptr[264]); + ((meltclosure_ptr_t) /*_._VALCLO___V265*/ meltfptr[264])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V266*/ meltfptr[265]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V264*/ meltfptr[263]); + meltgc_touch ( /*_._VALCLO___V265*/ meltfptr[264]); MELT_LOCATION ("warmelt-outobj.melt:196:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V263*/ meltfptr[262])) == + ( /*_._VALROUT___V264*/ meltfptr[263])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V264*/ meltfptr[263]); - ((meltroutine_ptr_t) /*_._VALROUT___V263*/ meltfptr[262])->tabval[5] = - (melt_ptr_t) ( /*_._VALCLO___V264*/ meltfptr[263]); + NULL != /*_._VALCLO___V265*/ meltfptr[264]); + ((meltroutine_ptr_t) /*_._VALROUT___V264*/ meltfptr[263])->tabval[5] = + (melt_ptr_t) ( /*_._VALCLO___V265*/ meltfptr[264]); MELT_LOCATION ("warmelt-outobj.melt:196:/ initchunk"); /*^putroutconst */ @@ -25356,13 +25351,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_1 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V263*/ meltfptr[262])) + ( /*_._VALROUT___V264*/ meltfptr[263])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_73__OUTPUCOD_OBJEXPANDPUREVAL#6", NULL != ( /*_.ADD2OUT__V14*/ meltfptr[13])); - ((meltroutine_ptr_t) /*_._VALROUT___V263*/ meltfptr[262])->tabval[6] = + ((meltroutine_ptr_t) /*_._VALROUT___V264*/ meltfptr[263])->tabval[6] = (melt_ptr_t) ( /*_.ADD2OUT__V14*/ meltfptr[13]); MELT_LOCATION ("warmelt-outobj.melt:196:/ initchunk"); @@ -25371,13 +25366,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_1 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V263*/ meltfptr[262])) + ( /*_._VALROUT___V264*/ meltfptr[263])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_73__OUTPUCOD_OBJEXPANDPUREVAL#7", NULL != ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19])); - ((meltroutine_ptr_t) /*_._VALROUT___V263*/ meltfptr[262])->tabval[7] = + ((meltroutine_ptr_t) /*_._VALROUT___V264*/ meltfptr[263])->tabval[7] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]); MELT_LOCATION ("warmelt-outobj.melt:196:/ initchunk"); @@ -25385,123 +25380,123 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_1 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V263*/ meltfptr[262])) == + ( /*_._VALROUT___V264*/ meltfptr[263])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V268*/ meltfptr[267]); - ((meltroutine_ptr_t) /*_._VALROUT___V263*/ meltfptr[262])->tabval[8] = - (melt_ptr_t) ( /*_._VALCLO___V268*/ meltfptr[267]); + NULL != /*_._VALCLO___V269*/ meltfptr[268]); + ((meltroutine_ptr_t) /*_._VALROUT___V264*/ meltfptr[263])->tabval[8] = + (melt_ptr_t) ( /*_._VALCLO___V269*/ meltfptr[268]); MELT_LOCATION ("warmelt-outobj.melt:196:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V263*/ meltfptr[262]); + meltgc_touch ( /*_._VALROUT___V264*/ meltfptr[263]); /*putclosurout#14 */ melt_assertmsg ("putclosrout#14 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V270*/ meltfptr[269])) == + ( /*_._VALCLO___V271*/ meltfptr[270])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#14 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V263*/ meltfptr[262])) == + ( /*_._VALROUT___V264*/ meltfptr[263])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V270*/ meltfptr[269])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V263*/ meltfptr[262]); + ((meltclosure_ptr_t) /*_._VALCLO___V271*/ meltfptr[270])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V264*/ meltfptr[263]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V270*/ meltfptr[269]); + meltgc_touch ( /*_._VALCLO___V271*/ meltfptr[270]); /*putslot */ melt_assertmsg ("checkobj putslot ~dsym_75__CLASS_OBJEXPANDPUREVAL @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V271*/ meltfptr[270])) == + ( /*_._VALDATA___V272*/ meltfptr[271])) == MELTOBMAG_OBJECT); melt_assertmsg ("checkoff putslot ~dsym_75__CLASS_OBJEXPANDPUREVAL @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V271*/ - meltfptr[270])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V271*/ meltfptr[270]))->obj_vartab[1] = + ( /*_._VALDATA___V272*/ + meltfptr[271])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V272*/ meltfptr[271]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V272*/ meltfptr[271]); + /*_._VALSTR___V273*/ meltfptr[272]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V271*/ meltfptr[270]); + meltgc_touch ( /*_._VALDATA___V272*/ meltfptr[271]); - melt_dbgtrace_written_object ( /*_._VALDATA___V271*/ meltfptr[270], + melt_dbgtrace_written_object ( /*_._VALDATA___V272*/ meltfptr[271], "new static instance"); /*putslot */ melt_assertmsg ("checkobj putslot ~dsym_77__CLASS_OBJVALUE @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V273*/ meltfptr[272])) == + ( /*_._VALDATA___V274*/ meltfptr[273])) == MELTOBMAG_OBJECT); melt_assertmsg ("checkoff putslot ~dsym_77__CLASS_OBJVALUE @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V273*/ - meltfptr[272])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V273*/ meltfptr[272]))->obj_vartab[1] = + ( /*_._VALDATA___V274*/ + meltfptr[273])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V274*/ meltfptr[273]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V274*/ meltfptr[273]); + /*_._VALSTR___V275*/ meltfptr[274]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V273*/ meltfptr[272]); + meltgc_touch ( /*_._VALDATA___V274*/ meltfptr[273]); - melt_dbgtrace_written_object ( /*_._VALDATA___V273*/ meltfptr[272], + melt_dbgtrace_written_object ( /*_._VALDATA___V274*/ meltfptr[273], "new static instance"); /*putslot */ melt_assertmsg ("checkobj putslot ~dsym_79__CLASS_CTYPE @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V275*/ meltfptr[274])) == + ( /*_._VALDATA___V276*/ meltfptr[275])) == MELTOBMAG_OBJECT); melt_assertmsg ("checkoff putslot ~dsym_79__CLASS_CTYPE @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V275*/ - meltfptr[274])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V275*/ meltfptr[274]))->obj_vartab[1] = + ( /*_._VALDATA___V276*/ + meltfptr[275])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V276*/ meltfptr[275]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V276*/ meltfptr[275]); + /*_._VALSTR___V277*/ meltfptr[276]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V275*/ meltfptr[274]); + meltgc_touch ( /*_._VALDATA___V276*/ meltfptr[275]); - melt_dbgtrace_written_object ( /*_._VALDATA___V275*/ meltfptr[274], + melt_dbgtrace_written_object ( /*_._VALDATA___V276*/ meltfptr[275], "new static instance"); /*putslot */ melt_assertmsg ("checkobj putslot ~dsym_81__CTYPE_VOID @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V277*/ meltfptr[276])) == + ( /*_._VALDATA___V278*/ meltfptr[277])) == MELTOBMAG_OBJECT); melt_assertmsg ("checkoff putslot ~dsym_81__CTYPE_VOID @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V277*/ - meltfptr[276])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V277*/ meltfptr[276]))->obj_vartab[1] = + ( /*_._VALDATA___V278*/ + meltfptr[277])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V278*/ meltfptr[277]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V278*/ meltfptr[277]); + /*_._VALSTR___V279*/ meltfptr[278]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V277*/ meltfptr[276]); + meltgc_touch ( /*_._VALDATA___V278*/ meltfptr[277]); - melt_dbgtrace_written_object ( /*_._VALDATA___V277*/ meltfptr[276], + melt_dbgtrace_written_object ( /*_._VALDATA___V278*/ meltfptr[277], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:284:/ initchunk"); @@ -25510,12 +25505,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_1 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V279*/ meltfptr[278])) + ( /*_._VALROUT___V280*/ meltfptr[279])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_83__OUTPUCOD_OBJHOOKNTH#0", NULL != ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_._VALROUT___V279*/ meltfptr[278])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V280*/ meltfptr[279])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:284:/ initchunk"); @@ -25524,12 +25519,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_1 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V279*/ meltfptr[278])) + ( /*_._VALROUT___V280*/ meltfptr[279])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_83__OUTPUCOD_OBJHOOKNTH#1", NULL != ( /*_.CLASS_OBJHOOKNTH__V30*/ meltfptr[29])); - ((meltroutine_ptr_t) /*_._VALROUT___V279*/ meltfptr[278])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V280*/ meltfptr[279])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_OBJHOOKNTH__V30*/ meltfptr[29]); MELT_LOCATION ("warmelt-outobj.melt:284:/ initchunk"); @@ -25538,12 +25533,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_1 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V279*/ meltfptr[278])) + ( /*_._VALROUT___V280*/ meltfptr[279])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_83__OUTPUCOD_OBJHOOKNTH#2", NULL != ( /*_.CLASS_OBJVALUE__V27*/ meltfptr[26])); - ((meltroutine_ptr_t) /*_._VALROUT___V279*/ meltfptr[278])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V280*/ meltfptr[279])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_OBJVALUE__V27*/ meltfptr[26]); MELT_LOCATION ("warmelt-outobj.melt:284:/ initchunk"); @@ -25552,12 +25547,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_1 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V279*/ meltfptr[278])) + ( /*_._VALROUT___V280*/ meltfptr[279])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_83__OUTPUCOD_OBJHOOKNTH#3", NULL != ( /*_.CTYPE_VALUE__V31*/ meltfptr[30])); - ((meltroutine_ptr_t) /*_._VALROUT___V279*/ meltfptr[278])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V280*/ meltfptr[279])->tabval[3] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V31*/ meltfptr[30]); MELT_LOCATION ("warmelt-outobj.melt:284:/ initchunk"); @@ -25566,12 +25561,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_1 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V279*/ meltfptr[278])) + ( /*_._VALROUT___V280*/ meltfptr[279])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_83__OUTPUCOD_OBJHOOKNTH#4", NULL != ( /*_.ADD2OUT__V14*/ meltfptr[13])); - ((meltroutine_ptr_t) /*_._VALROUT___V279*/ meltfptr[278])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V280*/ meltfptr[279])->tabval[4] = (melt_ptr_t) ( /*_.ADD2OUT__V14*/ meltfptr[13]); MELT_LOCATION ("warmelt-outobj.melt:284:/ initchunk"); @@ -25580,116 +25575,116 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_1 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V279*/ meltfptr[278])) + ( /*_._VALROUT___V280*/ meltfptr[279])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_83__OUTPUCOD_OBJHOOKNTH#5", NULL != ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19])); - ((meltroutine_ptr_t) /*_._VALROUT___V279*/ meltfptr[278])->tabval[5] = + ((meltroutine_ptr_t) /*_._VALROUT___V280*/ meltfptr[279])->tabval[5] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]); MELT_LOCATION ("warmelt-outobj.melt:284:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V279*/ meltfptr[278]); + meltgc_touch ( /*_._VALROUT___V280*/ meltfptr[279]); /*putclosurout#15 */ melt_assertmsg ("putclosrout#15 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V280*/ meltfptr[279])) == + ( /*_._VALCLO___V281*/ meltfptr[280])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#15 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V279*/ meltfptr[278])) == + ( /*_._VALROUT___V280*/ meltfptr[279])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V280*/ meltfptr[279])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V279*/ meltfptr[278]); + ((meltclosure_ptr_t) /*_._VALCLO___V281*/ meltfptr[280])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V280*/ meltfptr[279]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V280*/ meltfptr[279]); + meltgc_touch ( /*_._VALCLO___V281*/ meltfptr[280]); /*putslot */ melt_assertmsg ("checkobj putslot ~dsym_85__CLASS_OBJHOOKNTH @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V281*/ meltfptr[280])) == + ( /*_._VALDATA___V282*/ meltfptr[281])) == MELTOBMAG_OBJECT); melt_assertmsg ("checkoff putslot ~dsym_85__CLASS_OBJHOOKNTH @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V281*/ - meltfptr[280])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V281*/ meltfptr[280]))->obj_vartab[1] = + ( /*_._VALDATA___V282*/ + meltfptr[281])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V282*/ meltfptr[281]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V282*/ meltfptr[281]); + /*_._VALSTR___V283*/ meltfptr[282]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V281*/ meltfptr[280]); + meltgc_touch ( /*_._VALDATA___V282*/ meltfptr[281]); - melt_dbgtrace_written_object ( /*_._VALDATA___V281*/ meltfptr[280], + melt_dbgtrace_written_object ( /*_._VALDATA___V282*/ meltfptr[281], "new static instance"); /*putslot */ melt_assertmsg ("checkobj putslot ~dsym_87__CTYPE_VALUE @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V283*/ meltfptr[282])) == + ( /*_._VALDATA___V284*/ meltfptr[283])) == MELTOBMAG_OBJECT); melt_assertmsg ("checkoff putslot ~dsym_87__CTYPE_VALUE @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V283*/ - meltfptr[282])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V283*/ meltfptr[282]))->obj_vartab[1] = + ( /*_._VALDATA___V284*/ + meltfptr[283])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V284*/ meltfptr[283]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V284*/ meltfptr[283]); + /*_._VALSTR___V285*/ meltfptr[284]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V283*/ meltfptr[282]); + meltgc_touch ( /*_._VALDATA___V284*/ meltfptr[283]); - melt_dbgtrace_written_object ( /*_._VALDATA___V283*/ meltfptr[282], + melt_dbgtrace_written_object ( /*_._VALDATA___V284*/ meltfptr[283], "new static instance"); /*putclosurout#16 */ melt_assertmsg ("putclosrout#16 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V286*/ meltfptr[285])) == + ( /*_._VALCLO___V287*/ meltfptr[286])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#16 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V285*/ meltfptr[284])) == + ( /*_._VALROUT___V286*/ meltfptr[285])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V286*/ meltfptr[285])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V285*/ meltfptr[284]); + ((meltclosure_ptr_t) /*_._VALCLO___V287*/ meltfptr[286])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V286*/ meltfptr[285]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V286*/ meltfptr[285]); + meltgc_touch ( /*_._VALCLO___V287*/ meltfptr[286]); /*putslot */ melt_assertmsg ("checkobj putslot ~dsym_91__CLASS_OBJINITOBJECT @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V287*/ meltfptr[286])) == + ( /*_._VALDATA___V288*/ meltfptr[287])) == MELTOBMAG_OBJECT); melt_assertmsg ("checkoff putslot ~dsym_91__CLASS_OBJINITOBJECT @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V287*/ - meltfptr[286])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V287*/ meltfptr[286]))->obj_vartab[1] = + ( /*_._VALDATA___V288*/ + meltfptr[287])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V288*/ meltfptr[287]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V288*/ meltfptr[287]); + /*_._VALSTR___V289*/ meltfptr[288]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V287*/ meltfptr[286]); + meltgc_touch ( /*_._VALDATA___V288*/ meltfptr[287]); - melt_dbgtrace_written_object ( /*_._VALDATA___V287*/ meltfptr[286], + melt_dbgtrace_written_object ( /*_._VALDATA___V288*/ meltfptr[287], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:315:/ initchunk"); @@ -25698,13 +25693,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_1 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V289*/ meltfptr[288])) + ( /*_._VALROUT___V290*/ meltfptr[289])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_93__OUTCINITFILL_OBJINITOBJECT#0", NULL != ( /*_.CLASS_OBJINITOBJECT__V32*/ meltfptr[31])); - ((meltroutine_ptr_t) /*_._VALROUT___V289*/ meltfptr[288])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V290*/ meltfptr[289])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJINITOBJECT__V32*/ meltfptr[31]); MELT_LOCATION ("warmelt-outobj.melt:315:/ initchunk"); @@ -25713,13 +25708,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_1 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V289*/ meltfptr[288])) + ( /*_._VALROUT___V290*/ meltfptr[289])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_93__OUTCINITFILL_OBJINITOBJECT#1", NULL != ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_._VALROUT___V289*/ meltfptr[288])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V290*/ meltfptr[289])->tabval[1] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:315:/ initchunk"); @@ -25728,13 +25723,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_1 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V289*/ meltfptr[288])) + ( /*_._VALROUT___V290*/ meltfptr[289])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_93__OUTCINITFILL_OBJINITOBJECT#2", NULL != ( /*_.CLASS_NREP_DATAINSTANCE__V33*/ meltfptr[32])); - ((meltroutine_ptr_t) /*_._VALROUT___V289*/ meltfptr[288])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V290*/ meltfptr[289])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NREP_DATAINSTANCE__V33*/ meltfptr[32]); MELT_LOCATION ("warmelt-outobj.melt:315:/ initchunk"); @@ -25743,13 +25738,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_1 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V289*/ meltfptr[288])) + ( /*_._VALROUT___V290*/ meltfptr[289])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_93__OUTCINITFILL_OBJINITOBJECT#3", NULL != ( /*_.CLASS_CLASS__V34*/ meltfptr[33])); - ((meltroutine_ptr_t) /*_._VALROUT___V289*/ meltfptr[288])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V290*/ meltfptr[289])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_CLASS__V34*/ meltfptr[33]); MELT_LOCATION ("warmelt-outobj.melt:315:/ initchunk"); @@ -25757,24 +25752,24 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_1 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V289*/ meltfptr[288])) == + ( /*_._VALROUT___V290*/ meltfptr[289])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V264*/ meltfptr[263]); - ((meltroutine_ptr_t) /*_._VALROUT___V289*/ meltfptr[288])->tabval[4] = - (melt_ptr_t) ( /*_._VALCLO___V264*/ meltfptr[263]); + NULL != /*_._VALCLO___V265*/ meltfptr[264]); + ((meltroutine_ptr_t) /*_._VALROUT___V290*/ meltfptr[289])->tabval[4] = + (melt_ptr_t) ( /*_._VALCLO___V265*/ meltfptr[264]); MELT_LOCATION ("warmelt-outobj.melt:315:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V289*/ meltfptr[288])) == + ( /*_._VALROUT___V290*/ meltfptr[289])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V252*/ meltfptr[251]); - ((meltroutine_ptr_t) /*_._VALROUT___V289*/ meltfptr[288])->tabval[5] = - (melt_ptr_t) ( /*_._VALCLO___V252*/ meltfptr[251]); + NULL != /*_._VALCLO___V253*/ meltfptr[252]); + ((meltroutine_ptr_t) /*_._VALROUT___V290*/ meltfptr[289])->tabval[5] = + (melt_ptr_t) ( /*_._VALCLO___V253*/ meltfptr[252]); MELT_LOCATION ("warmelt-outobj.melt:315:/ initchunk"); /*^putroutconst */ @@ -25782,13 +25777,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_1 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V289*/ meltfptr[288])) + ( /*_._VALROUT___V290*/ meltfptr[289])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_93__OUTCINITFILL_OBJINITOBJECT#6", NULL != ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19])); - ((meltroutine_ptr_t) /*_._VALROUT___V289*/ meltfptr[288])->tabval[6] = + ((meltroutine_ptr_t) /*_._VALROUT___V290*/ meltfptr[289])->tabval[6] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]); MELT_LOCATION ("warmelt-outobj.melt:315:/ initchunk"); @@ -25797,13 +25792,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_1 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V289*/ meltfptr[288])) + ( /*_._VALROUT___V290*/ meltfptr[289])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_93__OUTCINITFILL_OBJINITOBJECT#7", NULL != ( /*_.CLASS_OBJINITUNIQUEOBJECT__V35*/ meltfptr[34])); - ((meltroutine_ptr_t) /*_._VALROUT___V289*/ meltfptr[288])->tabval[7] = + ((meltroutine_ptr_t) /*_._VALROUT___V290*/ meltfptr[289])->tabval[7] = (melt_ptr_t) ( /*_.CLASS_OBJINITUNIQUEOBJECT__V35*/ meltfptr[34]); MELT_LOCATION ("warmelt-outobj.melt:315:/ initchunk"); @@ -25812,13 +25807,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_1 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V289*/ meltfptr[288])) + ( /*_._VALROUT___V290*/ meltfptr[289])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_93__OUTCINITFILL_OBJINITOBJECT#8", NULL != ( /*_.CLASS_SYMBOL__V15*/ meltfptr[14])); - ((meltroutine_ptr_t) /*_._VALROUT___V289*/ meltfptr[288])->tabval[8] = + ((meltroutine_ptr_t) /*_._VALROUT___V290*/ meltfptr[289])->tabval[8] = (melt_ptr_t) ( /*_.CLASS_SYMBOL__V15*/ meltfptr[14]); MELT_LOCATION ("warmelt-outobj.melt:315:/ initchunk"); @@ -25826,12 +25821,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_1 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V289*/ meltfptr[288])) == + ( /*_._VALROUT___V290*/ meltfptr[289])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALDATA___V197*/ meltfptr[196]); - ((meltroutine_ptr_t) /*_._VALROUT___V289*/ meltfptr[288])->tabval[9] = - (melt_ptr_t) ( /*_._VALDATA___V197*/ meltfptr[196]); + NULL != /*_._VALDATA___V198*/ meltfptr[197]); + ((meltroutine_ptr_t) /*_._VALROUT___V290*/ meltfptr[289])->tabval[9] = + (melt_ptr_t) ( /*_._VALDATA___V198*/ meltfptr[197]); MELT_LOCATION ("warmelt-outobj.melt:315:/ initchunk"); /*^putroutconst */ @@ -25839,102 +25834,102 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_1 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V289*/ meltfptr[288])) + ( /*_._VALROUT___V290*/ meltfptr[289])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_93__OUTCINITFILL_OBJINITOBJECT#10", NULL != ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5])); - ((meltroutine_ptr_t) /*_._VALROUT___V289*/ meltfptr[288])->tabval[10] = + ((meltroutine_ptr_t) /*_._VALROUT___V290*/ meltfptr[289])->tabval[10] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5]); MELT_LOCATION ("warmelt-outobj.melt:315:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V289*/ meltfptr[288]); + meltgc_touch ( /*_._VALROUT___V290*/ meltfptr[289]); /*putclosurout#17 */ melt_assertmsg ("putclosrout#17 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V290*/ meltfptr[289])) == + ( /*_._VALCLO___V291*/ meltfptr[290])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#17 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V289*/ meltfptr[288])) == + ( /*_._VALROUT___V290*/ meltfptr[289])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V290*/ meltfptr[289])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V289*/ meltfptr[288]); + ((meltclosure_ptr_t) /*_._VALCLO___V291*/ meltfptr[290])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V290*/ meltfptr[289]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V290*/ meltfptr[289]); + meltgc_touch ( /*_._VALCLO___V291*/ meltfptr[290]); /*putslot */ melt_assertmsg ("checkobj putslot ~dsym_95__CLASS_NREP_DATAINSTANCE @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V291*/ meltfptr[290])) == + ( /*_._VALDATA___V292*/ meltfptr[291])) == MELTOBMAG_OBJECT); melt_assertmsg ("checkoff putslot ~dsym_95__CLASS_NREP_DATAINSTANCE @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V291*/ - meltfptr[290])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V291*/ meltfptr[290]))->obj_vartab[1] = + ( /*_._VALDATA___V292*/ + meltfptr[291])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V292*/ meltfptr[291]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V292*/ meltfptr[291]); + /*_._VALSTR___V293*/ meltfptr[292]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V291*/ meltfptr[290]); + meltgc_touch ( /*_._VALDATA___V292*/ meltfptr[291]); - melt_dbgtrace_written_object ( /*_._VALDATA___V291*/ meltfptr[290], + melt_dbgtrace_written_object ( /*_._VALDATA___V292*/ meltfptr[291], "new static instance"); /*putslot */ melt_assertmsg ("checkobj putslot ~dsym_97__CLASS_CLASS @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V293*/ meltfptr[292])) == + ( /*_._VALDATA___V294*/ meltfptr[293])) == MELTOBMAG_OBJECT); melt_assertmsg ("checkoff putslot ~dsym_97__CLASS_CLASS @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V293*/ - meltfptr[292])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V293*/ meltfptr[292]))->obj_vartab[1] = + ( /*_._VALDATA___V294*/ + meltfptr[293])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V294*/ meltfptr[293]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V294*/ meltfptr[293]); + /*_._VALSTR___V295*/ meltfptr[294]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V293*/ meltfptr[292]); + meltgc_touch ( /*_._VALDATA___V294*/ meltfptr[293]); - melt_dbgtrace_written_object ( /*_._VALDATA___V293*/ meltfptr[292], + melt_dbgtrace_written_object ( /*_._VALDATA___V294*/ meltfptr[293], "new static instance"); /*putslot */ melt_assertmsg ("checkobj putslot ~dsym_99__CLASS_OBJINITUNIQUEOBJECT @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V295*/ meltfptr[294])) == + ( /*_._VALDATA___V296*/ meltfptr[295])) == MELTOBMAG_OBJECT); melt_assertmsg ("checkoff putslot ~dsym_99__CLASS_OBJINITUNIQUEOBJECT @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V295*/ - meltfptr[294])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V295*/ meltfptr[294]))->obj_vartab[1] = + ( /*_._VALDATA___V296*/ + meltfptr[295])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V296*/ meltfptr[295]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V296*/ meltfptr[295]); + /*_._VALSTR___V297*/ meltfptr[296]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V295*/ meltfptr[294]); + meltgc_touch ( /*_._VALDATA___V296*/ meltfptr[295]); - melt_dbgtrace_written_object ( /*_._VALDATA___V295*/ meltfptr[294], + melt_dbgtrace_written_object ( /*_._VALDATA___V296*/ meltfptr[295], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:468:/ initchunk"); @@ -25943,13 +25938,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_1 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V297*/ meltfptr[296])) + ( /*_._VALROUT___V298*/ meltfptr[297])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_101__OUTCINITPREDEF_OBJINITOBJECT#0", NULL != ( /*_.CLASS_OBJINITOBJECT__V32*/ meltfptr[31])); - ((meltroutine_ptr_t) /*_._VALROUT___V297*/ meltfptr[296])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V298*/ meltfptr[297])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJINITOBJECT__V32*/ meltfptr[31]); MELT_LOCATION ("warmelt-outobj.melt:468:/ initchunk"); @@ -25958,13 +25953,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_1 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V297*/ meltfptr[296])) + ( /*_._VALROUT___V298*/ meltfptr[297])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_101__OUTCINITPREDEF_OBJINITOBJECT#1", NULL != ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_._VALROUT___V297*/ meltfptr[296])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V298*/ meltfptr[297])->tabval[1] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:468:/ initchunk"); @@ -25973,13 +25968,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_1 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V297*/ meltfptr[296])) + ( /*_._VALROUT___V298*/ meltfptr[297])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_101__OUTCINITPREDEF_OBJINITOBJECT#2", NULL != ( /*_.CLASS_NREP_DATAINSTANCE__V33*/ meltfptr[32])); - ((meltroutine_ptr_t) /*_._VALROUT___V297*/ meltfptr[296])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V298*/ meltfptr[297])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NREP_DATAINSTANCE__V33*/ meltfptr[32]); MELT_LOCATION ("warmelt-outobj.melt:468:/ initchunk"); @@ -25988,13 +25983,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_1 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V297*/ meltfptr[296])) + ( /*_._VALROUT___V298*/ meltfptr[297])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_101__OUTCINITPREDEF_OBJINITOBJECT#3", NULL != ( /*_.CLASS_NREP_NIL__V36*/ meltfptr[35])); - ((meltroutine_ptr_t) /*_._VALROUT___V297*/ meltfptr[296])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V298*/ meltfptr[297])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_NREP_NIL__V36*/ meltfptr[35]); MELT_LOCATION ("warmelt-outobj.melt:468:/ initchunk"); @@ -26002,24 +25997,24 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_1 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V297*/ meltfptr[296])) == + ( /*_._VALROUT___V298*/ meltfptr[297])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V264*/ meltfptr[263]); - ((meltroutine_ptr_t) /*_._VALROUT___V297*/ meltfptr[296])->tabval[4] = - (melt_ptr_t) ( /*_._VALCLO___V264*/ meltfptr[263]); + NULL != /*_._VALCLO___V265*/ meltfptr[264]); + ((meltroutine_ptr_t) /*_._VALROUT___V298*/ meltfptr[297])->tabval[4] = + (melt_ptr_t) ( /*_._VALCLO___V265*/ meltfptr[264]); MELT_LOCATION ("warmelt-outobj.melt:468:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V297*/ meltfptr[296])) == + ( /*_._VALROUT___V298*/ meltfptr[297])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALDATA___V197*/ meltfptr[196]); - ((meltroutine_ptr_t) /*_._VALROUT___V297*/ meltfptr[296])->tabval[5] = - (melt_ptr_t) ( /*_._VALDATA___V197*/ meltfptr[196]); + NULL != /*_._VALDATA___V198*/ meltfptr[197]); + ((meltroutine_ptr_t) /*_._VALROUT___V298*/ meltfptr[297])->tabval[5] = + (melt_ptr_t) ( /*_._VALDATA___V198*/ meltfptr[197]); MELT_LOCATION ("warmelt-outobj.melt:468:/ initchunk"); /*^putroutconst */ @@ -26027,13 +26022,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_1 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V297*/ meltfptr[296])) + ( /*_._VALROUT___V298*/ meltfptr[297])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_101__OUTCINITPREDEF_OBJINITOBJECT#6", NULL != ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5])); - ((meltroutine_ptr_t) /*_._VALROUT___V297*/ meltfptr[296])->tabval[6] = + ((meltroutine_ptr_t) /*_._VALROUT___V298*/ meltfptr[297])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5]); MELT_LOCATION ("warmelt-outobj.melt:468:/ initchunk"); @@ -26042,56 +26037,56 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_1 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V297*/ meltfptr[296])) + ( /*_._VALROUT___V298*/ meltfptr[297])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_101__OUTCINITPREDEF_OBJINITOBJECT#7", NULL != ( /*_.CLASS_SYMBOL__V15*/ meltfptr[14])); - ((meltroutine_ptr_t) /*_._VALROUT___V297*/ meltfptr[296])->tabval[7] = + ((meltroutine_ptr_t) /*_._VALROUT___V298*/ meltfptr[297])->tabval[7] = (melt_ptr_t) ( /*_.CLASS_SYMBOL__V15*/ meltfptr[14]); MELT_LOCATION ("warmelt-outobj.melt:468:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V297*/ meltfptr[296]); + meltgc_touch ( /*_._VALROUT___V298*/ meltfptr[297]); /*putclosurout#18 */ melt_assertmsg ("putclosrout#18 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V298*/ meltfptr[297])) == + ( /*_._VALCLO___V299*/ meltfptr[298])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#18 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V297*/ meltfptr[296])) == + ( /*_._VALROUT___V298*/ meltfptr[297])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V298*/ meltfptr[297])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V297*/ meltfptr[296]); + ((meltclosure_ptr_t) /*_._VALCLO___V299*/ meltfptr[298])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V298*/ meltfptr[297]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V298*/ meltfptr[297]); + meltgc_touch ( /*_._VALCLO___V299*/ meltfptr[298]); /*putslot */ melt_assertmsg ("checkobj putslot ~dsym_103__CLASS_NREP_NIL @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V299*/ meltfptr[298])) == + ( /*_._VALDATA___V300*/ meltfptr[299])) == MELTOBMAG_OBJECT); melt_assertmsg ("checkoff putslot ~dsym_103__CLASS_NREP_NIL @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V299*/ - meltfptr[298])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V299*/ meltfptr[298]))->obj_vartab[1] = + ( /*_._VALDATA___V300*/ + meltfptr[299])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V300*/ meltfptr[299]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V300*/ meltfptr[299]); + /*_._VALSTR___V301*/ meltfptr[300]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V299*/ meltfptr[298]); + meltgc_touch ( /*_._VALDATA___V300*/ meltfptr[299]); - melt_dbgtrace_written_object ( /*_._VALDATA___V299*/ meltfptr[298], + melt_dbgtrace_written_object ( /*_._VALDATA___V300*/ meltfptr[299], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:558:/ initchunk"); @@ -26100,13 +26095,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_1 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V301*/ meltfptr[300])) + ( /*_._VALROUT___V302*/ meltfptr[301])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_105__OUTCINITPREDEF_OBJINITHOOK#0", NULL != ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_._VALROUT___V301*/ meltfptr[300])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V302*/ meltfptr[301])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:558:/ initchunk"); @@ -26115,13 +26110,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_1 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V301*/ meltfptr[300])) + ( /*_._VALROUT___V302*/ meltfptr[301])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_105__OUTCINITPREDEF_OBJINITHOOK#1", NULL != ( /*_.CLASS_OBJINITHOOK__V37*/ meltfptr[36])); - ((meltroutine_ptr_t) /*_._VALROUT___V301*/ meltfptr[300])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V302*/ meltfptr[301])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_OBJINITHOOK__V37*/ meltfptr[36]); MELT_LOCATION ("warmelt-outobj.melt:558:/ initchunk"); @@ -26130,13 +26125,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_1 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V301*/ meltfptr[300])) + ( /*_._VALROUT___V302*/ meltfptr[301])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_105__OUTCINITPREDEF_OBJINITHOOK#2", NULL != ( /*_.CLASS_OBJINITELEM__V19*/ meltfptr[18])); - ((meltroutine_ptr_t) /*_._VALROUT___V301*/ meltfptr[300])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V302*/ meltfptr[301])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_OBJINITELEM__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-outobj.melt:558:/ initchunk"); @@ -26145,13 +26140,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_1 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V301*/ meltfptr[300])) + ( /*_._VALROUT___V302*/ meltfptr[301])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_105__OUTCINITPREDEF_OBJINITHOOK#3", NULL != ( /*_.CLASS_NREP__V38*/ meltfptr[37])); - ((meltroutine_ptr_t) /*_._VALROUT___V301*/ meltfptr[300])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V302*/ meltfptr[301])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_NREP__V38*/ meltfptr[37]); MELT_LOCATION ("warmelt-outobj.melt:558:/ initchunk"); @@ -26159,12 +26154,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_1 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V301*/ meltfptr[300])) == + ( /*_._VALROUT___V302*/ meltfptr[301])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V264*/ meltfptr[263]); - ((meltroutine_ptr_t) /*_._VALROUT___V301*/ meltfptr[300])->tabval[4] = - (melt_ptr_t) ( /*_._VALCLO___V264*/ meltfptr[263]); + NULL != /*_._VALCLO___V265*/ meltfptr[264]); + ((meltroutine_ptr_t) /*_._VALROUT___V302*/ meltfptr[301])->tabval[4] = + (melt_ptr_t) ( /*_._VALCLO___V265*/ meltfptr[264]); MELT_LOCATION ("warmelt-outobj.melt:558:/ initchunk"); /*^putroutconst */ @@ -26172,13 +26167,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_1 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V301*/ meltfptr[300])) + ( /*_._VALROUT___V302*/ meltfptr[301])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_105__OUTCINITPREDEF_OBJINITHOOK#5", NULL != ( /*_.ADD2OUT__V14*/ meltfptr[13])); - ((meltroutine_ptr_t) /*_._VALROUT___V301*/ meltfptr[300])->tabval[5] = + ((meltroutine_ptr_t) /*_._VALROUT___V302*/ meltfptr[301])->tabval[5] = (melt_ptr_t) ( /*_.ADD2OUT__V14*/ meltfptr[13]); MELT_LOCATION ("warmelt-outobj.melt:558:/ initchunk"); @@ -26187,13 +26182,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_1 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V301*/ meltfptr[300])) + ( /*_._VALROUT___V302*/ meltfptr[301])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_105__OUTCINITPREDEF_OBJINITHOOK#6", NULL != ( /*_.CLASS_SYMBOL__V15*/ meltfptr[14])); - ((meltroutine_ptr_t) /*_._VALROUT___V301*/ meltfptr[300])->tabval[6] = + ((meltroutine_ptr_t) /*_._VALROUT___V302*/ meltfptr[301])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_SYMBOL__V15*/ meltfptr[14]); MELT_LOCATION ("warmelt-outobj.melt:558:/ initchunk"); @@ -26202,92 +26197,92 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_1 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V301*/ meltfptr[300])) + ( /*_._VALROUT___V302*/ meltfptr[301])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_105__OUTCINITPREDEF_OBJINITHOOK#7", NULL != ( /*_.CLASS_NAMED__V13*/ meltfptr[12])); - ((meltroutine_ptr_t) /*_._VALROUT___V301*/ meltfptr[300])->tabval[7] = + ((meltroutine_ptr_t) /*_._VALROUT___V302*/ meltfptr[301])->tabval[7] = (melt_ptr_t) ( /*_.CLASS_NAMED__V13*/ meltfptr[12]); MELT_LOCATION ("warmelt-outobj.melt:558:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V301*/ meltfptr[300]); + meltgc_touch ( /*_._VALROUT___V302*/ meltfptr[301]); /*putclosurout#19 */ melt_assertmsg ("putclosrout#19 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V302*/ meltfptr[301])) == + ( /*_._VALCLO___V303*/ meltfptr[302])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#19 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V301*/ meltfptr[300])) == + ( /*_._VALROUT___V302*/ meltfptr[301])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V302*/ meltfptr[301])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V301*/ meltfptr[300]); + ((meltclosure_ptr_t) /*_._VALCLO___V303*/ meltfptr[302])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V302*/ meltfptr[301]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V302*/ meltfptr[301]); + meltgc_touch ( /*_._VALCLO___V303*/ meltfptr[302]); /*putslot */ melt_assertmsg ("checkobj putslot ~dsym_107__CLASS_OBJINITHOOK @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V303*/ meltfptr[302])) == + ( /*_._VALDATA___V304*/ meltfptr[303])) == MELTOBMAG_OBJECT); melt_assertmsg ("checkoff putslot ~dsym_107__CLASS_OBJINITHOOK @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V303*/ - meltfptr[302])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V303*/ meltfptr[302]))->obj_vartab[1] = + ( /*_._VALDATA___V304*/ + meltfptr[303])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V304*/ meltfptr[303]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V304*/ meltfptr[303]); + /*_._VALSTR___V305*/ meltfptr[304]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V303*/ meltfptr[302]); + meltgc_touch ( /*_._VALDATA___V304*/ meltfptr[303]); - melt_dbgtrace_written_object ( /*_._VALDATA___V303*/ meltfptr[302], + melt_dbgtrace_written_object ( /*_._VALDATA___V304*/ meltfptr[303], "new static instance"); /*putslot */ melt_assertmsg ("checkobj putslot ~dsym_109__CLASS_NREP @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V305*/ meltfptr[304])) == + ( /*_._VALDATA___V306*/ meltfptr[305])) == MELTOBMAG_OBJECT); melt_assertmsg ("checkoff putslot ~dsym_109__CLASS_NREP @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V305*/ - meltfptr[304])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V305*/ meltfptr[304]))->obj_vartab[1] = + ( /*_._VALDATA___V306*/ + meltfptr[305])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V306*/ meltfptr[305]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V306*/ meltfptr[305]); + /*_._VALSTR___V307*/ meltfptr[306]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V305*/ meltfptr[304]); + meltgc_touch ( /*_._VALDATA___V306*/ meltfptr[305]); - melt_dbgtrace_written_object ( /*_._VALDATA___V305*/ meltfptr[304], + melt_dbgtrace_written_object ( /*_._VALDATA___V306*/ meltfptr[305], "new static instance"); /*putclosurout#20 */ melt_assertmsg ("putclosrout#20 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V308*/ meltfptr[307])) == + ( /*_._VALCLO___V309*/ meltfptr[308])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#20 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V307*/ meltfptr[306])) == + ( /*_._VALROUT___V308*/ meltfptr[307])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V308*/ meltfptr[307])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V307*/ meltfptr[306]); + ((meltclosure_ptr_t) /*_._VALCLO___V309*/ meltfptr[308])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V308*/ meltfptr[307]); #undef meltfram__ @@ -26303,29 +26298,29 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_2 (meltinitial_frame_t * #define meltcallcount 0L (void) meltpredefinited; /*touch:_DATACLOSURE_*/ - meltgc_touch ( /*_._VALCLO___V308*/ meltfptr[307]); + meltgc_touch ( /*_._VALCLO___V309*/ meltfptr[308]); /*putslot */ melt_assertmsg ("checkobj putslot ~dsym_113__CLASS_OBJINITMULTIPLE @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V309*/ meltfptr[308])) == + ( /*_._VALDATA___V310*/ meltfptr[309])) == MELTOBMAG_OBJECT); melt_assertmsg ("checkoff putslot ~dsym_113__CLASS_OBJINITMULTIPLE @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V309*/ - meltfptr[308])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V309*/ meltfptr[308]))->obj_vartab[1] = + ( /*_._VALDATA___V310*/ + meltfptr[309])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V310*/ meltfptr[309]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V310*/ meltfptr[309]); + /*_._VALSTR___V311*/ meltfptr[310]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V309*/ meltfptr[308]); + meltgc_touch ( /*_._VALDATA___V310*/ meltfptr[309]); - melt_dbgtrace_written_object ( /*_._VALDATA___V309*/ meltfptr[308], + melt_dbgtrace_written_object ( /*_._VALDATA___V310*/ meltfptr[309], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:626:/ initchunk"); @@ -26334,13 +26329,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_2 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V311*/ meltfptr[310])) + ( /*_._VALROUT___V312*/ meltfptr[311])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_115__OUTCINITFILL_OBJINITMULTIPLE#0", NULL != ( /*_.CLASS_OBJINITMULTIPLE__V39*/ meltfptr[38])); - ((meltroutine_ptr_t) /*_._VALROUT___V311*/ meltfptr[310])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V312*/ meltfptr[311])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJINITMULTIPLE__V39*/ meltfptr[38]); MELT_LOCATION ("warmelt-outobj.melt:626:/ initchunk"); @@ -26349,13 +26344,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_2 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V311*/ meltfptr[310])) + ( /*_._VALROUT___V312*/ meltfptr[311])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_115__OUTCINITFILL_OBJINITMULTIPLE#1", NULL != ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_._VALROUT___V311*/ meltfptr[310])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V312*/ meltfptr[311])->tabval[1] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:626:/ initchunk"); @@ -26364,13 +26359,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_2 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V311*/ meltfptr[310])) + ( /*_._VALROUT___V312*/ meltfptr[311])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_115__OUTCINITFILL_OBJINITMULTIPLE#2", NULL != ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19])); - ((meltroutine_ptr_t) /*_._VALROUT___V311*/ meltfptr[310])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V312*/ meltfptr[311])->tabval[2] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]); MELT_LOCATION ("warmelt-outobj.melt:626:/ initchunk"); @@ -26378,12 +26373,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_2 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V311*/ meltfptr[310])) == + ( /*_._VALROUT___V312*/ meltfptr[311])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALDATA___V197*/ meltfptr[196]); - ((meltroutine_ptr_t) /*_._VALROUT___V311*/ meltfptr[310])->tabval[3] = - (melt_ptr_t) ( /*_._VALDATA___V197*/ meltfptr[196]); + NULL != /*_._VALDATA___V198*/ meltfptr[197]); + ((meltroutine_ptr_t) /*_._VALROUT___V312*/ meltfptr[311])->tabval[3] = + (melt_ptr_t) ( /*_._VALDATA___V198*/ meltfptr[197]); MELT_LOCATION ("warmelt-outobj.melt:626:/ initchunk"); /*^putroutconst */ @@ -26391,71 +26386,71 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_2 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V311*/ meltfptr[310])) + ( /*_._VALROUT___V312*/ meltfptr[311])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_115__OUTCINITFILL_OBJINITMULTIPLE#4", NULL != ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5])); - ((meltroutine_ptr_t) /*_._VALROUT___V311*/ meltfptr[310])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V312*/ meltfptr[311])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5]); MELT_LOCATION ("warmelt-outobj.melt:626:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V311*/ meltfptr[310]); + meltgc_touch ( /*_._VALROUT___V312*/ meltfptr[311]); /*putclosurout#21 */ melt_assertmsg ("putclosrout#21 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V312*/ meltfptr[311])) == + ( /*_._VALCLO___V313*/ meltfptr[312])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#21 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V311*/ meltfptr[310])) == + ( /*_._VALROUT___V312*/ meltfptr[311])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V312*/ meltfptr[311])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V311*/ meltfptr[310]); + ((meltclosure_ptr_t) /*_._VALCLO___V313*/ meltfptr[312])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V312*/ meltfptr[311]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V312*/ meltfptr[311]); + meltgc_touch ( /*_._VALCLO___V313*/ meltfptr[312]); /*putclosurout#22 */ melt_assertmsg ("putclosrout#22 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V314*/ meltfptr[313])) == + ( /*_._VALCLO___V315*/ meltfptr[314])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#22 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V313*/ meltfptr[312])) == + ( /*_._VALROUT___V314*/ meltfptr[313])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V314*/ meltfptr[313])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V313*/ meltfptr[312]); + ((meltclosure_ptr_t) /*_._VALCLO___V315*/ meltfptr[314])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V314*/ meltfptr[313]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V314*/ meltfptr[313]); + meltgc_touch ( /*_._VALCLO___V315*/ meltfptr[314]); /*putslot */ melt_assertmsg ("checkobj putslot ~dsym_119__CLASS_OBJINITCLOSURE @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V315*/ meltfptr[314])) == + ( /*_._VALDATA___V316*/ meltfptr[315])) == MELTOBMAG_OBJECT); melt_assertmsg ("checkoff putslot ~dsym_119__CLASS_OBJINITCLOSURE @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V315*/ - meltfptr[314])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V315*/ meltfptr[314]))->obj_vartab[1] = + ( /*_._VALDATA___V316*/ + meltfptr[315])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V316*/ meltfptr[315]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V316*/ meltfptr[315]); + /*_._VALSTR___V317*/ meltfptr[316]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V315*/ meltfptr[314]); + meltgc_touch ( /*_._VALDATA___V316*/ meltfptr[315]); - melt_dbgtrace_written_object ( /*_._VALDATA___V315*/ meltfptr[314], + melt_dbgtrace_written_object ( /*_._VALDATA___V316*/ meltfptr[315], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:680:/ initchunk"); @@ -26464,13 +26459,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_2 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V317*/ meltfptr[316])) + ( /*_._VALROUT___V318*/ meltfptr[317])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_121__OUTCINITFILL_OBJINITCLOSURE#0", NULL != ( /*_.CLASS_OBJINITCLOSURE__V40*/ meltfptr[39])); - ((meltroutine_ptr_t) /*_._VALROUT___V317*/ meltfptr[316])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V318*/ meltfptr[317])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJINITCLOSURE__V40*/ meltfptr[39]); MELT_LOCATION ("warmelt-outobj.melt:680:/ initchunk"); @@ -26479,13 +26474,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_2 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V317*/ meltfptr[316])) + ( /*_._VALROUT___V318*/ meltfptr[317])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_121__OUTCINITFILL_OBJINITCLOSURE#1", NULL != ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_._VALROUT___V317*/ meltfptr[316])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V318*/ meltfptr[317])->tabval[1] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:680:/ initchunk"); @@ -26494,13 +26489,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_2 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V317*/ meltfptr[316])) + ( /*_._VALROUT___V318*/ meltfptr[317])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_121__OUTCINITFILL_OBJINITCLOSURE#2", NULL != ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19])); - ((meltroutine_ptr_t) /*_._VALROUT___V317*/ meltfptr[316])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V318*/ meltfptr[317])->tabval[2] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]); MELT_LOCATION ("warmelt-outobj.melt:680:/ initchunk"); @@ -26508,12 +26503,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_2 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V317*/ meltfptr[316])) == + ( /*_._VALROUT___V318*/ meltfptr[317])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALDATA___V197*/ meltfptr[196]); - ((meltroutine_ptr_t) /*_._VALROUT___V317*/ meltfptr[316])->tabval[3] = - (melt_ptr_t) ( /*_._VALDATA___V197*/ meltfptr[196]); + NULL != /*_._VALDATA___V198*/ meltfptr[197]); + ((meltroutine_ptr_t) /*_._VALROUT___V318*/ meltfptr[317])->tabval[3] = + (melt_ptr_t) ( /*_._VALDATA___V198*/ meltfptr[197]); MELT_LOCATION ("warmelt-outobj.melt:680:/ initchunk"); /*^putroutconst */ @@ -26521,71 +26516,71 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_2 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V317*/ meltfptr[316])) + ( /*_._VALROUT___V318*/ meltfptr[317])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_121__OUTCINITFILL_OBJINITCLOSURE#4", NULL != ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5])); - ((meltroutine_ptr_t) /*_._VALROUT___V317*/ meltfptr[316])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V318*/ meltfptr[317])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5]); MELT_LOCATION ("warmelt-outobj.melt:680:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V317*/ meltfptr[316]); + meltgc_touch ( /*_._VALROUT___V318*/ meltfptr[317]); /*putclosurout#23 */ melt_assertmsg ("putclosrout#23 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V318*/ meltfptr[317])) == + ( /*_._VALCLO___V319*/ meltfptr[318])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#23 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V317*/ meltfptr[316])) == + ( /*_._VALROUT___V318*/ meltfptr[317])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V318*/ meltfptr[317])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V317*/ meltfptr[316]); + ((meltclosure_ptr_t) /*_._VALCLO___V319*/ meltfptr[318])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V318*/ meltfptr[317]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V318*/ meltfptr[317]); + meltgc_touch ( /*_._VALCLO___V319*/ meltfptr[318]); /*putclosurout#24 */ melt_assertmsg ("putclosrout#24 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V320*/ meltfptr[319])) == + ( /*_._VALCLO___V321*/ meltfptr[320])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#24 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V319*/ meltfptr[318])) == + ( /*_._VALROUT___V320*/ meltfptr[319])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V320*/ meltfptr[319])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V319*/ meltfptr[318]); + ((meltclosure_ptr_t) /*_._VALCLO___V321*/ meltfptr[320])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V320*/ meltfptr[319]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V320*/ meltfptr[319]); + meltgc_touch ( /*_._VALCLO___V321*/ meltfptr[320]); /*putslot */ melt_assertmsg ("checkobj putslot ~dsym_125__CLASS_OBJINITROUTINE @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V321*/ meltfptr[320])) == + ( /*_._VALDATA___V322*/ meltfptr[321])) == MELTOBMAG_OBJECT); melt_assertmsg ("checkoff putslot ~dsym_125__CLASS_OBJINITROUTINE @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V321*/ - meltfptr[320])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V321*/ meltfptr[320]))->obj_vartab[1] = + ( /*_._VALDATA___V322*/ + meltfptr[321])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V322*/ meltfptr[321]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V322*/ meltfptr[321]); + /*_._VALSTR___V323*/ meltfptr[322]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V321*/ meltfptr[320]); + meltgc_touch ( /*_._VALDATA___V322*/ meltfptr[321]); - melt_dbgtrace_written_object ( /*_._VALDATA___V321*/ meltfptr[320], + melt_dbgtrace_written_object ( /*_._VALDATA___V322*/ meltfptr[321], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:751:/ initchunk"); @@ -26594,13 +26589,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_2 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V323*/ meltfptr[322])) + ( /*_._VALROUT___V324*/ meltfptr[323])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_127__OUTCINITFILL_OBJINITROUTINE#0", NULL != ( /*_.CLASS_OBJINITROUTINE__V41*/ meltfptr[40])); - ((meltroutine_ptr_t) /*_._VALROUT___V323*/ meltfptr[322])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V324*/ meltfptr[323])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJINITROUTINE__V41*/ meltfptr[40]); MELT_LOCATION ("warmelt-outobj.melt:751:/ initchunk"); @@ -26609,13 +26604,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_2 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V323*/ meltfptr[322])) + ( /*_._VALROUT___V324*/ meltfptr[323])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_127__OUTCINITFILL_OBJINITROUTINE#1", NULL != ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_._VALROUT___V323*/ meltfptr[322])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V324*/ meltfptr[323])->tabval[1] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:751:/ initchunk"); @@ -26624,13 +26619,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_2 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V323*/ meltfptr[322])) + ( /*_._VALROUT___V324*/ meltfptr[323])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_127__OUTCINITFILL_OBJINITROUTINE#2", NULL != ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19])); - ((meltroutine_ptr_t) /*_._VALROUT___V323*/ meltfptr[322])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V324*/ meltfptr[323])->tabval[2] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]); MELT_LOCATION ("warmelt-outobj.melt:751:/ initchunk"); @@ -26639,13 +26634,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_2 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V323*/ meltfptr[322])) + ( /*_._VALROUT___V324*/ meltfptr[323])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_127__OUTCINITFILL_OBJINITROUTINE#3", NULL != ( /*_.CLASS_NREP_DATAROUTINE__V42*/ meltfptr[41])); - ((meltroutine_ptr_t) /*_._VALROUT___V323*/ meltfptr[322])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V324*/ meltfptr[323])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_NREP_DATAROUTINE__V42*/ meltfptr[41]); MELT_LOCATION ("warmelt-outobj.melt:751:/ initchunk"); @@ -26654,13 +26649,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_2 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V323*/ meltfptr[322])) + ( /*_._VALROUT___V324*/ meltfptr[323])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_127__OUTCINITFILL_OBJINITROUTINE#4", NULL != ( /*_.CLASS_NAMED__V13*/ meltfptr[12])); - ((meltroutine_ptr_t) /*_._VALROUT___V323*/ meltfptr[322])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V324*/ meltfptr[323])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_NAMED__V13*/ meltfptr[12]); MELT_LOCATION ("warmelt-outobj.melt:751:/ initchunk"); @@ -26669,13 +26664,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_2 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V323*/ meltfptr[322])) + ( /*_._VALROUT___V324*/ meltfptr[323])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_127__OUTCINITFILL_OBJINITROUTINE#5", NULL != ( /*_.CLASS_NREP_ROUTPROC__V43*/ meltfptr[42])); - ((meltroutine_ptr_t) /*_._VALROUT___V323*/ meltfptr[322])->tabval[5] = + ((meltroutine_ptr_t) /*_._VALROUT___V324*/ meltfptr[323])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_NREP_ROUTPROC__V43*/ meltfptr[42]); MELT_LOCATION ("warmelt-outobj.melt:751:/ initchunk"); @@ -26683,12 +26678,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_2 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V323*/ meltfptr[322])) == + ( /*_._VALROUT___V324*/ meltfptr[323])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALDATA___V197*/ meltfptr[196]); - ((meltroutine_ptr_t) /*_._VALROUT___V323*/ meltfptr[322])->tabval[6] = - (melt_ptr_t) ( /*_._VALDATA___V197*/ meltfptr[196]); + NULL != /*_._VALDATA___V198*/ meltfptr[197]); + ((meltroutine_ptr_t) /*_._VALROUT___V324*/ meltfptr[323])->tabval[6] = + (melt_ptr_t) ( /*_._VALDATA___V198*/ meltfptr[197]); MELT_LOCATION ("warmelt-outobj.melt:751:/ initchunk"); /*^putroutconst */ @@ -26696,79 +26691,79 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_2 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V323*/ meltfptr[322])) + ( /*_._VALROUT___V324*/ meltfptr[323])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_127__OUTCINITFILL_OBJINITROUTINE#7", NULL != ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5])); - ((meltroutine_ptr_t) /*_._VALROUT___V323*/ meltfptr[322])->tabval[7] = + ((meltroutine_ptr_t) /*_._VALROUT___V324*/ meltfptr[323])->tabval[7] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5]); MELT_LOCATION ("warmelt-outobj.melt:751:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V323*/ meltfptr[322]); + meltgc_touch ( /*_._VALROUT___V324*/ meltfptr[323]); /*putclosurout#25 */ melt_assertmsg ("putclosrout#25 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V324*/ meltfptr[323])) == + ( /*_._VALCLO___V325*/ meltfptr[324])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#25 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V323*/ meltfptr[322])) == + ( /*_._VALROUT___V324*/ meltfptr[323])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V324*/ meltfptr[323])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V323*/ meltfptr[322]); + ((meltclosure_ptr_t) /*_._VALCLO___V325*/ meltfptr[324])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V324*/ meltfptr[323]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V324*/ meltfptr[323]); + meltgc_touch ( /*_._VALCLO___V325*/ meltfptr[324]); /*putslot */ melt_assertmsg ("checkobj putslot ~dsym_129__CLASS_NREP_DATAROUTINE @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V325*/ meltfptr[324])) == + ( /*_._VALDATA___V326*/ meltfptr[325])) == MELTOBMAG_OBJECT); melt_assertmsg ("checkoff putslot ~dsym_129__CLASS_NREP_DATAROUTINE @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V325*/ - meltfptr[324])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V325*/ meltfptr[324]))->obj_vartab[1] = + ( /*_._VALDATA___V326*/ + meltfptr[325])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V326*/ meltfptr[325]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V326*/ meltfptr[325]); + /*_._VALSTR___V327*/ meltfptr[326]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V325*/ meltfptr[324]); + meltgc_touch ( /*_._VALDATA___V326*/ meltfptr[325]); - melt_dbgtrace_written_object ( /*_._VALDATA___V325*/ meltfptr[324], + melt_dbgtrace_written_object ( /*_._VALDATA___V326*/ meltfptr[325], "new static instance"); /*putslot */ melt_assertmsg ("checkobj putslot ~dsym_131__CLASS_NREP_ROUTPROC @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V327*/ meltfptr[326])) == + ( /*_._VALDATA___V328*/ meltfptr[327])) == MELTOBMAG_OBJECT); melt_assertmsg ("checkoff putslot ~dsym_131__CLASS_NREP_ROUTPROC @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V327*/ - meltfptr[326])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V327*/ meltfptr[326]))->obj_vartab[1] = + ( /*_._VALDATA___V328*/ + meltfptr[327])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V328*/ meltfptr[327]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V328*/ meltfptr[327]); + /*_._VALSTR___V329*/ meltfptr[328]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V327*/ meltfptr[326]); + meltgc_touch ( /*_._VALDATA___V328*/ meltfptr[327]); - melt_dbgtrace_written_object ( /*_._VALDATA___V327*/ meltfptr[326], + melt_dbgtrace_written_object ( /*_._VALDATA___V328*/ meltfptr[327], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:851:/ initchunk"); @@ -26777,13 +26772,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_2 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V329*/ meltfptr[328])) + ( /*_._VALROUT___V330*/ meltfptr[329])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_133__OUTDECLINIT_OBJINITHOOK#0", NULL != ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_._VALROUT___V329*/ meltfptr[328])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V330*/ meltfptr[329])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:851:/ initchunk"); @@ -26792,13 +26787,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_2 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V329*/ meltfptr[328])) + ( /*_._VALROUT___V330*/ meltfptr[329])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_133__OUTDECLINIT_OBJINITHOOK#1", NULL != ( /*_.CLASS_OBJINITHOOK__V37*/ meltfptr[36])); - ((meltroutine_ptr_t) /*_._VALROUT___V329*/ meltfptr[328])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V330*/ meltfptr[329])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_OBJINITHOOK__V37*/ meltfptr[36]); MELT_LOCATION ("warmelt-outobj.melt:851:/ initchunk"); @@ -26807,34 +26802,34 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_2 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V329*/ meltfptr[328])) + ( /*_._VALROUT___V330*/ meltfptr[329])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_133__OUTDECLINIT_OBJINITHOOK#2", NULL != ( /*_.CLASS_OBJINITELEM__V19*/ meltfptr[18])); - ((meltroutine_ptr_t) /*_._VALROUT___V329*/ meltfptr[328])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V330*/ meltfptr[329])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_OBJINITELEM__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-outobj.melt:851:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V329*/ meltfptr[328]); + meltgc_touch ( /*_._VALROUT___V330*/ meltfptr[329]); /*putclosurout#26 */ melt_assertmsg ("putclosrout#26 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V330*/ meltfptr[329])) == + ( /*_._VALCLO___V331*/ meltfptr[330])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#26 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V329*/ meltfptr[328])) == + ( /*_._VALROUT___V330*/ meltfptr[329])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V330*/ meltfptr[329])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V329*/ meltfptr[328]); + ((meltclosure_ptr_t) /*_._VALCLO___V331*/ meltfptr[330])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V330*/ meltfptr[329]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V330*/ meltfptr[329]); + meltgc_touch ( /*_._VALCLO___V331*/ meltfptr[330]); MELT_LOCATION ("warmelt-outobj.melt:864:/ initchunk"); /*^putroutconst */ @@ -26842,13 +26837,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_2 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V331*/ meltfptr[330])) + ( /*_._VALROUT___V332*/ meltfptr[331])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_135__OUTCINITFILL_OBJINITHOOK#0", NULL != ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_._VALROUT___V331*/ meltfptr[330])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V332*/ meltfptr[331])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:864:/ initchunk"); @@ -26857,13 +26852,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_2 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V331*/ meltfptr[330])) + ( /*_._VALROUT___V332*/ meltfptr[331])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_135__OUTCINITFILL_OBJINITHOOK#1", NULL != ( /*_.CLASS_OBJINITHOOK__V37*/ meltfptr[36])); - ((meltroutine_ptr_t) /*_._VALROUT___V331*/ meltfptr[330])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V332*/ meltfptr[331])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_OBJINITHOOK__V37*/ meltfptr[36]); MELT_LOCATION ("warmelt-outobj.melt:864:/ initchunk"); @@ -26872,13 +26867,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_2 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V331*/ meltfptr[330])) + ( /*_._VALROUT___V332*/ meltfptr[331])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_135__OUTCINITFILL_OBJINITHOOK#2", NULL != ( /*_.CLASS_OBJINITELEM__V19*/ meltfptr[18])); - ((meltroutine_ptr_t) /*_._VALROUT___V331*/ meltfptr[330])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V332*/ meltfptr[331])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_OBJINITELEM__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-outobj.melt:864:/ initchunk"); @@ -26887,14 +26882,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_2 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V331*/ meltfptr[330])) + ( /*_._VALROUT___V332*/ meltfptr[331])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_135__OUTCINITFILL_OBJINITHOOK#3", - NULL != ( /*_.CLASS_NREP_HOOKPROC__V44*/ meltfptr[43])); - ((meltroutine_ptr_t) /*_._VALROUT___V331*/ meltfptr[330])->tabval[3] = - (melt_ptr_t) ( /*_.CLASS_NREP_HOOKPROC__V44*/ meltfptr[43]); + NULL != ( /*_.CLASS_NREP_CLOSPROC__V44*/ meltfptr[43])); + ((meltroutine_ptr_t) /*_._VALROUT___V332*/ meltfptr[331])->tabval[3] = + (melt_ptr_t) ( /*_.CLASS_NREP_CLOSPROC__V44*/ meltfptr[43]); MELT_LOCATION ("warmelt-outobj.melt:864:/ initchunk"); /*^putroutconst */ @@ -26902,13 +26897,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_2 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V331*/ meltfptr[330])) + ( /*_._VALROUT___V332*/ meltfptr[331])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_135__OUTCINITFILL_OBJINITHOOK#4", NULL != ( /*_.ADD2OUT__V14*/ meltfptr[13])); - ((meltroutine_ptr_t) /*_._VALROUT___V331*/ meltfptr[330])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V332*/ meltfptr[331])->tabval[4] = (melt_ptr_t) ( /*_.ADD2OUT__V14*/ meltfptr[13]); MELT_LOCATION ("warmelt-outobj.melt:864:/ initchunk"); @@ -26917,94 +26912,94 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_2 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V331*/ meltfptr[330])) + ( /*_._VALROUT___V332*/ meltfptr[331])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_135__OUTCINITFILL_OBJINITHOOK#5", NULL != ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19])); - ((meltroutine_ptr_t) /*_._VALROUT___V331*/ meltfptr[330])->tabval[5] = + ((meltroutine_ptr_t) /*_._VALROUT___V332*/ meltfptr[331])->tabval[5] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]); MELT_LOCATION ("warmelt-outobj.melt:864:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V331*/ meltfptr[330]); + meltgc_touch ( /*_._VALROUT___V332*/ meltfptr[331]); /*putclosurout#27 */ melt_assertmsg ("putclosrout#27 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V332*/ meltfptr[331])) == + ( /*_._VALCLO___V333*/ meltfptr[332])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#27 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V331*/ meltfptr[330])) == + ( /*_._VALROUT___V332*/ meltfptr[331])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V332*/ meltfptr[331])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V331*/ meltfptr[330]); + ((meltclosure_ptr_t) /*_._VALCLO___V333*/ meltfptr[332])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V332*/ meltfptr[331]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V332*/ meltfptr[331]); + meltgc_touch ( /*_._VALCLO___V333*/ meltfptr[332]); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_137__CLASS_NREP_HOOKPROC @#1", + melt_assertmsg ("checkobj putslot ~dsym_137__CLASS_NREP_CLOSPROC @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V333*/ meltfptr[332])) == + ( /*_._VALDATA___V334*/ meltfptr[333])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_137__CLASS_NREP_HOOKPROC @#1", + melt_assertmsg ("checkoff putslot ~dsym_137__CLASS_NREP_CLOSPROC @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V333*/ - meltfptr[332])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V333*/ meltfptr[332]))->obj_vartab[1] = + ( /*_._VALDATA___V334*/ + meltfptr[333])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V334*/ meltfptr[333]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V334*/ meltfptr[333]); + /*_._VALSTR___V335*/ meltfptr[334]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V333*/ meltfptr[332]); + meltgc_touch ( /*_._VALDATA___V334*/ meltfptr[333]); - melt_dbgtrace_written_object ( /*_._VALDATA___V333*/ meltfptr[332], + melt_dbgtrace_written_object ( /*_._VALDATA___V334*/ meltfptr[333], "new static instance"); /*putclosurout#28 */ melt_assertmsg ("putclosrout#28 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V336*/ meltfptr[335])) == + ( /*_._VALCLO___V337*/ meltfptr[336])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#28 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V335*/ meltfptr[334])) == + ( /*_._VALROUT___V336*/ meltfptr[335])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V336*/ meltfptr[335])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V335*/ meltfptr[334]); + ((meltclosure_ptr_t) /*_._VALCLO___V337*/ meltfptr[336])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V336*/ meltfptr[335]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V336*/ meltfptr[335]); + meltgc_touch ( /*_._VALCLO___V337*/ meltfptr[336]); /*putslot */ melt_assertmsg ("checkobj putslot ~dsym_141__CLASS_OBJINITSTRING @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V337*/ meltfptr[336])) == + ( /*_._VALDATA___V338*/ meltfptr[337])) == MELTOBMAG_OBJECT); melt_assertmsg ("checkoff putslot ~dsym_141__CLASS_OBJINITSTRING @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V337*/ - meltfptr[336])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V337*/ meltfptr[336]))->obj_vartab[1] = + ( /*_._VALDATA___V338*/ + meltfptr[337])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V338*/ meltfptr[337]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V338*/ meltfptr[337]); + /*_._VALSTR___V339*/ meltfptr[338]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V337*/ meltfptr[336]); + meltgc_touch ( /*_._VALDATA___V338*/ meltfptr[337]); - melt_dbgtrace_written_object ( /*_._VALDATA___V337*/ meltfptr[336], + melt_dbgtrace_written_object ( /*_._VALDATA___V338*/ meltfptr[337], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:937:/ initchunk"); @@ -27013,13 +27008,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_2 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V339*/ meltfptr[338])) + ( /*_._VALROUT___V340*/ meltfptr[339])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_143__OUTCINITFILL_OBJINITSTRING#0", NULL != ( /*_.CLASS_OBJINITSTRING__V45*/ meltfptr[44])); - ((meltroutine_ptr_t) /*_._VALROUT___V339*/ meltfptr[338])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V340*/ meltfptr[339])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJINITSTRING__V45*/ meltfptr[44]); MELT_LOCATION ("warmelt-outobj.melt:937:/ initchunk"); @@ -27028,13 +27023,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_2 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V339*/ meltfptr[338])) + ( /*_._VALROUT___V340*/ meltfptr[339])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_143__OUTCINITFILL_OBJINITSTRING#1", NULL != ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_._VALROUT___V339*/ meltfptr[338])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V340*/ meltfptr[339])->tabval[1] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:937:/ initchunk"); @@ -27043,13 +27038,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_2 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V339*/ meltfptr[338])) + ( /*_._VALROUT___V340*/ meltfptr[339])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_143__OUTCINITFILL_OBJINITSTRING#2", NULL != ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19])); - ((meltroutine_ptr_t) /*_._VALROUT___V339*/ meltfptr[338])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V340*/ meltfptr[339])->tabval[2] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]); MELT_LOCATION ("warmelt-outobj.melt:937:/ initchunk"); @@ -27057,12 +27052,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_2 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V339*/ meltfptr[338])) == + ( /*_._VALROUT___V340*/ meltfptr[339])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALDATA___V197*/ meltfptr[196]); - ((meltroutine_ptr_t) /*_._VALROUT___V339*/ meltfptr[338])->tabval[3] = - (melt_ptr_t) ( /*_._VALDATA___V197*/ meltfptr[196]); + NULL != /*_._VALDATA___V198*/ meltfptr[197]); + ((meltroutine_ptr_t) /*_._VALROUT___V340*/ meltfptr[339])->tabval[3] = + (melt_ptr_t) ( /*_._VALDATA___V198*/ meltfptr[197]); MELT_LOCATION ("warmelt-outobj.melt:937:/ initchunk"); /*^putroutconst */ @@ -27070,13 +27065,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_2 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V339*/ meltfptr[338])) + ( /*_._VALROUT___V340*/ meltfptr[339])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_143__OUTCINITFILL_OBJINITSTRING#4", NULL != ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5])); - ((meltroutine_ptr_t) /*_._VALROUT___V339*/ meltfptr[338])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V340*/ meltfptr[339])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5]); MELT_LOCATION ("warmelt-outobj.melt:937:/ initchunk"); @@ -27085,71 +27080,71 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_2 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V339*/ meltfptr[338])) + ( /*_._VALROUT___V340*/ meltfptr[339])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_143__OUTCINITFILL_OBJINITSTRING#5", NULL != ( /*_.ADD2OUT__V14*/ meltfptr[13])); - ((meltroutine_ptr_t) /*_._VALROUT___V339*/ meltfptr[338])->tabval[5] = + ((meltroutine_ptr_t) /*_._VALROUT___V340*/ meltfptr[339])->tabval[5] = (melt_ptr_t) ( /*_.ADD2OUT__V14*/ meltfptr[13]); MELT_LOCATION ("warmelt-outobj.melt:937:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V339*/ meltfptr[338]); + meltgc_touch ( /*_._VALROUT___V340*/ meltfptr[339]); /*putclosurout#29 */ melt_assertmsg ("putclosrout#29 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V340*/ meltfptr[339])) == + ( /*_._VALCLO___V341*/ meltfptr[340])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#29 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V339*/ meltfptr[338])) == + ( /*_._VALROUT___V340*/ meltfptr[339])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V340*/ meltfptr[339])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V339*/ meltfptr[338]); + ((meltclosure_ptr_t) /*_._VALCLO___V341*/ meltfptr[340])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V340*/ meltfptr[339]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V340*/ meltfptr[339]); + meltgc_touch ( /*_._VALCLO___V341*/ meltfptr[340]); /*putclosurout#30 */ melt_assertmsg ("putclosrout#30 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V342*/ meltfptr[341])) == + ( /*_._VALCLO___V343*/ meltfptr[342])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#30 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V341*/ meltfptr[340])) == + ( /*_._VALROUT___V342*/ meltfptr[341])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V342*/ meltfptr[341])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V341*/ meltfptr[340]); + ((meltclosure_ptr_t) /*_._VALCLO___V343*/ meltfptr[342])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V342*/ meltfptr[341]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V342*/ meltfptr[341]); + meltgc_touch ( /*_._VALCLO___V343*/ meltfptr[342]); /*putslot */ melt_assertmsg ("checkobj putslot ~dsym_147__CLASS_OBJINITBOXINTEGER @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V343*/ meltfptr[342])) == + ( /*_._VALDATA___V344*/ meltfptr[343])) == MELTOBMAG_OBJECT); melt_assertmsg ("checkoff putslot ~dsym_147__CLASS_OBJINITBOXINTEGER @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V343*/ - meltfptr[342])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V343*/ meltfptr[342]))->obj_vartab[1] = + ( /*_._VALDATA___V344*/ + meltfptr[343])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V344*/ meltfptr[343]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V344*/ meltfptr[343]); + /*_._VALSTR___V345*/ meltfptr[344]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V343*/ meltfptr[342]); + meltgc_touch ( /*_._VALDATA___V344*/ meltfptr[343]); - melt_dbgtrace_written_object ( /*_._VALDATA___V343*/ meltfptr[342], + melt_dbgtrace_written_object ( /*_._VALDATA___V344*/ meltfptr[343], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:1144:/ initchunk"); @@ -27158,13 +27153,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_2 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V345*/ meltfptr[344])) + ( /*_._VALROUT___V346*/ meltfptr[345])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_149__OUTCINITFILL_OBJINITBOXEDINTEGER#0", NULL != ( /*_.CLASS_OBJINITBOXINTEGER__V46*/ meltfptr[45])); - ((meltroutine_ptr_t) /*_._VALROUT___V345*/ meltfptr[344])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V346*/ meltfptr[345])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJINITBOXINTEGER__V46*/ meltfptr[45]); MELT_LOCATION ("warmelt-outobj.melt:1144:/ initchunk"); @@ -27173,13 +27168,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_2 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V345*/ meltfptr[344])) + ( /*_._VALROUT___V346*/ meltfptr[345])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_149__OUTCINITFILL_OBJINITBOXEDINTEGER#1", NULL != ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_._VALROUT___V345*/ meltfptr[344])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V346*/ meltfptr[345])->tabval[1] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:1144:/ initchunk"); @@ -27188,13 +27183,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_2 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V345*/ meltfptr[344])) + ( /*_._VALROUT___V346*/ meltfptr[345])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_149__OUTCINITFILL_OBJINITBOXEDINTEGER#2", NULL != ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19])); - ((meltroutine_ptr_t) /*_._VALROUT___V345*/ meltfptr[344])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V346*/ meltfptr[345])->tabval[2] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]); MELT_LOCATION ("warmelt-outobj.melt:1144:/ initchunk"); @@ -27202,12 +27197,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_2 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V345*/ meltfptr[344])) == + ( /*_._VALROUT___V346*/ meltfptr[345])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALDATA___V197*/ meltfptr[196]); - ((meltroutine_ptr_t) /*_._VALROUT___V345*/ meltfptr[344])->tabval[3] = - (melt_ptr_t) ( /*_._VALDATA___V197*/ meltfptr[196]); + NULL != /*_._VALDATA___V198*/ meltfptr[197]); + ((meltroutine_ptr_t) /*_._VALROUT___V346*/ meltfptr[345])->tabval[3] = + (melt_ptr_t) ( /*_._VALDATA___V198*/ meltfptr[197]); MELT_LOCATION ("warmelt-outobj.melt:1144:/ initchunk"); /*^putroutconst */ @@ -27215,71 +27210,71 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_2 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V345*/ meltfptr[344])) + ( /*_._VALROUT___V346*/ meltfptr[345])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_149__OUTCINITFILL_OBJINITBOXEDINTEGER#4", NULL != ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5])); - ((meltroutine_ptr_t) /*_._VALROUT___V345*/ meltfptr[344])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V346*/ meltfptr[345])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5]); MELT_LOCATION ("warmelt-outobj.melt:1144:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V345*/ meltfptr[344]); + meltgc_touch ( /*_._VALROUT___V346*/ meltfptr[345]); /*putclosurout#31 */ melt_assertmsg ("putclosrout#31 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V346*/ meltfptr[345])) == + ( /*_._VALCLO___V347*/ meltfptr[346])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#31 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V345*/ meltfptr[344])) == + ( /*_._VALROUT___V346*/ meltfptr[345])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V346*/ meltfptr[345])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V345*/ meltfptr[344]); + ((meltclosure_ptr_t) /*_._VALCLO___V347*/ meltfptr[346])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V346*/ meltfptr[345]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V346*/ meltfptr[345]); + meltgc_touch ( /*_._VALCLO___V347*/ meltfptr[346]); /*putclosurout#32 */ melt_assertmsg ("putclosrout#32 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V348*/ meltfptr[347])) == + ( /*_._VALCLO___V349*/ meltfptr[348])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#32 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V347*/ meltfptr[346])) == + ( /*_._VALROUT___V348*/ meltfptr[347])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V348*/ meltfptr[347])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V347*/ meltfptr[346]); + ((meltclosure_ptr_t) /*_._VALCLO___V349*/ meltfptr[348])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V348*/ meltfptr[347]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V348*/ meltfptr[347]); + meltgc_touch ( /*_._VALCLO___V349*/ meltfptr[348]); /*putslot */ melt_assertmsg ("checkobj putslot ~dsym_153__CLASS_OBJINITPAIR @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V349*/ meltfptr[348])) == + ( /*_._VALDATA___V350*/ meltfptr[349])) == MELTOBMAG_OBJECT); melt_assertmsg ("checkoff putslot ~dsym_153__CLASS_OBJINITPAIR @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V349*/ - meltfptr[348])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V349*/ meltfptr[348]))->obj_vartab[1] = + ( /*_._VALDATA___V350*/ + meltfptr[349])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V350*/ meltfptr[349]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V350*/ meltfptr[349]); + /*_._VALSTR___V351*/ meltfptr[350]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V349*/ meltfptr[348]); + meltgc_touch ( /*_._VALDATA___V350*/ meltfptr[349]); - melt_dbgtrace_written_object ( /*_._VALDATA___V349*/ meltfptr[348], + melt_dbgtrace_written_object ( /*_._VALDATA___V350*/ meltfptr[349], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:1203:/ initchunk"); @@ -27288,13 +27283,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_2 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V351*/ meltfptr[350])) + ( /*_._VALROUT___V352*/ meltfptr[351])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_155__OUTCINITFILL_OBJINITPAIR#0", NULL != ( /*_.CLASS_OBJINITPAIR__V47*/ meltfptr[46])); - ((meltroutine_ptr_t) /*_._VALROUT___V351*/ meltfptr[350])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V352*/ meltfptr[351])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJINITPAIR__V47*/ meltfptr[46]); MELT_LOCATION ("warmelt-outobj.melt:1203:/ initchunk"); @@ -27303,13 +27298,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_2 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V351*/ meltfptr[350])) + ( /*_._VALROUT___V352*/ meltfptr[351])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_155__OUTCINITFILL_OBJINITPAIR#1", NULL != ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_._VALROUT___V351*/ meltfptr[350])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V352*/ meltfptr[351])->tabval[1] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:1203:/ initchunk"); @@ -27318,13 +27313,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_2 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V351*/ meltfptr[350])) + ( /*_._VALROUT___V352*/ meltfptr[351])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_155__OUTCINITFILL_OBJINITPAIR#2", NULL != ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19])); - ((meltroutine_ptr_t) /*_._VALROUT___V351*/ meltfptr[350])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V352*/ meltfptr[351])->tabval[2] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]); MELT_LOCATION ("warmelt-outobj.melt:1203:/ initchunk"); @@ -27332,12 +27327,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_2 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V351*/ meltfptr[350])) == + ( /*_._VALROUT___V352*/ meltfptr[351])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALDATA___V197*/ meltfptr[196]); - ((meltroutine_ptr_t) /*_._VALROUT___V351*/ meltfptr[350])->tabval[3] = - (melt_ptr_t) ( /*_._VALDATA___V197*/ meltfptr[196]); + NULL != /*_._VALDATA___V198*/ meltfptr[197]); + ((meltroutine_ptr_t) /*_._VALROUT___V352*/ meltfptr[351])->tabval[3] = + (melt_ptr_t) ( /*_._VALDATA___V198*/ meltfptr[197]); MELT_LOCATION ("warmelt-outobj.melt:1203:/ initchunk"); /*^putroutconst */ @@ -27345,71 +27340,71 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_2 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V351*/ meltfptr[350])) + ( /*_._VALROUT___V352*/ meltfptr[351])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_155__OUTCINITFILL_OBJINITPAIR#4", NULL != ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5])); - ((meltroutine_ptr_t) /*_._VALROUT___V351*/ meltfptr[350])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V352*/ meltfptr[351])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5]); MELT_LOCATION ("warmelt-outobj.melt:1203:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V351*/ meltfptr[350]); + meltgc_touch ( /*_._VALROUT___V352*/ meltfptr[351]); /*putclosurout#33 */ melt_assertmsg ("putclosrout#33 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V352*/ meltfptr[351])) == + ( /*_._VALCLO___V353*/ meltfptr[352])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#33 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V351*/ meltfptr[350])) == + ( /*_._VALROUT___V352*/ meltfptr[351])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V352*/ meltfptr[351])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V351*/ meltfptr[350]); + ((meltclosure_ptr_t) /*_._VALCLO___V353*/ meltfptr[352])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V352*/ meltfptr[351]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V352*/ meltfptr[351]); + meltgc_touch ( /*_._VALCLO___V353*/ meltfptr[352]); /*putclosurout#34 */ melt_assertmsg ("putclosrout#34 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V354*/ meltfptr[353])) == + ( /*_._VALCLO___V355*/ meltfptr[354])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#34 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V353*/ meltfptr[352])) == + ( /*_._VALROUT___V354*/ meltfptr[353])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V354*/ meltfptr[353])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V353*/ meltfptr[352]); + ((meltclosure_ptr_t) /*_._VALCLO___V355*/ meltfptr[354])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V354*/ meltfptr[353]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V354*/ meltfptr[353]); + meltgc_touch ( /*_._VALCLO___V355*/ meltfptr[354]); /*putslot */ melt_assertmsg ("checkobj putslot ~dsym_159__CLASS_OBJINITLIST @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V355*/ meltfptr[354])) == + ( /*_._VALDATA___V356*/ meltfptr[355])) == MELTOBMAG_OBJECT); melt_assertmsg ("checkoff putslot ~dsym_159__CLASS_OBJINITLIST @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V355*/ - meltfptr[354])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V355*/ meltfptr[354]))->obj_vartab[1] = + ( /*_._VALDATA___V356*/ + meltfptr[355])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V356*/ meltfptr[355]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V356*/ meltfptr[355]); + /*_._VALSTR___V357*/ meltfptr[356]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V355*/ meltfptr[354]); + meltgc_touch ( /*_._VALDATA___V356*/ meltfptr[355]); - melt_dbgtrace_written_object ( /*_._VALDATA___V355*/ meltfptr[354], + melt_dbgtrace_written_object ( /*_._VALDATA___V356*/ meltfptr[355], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:1252:/ initchunk"); @@ -27418,13 +27413,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_2 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V357*/ meltfptr[356])) + ( /*_._VALROUT___V358*/ meltfptr[357])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_161__OUTCINITFILL_OBJINITLIST#0", NULL != ( /*_.CLASS_OBJINITLIST__V48*/ meltfptr[47])); - ((meltroutine_ptr_t) /*_._VALROUT___V357*/ meltfptr[356])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V358*/ meltfptr[357])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJINITLIST__V48*/ meltfptr[47]); MELT_LOCATION ("warmelt-outobj.melt:1252:/ initchunk"); @@ -27433,13 +27428,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_2 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V357*/ meltfptr[356])) + ( /*_._VALROUT___V358*/ meltfptr[357])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_161__OUTCINITFILL_OBJINITLIST#1", NULL != ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_._VALROUT___V357*/ meltfptr[356])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V358*/ meltfptr[357])->tabval[1] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:1252:/ initchunk"); @@ -27448,13 +27443,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_2 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V357*/ meltfptr[356])) + ( /*_._VALROUT___V358*/ meltfptr[357])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_161__OUTCINITFILL_OBJINITLIST#2", NULL != ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19])); - ((meltroutine_ptr_t) /*_._VALROUT___V357*/ meltfptr[356])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V358*/ meltfptr[357])->tabval[2] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]); MELT_LOCATION ("warmelt-outobj.melt:1252:/ initchunk"); @@ -27462,12 +27457,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_2 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V357*/ meltfptr[356])) == + ( /*_._VALROUT___V358*/ meltfptr[357])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALDATA___V197*/ meltfptr[196]); - ((meltroutine_ptr_t) /*_._VALROUT___V357*/ meltfptr[356])->tabval[3] = - (melt_ptr_t) ( /*_._VALDATA___V197*/ meltfptr[196]); + NULL != /*_._VALDATA___V198*/ meltfptr[197]); + ((meltroutine_ptr_t) /*_._VALROUT___V358*/ meltfptr[357])->tabval[3] = + (melt_ptr_t) ( /*_._VALDATA___V198*/ meltfptr[197]); MELT_LOCATION ("warmelt-outobj.melt:1252:/ initchunk"); /*^putroutconst */ @@ -27475,34 +27470,34 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_2 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V357*/ meltfptr[356])) + ( /*_._VALROUT___V358*/ meltfptr[357])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_161__OUTCINITFILL_OBJINITLIST#4", NULL != ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5])); - ((meltroutine_ptr_t) /*_._VALROUT___V357*/ meltfptr[356])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V358*/ meltfptr[357])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5]); MELT_LOCATION ("warmelt-outobj.melt:1252:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V357*/ meltfptr[356]); + meltgc_touch ( /*_._VALROUT___V358*/ meltfptr[357]); /*putclosurout#35 */ melt_assertmsg ("putclosrout#35 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V358*/ meltfptr[357])) == + ( /*_._VALCLO___V359*/ meltfptr[358])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#35 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V357*/ meltfptr[356])) == + ( /*_._VALROUT___V358*/ meltfptr[357])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V358*/ meltfptr[357])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V357*/ meltfptr[356]); + ((meltclosure_ptr_t) /*_._VALCLO___V359*/ meltfptr[358])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V358*/ meltfptr[357]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V358*/ meltfptr[357]); + meltgc_touch ( /*_._VALCLO___V359*/ meltfptr[358]); MELT_LOCATION ("warmelt-outobj.melt:1294:/ initchunk"); /*^putroutconst */ @@ -27510,55 +27505,55 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_2 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V359*/ meltfptr[358])) + ( /*_._VALROUT___V360*/ meltfptr[359])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_163__OUTPUCOD_ANYDISCR#0", NULL != ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_._VALROUT___V359*/ meltfptr[358])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V360*/ meltfptr[359])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:1294:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V359*/ meltfptr[358]); + meltgc_touch ( /*_._VALROUT___V360*/ meltfptr[359]); /*putclosurout#36 */ melt_assertmsg ("putclosrout#36 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V360*/ meltfptr[359])) == + ( /*_._VALCLO___V361*/ meltfptr[360])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#36 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V359*/ meltfptr[358])) == + ( /*_._VALROUT___V360*/ meltfptr[359])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V360*/ meltfptr[359])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V359*/ meltfptr[358]); + ((meltclosure_ptr_t) /*_._VALCLO___V361*/ meltfptr[360])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V360*/ meltfptr[359]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V360*/ meltfptr[359]); + meltgc_touch ( /*_._VALCLO___V361*/ meltfptr[360]); /*putslot */ melt_assertmsg ("checkobj putslot ~dsym_165__DISCR_ANY_RECEIVER @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V361*/ meltfptr[360])) == + ( /*_._VALDATA___V362*/ meltfptr[361])) == MELTOBMAG_OBJECT); melt_assertmsg ("checkoff putslot ~dsym_165__DISCR_ANY_RECEIVER @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V361*/ - meltfptr[360])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V361*/ meltfptr[360]))->obj_vartab[1] = + ( /*_._VALDATA___V362*/ + meltfptr[361])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V362*/ meltfptr[361]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V362*/ meltfptr[361]); + /*_._VALSTR___V363*/ meltfptr[362]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V361*/ meltfptr[360]); + meltgc_touch ( /*_._VALDATA___V362*/ meltfptr[361]); - melt_dbgtrace_written_object ( /*_._VALDATA___V361*/ meltfptr[360], + melt_dbgtrace_written_object ( /*_._VALDATA___V362*/ meltfptr[361], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:1307:/ initchunk"); @@ -27567,30 +27562,30 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_2 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V363*/ meltfptr[362])) + ( /*_._VALROUT___V364*/ meltfptr[363])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_167__OUTPUCOD_NULL#0", NULL != ( /*_.ADD2OUT__V14*/ meltfptr[13])); - ((meltroutine_ptr_t) /*_._VALROUT___V363*/ meltfptr[362])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V364*/ meltfptr[363])->tabval[0] = (melt_ptr_t) ( /*_.ADD2OUT__V14*/ meltfptr[13]); MELT_LOCATION ("warmelt-outobj.melt:1307:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V363*/ meltfptr[362]); + meltgc_touch ( /*_._VALROUT___V364*/ meltfptr[363]); /*putclosurout#37 */ melt_assertmsg ("putclosrout#37 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V364*/ meltfptr[363])) == + ( /*_._VALCLO___V365*/ meltfptr[364])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#37 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V363*/ meltfptr[362])) == + ( /*_._VALROUT___V364*/ meltfptr[363])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V364*/ meltfptr[363])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V363*/ meltfptr[362]); + ((meltclosure_ptr_t) /*_._VALCLO___V365*/ meltfptr[364])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V364*/ meltfptr[363]); #undef meltfram__ @@ -27606,29 +27601,29 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_3 (meltinitial_frame_t * #define meltcallcount 0L (void) meltpredefinited; /*touch:_DATACLOSURE_*/ - meltgc_touch ( /*_._VALCLO___V364*/ meltfptr[363]); + meltgc_touch ( /*_._VALCLO___V365*/ meltfptr[364]); /*putslot */ melt_assertmsg ("checkobj putslot ~dsym_169__DISCR_NULL_RECEIVER @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V365*/ meltfptr[364])) == + ( /*_._VALDATA___V366*/ meltfptr[365])) == MELTOBMAG_OBJECT); melt_assertmsg ("checkoff putslot ~dsym_169__DISCR_NULL_RECEIVER @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V365*/ - meltfptr[364])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V365*/ meltfptr[364]))->obj_vartab[1] = + ( /*_._VALDATA___V366*/ + meltfptr[365])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V366*/ meltfptr[365]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V366*/ meltfptr[365]); + /*_._VALSTR___V367*/ meltfptr[366]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V365*/ meltfptr[364]); + meltgc_touch ( /*_._VALDATA___V366*/ meltfptr[365]); - melt_dbgtrace_written_object ( /*_._VALDATA___V365*/ meltfptr[364], + melt_dbgtrace_written_object ( /*_._VALDATA___V366*/ meltfptr[365], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:1316:/ initchunk"); @@ -27637,13 +27632,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V367*/ meltfptr[366])) + ( /*_._VALROUT___V368*/ meltfptr[367])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_171__OUTPUCOD_CATCHALL_ROOT#0", NULL != ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_._VALROUT___V367*/ meltfptr[366])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V368*/ meltfptr[367])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:1316:/ initchunk"); @@ -27652,102 +27647,102 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V367*/ meltfptr[366])) + ( /*_._VALROUT___V368*/ meltfptr[367])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_171__OUTPUCOD_CATCHALL_ROOT#1", NULL != ( /*_.DISPLAY_DEBUG_MESSAGE__V51*/ meltfptr[50])); - ((meltroutine_ptr_t) /*_._VALROUT___V367*/ meltfptr[366])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V368*/ meltfptr[367])->tabval[1] = (melt_ptr_t) ( /*_.DISPLAY_DEBUG_MESSAGE__V51*/ meltfptr[50]); MELT_LOCATION ("warmelt-outobj.melt:1316:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V367*/ meltfptr[366]); + meltgc_touch ( /*_._VALROUT___V368*/ meltfptr[367]); /*putclosurout#38 */ melt_assertmsg ("putclosrout#38 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V368*/ meltfptr[367])) == + ( /*_._VALCLO___V369*/ meltfptr[368])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#38 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V367*/ meltfptr[366])) == + ( /*_._VALROUT___V368*/ meltfptr[367])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V368*/ meltfptr[367])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V367*/ meltfptr[366]); + ((meltclosure_ptr_t) /*_._VALCLO___V369*/ meltfptr[368])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V368*/ meltfptr[367]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V368*/ meltfptr[367]); + meltgc_touch ( /*_._VALCLO___V369*/ meltfptr[368]); /*putslot */ melt_assertmsg ("checkobj putslot ~dsym_173__DISPLAY_DEBUG_MESSAGE @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V369*/ meltfptr[368])) == + ( /*_._VALDATA___V370*/ meltfptr[369])) == MELTOBMAG_OBJECT); melt_assertmsg ("checkoff putslot ~dsym_173__DISPLAY_DEBUG_MESSAGE @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V369*/ - meltfptr[368])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V369*/ meltfptr[368]))->obj_vartab[1] = + ( /*_._VALDATA___V370*/ + meltfptr[369])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V370*/ meltfptr[369]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V370*/ meltfptr[369]); + /*_._VALSTR___V371*/ meltfptr[370]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V369*/ meltfptr[368]); + meltgc_touch ( /*_._VALDATA___V370*/ meltfptr[369]); - melt_dbgtrace_written_object ( /*_._VALDATA___V369*/ meltfptr[368], + melt_dbgtrace_written_object ( /*_._VALDATA___V370*/ meltfptr[369], "new static instance"); /*putslot */ melt_assertmsg ("checkobj putslot ~dsym_177__PREVLOC_CONTAINER @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V371*/ meltfptr[370])) == + ( /*_._VALDATA___V372*/ meltfptr[371])) == MELTOBMAG_OBJECT); melt_assertmsg ("checkoff putslot ~dsym_177__PREVLOC_CONTAINER @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V371*/ - meltfptr[370])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V371*/ meltfptr[370]))->obj_vartab[1] = + ( /*_._VALDATA___V372*/ + meltfptr[371])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V372*/ meltfptr[371]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V372*/ meltfptr[371]); + /*_._VALSTR___V373*/ meltfptr[372]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V371*/ meltfptr[370]); + meltgc_touch ( /*_._VALDATA___V372*/ meltfptr[371]); - melt_dbgtrace_written_object ( /*_._VALDATA___V371*/ meltfptr[370], + melt_dbgtrace_written_object ( /*_._VALDATA___V372*/ meltfptr[371], "new static instance"); /*putslot */ melt_assertmsg ("checkobj putslot ~dsym_180__PREVIMPLBUF_CONTAINER @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V373*/ meltfptr[372])) == + ( /*_._VALDATA___V374*/ meltfptr[373])) == MELTOBMAG_OBJECT); melt_assertmsg ("checkoff putslot ~dsym_180__PREVIMPLBUF_CONTAINER @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V373*/ - meltfptr[372])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V373*/ meltfptr[372]))->obj_vartab[1] = + ( /*_._VALDATA___V374*/ + meltfptr[373])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V374*/ meltfptr[373]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V374*/ meltfptr[373]); + /*_._VALSTR___V375*/ meltfptr[374]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V373*/ meltfptr[372]); + meltgc_touch ( /*_._VALDATA___V374*/ meltfptr[373]); - melt_dbgtrace_written_object ( /*_._VALDATA___V373*/ meltfptr[372], + melt_dbgtrace_written_object ( /*_._VALDATA___V374*/ meltfptr[373], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:1377:/ initchunk"); @@ -27756,13 +27751,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V375*/ meltfptr[374])) + ( /*_._VALROUT___V376*/ meltfptr[375])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_183__LINE_AND_FILE_OF_LOCATION#0", NULL != ( /*_.DISCR_INTEGER__V52*/ meltfptr[51])); - ((meltroutine_ptr_t) /*_._VALROUT___V375*/ meltfptr[374])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V376*/ meltfptr[375])->tabval[0] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V52*/ meltfptr[51]); MELT_LOCATION ("warmelt-outobj.melt:1377:/ initchunk"); @@ -27771,79 +27766,79 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V375*/ meltfptr[374])) + ( /*_._VALROUT___V376*/ meltfptr[375])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_183__LINE_AND_FILE_OF_LOCATION#1", NULL != ( /*_.DISCR_STRING__V53*/ meltfptr[52])); - ((meltroutine_ptr_t) /*_._VALROUT___V375*/ meltfptr[374])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V376*/ meltfptr[375])->tabval[1] = (melt_ptr_t) ( /*_.DISCR_STRING__V53*/ meltfptr[52]); MELT_LOCATION ("warmelt-outobj.melt:1377:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V375*/ meltfptr[374]); + meltgc_touch ( /*_._VALROUT___V376*/ meltfptr[375]); /*putclosurout#39 */ melt_assertmsg ("putclosrout#39 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V376*/ meltfptr[375])) == + ( /*_._VALCLO___V377*/ meltfptr[376])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#39 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V375*/ meltfptr[374])) == + ( /*_._VALROUT___V376*/ meltfptr[375])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V376*/ meltfptr[375])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V375*/ meltfptr[374]); + ((meltclosure_ptr_t) /*_._VALCLO___V377*/ meltfptr[376])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V376*/ meltfptr[375]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V376*/ meltfptr[375]); + meltgc_touch ( /*_._VALCLO___V377*/ meltfptr[376]); /*putslot */ melt_assertmsg ("checkobj putslot ~dsym_185__DISCR_INTEGER @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V377*/ meltfptr[376])) == + ( /*_._VALDATA___V378*/ meltfptr[377])) == MELTOBMAG_OBJECT); melt_assertmsg ("checkoff putslot ~dsym_185__DISCR_INTEGER @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V377*/ - meltfptr[376])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V377*/ meltfptr[376]))->obj_vartab[1] = + ( /*_._VALDATA___V378*/ + meltfptr[377])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V378*/ meltfptr[377]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V378*/ meltfptr[377]); + /*_._VALSTR___V379*/ meltfptr[378]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V377*/ meltfptr[376]); + meltgc_touch ( /*_._VALDATA___V378*/ meltfptr[377]); - melt_dbgtrace_written_object ( /*_._VALDATA___V377*/ meltfptr[376], + melt_dbgtrace_written_object ( /*_._VALDATA___V378*/ meltfptr[377], "new static instance"); /*putslot */ melt_assertmsg ("checkobj putslot ~dsym_187__DISCR_STRING @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V379*/ meltfptr[378])) == + ( /*_._VALDATA___V380*/ meltfptr[379])) == MELTOBMAG_OBJECT); melt_assertmsg ("checkoff putslot ~dsym_187__DISCR_STRING @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V379*/ - meltfptr[378])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V379*/ meltfptr[378]))->obj_vartab[1] = + ( /*_._VALDATA___V380*/ + meltfptr[379])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V380*/ meltfptr[379]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V380*/ meltfptr[379]); + /*_._VALSTR___V381*/ meltfptr[380]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V379*/ meltfptr[378]); + meltgc_touch ( /*_._VALDATA___V380*/ meltfptr[379]); - melt_dbgtrace_written_object ( /*_._VALDATA___V379*/ meltfptr[378], + melt_dbgtrace_written_object ( /*_._VALDATA___V380*/ meltfptr[379], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:1468:/ initchunk"); @@ -27852,13 +27847,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V381*/ meltfptr[380])) + ( /*_._VALROUT___V382*/ meltfptr[381])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_191__OUTPUT_CURFRAME_DECLSTRUCT#0", NULL != ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_._VALROUT___V381*/ meltfptr[380])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V382*/ meltfptr[381])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:1468:/ initchunk"); @@ -27867,13 +27862,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V381*/ meltfptr[380])) + ( /*_._VALROUT___V382*/ meltfptr[381])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_191__OUTPUT_CURFRAME_DECLSTRUCT#1", NULL != ( /*_.CLASS_INITIAL_EXTENSION_ROUTINEOBJ__V54*/ meltfptr[53])); - ((meltroutine_ptr_t) /*_._VALROUT___V381*/ meltfptr[380])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V382*/ meltfptr[381])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_INITIAL_EXTENSION_ROUTINEOBJ__V54*/ meltfptr[53]); @@ -27883,13 +27878,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V381*/ meltfptr[380])) + ( /*_._VALROUT___V382*/ meltfptr[381])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_191__OUTPUT_CURFRAME_DECLSTRUCT#2", NULL != ( /*_.CLASS_INITIALROUTINEOBJ__V55*/ meltfptr[54])); - ((meltroutine_ptr_t) /*_._VALROUT___V381*/ meltfptr[380])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V382*/ meltfptr[381])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_INITIALROUTINEOBJ__V55*/ meltfptr[54]); MELT_LOCATION ("warmelt-outobj.melt:1468:/ initchunk"); @@ -27898,13 +27893,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V381*/ meltfptr[380])) + ( /*_._VALROUT___V382*/ meltfptr[381])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_191__OUTPUT_CURFRAME_DECLSTRUCT#3", NULL != ( /*_.CLASS_NAMED__V13*/ meltfptr[12])); - ((meltroutine_ptr_t) /*_._VALROUT___V381*/ meltfptr[380])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V382*/ meltfptr[381])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_NAMED__V13*/ meltfptr[12]); MELT_LOCATION ("warmelt-outobj.melt:1468:/ initchunk"); @@ -27913,13 +27908,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V381*/ meltfptr[380])) + ( /*_._VALROUT___V382*/ meltfptr[381])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_191__OUTPUT_CURFRAME_DECLSTRUCT#4", NULL != ( /*_.LIST_EVERY__V56*/ meltfptr[55])); - ((meltroutine_ptr_t) /*_._VALROUT___V381*/ meltfptr[380])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V382*/ meltfptr[381])->tabval[4] = (melt_ptr_t) ( /*_.LIST_EVERY__V56*/ meltfptr[55]); MELT_LOCATION ("warmelt-outobj.melt:1468:/ initchunk"); @@ -27928,13 +27923,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V381*/ meltfptr[380])) + ( /*_._VALROUT___V382*/ meltfptr[381])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_191__OUTPUT_CURFRAME_DECLSTRUCT#5", NULL != ( /*_.CLASS_OBJLOCV__V57*/ meltfptr[56])); - ((meltroutine_ptr_t) /*_._VALROUT___V381*/ meltfptr[380])->tabval[5] = + ((meltroutine_ptr_t) /*_._VALROUT___V382*/ meltfptr[381])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_OBJLOCV__V57*/ meltfptr[56]); MELT_LOCATION ("warmelt-outobj.melt:1468:/ initchunk"); @@ -27943,13 +27938,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V381*/ meltfptr[380])) + ( /*_._VALROUT___V382*/ meltfptr[381])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_191__OUTPUT_CURFRAME_DECLSTRUCT#6", NULL != ( /*_.CLASS_CTYPE__V28*/ meltfptr[27])); - ((meltroutine_ptr_t) /*_._VALROUT___V381*/ meltfptr[380])->tabval[6] = + ((meltroutine_ptr_t) /*_._VALROUT___V382*/ meltfptr[381])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_CTYPE__V28*/ meltfptr[27]); MELT_LOCATION ("warmelt-outobj.melt:1468:/ initchunk"); @@ -27957,12 +27952,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_3 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V381*/ meltfptr[380])) == + ( /*_._VALROUT___V382*/ meltfptr[381])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALDATA___V197*/ meltfptr[196]); - ((meltroutine_ptr_t) /*_._VALROUT___V381*/ meltfptr[380])->tabval[7] = - (melt_ptr_t) ( /*_._VALDATA___V197*/ meltfptr[196]); + NULL != /*_._VALDATA___V198*/ meltfptr[197]); + ((meltroutine_ptr_t) /*_._VALROUT___V382*/ meltfptr[381])->tabval[7] = + (melt_ptr_t) ( /*_._VALDATA___V198*/ meltfptr[197]); MELT_LOCATION ("warmelt-outobj.melt:1468:/ initchunk"); /*^putroutconst */ @@ -27970,13 +27965,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V381*/ meltfptr[380])) + ( /*_._VALROUT___V382*/ meltfptr[381])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_191__OUTPUT_CURFRAME_DECLSTRUCT#8", NULL != ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5])); - ((meltroutine_ptr_t) /*_._VALROUT___V381*/ meltfptr[380])->tabval[8] = + ((meltroutine_ptr_t) /*_._VALROUT___V382*/ meltfptr[381])->tabval[8] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5]); MELT_LOCATION ("warmelt-outobj.melt:1468:/ initchunk"); @@ -27985,13 +27980,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V381*/ meltfptr[380])) + ( /*_._VALROUT___V382*/ meltfptr[381])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_191__OUTPUT_CURFRAME_DECLSTRUCT#9", NULL != ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_._VALROUT___V381*/ meltfptr[380])->tabval[9] = + ((meltroutine_ptr_t) /*_._VALROUT___V382*/ meltfptr[381])->tabval[9] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:1559:/ initchunk"); @@ -28000,12 +27995,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V382*/ meltfptr[381])) + ( /*_._VALROUT___V383*/ meltfptr[382])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_199__LAMBDA_#0", NULL != ( /*_.CLASS_OBJLOCV__V57*/ meltfptr[56])); - ((meltroutine_ptr_t) /*_._VALROUT___V382*/ meltfptr[381])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V383*/ meltfptr[382])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJLOCV__V57*/ meltfptr[56]); MELT_LOCATION ("warmelt-outobj.melt:1559:/ initchunk"); @@ -28014,12 +28009,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V382*/ meltfptr[381])) + ( /*_._VALROUT___V383*/ meltfptr[382])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_199__LAMBDA_#1", NULL != ( /*_.CLASS_CTYPE__V28*/ meltfptr[27])); - ((meltroutine_ptr_t) /*_._VALROUT___V382*/ meltfptr[381])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V383*/ meltfptr[382])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_CTYPE__V28*/ meltfptr[27]); MELT_LOCATION ("warmelt-outobj.melt:1559:/ initchunk"); @@ -28027,12 +28022,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_3 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V382*/ meltfptr[381])) == + ( /*_._VALROUT___V383*/ meltfptr[382])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALDATA___V197*/ meltfptr[196]); - ((meltroutine_ptr_t) /*_._VALROUT___V382*/ meltfptr[381])->tabval[2] = - (melt_ptr_t) ( /*_._VALDATA___V197*/ meltfptr[196]); + NULL != /*_._VALDATA___V198*/ meltfptr[197]); + ((meltroutine_ptr_t) /*_._VALROUT___V383*/ meltfptr[382])->tabval[2] = + (melt_ptr_t) ( /*_._VALDATA___V198*/ meltfptr[197]); MELT_LOCATION ("warmelt-outobj.melt:1559:/ initchunk"); /*^putroutconst */ @@ -28040,12 +28035,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V382*/ meltfptr[381])) + ( /*_._VALROUT___V383*/ meltfptr[382])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_199__LAMBDA_#3", NULL != ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5])); - ((meltroutine_ptr_t) /*_._VALROUT___V382*/ meltfptr[381])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V383*/ meltfptr[382])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5]); MELT_LOCATION ("warmelt-outobj.melt:1559:/ initchunk"); @@ -28054,18 +28049,18 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V382*/ meltfptr[381])) + ( /*_._VALROUT___V383*/ meltfptr[382])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_199__LAMBDA_#4", NULL != ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_._VALROUT___V382*/ meltfptr[381])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V383*/ meltfptr[382])->tabval[4] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:1559:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V382*/ meltfptr[381]); + meltgc_touch ( /*_._VALROUT___V383*/ meltfptr[382]); MELT_LOCATION ("warmelt-outobj.melt:1468:/ initchunk"); /*^putroutconst */ @@ -28073,39 +28068,39 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V381*/ meltfptr[380])) + ( /*_._VALROUT___V382*/ meltfptr[381])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_191__OUTPUT_CURFRAME_DECLSTRUCT#10", - NULL != ( /*_._VALROUT___V382*/ meltfptr[381])); - ((meltroutine_ptr_t) /*_._VALROUT___V381*/ meltfptr[380])->tabval[10] = - (melt_ptr_t) ( /*_._VALROUT___V382*/ meltfptr[381]); + NULL != ( /*_._VALROUT___V383*/ meltfptr[382])); + ((meltroutine_ptr_t) /*_._VALROUT___V382*/ meltfptr[381])->tabval[10] = + (melt_ptr_t) ( /*_._VALROUT___V383*/ meltfptr[382]); MELT_LOCATION ("warmelt-outobj.melt:1468:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V381*/ meltfptr[380]); + meltgc_touch ( /*_._VALROUT___V382*/ meltfptr[381]); /*putclosurout#40 */ melt_assertmsg ("putclosrout#40 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V383*/ meltfptr[382])) == + ( /*_._VALCLO___V384*/ meltfptr[383])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#40 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V381*/ meltfptr[380])) == + ( /*_._VALROUT___V382*/ meltfptr[381])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V383*/ meltfptr[382])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V381*/ meltfptr[380]); + ((meltclosure_ptr_t) /*_._VALCLO___V384*/ meltfptr[383])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V382*/ meltfptr[381]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V383*/ meltfptr[382]); + meltgc_touch ( /*_._VALCLO___V384*/ meltfptr[383]); /*putslot */ melt_assertmsg ("checkobj putslot ~dsym_193__CLASS_INITIAL_EXTENSION_ROUTINEOBJ @#1", - melt_magic_discr ((melt_ptr_t) ( /*_._VALDATA___V384*/ meltfptr[383])) == + melt_magic_discr ((melt_ptr_t) ( /*_._VALDATA___V385*/ meltfptr[384])) == MELTOBMAG_OBJECT); melt_assertmsg @@ -28113,85 +28108,85 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_3 (meltinitial_frame_t * (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V384*/ meltfptr[383])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V384*/ meltfptr[383]))->obj_vartab[1] = + ( /*_._VALDATA___V385*/ meltfptr[384])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V385*/ meltfptr[384]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V385*/ meltfptr[384]); + /*_._VALSTR___V386*/ meltfptr[385]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V384*/ meltfptr[383]); + meltgc_touch ( /*_._VALDATA___V385*/ meltfptr[384]); - melt_dbgtrace_written_object ( /*_._VALDATA___V384*/ meltfptr[383], + melt_dbgtrace_written_object ( /*_._VALDATA___V385*/ meltfptr[384], "new static instance"); /*putslot */ melt_assertmsg ("checkobj putslot ~dsym_195__CLASS_INITIALROUTINEOBJ @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V386*/ meltfptr[385])) == + ( /*_._VALDATA___V387*/ meltfptr[386])) == MELTOBMAG_OBJECT); melt_assertmsg ("checkoff putslot ~dsym_195__CLASS_INITIALROUTINEOBJ @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V386*/ - meltfptr[385])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V386*/ meltfptr[385]))->obj_vartab[1] = + ( /*_._VALDATA___V387*/ + meltfptr[386])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V387*/ meltfptr[386]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V387*/ meltfptr[386]); + /*_._VALSTR___V388*/ meltfptr[387]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V386*/ meltfptr[385]); + meltgc_touch ( /*_._VALDATA___V387*/ meltfptr[386]); - melt_dbgtrace_written_object ( /*_._VALDATA___V386*/ meltfptr[385], + melt_dbgtrace_written_object ( /*_._VALDATA___V387*/ meltfptr[386], "new static instance"); /*putslot */ melt_assertmsg ("checkobj putslot ~dsym_197__LIST_EVERY @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V388*/ meltfptr[387])) == + ( /*_._VALDATA___V389*/ meltfptr[388])) == MELTOBMAG_OBJECT); melt_assertmsg ("checkoff putslot ~dsym_197__LIST_EVERY @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V388*/ - meltfptr[387])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V388*/ meltfptr[387]))->obj_vartab[1] = + ( /*_._VALDATA___V389*/ + meltfptr[388])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V389*/ meltfptr[388]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V389*/ meltfptr[388]); + /*_._VALSTR___V390*/ meltfptr[389]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V388*/ meltfptr[387]); + meltgc_touch ( /*_._VALDATA___V389*/ meltfptr[388]); - melt_dbgtrace_written_object ( /*_._VALDATA___V388*/ meltfptr[387], + melt_dbgtrace_written_object ( /*_._VALDATA___V389*/ meltfptr[388], "new static instance"); /*putslot */ melt_assertmsg ("checkobj putslot ~dsym_200__CLASS_OBJLOCV @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V390*/ meltfptr[389])) == + ( /*_._VALDATA___V391*/ meltfptr[390])) == MELTOBMAG_OBJECT); melt_assertmsg ("checkoff putslot ~dsym_200__CLASS_OBJLOCV @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V390*/ - meltfptr[389])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V390*/ meltfptr[389]))->obj_vartab[1] = + ( /*_._VALDATA___V391*/ + meltfptr[390])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V391*/ meltfptr[390]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V391*/ meltfptr[390]); + /*_._VALSTR___V392*/ meltfptr[391]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V390*/ meltfptr[389]); + meltgc_touch ( /*_._VALDATA___V391*/ meltfptr[390]); - melt_dbgtrace_written_object ( /*_._VALDATA___V390*/ meltfptr[389], + melt_dbgtrace_written_object ( /*_._VALDATA___V391*/ meltfptr[390], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:1589:/ initchunk"); @@ -28200,12 +28195,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V392*/ meltfptr[391])) + ( /*_._VALROUT___V393*/ meltfptr[392])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_202__OUTPUCOD_MARKER#0", NULL != ( /*_.CLASS_ROUTINEOBJ__V58*/ meltfptr[57])); - ((meltroutine_ptr_t) /*_._VALROUT___V392*/ meltfptr[391])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V393*/ meltfptr[392])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_ROUTINEOBJ__V58*/ meltfptr[57]); MELT_LOCATION ("warmelt-outobj.melt:1589:/ initchunk"); @@ -28214,12 +28209,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V392*/ meltfptr[391])) + ( /*_._VALROUT___V393*/ meltfptr[392])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_202__OUTPUCOD_MARKER#1", NULL != ( /*_.CLASS_PROCROUTINEOBJ__V59*/ meltfptr[58])); - ((meltroutine_ptr_t) /*_._VALROUT___V392*/ meltfptr[391])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V393*/ meltfptr[392])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_PROCROUTINEOBJ__V59*/ meltfptr[58]); MELT_LOCATION ("warmelt-outobj.melt:1589:/ initchunk"); @@ -28228,12 +28223,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V392*/ meltfptr[391])) + ( /*_._VALROUT___V393*/ meltfptr[392])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_202__OUTPUCOD_MARKER#2", NULL != ( /*_.CTYPE_VALUE__V31*/ meltfptr[30])); - ((meltroutine_ptr_t) /*_._VALROUT___V392*/ meltfptr[391])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V393*/ meltfptr[392])->tabval[2] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V31*/ meltfptr[30]); MELT_LOCATION ("warmelt-outobj.melt:1589:/ initchunk"); @@ -28242,12 +28237,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V392*/ meltfptr[391])) + ( /*_._VALROUT___V393*/ meltfptr[392])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_202__OUTPUCOD_MARKER#3", NULL != ( /*_.CLASS_CTYPE__V28*/ meltfptr[27])); - ((meltroutine_ptr_t) /*_._VALROUT___V392*/ meltfptr[391])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V393*/ meltfptr[392])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_CTYPE__V28*/ meltfptr[27]); MELT_LOCATION ("warmelt-outobj.melt:1589:/ initchunk"); @@ -28256,12 +28251,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V392*/ meltfptr[391])) + ( /*_._VALROUT___V393*/ meltfptr[392])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_202__OUTPUCOD_MARKER#4", NULL != ( /*_.LIST_EVERY__V56*/ meltfptr[55])); - ((meltroutine_ptr_t) /*_._VALROUT___V392*/ meltfptr[391])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V393*/ meltfptr[392])->tabval[4] = (melt_ptr_t) ( /*_.LIST_EVERY__V56*/ meltfptr[55]); MELT_LOCATION ("warmelt-outobj.melt:1589:/ initchunk"); @@ -28270,12 +28265,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V392*/ meltfptr[391])) + ( /*_._VALROUT___V393*/ meltfptr[392])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_202__OUTPUCOD_MARKER#5", NULL != ( /*_.CLASS_OBJLOCV__V57*/ meltfptr[56])); - ((meltroutine_ptr_t) /*_._VALROUT___V392*/ meltfptr[391])->tabval[5] = + ((meltroutine_ptr_t) /*_._VALROUT___V393*/ meltfptr[392])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_OBJLOCV__V57*/ meltfptr[56]); MELT_LOCATION ("warmelt-outobj.melt:1589:/ initchunk"); @@ -28284,12 +28279,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V392*/ meltfptr[391])) + ( /*_._VALROUT___V393*/ meltfptr[392])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_202__OUTPUCOD_MARKER#6", NULL != ( /*_.CLASS_OBJVALUE__V27*/ meltfptr[26])); - ((meltroutine_ptr_t) /*_._VALROUT___V392*/ meltfptr[391])->tabval[6] = + ((meltroutine_ptr_t) /*_._VALROUT___V393*/ meltfptr[392])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_OBJVALUE__V27*/ meltfptr[26]); MELT_LOCATION ("warmelt-outobj.melt:1589:/ initchunk"); @@ -28298,12 +28293,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V392*/ meltfptr[391])) + ( /*_._VALROUT___V393*/ meltfptr[392])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_202__OUTPUCOD_MARKER#7", NULL != ( /*_.CLASS_CTYPE__V28*/ meltfptr[27])); - ((meltroutine_ptr_t) /*_._VALROUT___V392*/ meltfptr[391])->tabval[7] = + ((meltroutine_ptr_t) /*_._VALROUT___V393*/ meltfptr[392])->tabval[7] = (melt_ptr_t) ( /*_.CLASS_CTYPE__V28*/ meltfptr[27]); MELT_LOCATION ("warmelt-outobj.melt:1589:/ initchunk"); @@ -28312,12 +28307,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V392*/ meltfptr[391])) + ( /*_._VALROUT___V393*/ meltfptr[392])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_202__OUTPUCOD_MARKER#8", NULL != ( /*_.CLASS_NAMED__V13*/ meltfptr[12])); - ((meltroutine_ptr_t) /*_._VALROUT___V392*/ meltfptr[391])->tabval[8] = + ((meltroutine_ptr_t) /*_._VALROUT___V393*/ meltfptr[392])->tabval[8] = (melt_ptr_t) ( /*_.CLASS_NAMED__V13*/ meltfptr[12]); MELT_LOCATION ("warmelt-outobj.melt:1589:/ initchunk"); @@ -28325,12 +28320,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_3 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V392*/ meltfptr[391])) == + ( /*_._VALROUT___V393*/ meltfptr[392])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALDATA___V197*/ meltfptr[196]); - ((meltroutine_ptr_t) /*_._VALROUT___V392*/ meltfptr[391])->tabval[9] = - (melt_ptr_t) ( /*_._VALDATA___V197*/ meltfptr[196]); + NULL != /*_._VALDATA___V198*/ meltfptr[197]); + ((meltroutine_ptr_t) /*_._VALROUT___V393*/ meltfptr[392])->tabval[9] = + (melt_ptr_t) ( /*_._VALDATA___V198*/ meltfptr[197]); MELT_LOCATION ("warmelt-outobj.melt:1589:/ initchunk"); /*^putroutconst */ @@ -28338,12 +28333,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V392*/ meltfptr[391])) + ( /*_._VALROUT___V393*/ meltfptr[392])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_202__OUTPUCOD_MARKER#10", NULL != ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5])); - ((meltroutine_ptr_t) /*_._VALROUT___V392*/ meltfptr[391])->tabval[10] = + ((meltroutine_ptr_t) /*_._VALROUT___V393*/ meltfptr[392])->tabval[10] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5]); MELT_LOCATION ("warmelt-outobj.melt:1611:/ initchunk"); @@ -28352,12 +28347,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V393*/ meltfptr[392])) + ( /*_._VALROUT___V394*/ meltfptr[393])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_208__LAMBDA_#0", NULL != ( /*_.CLASS_OBJLOCV__V57*/ meltfptr[56])); - ((meltroutine_ptr_t) /*_._VALROUT___V393*/ meltfptr[392])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V394*/ meltfptr[393])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJLOCV__V57*/ meltfptr[56]); MELT_LOCATION ("warmelt-outobj.melt:1611:/ initchunk"); @@ -28366,12 +28361,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V393*/ meltfptr[392])) + ( /*_._VALROUT___V394*/ meltfptr[393])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_208__LAMBDA_#1", NULL != ( /*_.CLASS_OBJVALUE__V27*/ meltfptr[26])); - ((meltroutine_ptr_t) /*_._VALROUT___V393*/ meltfptr[392])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V394*/ meltfptr[393])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_OBJVALUE__V27*/ meltfptr[26]); MELT_LOCATION ("warmelt-outobj.melt:1611:/ initchunk"); @@ -28380,12 +28375,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V393*/ meltfptr[392])) + ( /*_._VALROUT___V394*/ meltfptr[393])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_208__LAMBDA_#2", NULL != ( /*_.CLASS_CTYPE__V28*/ meltfptr[27])); - ((meltroutine_ptr_t) /*_._VALROUT___V393*/ meltfptr[392])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V394*/ meltfptr[393])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_CTYPE__V28*/ meltfptr[27]); MELT_LOCATION ("warmelt-outobj.melt:1611:/ initchunk"); @@ -28394,12 +28389,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V393*/ meltfptr[392])) + ( /*_._VALROUT___V394*/ meltfptr[393])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_208__LAMBDA_#3", NULL != ( /*_.CLASS_NAMED__V13*/ meltfptr[12])); - ((meltroutine_ptr_t) /*_._VALROUT___V393*/ meltfptr[392])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V394*/ meltfptr[393])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_NAMED__V13*/ meltfptr[12]); MELT_LOCATION ("warmelt-outobj.melt:1611:/ initchunk"); @@ -28407,12 +28402,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_3 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V393*/ meltfptr[392])) == + ( /*_._VALROUT___V394*/ meltfptr[393])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALDATA___V197*/ meltfptr[196]); - ((meltroutine_ptr_t) /*_._VALROUT___V393*/ meltfptr[392])->tabval[4] = - (melt_ptr_t) ( /*_._VALDATA___V197*/ meltfptr[196]); + NULL != /*_._VALDATA___V198*/ meltfptr[197]); + ((meltroutine_ptr_t) /*_._VALROUT___V394*/ meltfptr[393])->tabval[4] = + (melt_ptr_t) ( /*_._VALDATA___V198*/ meltfptr[197]); MELT_LOCATION ("warmelt-outobj.melt:1611:/ initchunk"); /*^putroutconst */ @@ -28420,18 +28415,18 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V393*/ meltfptr[392])) + ( /*_._VALROUT___V394*/ meltfptr[393])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_208__LAMBDA_#5", NULL != ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5])); - ((meltroutine_ptr_t) /*_._VALROUT___V393*/ meltfptr[392])->tabval[5] = + ((meltroutine_ptr_t) /*_._VALROUT___V394*/ meltfptr[393])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5]); MELT_LOCATION ("warmelt-outobj.melt:1611:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V393*/ meltfptr[392]); + meltgc_touch ( /*_._VALROUT___V394*/ meltfptr[393]); MELT_LOCATION ("warmelt-outobj.melt:1589:/ initchunk"); /*^putroutconst */ @@ -28439,78 +28434,78 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V392*/ meltfptr[391])) + ( /*_._VALROUT___V393*/ meltfptr[392])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_202__OUTPUCOD_MARKER#11", - NULL != ( /*_._VALROUT___V393*/ meltfptr[392])); - ((meltroutine_ptr_t) /*_._VALROUT___V392*/ meltfptr[391])->tabval[11] = - (melt_ptr_t) ( /*_._VALROUT___V393*/ meltfptr[392]); + NULL != ( /*_._VALROUT___V394*/ meltfptr[393])); + ((meltroutine_ptr_t) /*_._VALROUT___V393*/ meltfptr[392])->tabval[11] = + (melt_ptr_t) ( /*_._VALROUT___V394*/ meltfptr[393]); MELT_LOCATION ("warmelt-outobj.melt:1589:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V392*/ meltfptr[391]); + meltgc_touch ( /*_._VALROUT___V393*/ meltfptr[392]); /*putclosurout#41 */ melt_assertmsg ("putclosrout#41 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V394*/ meltfptr[393])) == + ( /*_._VALCLO___V395*/ meltfptr[394])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#41 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V392*/ meltfptr[391])) == + ( /*_._VALROUT___V393*/ meltfptr[392])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V394*/ meltfptr[393])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V392*/ meltfptr[391]); + ((meltclosure_ptr_t) /*_._VALCLO___V395*/ meltfptr[394])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V393*/ meltfptr[392]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V394*/ meltfptr[393]); + meltgc_touch ( /*_._VALCLO___V395*/ meltfptr[394]); /*putslot */ melt_assertmsg ("checkobj putslot ~dsym_204__CLASS_ROUTINEOBJ @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V395*/ meltfptr[394])) == + ( /*_._VALDATA___V396*/ meltfptr[395])) == MELTOBMAG_OBJECT); melt_assertmsg ("checkoff putslot ~dsym_204__CLASS_ROUTINEOBJ @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V395*/ - meltfptr[394])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V395*/ meltfptr[394]))->obj_vartab[1] = + ( /*_._VALDATA___V396*/ + meltfptr[395])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V396*/ meltfptr[395]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V396*/ meltfptr[395]); + /*_._VALSTR___V397*/ meltfptr[396]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V395*/ meltfptr[394]); + meltgc_touch ( /*_._VALDATA___V396*/ meltfptr[395]); - melt_dbgtrace_written_object ( /*_._VALDATA___V395*/ meltfptr[394], + melt_dbgtrace_written_object ( /*_._VALDATA___V396*/ meltfptr[395], "new static instance"); /*putslot */ melt_assertmsg ("checkobj putslot ~dsym_206__CLASS_PROCROUTINEOBJ @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V397*/ meltfptr[396])) == + ( /*_._VALDATA___V398*/ meltfptr[397])) == MELTOBMAG_OBJECT); melt_assertmsg ("checkoff putslot ~dsym_206__CLASS_PROCROUTINEOBJ @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V397*/ - meltfptr[396])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V397*/ meltfptr[396]))->obj_vartab[1] = + ( /*_._VALDATA___V398*/ + meltfptr[397])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V398*/ meltfptr[397]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V398*/ meltfptr[397]); + /*_._VALSTR___V399*/ meltfptr[398]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V397*/ meltfptr[396]); + meltgc_touch ( /*_._VALDATA___V398*/ meltfptr[397]); - melt_dbgtrace_written_object ( /*_._VALDATA___V397*/ meltfptr[396], + melt_dbgtrace_written_object ( /*_._VALDATA___V398*/ meltfptr[397], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:1649:/ initchunk"); @@ -28519,13 +28514,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V399*/ meltfptr[398])) + ( /*_._VALROUT___V400*/ meltfptr[399])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_209__OUTPUT_CURFRAME_DECLSTRUCT_INIT#0", NULL != ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_._VALROUT___V399*/ meltfptr[398])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V400*/ meltfptr[399])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:1649:/ initchunk"); @@ -28534,13 +28529,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V399*/ meltfptr[398])) + ( /*_._VALROUT___V400*/ meltfptr[399])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_209__OUTPUT_CURFRAME_DECLSTRUCT_INIT#1", NULL != ( /*_.CLASS_ROUTINEOBJ__V58*/ meltfptr[57])); - ((meltroutine_ptr_t) /*_._VALROUT___V399*/ meltfptr[398])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V400*/ meltfptr[399])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_ROUTINEOBJ__V58*/ meltfptr[57]); MELT_LOCATION ("warmelt-outobj.melt:1649:/ initchunk"); @@ -28549,13 +28544,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V399*/ meltfptr[398])) + ( /*_._VALROUT___V400*/ meltfptr[399])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_209__OUTPUT_CURFRAME_DECLSTRUCT_INIT#2", NULL != ( /*_.CLASS_INITIAL_EXTENSION_ROUTINEOBJ__V54*/ meltfptr[53])); - ((meltroutine_ptr_t) /*_._VALROUT___V399*/ meltfptr[398])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V400*/ meltfptr[399])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_INITIAL_EXTENSION_ROUTINEOBJ__V54*/ meltfptr[53]); @@ -28565,13 +28560,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V399*/ meltfptr[398])) + ( /*_._VALROUT___V400*/ meltfptr[399])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_209__OUTPUT_CURFRAME_DECLSTRUCT_INIT#3", NULL != ( /*_.CLASS_HOOKROUTINEOBJ__V60*/ meltfptr[59])); - ((meltroutine_ptr_t) /*_._VALROUT___V399*/ meltfptr[398])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V400*/ meltfptr[399])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_HOOKROUTINEOBJ__V60*/ meltfptr[59]); MELT_LOCATION ("warmelt-outobj.melt:1649:/ initchunk"); @@ -28580,13 +28575,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V399*/ meltfptr[398])) + ( /*_._VALROUT___V400*/ meltfptr[399])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_209__OUTPUT_CURFRAME_DECLSTRUCT_INIT#4", NULL != ( /*_.CLASS_INITIALROUTINEOBJ__V55*/ meltfptr[54])); - ((meltroutine_ptr_t) /*_._VALROUT___V399*/ meltfptr[398])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V400*/ meltfptr[399])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_INITIALROUTINEOBJ__V55*/ meltfptr[54]); MELT_LOCATION ("warmelt-outobj.melt:1649:/ initchunk"); @@ -28595,13 +28590,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V399*/ meltfptr[398])) + ( /*_._VALROUT___V400*/ meltfptr[399])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_209__OUTPUT_CURFRAME_DECLSTRUCT_INIT#5", NULL != ( /*_.CLASS_NAMED__V13*/ meltfptr[12])); - ((meltroutine_ptr_t) /*_._VALROUT___V399*/ meltfptr[398])->tabval[5] = + ((meltroutine_ptr_t) /*_._VALROUT___V400*/ meltfptr[399])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_NAMED__V13*/ meltfptr[12]); MELT_LOCATION ("warmelt-outobj.melt:1649:/ initchunk"); @@ -28610,13 +28605,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V399*/ meltfptr[398])) + ( /*_._VALROUT___V400*/ meltfptr[399])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_209__OUTPUT_CURFRAME_DECLSTRUCT_INIT#6", NULL != ( /*_.ADD2OUT__V14*/ meltfptr[13])); - ((meltroutine_ptr_t) /*_._VALROUT___V399*/ meltfptr[398])->tabval[6] = + ((meltroutine_ptr_t) /*_._VALROUT___V400*/ meltfptr[399])->tabval[6] = (melt_ptr_t) ( /*_.ADD2OUT__V14*/ meltfptr[13]); MELT_LOCATION ("warmelt-outobj.melt:1649:/ initchunk"); @@ -28625,38 +28620,38 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V399*/ meltfptr[398])) + ( /*_._VALROUT___V400*/ meltfptr[399])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_209__OUTPUT_CURFRAME_DECLSTRUCT_INIT#7", - NULL != ( /*_.CLASS_NREP_HOOKPROC__V44*/ meltfptr[43])); - ((meltroutine_ptr_t) /*_._VALROUT___V399*/ meltfptr[398])->tabval[7] = - (melt_ptr_t) ( /*_.CLASS_NREP_HOOKPROC__V44*/ meltfptr[43]); + NULL != ( /*_.CLASS_NREP_CLOSPROC__V44*/ meltfptr[43])); + ((meltroutine_ptr_t) /*_._VALROUT___V400*/ meltfptr[399])->tabval[7] = + (melt_ptr_t) ( /*_.CLASS_NREP_CLOSPROC__V44*/ meltfptr[43]); MELT_LOCATION ("warmelt-outobj.melt:1649:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V399*/ meltfptr[398])) == + ( /*_._VALROUT___V400*/ meltfptr[399])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V394*/ meltfptr[393]); - ((meltroutine_ptr_t) /*_._VALROUT___V399*/ meltfptr[398])->tabval[8] = - (melt_ptr_t) ( /*_._VALCLO___V394*/ meltfptr[393]); + NULL != /*_._VALCLO___V395*/ meltfptr[394]); + ((meltroutine_ptr_t) /*_._VALROUT___V400*/ meltfptr[399])->tabval[8] = + (melt_ptr_t) ( /*_._VALCLO___V395*/ meltfptr[394]); MELT_LOCATION ("warmelt-outobj.melt:1649:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V399*/ meltfptr[398])) == + ( /*_._VALROUT___V400*/ meltfptr[399])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALDATA___V197*/ meltfptr[196]); - ((meltroutine_ptr_t) /*_._VALROUT___V399*/ meltfptr[398])->tabval[9] = - (melt_ptr_t) ( /*_._VALDATA___V197*/ meltfptr[196]); + NULL != /*_._VALDATA___V198*/ meltfptr[197]); + ((meltroutine_ptr_t) /*_._VALROUT___V400*/ meltfptr[399])->tabval[9] = + (melt_ptr_t) ( /*_._VALDATA___V198*/ meltfptr[197]); MELT_LOCATION ("warmelt-outobj.melt:1649:/ initchunk"); /*^putroutconst */ @@ -28664,56 +28659,56 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V399*/ meltfptr[398])) + ( /*_._VALROUT___V400*/ meltfptr[399])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_209__OUTPUT_CURFRAME_DECLSTRUCT_INIT#10", NULL != ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5])); - ((meltroutine_ptr_t) /*_._VALROUT___V399*/ meltfptr[398])->tabval[10] = + ((meltroutine_ptr_t) /*_._VALROUT___V400*/ meltfptr[399])->tabval[10] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5]); MELT_LOCATION ("warmelt-outobj.melt:1649:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V399*/ meltfptr[398]); + meltgc_touch ( /*_._VALROUT___V400*/ meltfptr[399]); /*putclosurout#42 */ melt_assertmsg ("putclosrout#42 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V400*/ meltfptr[399])) == + ( /*_._VALCLO___V401*/ meltfptr[400])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#42 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V399*/ meltfptr[398])) == + ( /*_._VALROUT___V400*/ meltfptr[399])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V400*/ meltfptr[399])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V399*/ meltfptr[398]); + ((meltclosure_ptr_t) /*_._VALCLO___V401*/ meltfptr[400])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V400*/ meltfptr[399]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V400*/ meltfptr[399]); + meltgc_touch ( /*_._VALCLO___V401*/ meltfptr[400]); /*putslot */ melt_assertmsg ("checkobj putslot ~dsym_211__CLASS_HOOKROUTINEOBJ @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V401*/ meltfptr[400])) == + ( /*_._VALDATA___V402*/ meltfptr[401])) == MELTOBMAG_OBJECT); melt_assertmsg ("checkoff putslot ~dsym_211__CLASS_HOOKROUTINEOBJ @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V401*/ - meltfptr[400])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V401*/ meltfptr[400]))->obj_vartab[1] = + ( /*_._VALDATA___V402*/ + meltfptr[401])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V402*/ meltfptr[401]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V402*/ meltfptr[401]); + /*_._VALSTR___V403*/ meltfptr[402]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V401*/ meltfptr[400]); + meltgc_touch ( /*_._VALDATA___V402*/ meltfptr[401]); - melt_dbgtrace_written_object ( /*_._VALDATA___V401*/ meltfptr[400], + melt_dbgtrace_written_object ( /*_._VALDATA___V402*/ meltfptr[401], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:1777:/ initchunk"); @@ -28722,12 +28717,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V403*/ meltfptr[402])) + ( /*_._VALROUT___V404*/ meltfptr[403])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_213__OUTPUCOD_PROCROUTINE#0", NULL != ( /*_.CLASS_PROCROUTINEOBJ__V59*/ meltfptr[58])); - ((meltroutine_ptr_t) /*_._VALROUT___V403*/ meltfptr[402])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V404*/ meltfptr[403])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_PROCROUTINEOBJ__V59*/ meltfptr[58]); MELT_LOCATION ("warmelt-outobj.melt:1777:/ initchunk"); @@ -28736,25 +28731,25 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V403*/ meltfptr[402])) + ( /*_._VALROUT___V404*/ meltfptr[403])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_213__OUTPUCOD_PROCROUTINE#1", - NULL != ( /*_._VALSTR___V404*/ meltfptr[403])); - ((meltroutine_ptr_t) /*_._VALROUT___V403*/ meltfptr[402])->tabval[1] = - (melt_ptr_t) ( /*_._VALSTR___V404*/ meltfptr[403]); + NULL != ( /*_._VALSTR___V405*/ meltfptr[404])); + ((meltroutine_ptr_t) /*_._VALROUT___V404*/ meltfptr[403])->tabval[1] = + (melt_ptr_t) ( /*_._VALSTR___V405*/ meltfptr[404]); MELT_LOCATION ("warmelt-outobj.melt:1777:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V403*/ meltfptr[402])) == + ( /*_._VALROUT___V404*/ meltfptr[403])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V268*/ meltfptr[267]); - ((meltroutine_ptr_t) /*_._VALROUT___V403*/ meltfptr[402])->tabval[2] = - (melt_ptr_t) ( /*_._VALCLO___V268*/ meltfptr[267]); + NULL != /*_._VALCLO___V269*/ meltfptr[268]); + ((meltroutine_ptr_t) /*_._VALROUT___V404*/ meltfptr[403])->tabval[2] = + (melt_ptr_t) ( /*_._VALCLO___V269*/ meltfptr[268]); MELT_LOCATION ("warmelt-outobj.melt:1777:/ initchunk"); /*^putroutconst */ @@ -28762,12 +28757,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V403*/ meltfptr[402])) + ( /*_._VALROUT___V404*/ meltfptr[403])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_213__OUTPUCOD_PROCROUTINE#3", NULL != ( /*_.VARIADIC_INDEX_IDSTR__V61*/ meltfptr[60])); - ((meltroutine_ptr_t) /*_._VALROUT___V403*/ meltfptr[402])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V404*/ meltfptr[403])->tabval[3] = (melt_ptr_t) ( /*_.VARIADIC_INDEX_IDSTR__V61*/ meltfptr[60]); MELT_LOCATION ("warmelt-outobj.melt:1777:/ initchunk"); @@ -28776,12 +28771,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V403*/ meltfptr[402])) + ( /*_._VALROUT___V404*/ meltfptr[403])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_213__OUTPUCOD_PROCROUTINE#4", NULL != ( /*_.VARIADIC_LENGTH_IDSTR__V62*/ meltfptr[61])); - ((meltroutine_ptr_t) /*_._VALROUT___V403*/ meltfptr[402])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V404*/ meltfptr[403])->tabval[4] = (melt_ptr_t) ( /*_.VARIADIC_LENGTH_IDSTR__V62*/ meltfptr[61]); MELT_LOCATION ("warmelt-outobj.melt:1777:/ initchunk"); @@ -28790,12 +28785,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V403*/ meltfptr[402])) + ( /*_._VALROUT___V404*/ meltfptr[403])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_213__OUTPUCOD_PROCROUTINE#5", NULL != ( /*_.ADD2OUT__V14*/ meltfptr[13])); - ((meltroutine_ptr_t) /*_._VALROUT___V403*/ meltfptr[402])->tabval[5] = + ((meltroutine_ptr_t) /*_._VALROUT___V404*/ meltfptr[403])->tabval[5] = (melt_ptr_t) ( /*_.ADD2OUT__V14*/ meltfptr[13]); MELT_LOCATION ("warmelt-outobj.melt:1777:/ initchunk"); @@ -28803,24 +28798,24 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_3 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V403*/ meltfptr[402])) == + ( /*_._VALROUT___V404*/ meltfptr[403])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V400*/ meltfptr[399]); - ((meltroutine_ptr_t) /*_._VALROUT___V403*/ meltfptr[402])->tabval[6] = - (melt_ptr_t) ( /*_._VALCLO___V400*/ meltfptr[399]); + NULL != /*_._VALCLO___V401*/ meltfptr[400]); + ((meltroutine_ptr_t) /*_._VALROUT___V404*/ meltfptr[403])->tabval[6] = + (melt_ptr_t) ( /*_._VALCLO___V401*/ meltfptr[400]); MELT_LOCATION ("warmelt-outobj.melt:1777:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V403*/ meltfptr[402])) == + ( /*_._VALROUT___V404*/ meltfptr[403])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V383*/ meltfptr[382]); - ((meltroutine_ptr_t) /*_._VALROUT___V403*/ meltfptr[402])->tabval[7] = - (melt_ptr_t) ( /*_._VALCLO___V383*/ meltfptr[382]); + NULL != /*_._VALCLO___V384*/ meltfptr[383]); + ((meltroutine_ptr_t) /*_._VALROUT___V404*/ meltfptr[403])->tabval[7] = + (melt_ptr_t) ( /*_._VALCLO___V384*/ meltfptr[383]); MELT_LOCATION ("warmelt-outobj.melt:1777:/ initchunk"); /*^putroutconst */ @@ -28828,12 +28823,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V403*/ meltfptr[402])) + ( /*_._VALROUT___V404*/ meltfptr[403])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_213__OUTPUCOD_PROCROUTINE#8", NULL != ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19])); - ((meltroutine_ptr_t) /*_._VALROUT___V403*/ meltfptr[402])->tabval[8] = + ((meltroutine_ptr_t) /*_._VALROUT___V404*/ meltfptr[403])->tabval[8] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]); MELT_LOCATION ("warmelt-outobj.melt:1777:/ initchunk"); @@ -28841,12 +28836,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_3 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V403*/ meltfptr[402])) == + ( /*_._VALROUT___V404*/ meltfptr[403])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALDATA___V197*/ meltfptr[196]); - ((meltroutine_ptr_t) /*_._VALROUT___V403*/ meltfptr[402])->tabval[9] = - (melt_ptr_t) ( /*_._VALDATA___V197*/ meltfptr[196]); + NULL != /*_._VALDATA___V198*/ meltfptr[197]); + ((meltroutine_ptr_t) /*_._VALROUT___V404*/ meltfptr[403])->tabval[9] = + (melt_ptr_t) ( /*_._VALDATA___V198*/ meltfptr[197]); MELT_LOCATION ("warmelt-outobj.melt:1777:/ initchunk"); /*^putroutconst */ @@ -28854,13 +28849,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V403*/ meltfptr[402])) + ( /*_._VALROUT___V404*/ meltfptr[403])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_213__OUTPUCOD_PROCROUTINE#10", NULL != ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5])); - ((meltroutine_ptr_t) /*_._VALROUT___V403*/ meltfptr[402])->tabval[10] = + ((meltroutine_ptr_t) /*_._VALROUT___V404*/ meltfptr[403])->tabval[10] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5]); MELT_LOCATION ("warmelt-outobj.melt:1777:/ initchunk"); @@ -28869,13 +28864,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V403*/ meltfptr[402])) + ( /*_._VALROUT___V404*/ meltfptr[403])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_213__OUTPUCOD_PROCROUTINE#11", NULL != ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_._VALROUT___V403*/ meltfptr[402])->tabval[11] = + ((meltroutine_ptr_t) /*_._VALROUT___V404*/ meltfptr[403])->tabval[11] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:1777:/ initchunk"); @@ -28884,13 +28879,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V403*/ meltfptr[402])) + ( /*_._VALROUT___V404*/ meltfptr[403])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_213__OUTPUCOD_PROCROUTINE#12", NULL != ( /*_.LIST_EVERY__V56*/ meltfptr[55])); - ((meltroutine_ptr_t) /*_._VALROUT___V403*/ meltfptr[402])->tabval[12] = + ((meltroutine_ptr_t) /*_._VALROUT___V404*/ meltfptr[403])->tabval[12] = (melt_ptr_t) ( /*_.LIST_EVERY__V56*/ meltfptr[55]); MELT_LOCATION ("warmelt-outobj.melt:1777:/ initchunk"); @@ -28899,13 +28894,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V403*/ meltfptr[402])) + ( /*_._VALROUT___V404*/ meltfptr[403])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_213__OUTPUCOD_PROCROUTINE#13", NULL != ( /*_.CLASS_OBJPUREVALUE__V63*/ meltfptr[62])); - ((meltroutine_ptr_t) /*_._VALROUT___V403*/ meltfptr[402])->tabval[13] = + ((meltroutine_ptr_t) /*_._VALROUT___V404*/ meltfptr[403])->tabval[13] = (melt_ptr_t) ( /*_.CLASS_OBJPUREVALUE__V63*/ meltfptr[62]); MELT_LOCATION ("warmelt-outobj.melt:1777:/ initchunk"); @@ -28914,13 +28909,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V403*/ meltfptr[402])) + ( /*_._VALROUT___V404*/ meltfptr[403])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_213__OUTPUCOD_PROCROUTINE#14", NULL != ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19])); - ((meltroutine_ptr_t) /*_._VALROUT___V403*/ meltfptr[402])->tabval[14] = + ((meltroutine_ptr_t) /*_._VALROUT___V404*/ meltfptr[403])->tabval[14] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]); MELT_LOCATION ("warmelt-outobj.melt:1777:/ initchunk"); @@ -28928,12 +28923,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_3 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V403*/ meltfptr[402])) == + ( /*_._VALROUT___V404*/ meltfptr[403])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALDATA___V197*/ meltfptr[196]); - ((meltroutine_ptr_t) /*_._VALROUT___V403*/ meltfptr[402])->tabval[15] = - (melt_ptr_t) ( /*_._VALDATA___V197*/ meltfptr[196]); + NULL != /*_._VALDATA___V198*/ meltfptr[197]); + ((meltroutine_ptr_t) /*_._VALROUT___V404*/ meltfptr[403])->tabval[15] = + (melt_ptr_t) ( /*_._VALDATA___V198*/ meltfptr[197]); MELT_LOCATION ("warmelt-outobj.melt:1777:/ initchunk"); /*^putroutconst */ @@ -28941,13 +28936,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V403*/ meltfptr[402])) + ( /*_._VALROUT___V404*/ meltfptr[403])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_213__OUTPUCOD_PROCROUTINE#16", NULL != ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5])); - ((meltroutine_ptr_t) /*_._VALROUT___V403*/ meltfptr[402])->tabval[16] = + ((meltroutine_ptr_t) /*_._VALROUT___V404*/ meltfptr[403])->tabval[16] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5]); MELT_LOCATION ("warmelt-outobj.melt:1893:/ initchunk"); @@ -28956,12 +28951,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V405*/ meltfptr[404])) + ( /*_._VALROUT___V406*/ meltfptr[405])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_220__LAMBDA_#0", NULL != ( /*_.CLASS_OBJPUREVALUE__V63*/ meltfptr[62])); - ((meltroutine_ptr_t) /*_._VALROUT___V405*/ meltfptr[404])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V406*/ meltfptr[405])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJPUREVALUE__V63*/ meltfptr[62]); MELT_LOCATION ("warmelt-outobj.melt:1893:/ initchunk"); @@ -28970,12 +28965,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V405*/ meltfptr[404])) + ( /*_._VALROUT___V406*/ meltfptr[405])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_220__LAMBDA_#1", NULL != ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19])); - ((meltroutine_ptr_t) /*_._VALROUT___V405*/ meltfptr[404])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V406*/ meltfptr[405])->tabval[1] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]); MELT_LOCATION ("warmelt-outobj.melt:1893:/ initchunk"); @@ -28983,12 +28978,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_3 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V405*/ meltfptr[404])) == + ( /*_._VALROUT___V406*/ meltfptr[405])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALDATA___V197*/ meltfptr[196]); - ((meltroutine_ptr_t) /*_._VALROUT___V405*/ meltfptr[404])->tabval[2] = - (melt_ptr_t) ( /*_._VALDATA___V197*/ meltfptr[196]); + NULL != /*_._VALDATA___V198*/ meltfptr[197]); + ((meltroutine_ptr_t) /*_._VALROUT___V406*/ meltfptr[405])->tabval[2] = + (melt_ptr_t) ( /*_._VALDATA___V198*/ meltfptr[197]); MELT_LOCATION ("warmelt-outobj.melt:1893:/ initchunk"); /*^putroutconst */ @@ -28996,18 +28991,18 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_3 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V405*/ meltfptr[404])) + ( /*_._VALROUT___V406*/ meltfptr[405])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_220__LAMBDA_#3", NULL != ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5])); - ((meltroutine_ptr_t) /*_._VALROUT___V405*/ meltfptr[404])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V406*/ meltfptr[405])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5]); MELT_LOCATION ("warmelt-outobj.melt:1893:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V405*/ meltfptr[404]); + meltgc_touch ( /*_._VALROUT___V406*/ meltfptr[405]); #undef meltfram__ @@ -29028,102 +29023,102 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V403*/ meltfptr[402])) + ( /*_._VALROUT___V404*/ meltfptr[403])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_213__OUTPUCOD_PROCROUTINE#17", - NULL != ( /*_._VALROUT___V405*/ meltfptr[404])); - ((meltroutine_ptr_t) /*_._VALROUT___V403*/ meltfptr[402])->tabval[17] = - (melt_ptr_t) ( /*_._VALROUT___V405*/ meltfptr[404]); + NULL != ( /*_._VALROUT___V406*/ meltfptr[405])); + ((meltroutine_ptr_t) /*_._VALROUT___V404*/ meltfptr[403])->tabval[17] = + (melt_ptr_t) ( /*_._VALROUT___V406*/ meltfptr[405]); MELT_LOCATION ("warmelt-outobj.melt:1777:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V403*/ meltfptr[402]); + meltgc_touch ( /*_._VALROUT___V404*/ meltfptr[403]); /*putclosurout#43 */ melt_assertmsg ("putclosrout#43 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V406*/ meltfptr[405])) == + ( /*_._VALCLO___V407*/ meltfptr[406])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#43 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V403*/ meltfptr[402])) == + ( /*_._VALROUT___V404*/ meltfptr[403])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V406*/ meltfptr[405])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V403*/ meltfptr[402]); + ((meltclosure_ptr_t) /*_._VALCLO___V407*/ meltfptr[406])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V404*/ meltfptr[403]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V406*/ meltfptr[405]); + meltgc_touch ( /*_._VALCLO___V407*/ meltfptr[406]); /*putslot */ melt_assertmsg ("checkobj putslot ~dsym_216__VARIADIC_INDEX_IDSTR @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V407*/ meltfptr[406])) == + ( /*_._VALDATA___V408*/ meltfptr[407])) == MELTOBMAG_OBJECT); melt_assertmsg ("checkoff putslot ~dsym_216__VARIADIC_INDEX_IDSTR @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V407*/ - meltfptr[406])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V407*/ meltfptr[406]))->obj_vartab[1] = + ( /*_._VALDATA___V408*/ + meltfptr[407])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V408*/ meltfptr[407]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V408*/ meltfptr[407]); + /*_._VALSTR___V409*/ meltfptr[408]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V407*/ meltfptr[406]); + meltgc_touch ( /*_._VALDATA___V408*/ meltfptr[407]); - melt_dbgtrace_written_object ( /*_._VALDATA___V407*/ meltfptr[406], + melt_dbgtrace_written_object ( /*_._VALDATA___V408*/ meltfptr[407], "new static instance"); /*putslot */ melt_assertmsg ("checkobj putslot ~dsym_218__VARIADIC_LENGTH_IDSTR @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V409*/ meltfptr[408])) == + ( /*_._VALDATA___V410*/ meltfptr[409])) == MELTOBMAG_OBJECT); melt_assertmsg ("checkoff putslot ~dsym_218__VARIADIC_LENGTH_IDSTR @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V409*/ - meltfptr[408])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V409*/ meltfptr[408]))->obj_vartab[1] = + ( /*_._VALDATA___V410*/ + meltfptr[409])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V410*/ meltfptr[409]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V410*/ meltfptr[409]); + /*_._VALSTR___V411*/ meltfptr[410]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V409*/ meltfptr[408]); + meltgc_touch ( /*_._VALDATA___V410*/ meltfptr[409]); - melt_dbgtrace_written_object ( /*_._VALDATA___V409*/ meltfptr[408], + melt_dbgtrace_written_object ( /*_._VALDATA___V410*/ meltfptr[409], "new static instance"); /*putslot */ melt_assertmsg ("checkobj putslot ~dsym_221__CLASS_OBJPUREVALUE @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V411*/ meltfptr[410])) == + ( /*_._VALDATA___V412*/ meltfptr[411])) == MELTOBMAG_OBJECT); melt_assertmsg ("checkoff putslot ~dsym_221__CLASS_OBJPUREVALUE @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V411*/ - meltfptr[410])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V411*/ meltfptr[410]))->obj_vartab[1] = + ( /*_._VALDATA___V412*/ + meltfptr[411])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V412*/ meltfptr[411]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V412*/ meltfptr[411]); + /*_._VALSTR___V413*/ meltfptr[412]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V411*/ meltfptr[410]); + meltgc_touch ( /*_._VALDATA___V412*/ meltfptr[411]); - melt_dbgtrace_written_object ( /*_._VALDATA___V411*/ meltfptr[410], + melt_dbgtrace_written_object ( /*_._VALDATA___V412*/ meltfptr[411], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:1963:/ initchunk"); @@ -29132,13 +29127,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V413*/ meltfptr[412])) + ( /*_._VALROUT___V414*/ meltfptr[413])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_223__OUTPUT_CURFRAME_CDAT_STRUCT#0", NULL != ( /*_.OUTPUT_C_DECLINIT__V18*/ meltfptr[17])); - ((meltroutine_ptr_t) /*_._VALROUT___V413*/ meltfptr[412])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V414*/ meltfptr[413])->tabval[0] = (melt_ptr_t) ( /*_.OUTPUT_C_DECLINIT__V18*/ meltfptr[17]); MELT_LOCATION ("warmelt-outobj.melt:1963:/ initchunk"); @@ -29146,12 +29141,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_4 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V413*/ meltfptr[412])) == + ( /*_._VALROUT___V414*/ meltfptr[413])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALDATA___V197*/ meltfptr[196]); - ((meltroutine_ptr_t) /*_._VALROUT___V413*/ meltfptr[412])->tabval[1] = - (melt_ptr_t) ( /*_._VALDATA___V197*/ meltfptr[196]); + NULL != /*_._VALDATA___V198*/ meltfptr[197]); + ((meltroutine_ptr_t) /*_._VALROUT___V414*/ meltfptr[413])->tabval[1] = + (melt_ptr_t) ( /*_._VALDATA___V198*/ meltfptr[197]); MELT_LOCATION ("warmelt-outobj.melt:1963:/ initchunk"); /*^putroutconst */ @@ -29159,13 +29154,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V413*/ meltfptr[412])) + ( /*_._VALROUT___V414*/ meltfptr[413])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_223__OUTPUT_CURFRAME_CDAT_STRUCT#2", NULL != ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5])); - ((meltroutine_ptr_t) /*_._VALROUT___V413*/ meltfptr[412])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V414*/ meltfptr[413])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5]); MELT_LOCATION ("warmelt-outobj.melt:1963:/ initchunk"); @@ -29174,34 +29169,34 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V413*/ meltfptr[412])) + ( /*_._VALROUT___V414*/ meltfptr[413])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_223__OUTPUT_CURFRAME_CDAT_STRUCT#3", NULL != ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_._VALROUT___V413*/ meltfptr[412])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V414*/ meltfptr[413])->tabval[3] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:1963:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V413*/ meltfptr[412]); + meltgc_touch ( /*_._VALROUT___V414*/ meltfptr[413]); /*putclosurout#44 */ melt_assertmsg ("putclosrout#44 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V414*/ meltfptr[413])) == + ( /*_._VALCLO___V415*/ meltfptr[414])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#44 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V413*/ meltfptr[412])) == + ( /*_._VALROUT___V414*/ meltfptr[413])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V414*/ meltfptr[413])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V413*/ meltfptr[412]); + ((meltclosure_ptr_t) /*_._VALCLO___V415*/ meltfptr[414])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V414*/ meltfptr[413]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V414*/ meltfptr[413]); + meltgc_touch ( /*_._VALCLO___V415*/ meltfptr[414]); MELT_LOCATION ("warmelt-outobj.melt:1988:/ initchunk"); /*^putroutconst */ @@ -29209,13 +29204,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V415*/ meltfptr[414])) + ( /*_._VALROUT___V416*/ meltfptr[415])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_225__OUTPUT_CURFRAME_CDAT_FILL#0", NULL != ( /*_.OUTPUT_C_INITIAL_PREDEF__V22*/ meltfptr[21])); - ((meltroutine_ptr_t) /*_._VALROUT___V415*/ meltfptr[414])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V416*/ meltfptr[415])->tabval[0] = (melt_ptr_t) ( /*_.OUTPUT_C_INITIAL_PREDEF__V22*/ meltfptr[21]); MELT_LOCATION ("warmelt-outobj.melt:1988:/ initchunk"); @@ -29224,14 +29219,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V415*/ meltfptr[414])) + ( /*_._VALROUT___V416*/ meltfptr[415])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_225__OUTPUT_CURFRAME_CDAT_FILL#1", - NULL != ( /*_._VALSTR___V416*/ meltfptr[415])); - ((meltroutine_ptr_t) /*_._VALROUT___V415*/ meltfptr[414])->tabval[1] = - (melt_ptr_t) ( /*_._VALSTR___V416*/ meltfptr[415]); + NULL != ( /*_._VALSTR___V417*/ meltfptr[416])); + ((meltroutine_ptr_t) /*_._VALROUT___V416*/ meltfptr[415])->tabval[1] = + (melt_ptr_t) ( /*_._VALSTR___V417*/ meltfptr[416]); MELT_LOCATION ("warmelt-outobj.melt:1988:/ initchunk"); /*^putroutconst */ @@ -29239,13 +29234,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V415*/ meltfptr[414])) + ( /*_._VALROUT___V416*/ meltfptr[415])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_225__OUTPUT_CURFRAME_CDAT_FILL#2", NULL != ( /*_.OUTPUT_C_INITIAL_FILL__V21*/ meltfptr[20])); - ((meltroutine_ptr_t) /*_._VALROUT___V415*/ meltfptr[414])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V416*/ meltfptr[415])->tabval[2] = (melt_ptr_t) ( /*_.OUTPUT_C_INITIAL_FILL__V21*/ meltfptr[20]); MELT_LOCATION ("warmelt-outobj.melt:1988:/ initchunk"); @@ -29254,26 +29249,26 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V415*/ meltfptr[414])) + ( /*_._VALROUT___V416*/ meltfptr[415])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_225__OUTPUT_CURFRAME_CDAT_FILL#3", - NULL != ( /*_._VALSTR___V417*/ meltfptr[416])); - ((meltroutine_ptr_t) /*_._VALROUT___V415*/ meltfptr[414])->tabval[3] = - (melt_ptr_t) ( /*_._VALSTR___V417*/ meltfptr[416]); + NULL != ( /*_._VALSTR___V418*/ meltfptr[417])); + ((meltroutine_ptr_t) /*_._VALROUT___V416*/ meltfptr[415])->tabval[3] = + (melt_ptr_t) ( /*_._VALSTR___V418*/ meltfptr[417]); MELT_LOCATION ("warmelt-outobj.melt:1988:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V415*/ meltfptr[414])) == + ( /*_._VALROUT___V416*/ meltfptr[415])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALDATA___V197*/ meltfptr[196]); - ((meltroutine_ptr_t) /*_._VALROUT___V415*/ meltfptr[414])->tabval[4] = - (melt_ptr_t) ( /*_._VALDATA___V197*/ meltfptr[196]); + NULL != /*_._VALDATA___V198*/ meltfptr[197]); + ((meltroutine_ptr_t) /*_._VALROUT___V416*/ meltfptr[415])->tabval[4] = + (melt_ptr_t) ( /*_._VALDATA___V198*/ meltfptr[197]); MELT_LOCATION ("warmelt-outobj.melt:1988:/ initchunk"); /*^putroutconst */ @@ -29281,13 +29276,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V415*/ meltfptr[414])) + ( /*_._VALROUT___V416*/ meltfptr[415])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_225__OUTPUT_CURFRAME_CDAT_FILL#5", NULL != ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5])); - ((meltroutine_ptr_t) /*_._VALROUT___V415*/ meltfptr[414])->tabval[5] = + ((meltroutine_ptr_t) /*_._VALROUT___V416*/ meltfptr[415])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5]); MELT_LOCATION ("warmelt-outobj.melt:1988:/ initchunk"); @@ -29296,34 +29291,34 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V415*/ meltfptr[414])) + ( /*_._VALROUT___V416*/ meltfptr[415])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_225__OUTPUT_CURFRAME_CDAT_FILL#6", NULL != ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_._VALROUT___V415*/ meltfptr[414])->tabval[6] = + ((meltroutine_ptr_t) /*_._VALROUT___V416*/ meltfptr[415])->tabval[6] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:1988:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V415*/ meltfptr[414]); + meltgc_touch ( /*_._VALROUT___V416*/ meltfptr[415]); /*putclosurout#45 */ melt_assertmsg ("putclosrout#45 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V418*/ meltfptr[417])) == + ( /*_._VALCLO___V419*/ meltfptr[418])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#45 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V415*/ meltfptr[414])) == + ( /*_._VALROUT___V416*/ meltfptr[415])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V418*/ meltfptr[417])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V415*/ meltfptr[414]); + ((meltclosure_ptr_t) /*_._VALCLO___V419*/ meltfptr[418])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V416*/ meltfptr[415]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V418*/ meltfptr[417]); + meltgc_touch ( /*_._VALCLO___V419*/ meltfptr[418]); MELT_LOCATION ("warmelt-outobj.melt:2035:/ initchunk"); /*^putroutconst */ @@ -29331,13 +29326,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V419*/ meltfptr[418])) + ( /*_._VALROUT___V420*/ meltfptr[419])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_229__OUTPUCOD_INITIALMODULEROUTINE#0", NULL != ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_._VALROUT___V419*/ meltfptr[418])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V420*/ meltfptr[419])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:2035:/ initchunk"); @@ -29346,13 +29341,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V419*/ meltfptr[418])) + ( /*_._VALROUT___V420*/ meltfptr[419])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_229__OUTPUCOD_INITIALMODULEROUTINE#1", NULL != ( /*_.CLASS_INITIAL_MODULE_ROUTINEOBJ__V64*/ meltfptr[63])); - ((meltroutine_ptr_t) /*_._VALROUT___V419*/ meltfptr[418])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V420*/ meltfptr[419])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_INITIAL_MODULE_ROUTINEOBJ__V64*/ meltfptr[63]); MELT_LOCATION ("warmelt-outobj.melt:2035:/ initchunk"); @@ -29361,13 +29356,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V419*/ meltfptr[418])) + ( /*_._VALROUT___V420*/ meltfptr[419])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_229__OUTPUCOD_INITIALMODULEROUTINE#2", NULL != ( /*_.CLASS_ROUTINEOBJ__V58*/ meltfptr[57])); - ((meltroutine_ptr_t) /*_._VALROUT___V419*/ meltfptr[418])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V420*/ meltfptr[419])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_ROUTINEOBJ__V58*/ meltfptr[57]); MELT_LOCATION ("warmelt-outobj.melt:2035:/ initchunk"); @@ -29376,13 +29371,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V419*/ meltfptr[418])) + ( /*_._VALROUT___V420*/ meltfptr[419])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_229__OUTPUCOD_INITIALMODULEROUTINE#3", NULL != ( /*_.ADD2OUT__V14*/ meltfptr[13])); - ((meltroutine_ptr_t) /*_._VALROUT___V419*/ meltfptr[418])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V420*/ meltfptr[419])->tabval[3] = (melt_ptr_t) ( /*_.ADD2OUT__V14*/ meltfptr[13]); MELT_LOCATION ("warmelt-outobj.melt:2035:/ initchunk"); @@ -29390,48 +29385,48 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_4 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V419*/ meltfptr[418])) == + ( /*_._VALROUT___V420*/ meltfptr[419])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V383*/ meltfptr[382]); - ((meltroutine_ptr_t) /*_._VALROUT___V419*/ meltfptr[418])->tabval[4] = - (melt_ptr_t) ( /*_._VALCLO___V383*/ meltfptr[382]); + NULL != /*_._VALCLO___V384*/ meltfptr[383]); + ((meltroutine_ptr_t) /*_._VALROUT___V420*/ meltfptr[419])->tabval[4] = + (melt_ptr_t) ( /*_._VALCLO___V384*/ meltfptr[383]); MELT_LOCATION ("warmelt-outobj.melt:2035:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V419*/ meltfptr[418])) == + ( /*_._VALROUT___V420*/ meltfptr[419])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V414*/ meltfptr[413]); - ((meltroutine_ptr_t) /*_._VALROUT___V419*/ meltfptr[418])->tabval[5] = - (melt_ptr_t) ( /*_._VALCLO___V414*/ meltfptr[413]); + NULL != /*_._VALCLO___V415*/ meltfptr[414]); + ((meltroutine_ptr_t) /*_._VALROUT___V420*/ meltfptr[419])->tabval[5] = + (melt_ptr_t) ( /*_._VALCLO___V415*/ meltfptr[414]); MELT_LOCATION ("warmelt-outobj.melt:2035:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V419*/ meltfptr[418])) == + ( /*_._VALROUT___V420*/ meltfptr[419])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V418*/ meltfptr[417]); - ((meltroutine_ptr_t) /*_._VALROUT___V419*/ meltfptr[418])->tabval[6] = - (melt_ptr_t) ( /*_._VALCLO___V418*/ meltfptr[417]); + NULL != /*_._VALCLO___V419*/ meltfptr[418]); + ((meltroutine_ptr_t) /*_._VALROUT___V420*/ meltfptr[419])->tabval[6] = + (melt_ptr_t) ( /*_._VALCLO___V419*/ meltfptr[418]); MELT_LOCATION ("warmelt-outobj.melt:2035:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V419*/ meltfptr[418])) == + ( /*_._VALROUT___V420*/ meltfptr[419])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V400*/ meltfptr[399]); - ((meltroutine_ptr_t) /*_._VALROUT___V419*/ meltfptr[418])->tabval[7] = - (melt_ptr_t) ( /*_._VALCLO___V400*/ meltfptr[399]); + NULL != /*_._VALCLO___V401*/ meltfptr[400]); + ((meltroutine_ptr_t) /*_._VALROUT___V420*/ meltfptr[419])->tabval[7] = + (melt_ptr_t) ( /*_._VALCLO___V401*/ meltfptr[400]); MELT_LOCATION ("warmelt-outobj.melt:2035:/ initchunk"); /*^putroutconst */ @@ -29439,14 +29434,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V419*/ meltfptr[418])) + ( /*_._VALROUT___V420*/ meltfptr[419])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_229__OUTPUCOD_INITIALMODULEROUTINE#8", - NULL != ( /*_._VALROUT___V420*/ meltfptr[419])); - ((meltroutine_ptr_t) /*_._VALROUT___V419*/ meltfptr[418])->tabval[8] = - (melt_ptr_t) ( /*_._VALROUT___V420*/ meltfptr[419]); + NULL != ( /*_._VALROUT___V421*/ meltfptr[420])); + ((meltroutine_ptr_t) /*_._VALROUT___V420*/ meltfptr[419])->tabval[8] = + (melt_ptr_t) ( /*_._VALROUT___V421*/ meltfptr[420]); MELT_LOCATION ("warmelt-outobj.melt:2035:/ initchunk"); /*^putroutconst */ @@ -29454,13 +29449,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V419*/ meltfptr[418])) + ( /*_._VALROUT___V420*/ meltfptr[419])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_229__OUTPUCOD_INITIALMODULEROUTINE#9", NULL != ( /*_.CLASS_OBJPUREVALUE__V63*/ meltfptr[62])); - ((meltroutine_ptr_t) /*_._VALROUT___V419*/ meltfptr[418])->tabval[9] = + ((meltroutine_ptr_t) /*_._VALROUT___V420*/ meltfptr[419])->tabval[9] = (melt_ptr_t) ( /*_.CLASS_OBJPUREVALUE__V63*/ meltfptr[62]); MELT_LOCATION ("warmelt-outobj.melt:2035:/ initchunk"); @@ -29469,13 +29464,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V419*/ meltfptr[418])) + ( /*_._VALROUT___V420*/ meltfptr[419])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_229__OUTPUCOD_INITIALMODULEROUTINE#10", NULL != ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19])); - ((meltroutine_ptr_t) /*_._VALROUT___V419*/ meltfptr[418])->tabval[10] = + ((meltroutine_ptr_t) /*_._VALROUT___V420*/ meltfptr[419])->tabval[10] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]); MELT_LOCATION ("warmelt-outobj.melt:2035:/ initchunk"); @@ -29484,13 +29479,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V419*/ meltfptr[418])) + ( /*_._VALROUT___V420*/ meltfptr[419])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_229__OUTPUCOD_INITIALMODULEROUTINE#11", NULL != ( /*_.DISCR_LIST__V65*/ meltfptr[64])); - ((meltroutine_ptr_t) /*_._VALROUT___V419*/ meltfptr[418])->tabval[11] = + ((meltroutine_ptr_t) /*_._VALROUT___V420*/ meltfptr[419])->tabval[11] = (melt_ptr_t) ( /*_.DISCR_LIST__V65*/ meltfptr[64]); MELT_LOCATION ("warmelt-outobj.melt:2035:/ initchunk"); @@ -29499,13 +29494,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V419*/ meltfptr[418])) + ( /*_._VALROUT___V420*/ meltfptr[419])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_229__OUTPUCOD_INITIALMODULEROUTINE#12", NULL != ( /*_.LIST_TO_MULTIPLE__V66*/ meltfptr[65])); - ((meltroutine_ptr_t) /*_._VALROUT___V419*/ meltfptr[418])->tabval[12] = + ((meltroutine_ptr_t) /*_._VALROUT___V420*/ meltfptr[419])->tabval[12] = (melt_ptr_t) ( /*_.LIST_TO_MULTIPLE__V66*/ meltfptr[65]); MELT_LOCATION ("warmelt-outobj.melt:2035:/ initchunk"); @@ -29514,13 +29509,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V419*/ meltfptr[418])) + ( /*_._VALROUT___V420*/ meltfptr[419])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_229__OUTPUCOD_INITIALMODULEROUTINE#13", NULL != ( /*_.DISCR_MULTIPLE__V67*/ meltfptr[66])); - ((meltroutine_ptr_t) /*_._VALROUT___V419*/ meltfptr[418])->tabval[13] = + ((meltroutine_ptr_t) /*_._VALROUT___V420*/ meltfptr[419])->tabval[13] = (melt_ptr_t) ( /*_.DISCR_MULTIPLE__V67*/ meltfptr[66]); MELT_LOCATION ("warmelt-outobj.melt:2035:/ initchunk"); @@ -29529,13 +29524,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V419*/ meltfptr[418])) + ( /*_._VALROUT___V420*/ meltfptr[419])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_229__OUTPUCOD_INITIALMODULEROUTINE#14", NULL != ( /*_.DISCR_STRBUF__V68*/ meltfptr[67])); - ((meltroutine_ptr_t) /*_._VALROUT___V419*/ meltfptr[418])->tabval[14] = + ((meltroutine_ptr_t) /*_._VALROUT___V420*/ meltfptr[419])->tabval[14] = (melt_ptr_t) ( /*_.DISCR_STRBUF__V68*/ meltfptr[67]); MELT_LOCATION ("warmelt-outobj.melt:2035:/ initchunk"); @@ -29543,24 +29538,24 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_4 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V419*/ meltfptr[418])) == + ( /*_._VALROUT___V420*/ meltfptr[419])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALDATA___V266*/ meltfptr[265]); - ((meltroutine_ptr_t) /*_._VALROUT___V419*/ meltfptr[418])->tabval[15] = - (melt_ptr_t) ( /*_._VALDATA___V266*/ meltfptr[265]); + NULL != /*_._VALDATA___V267*/ meltfptr[266]); + ((meltroutine_ptr_t) /*_._VALROUT___V420*/ meltfptr[419])->tabval[15] = + (melt_ptr_t) ( /*_._VALDATA___V267*/ meltfptr[266]); MELT_LOCATION ("warmelt-outobj.melt:2035:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V419*/ meltfptr[418])) == + ( /*_._VALROUT___V420*/ meltfptr[419])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALDATA___V267*/ meltfptr[266]); - ((meltroutine_ptr_t) /*_._VALROUT___V419*/ meltfptr[418])->tabval[16] = - (melt_ptr_t) ( /*_._VALDATA___V267*/ meltfptr[266]); + NULL != /*_._VALDATA___V268*/ meltfptr[267]); + ((meltroutine_ptr_t) /*_._VALROUT___V420*/ meltfptr[419])->tabval[16] = + (melt_ptr_t) ( /*_._VALDATA___V268*/ meltfptr[267]); MELT_LOCATION ("warmelt-outobj.melt:2035:/ initchunk"); /*^putroutconst */ @@ -29568,13 +29563,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V419*/ meltfptr[418])) + ( /*_._VALROUT___V420*/ meltfptr[419])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_229__OUTPUCOD_INITIALMODULEROUTINE#17", NULL != ( /*_.CLASS_OBJINSTR__V69*/ meltfptr[68])); - ((meltroutine_ptr_t) /*_._VALROUT___V419*/ meltfptr[418])->tabval[17] = + ((meltroutine_ptr_t) /*_._VALROUT___V420*/ meltfptr[419])->tabval[17] = (melt_ptr_t) ( /*_.CLASS_OBJINSTR__V69*/ meltfptr[68]); MELT_LOCATION ("warmelt-outobj.melt:2035:/ initchunk"); @@ -29582,24 +29577,24 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_4 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V419*/ meltfptr[418])) == + ( /*_._VALROUT___V420*/ meltfptr[419])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V264*/ meltfptr[263]); - ((meltroutine_ptr_t) /*_._VALROUT___V419*/ meltfptr[418])->tabval[18] = - (melt_ptr_t) ( /*_._VALCLO___V264*/ meltfptr[263]); + NULL != /*_._VALCLO___V265*/ meltfptr[264]); + ((meltroutine_ptr_t) /*_._VALROUT___V420*/ meltfptr[419])->tabval[18] = + (melt_ptr_t) ( /*_._VALCLO___V265*/ meltfptr[264]); MELT_LOCATION ("warmelt-outobj.melt:2035:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V419*/ meltfptr[418])) == + ( /*_._VALROUT___V420*/ meltfptr[419])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALDATA___V197*/ meltfptr[196]); - ((meltroutine_ptr_t) /*_._VALROUT___V419*/ meltfptr[418])->tabval[19] = - (melt_ptr_t) ( /*_._VALDATA___V197*/ meltfptr[196]); + NULL != /*_._VALDATA___V198*/ meltfptr[197]); + ((meltroutine_ptr_t) /*_._VALROUT___V420*/ meltfptr[419])->tabval[19] = + (melt_ptr_t) ( /*_._VALDATA___V198*/ meltfptr[197]); MELT_LOCATION ("warmelt-outobj.melt:2035:/ initchunk"); /*^putroutconst */ @@ -29607,13 +29602,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V419*/ meltfptr[418])) + ( /*_._VALROUT___V420*/ meltfptr[419])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_229__OUTPUCOD_INITIALMODULEROUTINE#20", NULL != ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5])); - ((meltroutine_ptr_t) /*_._VALROUT___V419*/ meltfptr[418])->tabval[20] = + ((meltroutine_ptr_t) /*_._VALROUT___V420*/ meltfptr[419])->tabval[20] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5]); MELT_LOCATION ("warmelt-outobj.melt:2035:/ initchunk"); @@ -29621,37 +29616,37 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_4 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V419*/ meltfptr[418])) == + ( /*_._VALROUT___V420*/ meltfptr[419])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V394*/ meltfptr[393]); - ((meltroutine_ptr_t) /*_._VALROUT___V419*/ meltfptr[418])->tabval[21] = - (melt_ptr_t) ( /*_._VALCLO___V394*/ meltfptr[393]); + NULL != /*_._VALCLO___V395*/ meltfptr[394]); + ((meltroutine_ptr_t) /*_._VALROUT___V420*/ meltfptr[419])->tabval[21] = + (melt_ptr_t) ( /*_._VALCLO___V395*/ meltfptr[394]); MELT_LOCATION ("warmelt-outobj.melt:2035:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V419*/ meltfptr[418]); + meltgc_touch ( /*_._VALROUT___V420*/ meltfptr[419]); /*putclosurout#46 */ melt_assertmsg ("putclosrout#46 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V421*/ meltfptr[420])) == + ( /*_._VALCLO___V422*/ meltfptr[421])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#46 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V419*/ meltfptr[418])) == + ( /*_._VALROUT___V420*/ meltfptr[419])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V421*/ meltfptr[420])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V419*/ meltfptr[418]); + ((meltclosure_ptr_t) /*_._VALCLO___V422*/ meltfptr[421])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V420*/ meltfptr[419]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V421*/ meltfptr[420]); + meltgc_touch ( /*_._VALCLO___V422*/ meltfptr[421]); /*putslot */ melt_assertmsg ("checkobj putslot ~dsym_231__CLASS_INITIAL_MODULE_ROUTINEOBJ @#1", - melt_magic_discr ((melt_ptr_t) ( /*_._VALDATA___V422*/ meltfptr[421])) == + melt_magic_discr ((melt_ptr_t) ( /*_._VALDATA___V423*/ meltfptr[422])) == MELTOBMAG_OBJECT); melt_assertmsg @@ -29659,131 +29654,131 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_4 (meltinitial_frame_t * (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V422*/ meltfptr[421])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V422*/ meltfptr[421]))->obj_vartab[1] = + ( /*_._VALDATA___V423*/ meltfptr[422])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V423*/ meltfptr[422]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V423*/ meltfptr[422]); + /*_._VALSTR___V424*/ meltfptr[423]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V422*/ meltfptr[421]); + meltgc_touch ( /*_._VALDATA___V423*/ meltfptr[422]); - melt_dbgtrace_written_object ( /*_._VALDATA___V422*/ meltfptr[421], + melt_dbgtrace_written_object ( /*_._VALDATA___V423*/ meltfptr[422], "new static instance"); /*putslot */ melt_assertmsg ("checkobj putslot ~dsym_234__DISCR_LIST @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V424*/ meltfptr[423])) == + ( /*_._VALDATA___V425*/ meltfptr[424])) == MELTOBMAG_OBJECT); melt_assertmsg ("checkoff putslot ~dsym_234__DISCR_LIST @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V424*/ - meltfptr[423])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V424*/ meltfptr[423]))->obj_vartab[1] = + ( /*_._VALDATA___V425*/ + meltfptr[424])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V425*/ meltfptr[424]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V425*/ meltfptr[424]); + /*_._VALSTR___V426*/ meltfptr[425]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V424*/ meltfptr[423]); + meltgc_touch ( /*_._VALDATA___V425*/ meltfptr[424]); - melt_dbgtrace_written_object ( /*_._VALDATA___V424*/ meltfptr[423], + melt_dbgtrace_written_object ( /*_._VALDATA___V425*/ meltfptr[424], "new static instance"); /*putslot */ melt_assertmsg ("checkobj putslot ~dsym_236__LIST_TO_MULTIPLE @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V426*/ meltfptr[425])) == + ( /*_._VALDATA___V427*/ meltfptr[426])) == MELTOBMAG_OBJECT); melt_assertmsg ("checkoff putslot ~dsym_236__LIST_TO_MULTIPLE @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V426*/ - meltfptr[425])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V426*/ meltfptr[425]))->obj_vartab[1] = + ( /*_._VALDATA___V427*/ + meltfptr[426])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V427*/ meltfptr[426]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V427*/ meltfptr[426]); + /*_._VALSTR___V428*/ meltfptr[427]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V426*/ meltfptr[425]); + meltgc_touch ( /*_._VALDATA___V427*/ meltfptr[426]); - melt_dbgtrace_written_object ( /*_._VALDATA___V426*/ meltfptr[425], + melt_dbgtrace_written_object ( /*_._VALDATA___V427*/ meltfptr[426], "new static instance"); /*putslot */ melt_assertmsg ("checkobj putslot ~dsym_238__DISCR_MULTIPLE @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V428*/ meltfptr[427])) == + ( /*_._VALDATA___V429*/ meltfptr[428])) == MELTOBMAG_OBJECT); melt_assertmsg ("checkoff putslot ~dsym_238__DISCR_MULTIPLE @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V428*/ - meltfptr[427])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V428*/ meltfptr[427]))->obj_vartab[1] = + ( /*_._VALDATA___V429*/ + meltfptr[428])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V429*/ meltfptr[428]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V429*/ meltfptr[428]); + /*_._VALSTR___V430*/ meltfptr[429]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V428*/ meltfptr[427]); + meltgc_touch ( /*_._VALDATA___V429*/ meltfptr[428]); - melt_dbgtrace_written_object ( /*_._VALDATA___V428*/ meltfptr[427], + melt_dbgtrace_written_object ( /*_._VALDATA___V429*/ meltfptr[428], "new static instance"); /*putslot */ melt_assertmsg ("checkobj putslot ~dsym_240__DISCR_STRBUF @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V430*/ meltfptr[429])) == + ( /*_._VALDATA___V431*/ meltfptr[430])) == MELTOBMAG_OBJECT); melt_assertmsg ("checkoff putslot ~dsym_240__DISCR_STRBUF @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V430*/ - meltfptr[429])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V430*/ meltfptr[429]))->obj_vartab[1] = + ( /*_._VALDATA___V431*/ + meltfptr[430])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V431*/ meltfptr[430]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V431*/ meltfptr[430]); + /*_._VALSTR___V432*/ meltfptr[431]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V430*/ meltfptr[429]); + meltgc_touch ( /*_._VALDATA___V431*/ meltfptr[430]); - melt_dbgtrace_written_object ( /*_._VALDATA___V430*/ meltfptr[429], + melt_dbgtrace_written_object ( /*_._VALDATA___V431*/ meltfptr[430], "new static instance"); /*putslot */ melt_assertmsg ("checkobj putslot ~dsym_242__CLASS_OBJINSTR @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V432*/ meltfptr[431])) == + ( /*_._VALDATA___V433*/ meltfptr[432])) == MELTOBMAG_OBJECT); melt_assertmsg ("checkoff putslot ~dsym_242__CLASS_OBJINSTR @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V432*/ - meltfptr[431])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V432*/ meltfptr[431]))->obj_vartab[1] = + ( /*_._VALDATA___V433*/ + meltfptr[432])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V433*/ meltfptr[432]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V433*/ meltfptr[432]); + /*_._VALSTR___V434*/ meltfptr[433]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V432*/ meltfptr[431]); + meltgc_touch ( /*_._VALDATA___V433*/ meltfptr[432]); - melt_dbgtrace_written_object ( /*_._VALDATA___V432*/ meltfptr[431], + melt_dbgtrace_written_object ( /*_._VALDATA___V433*/ meltfptr[432], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:2405:/ initchunk"); @@ -29792,13 +29787,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V434*/ meltfptr[433])) + ( /*_._VALROUT___V435*/ meltfptr[434])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_244__OUTPUT_CENTRALDECL_HOOKROUTINE#0", NULL != ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_._VALROUT___V434*/ meltfptr[433])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V435*/ meltfptr[434])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:2405:/ initchunk"); @@ -29807,13 +29802,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V434*/ meltfptr[433])) + ( /*_._VALROUT___V435*/ meltfptr[434])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_244__OUTPUT_CENTRALDECL_HOOKROUTINE#1", NULL != ( /*_.CLASS_HOOKROUTINEOBJ__V60*/ meltfptr[59])); - ((meltroutine_ptr_t) /*_._VALROUT___V434*/ meltfptr[433])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V435*/ meltfptr[434])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_HOOKROUTINEOBJ__V60*/ meltfptr[59]); MELT_LOCATION ("warmelt-outobj.melt:2405:/ initchunk"); @@ -29822,13 +29817,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V434*/ meltfptr[433])) + ( /*_._VALROUT___V435*/ meltfptr[434])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_244__OUTPUT_CENTRALDECL_HOOKROUTINE#2", NULL != ( /*_.CLASS_NAMED__V13*/ meltfptr[12])); - ((meltroutine_ptr_t) /*_._VALROUT___V434*/ meltfptr[433])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V435*/ meltfptr[434])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NAMED__V13*/ meltfptr[12]); MELT_LOCATION ("warmelt-outobj.melt:2405:/ initchunk"); @@ -29837,13 +29832,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V434*/ meltfptr[433])) + ( /*_._VALROUT___V435*/ meltfptr[434])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_244__OUTPUT_CENTRALDECL_HOOKROUTINE#3", NULL != ( /*_.CLASS_ROUTINEOBJ__V58*/ meltfptr[57])); - ((meltroutine_ptr_t) /*_._VALROUT___V434*/ meltfptr[433])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V435*/ meltfptr[434])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_ROUTINEOBJ__V58*/ meltfptr[57]); MELT_LOCATION ("warmelt-outobj.melt:2405:/ initchunk"); @@ -29852,14 +29847,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V434*/ meltfptr[433])) + ( /*_._VALROUT___V435*/ meltfptr[434])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_244__OUTPUT_CENTRALDECL_HOOKROUTINE#4", - NULL != ( /*_.CLASS_NREP_HOOKPROC__V44*/ meltfptr[43])); - ((meltroutine_ptr_t) /*_._VALROUT___V434*/ meltfptr[433])->tabval[4] = - (melt_ptr_t) ( /*_.CLASS_NREP_HOOKPROC__V44*/ meltfptr[43]); + NULL != ( /*_.CLASS_NREP_HOOKPROC__V70*/ meltfptr[69])); + ((meltroutine_ptr_t) /*_._VALROUT___V435*/ meltfptr[434])->tabval[4] = + (melt_ptr_t) ( /*_.CLASS_NREP_HOOKPROC__V70*/ meltfptr[69]); MELT_LOCATION ("warmelt-outobj.melt:2405:/ initchunk"); /*^putroutconst */ @@ -29867,13 +29862,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V434*/ meltfptr[433])) + ( /*_._VALROUT___V435*/ meltfptr[434])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_244__OUTPUT_CENTRALDECL_HOOKROUTINE#5", NULL != ( /*_.CLASS_CTYPE__V28*/ meltfptr[27])); - ((meltroutine_ptr_t) /*_._VALROUT___V434*/ meltfptr[433])->tabval[5] = + ((meltroutine_ptr_t) /*_._VALROUT___V435*/ meltfptr[434])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_CTYPE__V28*/ meltfptr[27]); MELT_LOCATION ("warmelt-outobj.melt:2405:/ initchunk"); @@ -29882,14 +29877,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V434*/ meltfptr[433])) + ( /*_._VALROUT___V435*/ meltfptr[434])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_244__OUTPUT_CENTRALDECL_HOOKROUTINE#6", - NULL != ( /*_.CLASS_OBJCFORMAL__V70*/ meltfptr[69])); - ((meltroutine_ptr_t) /*_._VALROUT___V434*/ meltfptr[433])->tabval[6] = - (melt_ptr_t) ( /*_.CLASS_OBJCFORMAL__V70*/ meltfptr[69]); + NULL != ( /*_.CLASS_OBJCFORMAL__V71*/ meltfptr[70])); + ((meltroutine_ptr_t) /*_._VALROUT___V435*/ meltfptr[434])->tabval[6] = + (melt_ptr_t) ( /*_.CLASS_OBJCFORMAL__V71*/ meltfptr[70]); MELT_LOCATION ("warmelt-outobj.melt:2405:/ initchunk"); /*^putroutconst */ @@ -29897,13 +29892,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V434*/ meltfptr[433])) + ( /*_._VALROUT___V435*/ meltfptr[434])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_244__OUTPUT_CENTRALDECL_HOOKROUTINE#7", NULL != ( /*_.ADD2OUT__V14*/ meltfptr[13])); - ((meltroutine_ptr_t) /*_._VALROUT___V434*/ meltfptr[433])->tabval[7] = + ((meltroutine_ptr_t) /*_._VALROUT___V435*/ meltfptr[434])->tabval[7] = (melt_ptr_t) ( /*_.ADD2OUT__V14*/ meltfptr[13]); MELT_LOCATION ("warmelt-outobj.melt:2405:/ initchunk"); @@ -29912,56 +29907,79 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V434*/ meltfptr[433])) + ( /*_._VALROUT___V435*/ meltfptr[434])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg ("putroutconst constnull.drout_244__OUTPUT_CENTRALDECL_HOOKROUTINE#8", NULL != ( /*_.CLASS_OBJVALUE__V27*/ meltfptr[26])); - ((meltroutine_ptr_t) /*_._VALROUT___V434*/ meltfptr[433])->tabval[8] = + ((meltroutine_ptr_t) /*_._VALROUT___V435*/ meltfptr[434])->tabval[8] = (melt_ptr_t) ( /*_.CLASS_OBJVALUE__V27*/ meltfptr[26]); MELT_LOCATION ("warmelt-outobj.melt:2405:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V434*/ meltfptr[433]); + meltgc_touch ( /*_._VALROUT___V435*/ meltfptr[434]); /*putclosurout#47 */ melt_assertmsg ("putclosrout#47 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V435*/ meltfptr[434])) == + ( /*_._VALCLO___V436*/ meltfptr[435])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#47 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V434*/ meltfptr[433])) == + ( /*_._VALROUT___V435*/ meltfptr[434])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V435*/ meltfptr[434])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V434*/ meltfptr[433]); + ((meltclosure_ptr_t) /*_._VALCLO___V436*/ meltfptr[435])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V435*/ meltfptr[434]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V435*/ meltfptr[434]); + meltgc_touch ( /*_._VALCLO___V436*/ meltfptr[435]); + + /*putslot */ + melt_assertmsg ("checkobj putslot ~dsym_246__CLASS_NREP_HOOKPROC @#1", + melt_magic_discr ((melt_ptr_t) + ( /*_._VALDATA___V437*/ meltfptr[436])) == + MELTOBMAG_OBJECT); + + melt_assertmsg ("checkoff putslot ~dsym_246__CLASS_NREP_HOOKPROC @#1", + (1 >= 0 + && 1 < + melt_object_length ((melt_ptr_t) + ( /*_._VALDATA___V437*/ + meltfptr[436])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V437*/ meltfptr[436]))->obj_vartab[1] = + (melt_ptr_t) ( + /*_._VALSTR___V438*/ meltfptr[437]); + + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V437*/ meltfptr[436]); + + + melt_dbgtrace_written_object ( /*_._VALDATA___V437*/ meltfptr[436], + "new static instance"); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_246__CLASS_OBJCFORMAL @#1", + melt_assertmsg ("checkobj putslot ~dsym_248__CLASS_OBJCFORMAL @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V436*/ meltfptr[435])) == + ( /*_._VALDATA___V439*/ meltfptr[438])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_246__CLASS_OBJCFORMAL @#1", + melt_assertmsg ("checkoff putslot ~dsym_248__CLASS_OBJCFORMAL @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V436*/ - meltfptr[435])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V436*/ meltfptr[435]))->obj_vartab[1] = + ( /*_._VALDATA___V439*/ + meltfptr[438])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V439*/ meltfptr[438]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V437*/ meltfptr[436]); + /*_._VALSTR___V440*/ meltfptr[439]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V436*/ meltfptr[435]); + meltgc_touch ( /*_._VALDATA___V439*/ meltfptr[438]); - melt_dbgtrace_written_object ( /*_._VALDATA___V436*/ meltfptr[435], + melt_dbgtrace_written_object ( /*_._VALDATA___V439*/ meltfptr[438], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:2463:/ initchunk"); @@ -29970,12 +29988,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V438*/ meltfptr[437])) + ( /*_._VALROUT___V441*/ meltfptr[440])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_248__OUTPUCOD_HOOKROUTINE#0", + melt_checkmsg ("putroutconst constnull.drout_250__OUTPUCOD_HOOKROUTINE#0", NULL != ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_._VALROUT___V438*/ meltfptr[437])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V441*/ meltfptr[440])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:2463:/ initchunk"); @@ -29984,12 +30002,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V438*/ meltfptr[437])) + ( /*_._VALROUT___V441*/ meltfptr[440])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_248__OUTPUCOD_HOOKROUTINE#1", + melt_checkmsg ("putroutconst constnull.drout_250__OUTPUCOD_HOOKROUTINE#1", NULL != ( /*_.CLASS_HOOKROUTINEOBJ__V60*/ meltfptr[59])); - ((meltroutine_ptr_t) /*_._VALROUT___V438*/ meltfptr[437])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V441*/ meltfptr[440])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_HOOKROUTINEOBJ__V60*/ meltfptr[59]); MELT_LOCATION ("warmelt-outobj.melt:2463:/ initchunk"); @@ -29998,12 +30016,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V438*/ meltfptr[437])) + ( /*_._VALROUT___V441*/ meltfptr[440])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_248__OUTPUCOD_HOOKROUTINE#2", + melt_checkmsg ("putroutconst constnull.drout_250__OUTPUCOD_HOOKROUTINE#2", NULL != ( /*_.CLASS_NAMED__V13*/ meltfptr[12])); - ((meltroutine_ptr_t) /*_._VALROUT___V438*/ meltfptr[437])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V441*/ meltfptr[440])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NAMED__V13*/ meltfptr[12]); MELT_LOCATION ("warmelt-outobj.melt:2463:/ initchunk"); @@ -30012,12 +30030,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V438*/ meltfptr[437])) + ( /*_._VALROUT___V441*/ meltfptr[440])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_248__OUTPUCOD_HOOKROUTINE#3", + melt_checkmsg ("putroutconst constnull.drout_250__OUTPUCOD_HOOKROUTINE#3", NULL != ( /*_.CLASS_ROUTINEOBJ__V58*/ meltfptr[57])); - ((meltroutine_ptr_t) /*_._VALROUT___V438*/ meltfptr[437])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V441*/ meltfptr[440])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_ROUTINEOBJ__V58*/ meltfptr[57]); MELT_LOCATION ("warmelt-outobj.melt:2463:/ initchunk"); @@ -30026,13 +30044,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V438*/ meltfptr[437])) + ( /*_._VALROUT___V441*/ meltfptr[440])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_248__OUTPUCOD_HOOKROUTINE#4", - NULL != ( /*_.CLASS_NREP_HOOKPROC__V44*/ meltfptr[43])); - ((meltroutine_ptr_t) /*_._VALROUT___V438*/ meltfptr[437])->tabval[4] = - (melt_ptr_t) ( /*_.CLASS_NREP_HOOKPROC__V44*/ meltfptr[43]); + melt_checkmsg ("putroutconst constnull.drout_250__OUTPUCOD_HOOKROUTINE#4", + NULL != ( /*_.CLASS_NREP_CLOSPROC__V44*/ meltfptr[43])); + ((meltroutine_ptr_t) /*_._VALROUT___V441*/ meltfptr[440])->tabval[4] = + (melt_ptr_t) ( /*_.CLASS_NREP_CLOSPROC__V44*/ meltfptr[43]); MELT_LOCATION ("warmelt-outobj.melt:2463:/ initchunk"); /*^putroutconst */ @@ -30040,12 +30058,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V438*/ meltfptr[437])) + ( /*_._VALROUT___V441*/ meltfptr[440])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_248__OUTPUCOD_HOOKROUTINE#5", + melt_checkmsg ("putroutconst constnull.drout_250__OUTPUCOD_HOOKROUTINE#5", NULL != ( /*_.CLASS_OBJVALUE__V27*/ meltfptr[26])); - ((meltroutine_ptr_t) /*_._VALROUT___V438*/ meltfptr[437])->tabval[5] = + ((meltroutine_ptr_t) /*_._VALROUT___V441*/ meltfptr[440])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_OBJVALUE__V27*/ meltfptr[26]); MELT_LOCATION ("warmelt-outobj.melt:2463:/ initchunk"); @@ -30054,12 +30072,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V438*/ meltfptr[437])) + ( /*_._VALROUT___V441*/ meltfptr[440])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_248__OUTPUCOD_HOOKROUTINE#6", + melt_checkmsg ("putroutconst constnull.drout_250__OUTPUCOD_HOOKROUTINE#6", NULL != ( /*_.CLASS_CTYPE__V28*/ meltfptr[27])); - ((meltroutine_ptr_t) /*_._VALROUT___V438*/ meltfptr[437])->tabval[6] = + ((meltroutine_ptr_t) /*_._VALROUT___V441*/ meltfptr[440])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_CTYPE__V28*/ meltfptr[27]); MELT_LOCATION ("warmelt-outobj.melt:2463:/ initchunk"); @@ -30068,25 +30086,25 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V438*/ meltfptr[437])) + ( /*_._VALROUT___V441*/ meltfptr[440])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_248__OUTPUCOD_HOOKROUTINE#7", - NULL != ( /*_.CLASS_OBJCFORMAL__V70*/ meltfptr[69])); - ((meltroutine_ptr_t) /*_._VALROUT___V438*/ meltfptr[437])->tabval[7] = - (melt_ptr_t) ( /*_.CLASS_OBJCFORMAL__V70*/ meltfptr[69]); + melt_checkmsg ("putroutconst constnull.drout_250__OUTPUCOD_HOOKROUTINE#7", + NULL != ( /*_.CLASS_OBJCFORMAL__V71*/ meltfptr[70])); + ((meltroutine_ptr_t) /*_._VALROUT___V441*/ meltfptr[440])->tabval[7] = + (melt_ptr_t) ( /*_.CLASS_OBJCFORMAL__V71*/ meltfptr[70]); MELT_LOCATION ("warmelt-outobj.melt:2463:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V438*/ meltfptr[437])) == + ( /*_._VALROUT___V441*/ meltfptr[440])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V435*/ meltfptr[434]); - ((meltroutine_ptr_t) /*_._VALROUT___V438*/ meltfptr[437])->tabval[8] = - (melt_ptr_t) ( /*_._VALCLO___V435*/ meltfptr[434]); + NULL != /*_._VALCLO___V436*/ meltfptr[435]); + ((meltroutine_ptr_t) /*_._VALROUT___V441*/ meltfptr[440])->tabval[8] = + (melt_ptr_t) ( /*_._VALCLO___V436*/ meltfptr[435]); MELT_LOCATION ("warmelt-outobj.melt:2463:/ initchunk"); /*^putroutconst */ @@ -30094,12 +30112,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V438*/ meltfptr[437])) + ( /*_._VALROUT___V441*/ meltfptr[440])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_248__OUTPUCOD_HOOKROUTINE#9", + melt_checkmsg ("putroutconst constnull.drout_250__OUTPUCOD_HOOKROUTINE#9", NULL != ( /*_.ADD2OUT__V14*/ meltfptr[13])); - ((meltroutine_ptr_t) /*_._VALROUT___V438*/ meltfptr[437])->tabval[9] = + ((meltroutine_ptr_t) /*_._VALROUT___V441*/ meltfptr[440])->tabval[9] = (melt_ptr_t) ( /*_.ADD2OUT__V14*/ meltfptr[13]); MELT_LOCATION ("warmelt-outobj.melt:2463:/ initchunk"); @@ -30107,12 +30125,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_4 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V438*/ meltfptr[437])) == + ( /*_._VALROUT___V441*/ meltfptr[440])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V383*/ meltfptr[382]); - ((meltroutine_ptr_t) /*_._VALROUT___V438*/ meltfptr[437])->tabval[10] = - (melt_ptr_t) ( /*_._VALCLO___V383*/ meltfptr[382]); + NULL != /*_._VALCLO___V384*/ meltfptr[383]); + ((meltroutine_ptr_t) /*_._VALROUT___V441*/ meltfptr[440])->tabval[10] = + (melt_ptr_t) ( /*_._VALCLO___V384*/ meltfptr[383]); MELT_LOCATION ("warmelt-outobj.melt:2463:/ initchunk"); /*^putroutconst */ @@ -30120,13 +30138,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V438*/ meltfptr[437])) + ( /*_._VALROUT___V441*/ meltfptr[440])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_248__OUTPUCOD_HOOKROUTINE#11", + ("putroutconst constnull.drout_250__OUTPUCOD_HOOKROUTINE#11", NULL != ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19])); - ((meltroutine_ptr_t) /*_._VALROUT___V438*/ meltfptr[437])->tabval[11] = + ((meltroutine_ptr_t) /*_._VALROUT___V441*/ meltfptr[440])->tabval[11] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]); MELT_LOCATION ("warmelt-outobj.melt:2463:/ initchunk"); @@ -30135,13 +30153,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V438*/ meltfptr[437])) + ( /*_._VALROUT___V441*/ meltfptr[440])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_248__OUTPUCOD_HOOKROUTINE#12", + ("putroutconst constnull.drout_250__OUTPUCOD_HOOKROUTINE#12", NULL != ( /*_.CLASS_OBJPUREVALUE__V63*/ meltfptr[62])); - ((meltroutine_ptr_t) /*_._VALROUT___V438*/ meltfptr[437])->tabval[12] = + ((meltroutine_ptr_t) /*_._VALROUT___V441*/ meltfptr[440])->tabval[12] = (melt_ptr_t) ( /*_.CLASS_OBJPUREVALUE__V63*/ meltfptr[62]); MELT_LOCATION ("warmelt-outobj.melt:2463:/ initchunk"); @@ -30149,12 +30167,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_4 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V438*/ meltfptr[437])) == + ( /*_._VALROUT___V441*/ meltfptr[440])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALDATA___V197*/ meltfptr[196]); - ((meltroutine_ptr_t) /*_._VALROUT___V438*/ meltfptr[437])->tabval[13] = - (melt_ptr_t) ( /*_._VALDATA___V197*/ meltfptr[196]); + NULL != /*_._VALDATA___V198*/ meltfptr[197]); + ((meltroutine_ptr_t) /*_._VALROUT___V441*/ meltfptr[440])->tabval[13] = + (melt_ptr_t) ( /*_._VALDATA___V198*/ meltfptr[197]); MELT_LOCATION ("warmelt-outobj.melt:2463:/ initchunk"); /*^putroutconst */ @@ -30162,13 +30180,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V438*/ meltfptr[437])) + ( /*_._VALROUT___V441*/ meltfptr[440])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_248__OUTPUCOD_HOOKROUTINE#14", + ("putroutconst constnull.drout_250__OUTPUCOD_HOOKROUTINE#14", NULL != ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5])); - ((meltroutine_ptr_t) /*_._VALROUT___V438*/ meltfptr[437])->tabval[14] = + ((meltroutine_ptr_t) /*_._VALROUT___V441*/ meltfptr[440])->tabval[14] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5]); MELT_LOCATION ("warmelt-outobj.melt:2463:/ initchunk"); @@ -30176,32 +30194,32 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_4 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V438*/ meltfptr[437])) == + ( /*_._VALROUT___V441*/ meltfptr[440])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V394*/ meltfptr[393]); - ((meltroutine_ptr_t) /*_._VALROUT___V438*/ meltfptr[437])->tabval[15] = - (melt_ptr_t) ( /*_._VALCLO___V394*/ meltfptr[393]); + NULL != /*_._VALCLO___V395*/ meltfptr[394]); + ((meltroutine_ptr_t) /*_._VALROUT___V441*/ meltfptr[440])->tabval[15] = + (melt_ptr_t) ( /*_._VALCLO___V395*/ meltfptr[394]); MELT_LOCATION ("warmelt-outobj.melt:2463:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V438*/ meltfptr[437]); + meltgc_touch ( /*_._VALROUT___V441*/ meltfptr[440]); /*putclosurout#48 */ melt_assertmsg ("putclosrout#48 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V439*/ meltfptr[438])) == + ( /*_._VALCLO___V442*/ meltfptr[441])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#48 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V438*/ meltfptr[437])) == + ( /*_._VALROUT___V441*/ meltfptr[440])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V439*/ meltfptr[438])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V438*/ meltfptr[437]); + ((meltclosure_ptr_t) /*_._VALCLO___V442*/ meltfptr[441])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V441*/ meltfptr[440]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V439*/ meltfptr[438]); + meltgc_touch ( /*_._VALCLO___V442*/ meltfptr[441]); MELT_LOCATION ("warmelt-outobj.melt:2649:/ initchunk"); /*^putroutconst */ @@ -30209,13 +30227,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V440*/ meltfptr[439])) + ( /*_._VALROUT___V443*/ meltfptr[442])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_250__OUTPUCOD_INITIALEXTENSIONROUTINE#0", + ("putroutconst constnull.drout_252__OUTPUCOD_INITIALEXTENSIONROUTINE#0", NULL != ( /*_.CLASS_INITIAL_EXTENSION_ROUTINEOBJ__V54*/ meltfptr[53])); - ((meltroutine_ptr_t) /*_._VALROUT___V440*/ meltfptr[439])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V443*/ meltfptr[442])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_INITIAL_EXTENSION_ROUTINEOBJ__V54*/ meltfptr[53]); @@ -30225,13 +30243,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V440*/ meltfptr[439])) + ( /*_._VALROUT___V443*/ meltfptr[442])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_250__OUTPUCOD_INITIALEXTENSIONROUTINE#1", + ("putroutconst constnull.drout_252__OUTPUCOD_INITIALEXTENSIONROUTINE#1", NULL != ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_._VALROUT___V440*/ meltfptr[439])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V443*/ meltfptr[442])->tabval[1] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:2649:/ initchunk"); @@ -30240,13 +30258,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V440*/ meltfptr[439])) + ( /*_._VALROUT___V443*/ meltfptr[442])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_250__OUTPUCOD_INITIALEXTENSIONROUTINE#2", + ("putroutconst constnull.drout_252__OUTPUCOD_INITIALEXTENSIONROUTINE#2", NULL != ( /*_.CLASS_NAMED__V13*/ meltfptr[12])); - ((meltroutine_ptr_t) /*_._VALROUT___V440*/ meltfptr[439])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V443*/ meltfptr[442])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NAMED__V13*/ meltfptr[12]); MELT_LOCATION ("warmelt-outobj.melt:2649:/ initchunk"); @@ -30255,13 +30273,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V440*/ meltfptr[439])) + ( /*_._VALROUT___V443*/ meltfptr[442])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_250__OUTPUCOD_INITIALEXTENSIONROUTINE#3", + ("putroutconst constnull.drout_252__OUTPUCOD_INITIALEXTENSIONROUTINE#3", NULL != ( /*_.CLASS_INITIALROUTINEOBJ__V55*/ meltfptr[54])); - ((meltroutine_ptr_t) /*_._VALROUT___V440*/ meltfptr[439])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V443*/ meltfptr[442])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_INITIALROUTINEOBJ__V55*/ meltfptr[54]); MELT_LOCATION ("warmelt-outobj.melt:2649:/ initchunk"); @@ -30270,13 +30288,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V440*/ meltfptr[439])) + ( /*_._VALROUT___V443*/ meltfptr[442])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_250__OUTPUCOD_INITIALEXTENSIONROUTINE#4", + ("putroutconst constnull.drout_252__OUTPUCOD_INITIALEXTENSIONROUTINE#4", NULL != ( /*_.CLASS_ROUTINEOBJ__V58*/ meltfptr[57])); - ((meltroutine_ptr_t) /*_._VALROUT___V440*/ meltfptr[439])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V443*/ meltfptr[442])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_ROUTINEOBJ__V58*/ meltfptr[57]); MELT_LOCATION ("warmelt-outobj.melt:2649:/ initchunk"); @@ -30285,13 +30303,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V440*/ meltfptr[439])) + ( /*_._VALROUT___V443*/ meltfptr[442])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_250__OUTPUCOD_INITIALEXTENSIONROUTINE#5", + ("putroutconst constnull.drout_252__OUTPUCOD_INITIALEXTENSIONROUTINE#5", NULL != ( /*_.ADD2OUT__V14*/ meltfptr[13])); - ((meltroutine_ptr_t) /*_._VALROUT___V440*/ meltfptr[439])->tabval[5] = + ((meltroutine_ptr_t) /*_._VALROUT___V443*/ meltfptr[442])->tabval[5] = (melt_ptr_t) ( /*_.ADD2OUT__V14*/ meltfptr[13]); MELT_LOCATION ("warmelt-outobj.melt:2649:/ initchunk"); @@ -30299,24 +30317,24 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_4 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V440*/ meltfptr[439])) == + ( /*_._VALROUT___V443*/ meltfptr[442])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V383*/ meltfptr[382]); - ((meltroutine_ptr_t) /*_._VALROUT___V440*/ meltfptr[439])->tabval[6] = - (melt_ptr_t) ( /*_._VALCLO___V383*/ meltfptr[382]); + NULL != /*_._VALCLO___V384*/ meltfptr[383]); + ((meltroutine_ptr_t) /*_._VALROUT___V443*/ meltfptr[442])->tabval[6] = + (melt_ptr_t) ( /*_._VALCLO___V384*/ meltfptr[383]); MELT_LOCATION ("warmelt-outobj.melt:2649:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V440*/ meltfptr[439])) == + ( /*_._VALROUT___V443*/ meltfptr[442])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V400*/ meltfptr[399]); - ((meltroutine_ptr_t) /*_._VALROUT___V440*/ meltfptr[439])->tabval[7] = - (melt_ptr_t) ( /*_._VALCLO___V400*/ meltfptr[399]); + NULL != /*_._VALCLO___V401*/ meltfptr[400]); + ((meltroutine_ptr_t) /*_._VALROUT___V443*/ meltfptr[442])->tabval[7] = + (melt_ptr_t) ( /*_._VALCLO___V401*/ meltfptr[400]); MELT_LOCATION ("warmelt-outobj.melt:2649:/ initchunk"); /*^putroutconst */ @@ -30324,13 +30342,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V440*/ meltfptr[439])) + ( /*_._VALROUT___V443*/ meltfptr[442])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_250__OUTPUCOD_INITIALEXTENSIONROUTINE#8", + ("putroutconst constnull.drout_252__OUTPUCOD_INITIALEXTENSIONROUTINE#8", NULL != ( /*_.ADD2OUT__V14*/ meltfptr[13])); - ((meltroutine_ptr_t) /*_._VALROUT___V440*/ meltfptr[439])->tabval[8] = + ((meltroutine_ptr_t) /*_._VALROUT___V443*/ meltfptr[442])->tabval[8] = (melt_ptr_t) ( /*_.ADD2OUT__V14*/ meltfptr[13]); MELT_LOCATION ("warmelt-outobj.melt:2726:/ initchunk"); @@ -30339,18 +30357,18 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V441*/ meltfptr[440])) + ( /*_._VALROUT___V444*/ meltfptr[443])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_252__LAMBDA_#0", + melt_checkmsg ("putroutconst constnull.drout_254__LAMBDA_#0", NULL != ( /*_.ADD2OUT__V14*/ meltfptr[13])); - ((meltroutine_ptr_t) /*_._VALROUT___V441*/ meltfptr[440])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V444*/ meltfptr[443])->tabval[0] = (melt_ptr_t) ( /*_.ADD2OUT__V14*/ meltfptr[13]); MELT_LOCATION ("warmelt-outobj.melt:2726:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V441*/ meltfptr[440]); + meltgc_touch ( /*_._VALROUT___V444*/ meltfptr[443]); MELT_LOCATION ("warmelt-outobj.melt:2649:/ initchunk"); /*^putroutconst */ @@ -30358,26 +30376,26 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V440*/ meltfptr[439])) + ( /*_._VALROUT___V443*/ meltfptr[442])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_250__OUTPUCOD_INITIALEXTENSIONROUTINE#9", - NULL != ( /*_._VALROUT___V441*/ meltfptr[440])); - ((meltroutine_ptr_t) /*_._VALROUT___V440*/ meltfptr[439])->tabval[9] = - (melt_ptr_t) ( /*_._VALROUT___V441*/ meltfptr[440]); + ("putroutconst constnull.drout_252__OUTPUCOD_INITIALEXTENSIONROUTINE#9", + NULL != ( /*_._VALROUT___V444*/ meltfptr[443])); + ((meltroutine_ptr_t) /*_._VALROUT___V443*/ meltfptr[442])->tabval[9] = + (melt_ptr_t) ( /*_._VALROUT___V444*/ meltfptr[443]); MELT_LOCATION ("warmelt-outobj.melt:2649:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V440*/ meltfptr[439])) == + ( /*_._VALROUT___V443*/ meltfptr[442])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V414*/ meltfptr[413]); - ((meltroutine_ptr_t) /*_._VALROUT___V440*/ meltfptr[439])->tabval[10] = - (melt_ptr_t) ( /*_._VALCLO___V414*/ meltfptr[413]); + NULL != /*_._VALCLO___V415*/ meltfptr[414]); + ((meltroutine_ptr_t) /*_._VALROUT___V443*/ meltfptr[442])->tabval[10] = + (melt_ptr_t) ( /*_._VALCLO___V415*/ meltfptr[414]); MELT_LOCATION ("warmelt-outobj.melt:2649:/ initchunk"); /*^putroutconst */ @@ -30385,13 +30403,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V440*/ meltfptr[439])) + ( /*_._VALROUT___V443*/ meltfptr[442])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_250__OUTPUCOD_INITIALEXTENSIONROUTINE#11", + ("putroutconst constnull.drout_252__OUTPUCOD_INITIALEXTENSIONROUTINE#11", NULL != ( /*_.CLASS_OBJPUREVALUE__V63*/ meltfptr[62])); - ((meltroutine_ptr_t) /*_._VALROUT___V440*/ meltfptr[439])->tabval[11] = + ((meltroutine_ptr_t) /*_._VALROUT___V443*/ meltfptr[442])->tabval[11] = (melt_ptr_t) ( /*_.CLASS_OBJPUREVALUE__V63*/ meltfptr[62]); MELT_LOCATION ("warmelt-outobj.melt:2649:/ initchunk"); @@ -30400,13 +30418,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V440*/ meltfptr[439])) + ( /*_._VALROUT___V443*/ meltfptr[442])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_250__OUTPUCOD_INITIALEXTENSIONROUTINE#12", + ("putroutconst constnull.drout_252__OUTPUCOD_INITIALEXTENSIONROUTINE#12", NULL != ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19])); - ((meltroutine_ptr_t) /*_._VALROUT___V440*/ meltfptr[439])->tabval[12] = + ((meltroutine_ptr_t) /*_._VALROUT___V443*/ meltfptr[442])->tabval[12] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]); MELT_LOCATION ("warmelt-outobj.melt:2649:/ initchunk"); @@ -30414,12 +30432,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_4 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V440*/ meltfptr[439])) == + ( /*_._VALROUT___V443*/ meltfptr[442])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V418*/ meltfptr[417]); - ((meltroutine_ptr_t) /*_._VALROUT___V440*/ meltfptr[439])->tabval[13] = - (melt_ptr_t) ( /*_._VALCLO___V418*/ meltfptr[417]); + NULL != /*_._VALCLO___V419*/ meltfptr[418]); + ((meltroutine_ptr_t) /*_._VALROUT___V443*/ meltfptr[442])->tabval[13] = + (melt_ptr_t) ( /*_._VALCLO___V419*/ meltfptr[418]); MELT_LOCATION ("warmelt-outobj.melt:2649:/ initchunk"); /*^putroutconst */ @@ -30427,13 +30445,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V440*/ meltfptr[439])) + ( /*_._VALROUT___V443*/ meltfptr[442])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_250__OUTPUCOD_INITIALEXTENSIONROUTINE#14", + ("putroutconst constnull.drout_252__OUTPUCOD_INITIALEXTENSIONROUTINE#14", NULL != ( /*_.LIST_TO_MULTIPLE__V66*/ meltfptr[65])); - ((meltroutine_ptr_t) /*_._VALROUT___V440*/ meltfptr[439])->tabval[14] = + ((meltroutine_ptr_t) /*_._VALROUT___V443*/ meltfptr[442])->tabval[14] = (melt_ptr_t) ( /*_.LIST_TO_MULTIPLE__V66*/ meltfptr[65]); MELT_LOCATION ("warmelt-outobj.melt:2649:/ initchunk"); @@ -30442,28 +30460,41 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_4 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V440*/ meltfptr[439])) + ( /*_._VALROUT___V443*/ meltfptr[442])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_250__OUTPUCOD_INITIALEXTENSIONROUTINE#15", + ("putroutconst constnull.drout_252__OUTPUCOD_INITIALEXTENSIONROUTINE#15", NULL != ( /*_.DISCR_MULTIPLE__V67*/ meltfptr[66])); - ((meltroutine_ptr_t) /*_._VALROUT___V440*/ meltfptr[439])->tabval[15] = + ((meltroutine_ptr_t) /*_._VALROUT___V443*/ meltfptr[442])->tabval[15] = (melt_ptr_t) ( /*_.DISCR_MULTIPLE__V67*/ meltfptr[66]); + +#undef meltfram__ +} /*end of meltmod__WARMELTmiOUTOBJ__initialmeltchunk_4 */ + +void +meltmod__WARMELTmiOUTOBJ__initialmeltchunk_5 (meltinitial_frame_t * + meltmeltframptr__, + char meltpredefinited[]) +{ +#define meltfram__ (*meltmeltframptr__) +#undef meltcallcount +#define meltcallcount 0L + (void) meltpredefinited; MELT_LOCATION ("warmelt-outobj.melt:2649:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V440*/ meltfptr[439])) + ( /*_._VALROUT___V443*/ meltfptr[442])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_250__OUTPUCOD_INITIALEXTENSIONROUTINE#16", + ("putroutconst constnull.drout_252__OUTPUCOD_INITIALEXTENSIONROUTINE#16", NULL != ( /*_.CLASS_OBJINSTR__V69*/ meltfptr[68])); - ((meltroutine_ptr_t) /*_._VALROUT___V440*/ meltfptr[439])->tabval[16] = + ((meltroutine_ptr_t) /*_._VALROUT___V443*/ meltfptr[442])->tabval[16] = (melt_ptr_t) ( /*_.CLASS_OBJINSTR__V69*/ meltfptr[68]); MELT_LOCATION ("warmelt-outobj.melt:2649:/ initchunk"); @@ -30471,57 +30502,44 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_4 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V440*/ meltfptr[439])) == + ( /*_._VALROUT___V443*/ meltfptr[442])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V264*/ meltfptr[263]); - ((meltroutine_ptr_t) /*_._VALROUT___V440*/ meltfptr[439])->tabval[17] = - (melt_ptr_t) ( /*_._VALCLO___V264*/ meltfptr[263]); + NULL != /*_._VALCLO___V265*/ meltfptr[264]); + ((meltroutine_ptr_t) /*_._VALROUT___V443*/ meltfptr[442])->tabval[17] = + (melt_ptr_t) ( /*_._VALCLO___V265*/ meltfptr[264]); MELT_LOCATION ("warmelt-outobj.melt:2649:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V440*/ meltfptr[439])) == + ( /*_._VALROUT___V443*/ meltfptr[442])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V394*/ meltfptr[393]); - ((meltroutine_ptr_t) /*_._VALROUT___V440*/ meltfptr[439])->tabval[18] = - (melt_ptr_t) ( /*_._VALCLO___V394*/ meltfptr[393]); - - -#undef meltfram__ -} /*end of meltmod__WARMELTmiOUTOBJ__initialmeltchunk_4 */ + NULL != /*_._VALCLO___V395*/ meltfptr[394]); + ((meltroutine_ptr_t) /*_._VALROUT___V443*/ meltfptr[442])->tabval[18] = + (melt_ptr_t) ( /*_._VALCLO___V395*/ meltfptr[394]); -void -meltmod__WARMELTmiOUTOBJ__initialmeltchunk_5 (meltinitial_frame_t * - meltmeltframptr__, - char meltpredefinited[]) -{ -#define meltfram__ (*meltmeltframptr__) -#undef meltcallcount -#define meltcallcount 0L - (void) meltpredefinited; MELT_LOCATION ("warmelt-outobj.melt:2649:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V440*/ meltfptr[439]); + meltgc_touch ( /*_._VALROUT___V443*/ meltfptr[442]); /*putclosurout#49 */ melt_assertmsg ("putclosrout#49 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V442*/ meltfptr[441])) == + ( /*_._VALCLO___V445*/ meltfptr[444])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#49 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V440*/ meltfptr[439])) == + ( /*_._VALROUT___V443*/ meltfptr[442])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V442*/ meltfptr[441])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V440*/ meltfptr[439]); + ((meltclosure_ptr_t) /*_._VALCLO___V445*/ meltfptr[444])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V443*/ meltfptr[442]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V442*/ meltfptr[441]); + meltgc_touch ( /*_._VALCLO___V445*/ meltfptr[444]); MELT_LOCATION ("warmelt-outobj.melt:2847:/ initchunk"); /*^putroutconst */ @@ -30529,13 +30547,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_5 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V443*/ meltfptr[442])) + ( /*_._VALROUT___V446*/ meltfptr[445])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_253__OUTPUCOD_GETARG#0", - NULL != ( /*_.CLASS_OBJGETARG__V71*/ meltfptr[70])); - ((meltroutine_ptr_t) /*_._VALROUT___V443*/ meltfptr[442])->tabval[0] = - (melt_ptr_t) ( /*_.CLASS_OBJGETARG__V71*/ meltfptr[70]); + melt_checkmsg ("putroutconst constnull.drout_255__OUTPUCOD_GETARG#0", + NULL != ( /*_.CLASS_OBJGETARG__V72*/ meltfptr[71])); + ((meltroutine_ptr_t) /*_._VALROUT___V446*/ meltfptr[445])->tabval[0] = + (melt_ptr_t) ( /*_.CLASS_OBJGETARG__V72*/ meltfptr[71]); MELT_LOCATION ("warmelt-outobj.melt:2847:/ initchunk"); /*^putroutconst */ @@ -30543,25 +30561,25 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_5 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V443*/ meltfptr[442])) + ( /*_._VALROUT___V446*/ meltfptr[445])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_253__OUTPUCOD_GETARG#1", - NULL != ( /*_.CLASS_FORMAL_BINDING__V72*/ meltfptr[71])); - ((meltroutine_ptr_t) /*_._VALROUT___V443*/ meltfptr[442])->tabval[1] = - (melt_ptr_t) ( /*_.CLASS_FORMAL_BINDING__V72*/ meltfptr[71]); + melt_checkmsg ("putroutconst constnull.drout_255__OUTPUCOD_GETARG#1", + NULL != ( /*_.CLASS_FORMAL_BINDING__V73*/ meltfptr[72])); + ((meltroutine_ptr_t) /*_._VALROUT___V446*/ meltfptr[445])->tabval[1] = + (melt_ptr_t) ( /*_.CLASS_FORMAL_BINDING__V73*/ meltfptr[72]); MELT_LOCATION ("warmelt-outobj.melt:2847:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V443*/ meltfptr[442])) == + ( /*_._VALROUT___V446*/ meltfptr[445])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V264*/ meltfptr[263]); - ((meltroutine_ptr_t) /*_._VALROUT___V443*/ meltfptr[442])->tabval[2] = - (melt_ptr_t) ( /*_._VALCLO___V264*/ meltfptr[263]); + NULL != /*_._VALCLO___V265*/ meltfptr[264]); + ((meltroutine_ptr_t) /*_._VALROUT___V446*/ meltfptr[445])->tabval[2] = + (melt_ptr_t) ( /*_._VALCLO___V265*/ meltfptr[264]); MELT_LOCATION ("warmelt-outobj.melt:2847:/ initchunk"); /*^putroutconst */ @@ -30569,12 +30587,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_5 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V443*/ meltfptr[442])) + ( /*_._VALROUT___V446*/ meltfptr[445])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_253__OUTPUCOD_GETARG#3", + melt_checkmsg ("putroutconst constnull.drout_255__OUTPUCOD_GETARG#3", NULL != ( /*_.CLASS_OBJLOCV__V57*/ meltfptr[56])); - ((meltroutine_ptr_t) /*_._VALROUT___V443*/ meltfptr[442])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V446*/ meltfptr[445])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_OBJLOCV__V57*/ meltfptr[56]); MELT_LOCATION ("warmelt-outobj.melt:2847:/ initchunk"); @@ -30583,12 +30601,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_5 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V443*/ meltfptr[442])) + ( /*_._VALROUT___V446*/ meltfptr[445])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_253__OUTPUCOD_GETARG#4", + melt_checkmsg ("putroutconst constnull.drout_255__OUTPUCOD_GETARG#4", NULL != ( /*_.CLASS_CTYPE__V28*/ meltfptr[27])); - ((meltroutine_ptr_t) /*_._VALROUT___V443*/ meltfptr[442])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V446*/ meltfptr[445])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_CTYPE__V28*/ meltfptr[27]); MELT_LOCATION ("warmelt-outobj.melt:2847:/ initchunk"); @@ -30597,12 +30615,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_5 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V443*/ meltfptr[442])) + ( /*_._VALROUT___V446*/ meltfptr[445])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_253__OUTPUCOD_GETARG#5", + melt_checkmsg ("putroutconst constnull.drout_255__OUTPUCOD_GETARG#5", NULL != ( /*_.CTYPE_VALUE__V31*/ meltfptr[30])); - ((meltroutine_ptr_t) /*_._VALROUT___V443*/ meltfptr[442])->tabval[5] = + ((meltroutine_ptr_t) /*_._VALROUT___V446*/ meltfptr[445])->tabval[5] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V31*/ meltfptr[30]); MELT_LOCATION ("warmelt-outobj.melt:2847:/ initchunk"); @@ -30611,12 +30629,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_5 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V443*/ meltfptr[442])) + ( /*_._VALROUT___V446*/ meltfptr[445])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_253__OUTPUCOD_GETARG#6", + melt_checkmsg ("putroutconst constnull.drout_255__OUTPUCOD_GETARG#6", NULL != ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19])); - ((meltroutine_ptr_t) /*_._VALROUT___V443*/ meltfptr[442])->tabval[6] = + ((meltroutine_ptr_t) /*_._VALROUT___V446*/ meltfptr[445])->tabval[6] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]); MELT_LOCATION ("warmelt-outobj.melt:2847:/ initchunk"); @@ -30624,12 +30642,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_5 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V443*/ meltfptr[442])) == + ( /*_._VALROUT___V446*/ meltfptr[445])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALDATA___V197*/ meltfptr[196]); - ((meltroutine_ptr_t) /*_._VALROUT___V443*/ meltfptr[442])->tabval[7] = - (melt_ptr_t) ( /*_._VALDATA___V197*/ meltfptr[196]); + NULL != /*_._VALDATA___V198*/ meltfptr[197]); + ((meltroutine_ptr_t) /*_._VALROUT___V446*/ meltfptr[445])->tabval[7] = + (melt_ptr_t) ( /*_._VALDATA___V198*/ meltfptr[197]); MELT_LOCATION ("warmelt-outobj.melt:2847:/ initchunk"); /*^putroutconst */ @@ -30637,78 +30655,78 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_5 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V443*/ meltfptr[442])) + ( /*_._VALROUT___V446*/ meltfptr[445])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_253__OUTPUCOD_GETARG#8", + melt_checkmsg ("putroutconst constnull.drout_255__OUTPUCOD_GETARG#8", NULL != ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5])); - ((meltroutine_ptr_t) /*_._VALROUT___V443*/ meltfptr[442])->tabval[8] = + ((meltroutine_ptr_t) /*_._VALROUT___V446*/ meltfptr[445])->tabval[8] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5]); MELT_LOCATION ("warmelt-outobj.melt:2847:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V443*/ meltfptr[442]); + meltgc_touch ( /*_._VALROUT___V446*/ meltfptr[445]); /*putclosurout#50 */ melt_assertmsg ("putclosrout#50 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V444*/ meltfptr[443])) == + ( /*_._VALCLO___V447*/ meltfptr[446])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#50 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V443*/ meltfptr[442])) == + ( /*_._VALROUT___V446*/ meltfptr[445])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V444*/ meltfptr[443])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V443*/ meltfptr[442]); + ((meltclosure_ptr_t) /*_._VALCLO___V447*/ meltfptr[446])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V446*/ meltfptr[445]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V444*/ meltfptr[443]); + meltgc_touch ( /*_._VALCLO___V447*/ meltfptr[446]); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_255__CLASS_OBJGETARG @#1", + melt_assertmsg ("checkobj putslot ~dsym_257__CLASS_OBJGETARG @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V445*/ meltfptr[444])) == + ( /*_._VALDATA___V448*/ meltfptr[447])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_255__CLASS_OBJGETARG @#1", + melt_assertmsg ("checkoff putslot ~dsym_257__CLASS_OBJGETARG @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V445*/ - meltfptr[444])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V445*/ meltfptr[444]))->obj_vartab[1] = + ( /*_._VALDATA___V448*/ + meltfptr[447])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V448*/ meltfptr[447]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V446*/ meltfptr[445]); + /*_._VALSTR___V449*/ meltfptr[448]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V445*/ meltfptr[444]); + meltgc_touch ( /*_._VALDATA___V448*/ meltfptr[447]); - melt_dbgtrace_written_object ( /*_._VALDATA___V445*/ meltfptr[444], + melt_dbgtrace_written_object ( /*_._VALDATA___V448*/ meltfptr[447], "new static instance"); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_257__CLASS_FORMAL_BINDING @#1", + melt_assertmsg ("checkobj putslot ~dsym_259__CLASS_FORMAL_BINDING @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V447*/ meltfptr[446])) == + ( /*_._VALDATA___V450*/ meltfptr[449])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_257__CLASS_FORMAL_BINDING @#1", + melt_assertmsg ("checkoff putslot ~dsym_259__CLASS_FORMAL_BINDING @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V447*/ - meltfptr[446])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V447*/ meltfptr[446]))->obj_vartab[1] = + ( /*_._VALDATA___V450*/ + meltfptr[449])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V450*/ meltfptr[449]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V448*/ meltfptr[447]); + /*_._VALSTR___V451*/ meltfptr[450]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V447*/ meltfptr[446]); + meltgc_touch ( /*_._VALDATA___V450*/ meltfptr[449]); - melt_dbgtrace_written_object ( /*_._VALDATA___V447*/ meltfptr[446], + melt_dbgtrace_written_object ( /*_._VALDATA___V450*/ meltfptr[449], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:2912:/ initchunk"); @@ -30717,13 +30735,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_5 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V449*/ meltfptr[448])) + ( /*_._VALROUT___V452*/ meltfptr[451])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_259__OUTPUCOD_GETARGREST#0", - NULL != ( /*_.CLASS_OBJGETARGREST__V73*/ meltfptr[72])); - ((meltroutine_ptr_t) /*_._VALROUT___V449*/ meltfptr[448])->tabval[0] = - (melt_ptr_t) ( /*_.CLASS_OBJGETARGREST__V73*/ meltfptr[72]); + melt_checkmsg ("putroutconst constnull.drout_261__OUTPUCOD_GETARGREST#0", + NULL != ( /*_.CLASS_OBJGETARGREST__V74*/ meltfptr[73])); + ((meltroutine_ptr_t) /*_._VALROUT___V452*/ meltfptr[451])->tabval[0] = + (melt_ptr_t) ( /*_.CLASS_OBJGETARGREST__V74*/ meltfptr[73]); MELT_LOCATION ("warmelt-outobj.melt:2912:/ initchunk"); /*^putroutconst */ @@ -30731,12 +30749,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_5 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V449*/ meltfptr[448])) + ( /*_._VALROUT___V452*/ meltfptr[451])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_259__OUTPUCOD_GETARGREST#1", + melt_checkmsg ("putroutconst constnull.drout_261__OUTPUCOD_GETARGREST#1", NULL != ( /*_.VARIADIC_INDEX_IDSTR__V61*/ meltfptr[60])); - ((meltroutine_ptr_t) /*_._VALROUT___V449*/ meltfptr[448])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V452*/ meltfptr[451])->tabval[1] = (melt_ptr_t) ( /*_.VARIADIC_INDEX_IDSTR__V61*/ meltfptr[60]); MELT_LOCATION ("warmelt-outobj.melt:2912:/ initchunk"); @@ -30745,12 +30763,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_5 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V449*/ meltfptr[448])) + ( /*_._VALROUT___V452*/ meltfptr[451])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_259__OUTPUCOD_GETARGREST#2", + melt_checkmsg ("putroutconst constnull.drout_261__OUTPUCOD_GETARGREST#2", NULL != ( /*_.VARIADIC_LENGTH_IDSTR__V62*/ meltfptr[61])); - ((meltroutine_ptr_t) /*_._VALROUT___V449*/ meltfptr[448])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V452*/ meltfptr[451])->tabval[2] = (melt_ptr_t) ( /*_.VARIADIC_LENGTH_IDSTR__V62*/ meltfptr[61]); MELT_LOCATION ("warmelt-outobj.melt:2912:/ initchunk"); @@ -30759,25 +30777,25 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_5 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V449*/ meltfptr[448])) + ( /*_._VALROUT___V452*/ meltfptr[451])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_259__OUTPUCOD_GETARGREST#3", - NULL != ( /*_.CLASS_FORMAL_BINDING__V72*/ meltfptr[71])); - ((meltroutine_ptr_t) /*_._VALROUT___V449*/ meltfptr[448])->tabval[3] = - (melt_ptr_t) ( /*_.CLASS_FORMAL_BINDING__V72*/ meltfptr[71]); + melt_checkmsg ("putroutconst constnull.drout_261__OUTPUCOD_GETARGREST#3", + NULL != ( /*_.CLASS_FORMAL_BINDING__V73*/ meltfptr[72])); + ((meltroutine_ptr_t) /*_._VALROUT___V452*/ meltfptr[451])->tabval[3] = + (melt_ptr_t) ( /*_.CLASS_FORMAL_BINDING__V73*/ meltfptr[72]); MELT_LOCATION ("warmelt-outobj.melt:2912:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V449*/ meltfptr[448])) == + ( /*_._VALROUT___V452*/ meltfptr[451])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V264*/ meltfptr[263]); - ((meltroutine_ptr_t) /*_._VALROUT___V449*/ meltfptr[448])->tabval[4] = - (melt_ptr_t) ( /*_._VALCLO___V264*/ meltfptr[263]); + NULL != /*_._VALCLO___V265*/ meltfptr[264]); + ((meltroutine_ptr_t) /*_._VALROUT___V452*/ meltfptr[451])->tabval[4] = + (melt_ptr_t) ( /*_._VALCLO___V265*/ meltfptr[264]); MELT_LOCATION ("warmelt-outobj.melt:2912:/ initchunk"); /*^putroutconst */ @@ -30785,12 +30803,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_5 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V449*/ meltfptr[448])) + ( /*_._VALROUT___V452*/ meltfptr[451])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_259__OUTPUCOD_GETARGREST#5", + melt_checkmsg ("putroutconst constnull.drout_261__OUTPUCOD_GETARGREST#5", NULL != ( /*_.CLASS_OBJLOCV__V57*/ meltfptr[56])); - ((meltroutine_ptr_t) /*_._VALROUT___V449*/ meltfptr[448])->tabval[5] = + ((meltroutine_ptr_t) /*_._VALROUT___V452*/ meltfptr[451])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_OBJLOCV__V57*/ meltfptr[56]); MELT_LOCATION ("warmelt-outobj.melt:2912:/ initchunk"); @@ -30799,12 +30817,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_5 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V449*/ meltfptr[448])) + ( /*_._VALROUT___V452*/ meltfptr[451])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_259__OUTPUCOD_GETARGREST#6", + melt_checkmsg ("putroutconst constnull.drout_261__OUTPUCOD_GETARGREST#6", NULL != ( /*_.CLASS_CTYPE__V28*/ meltfptr[27])); - ((meltroutine_ptr_t) /*_._VALROUT___V449*/ meltfptr[448])->tabval[6] = + ((meltroutine_ptr_t) /*_._VALROUT___V452*/ meltfptr[451])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_CTYPE__V28*/ meltfptr[27]); MELT_LOCATION ("warmelt-outobj.melt:2912:/ initchunk"); @@ -30813,12 +30831,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_5 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V449*/ meltfptr[448])) + ( /*_._VALROUT___V452*/ meltfptr[451])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_259__OUTPUCOD_GETARGREST#7", + melt_checkmsg ("putroutconst constnull.drout_261__OUTPUCOD_GETARGREST#7", NULL != ( /*_.CTYPE_VALUE__V31*/ meltfptr[30])); - ((meltroutine_ptr_t) /*_._VALROUT___V449*/ meltfptr[448])->tabval[7] = + ((meltroutine_ptr_t) /*_._VALROUT___V452*/ meltfptr[451])->tabval[7] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V31*/ meltfptr[30]); MELT_LOCATION ("warmelt-outobj.melt:2912:/ initchunk"); @@ -30827,12 +30845,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_5 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V449*/ meltfptr[448])) + ( /*_._VALROUT___V452*/ meltfptr[451])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_259__OUTPUCOD_GETARGREST#8", + melt_checkmsg ("putroutconst constnull.drout_261__OUTPUCOD_GETARGREST#8", NULL != ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19])); - ((meltroutine_ptr_t) /*_._VALROUT___V449*/ meltfptr[448])->tabval[8] = + ((meltroutine_ptr_t) /*_._VALROUT___V452*/ meltfptr[451])->tabval[8] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]); MELT_LOCATION ("warmelt-outobj.melt:2912:/ initchunk"); @@ -30840,12 +30858,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_5 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V449*/ meltfptr[448])) == + ( /*_._VALROUT___V452*/ meltfptr[451])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALDATA___V197*/ meltfptr[196]); - ((meltroutine_ptr_t) /*_._VALROUT___V449*/ meltfptr[448])->tabval[9] = - (melt_ptr_t) ( /*_._VALDATA___V197*/ meltfptr[196]); + NULL != /*_._VALDATA___V198*/ meltfptr[197]); + ((meltroutine_ptr_t) /*_._VALROUT___V452*/ meltfptr[451])->tabval[9] = + (melt_ptr_t) ( /*_._VALDATA___V198*/ meltfptr[197]); MELT_LOCATION ("warmelt-outobj.melt:2912:/ initchunk"); /*^putroutconst */ @@ -30853,55 +30871,55 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_5 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V449*/ meltfptr[448])) + ( /*_._VALROUT___V452*/ meltfptr[451])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_259__OUTPUCOD_GETARGREST#10", + melt_checkmsg ("putroutconst constnull.drout_261__OUTPUCOD_GETARGREST#10", NULL != ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5])); - ((meltroutine_ptr_t) /*_._VALROUT___V449*/ meltfptr[448])->tabval[10] = + ((meltroutine_ptr_t) /*_._VALROUT___V452*/ meltfptr[451])->tabval[10] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5]); MELT_LOCATION ("warmelt-outobj.melt:2912:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V449*/ meltfptr[448]); + meltgc_touch ( /*_._VALROUT___V452*/ meltfptr[451]); /*putclosurout#51 */ melt_assertmsg ("putclosrout#51 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V450*/ meltfptr[449])) == + ( /*_._VALCLO___V453*/ meltfptr[452])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#51 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V449*/ meltfptr[448])) == + ( /*_._VALROUT___V452*/ meltfptr[451])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V450*/ meltfptr[449])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V449*/ meltfptr[448]); + ((meltclosure_ptr_t) /*_._VALCLO___V453*/ meltfptr[452])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V452*/ meltfptr[451]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V450*/ meltfptr[449]); + meltgc_touch ( /*_._VALCLO___V453*/ meltfptr[452]); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_261__CLASS_OBJGETARGREST @#1", + melt_assertmsg ("checkobj putslot ~dsym_263__CLASS_OBJGETARGREST @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V451*/ meltfptr[450])) == + ( /*_._VALDATA___V454*/ meltfptr[453])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_261__CLASS_OBJGETARGREST @#1", + melt_assertmsg ("checkoff putslot ~dsym_263__CLASS_OBJGETARGREST @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V451*/ - meltfptr[450])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V451*/ meltfptr[450]))->obj_vartab[1] = + ( /*_._VALDATA___V454*/ + meltfptr[453])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V454*/ meltfptr[453]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V452*/ meltfptr[451]); + /*_._VALSTR___V455*/ meltfptr[454]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V451*/ meltfptr[450]); + meltgc_touch ( /*_._VALDATA___V454*/ meltfptr[453]); - melt_dbgtrace_written_object ( /*_._VALDATA___V451*/ meltfptr[450], + melt_dbgtrace_written_object ( /*_._VALDATA___V454*/ meltfptr[453], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:2995:/ initchunk"); @@ -30910,12 +30928,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_5 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V453*/ meltfptr[452])) + ( /*_._VALROUT___V456*/ meltfptr[455])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_263__OUTPUCOD_OBJCFORMAL#0", + melt_checkmsg ("putroutconst constnull.drout_265__OUTPUCOD_OBJCFORMAL#0", NULL != ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_._VALROUT___V453*/ meltfptr[452])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V456*/ meltfptr[455])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:2995:/ initchunk"); @@ -30924,33 +30942,33 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_5 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V453*/ meltfptr[452])) + ( /*_._VALROUT___V456*/ meltfptr[455])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_263__OUTPUCOD_OBJCFORMAL#1", - NULL != ( /*_.CLASS_OBJCFORMAL__V70*/ meltfptr[69])); - ((meltroutine_ptr_t) /*_._VALROUT___V453*/ meltfptr[452])->tabval[1] = - (melt_ptr_t) ( /*_.CLASS_OBJCFORMAL__V70*/ meltfptr[69]); + melt_checkmsg ("putroutconst constnull.drout_265__OUTPUCOD_OBJCFORMAL#1", + NULL != ( /*_.CLASS_OBJCFORMAL__V71*/ meltfptr[70])); + ((meltroutine_ptr_t) /*_._VALROUT___V456*/ meltfptr[455])->tabval[1] = + (melt_ptr_t) ( /*_.CLASS_OBJCFORMAL__V71*/ meltfptr[70]); MELT_LOCATION ("warmelt-outobj.melt:2995:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V453*/ meltfptr[452]); + meltgc_touch ( /*_._VALROUT___V456*/ meltfptr[455]); /*putclosurout#52 */ melt_assertmsg ("putclosrout#52 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V454*/ meltfptr[453])) == + ( /*_._VALCLO___V457*/ meltfptr[456])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#52 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V453*/ meltfptr[452])) == + ( /*_._VALROUT___V456*/ meltfptr[455])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V454*/ meltfptr[453])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V453*/ meltfptr[452]); + ((meltclosure_ptr_t) /*_._VALCLO___V457*/ meltfptr[456])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V456*/ meltfptr[455]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V454*/ meltfptr[453]); + meltgc_touch ( /*_._VALCLO___V457*/ meltfptr[456]); MELT_LOCATION ("warmelt-outobj.melt:3009:/ initchunk"); /*^putroutconst */ @@ -30958,13 +30976,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_5 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V455*/ meltfptr[454])) + ( /*_._VALROUT___V458*/ meltfptr[457])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_265__OUTPUCOD_OBJFETCHMODVAR#0", + ("putroutconst constnull.drout_267__OUTPUCOD_OBJFETCHMODVAR#0", NULL != ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_._VALROUT___V455*/ meltfptr[454])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V458*/ meltfptr[457])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:3009:/ initchunk"); @@ -30973,14 +30991,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_5 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V455*/ meltfptr[454])) + ( /*_._VALROUT___V458*/ meltfptr[457])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_265__OUTPUCOD_OBJFETCHMODVAR#1", - NULL != ( /*_.CLASS_OBJFETCHMODVAR__V74*/ meltfptr[73])); - ((meltroutine_ptr_t) /*_._VALROUT___V455*/ meltfptr[454])->tabval[1] = - (melt_ptr_t) ( /*_.CLASS_OBJFETCHMODVAR__V74*/ meltfptr[73]); + ("putroutconst constnull.drout_267__OUTPUCOD_OBJFETCHMODVAR#1", + NULL != ( /*_.CLASS_OBJFETCHMODVAR__V75*/ meltfptr[74])); + ((meltroutine_ptr_t) /*_._VALROUT___V458*/ meltfptr[457])->tabval[1] = + (melt_ptr_t) ( /*_.CLASS_OBJFETCHMODVAR__V75*/ meltfptr[74]); MELT_LOCATION ("warmelt-outobj.melt:3009:/ initchunk"); /*^putroutconst */ @@ -30988,14 +31006,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_5 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V455*/ meltfptr[454])) + ( /*_._VALROUT___V458*/ meltfptr[457])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_265__OUTPUCOD_OBJFETCHMODVAR#2", + ("putroutconst constnull.drout_267__OUTPUCOD_OBJFETCHMODVAR#2", NULL != ( /*_.CLASS_NORMAL_MODULE_VARIABLE_BINDING__V10*/ meltfptr[9])); - ((meltroutine_ptr_t) /*_._VALROUT___V455*/ meltfptr[454])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V458*/ meltfptr[457])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NORMAL_MODULE_VARIABLE_BINDING__V10*/ meltfptr[9]); @@ -31005,13 +31023,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_5 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V455*/ meltfptr[454])) + ( /*_._VALROUT___V458*/ meltfptr[457])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_265__OUTPUCOD_OBJFETCHMODVAR#3", + ("putroutconst constnull.drout_267__OUTPUCOD_OBJFETCHMODVAR#3", NULL != ( /*_.ADD2OUT__V14*/ meltfptr[13])); - ((meltroutine_ptr_t) /*_._VALROUT___V455*/ meltfptr[454])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V458*/ meltfptr[457])->tabval[3] = (melt_ptr_t) ( /*_.ADD2OUT__V14*/ meltfptr[13]); MELT_LOCATION ("warmelt-outobj.melt:3009:/ initchunk"); @@ -31019,54 +31037,54 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_5 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V455*/ meltfptr[454])) == + ( /*_._VALROUT___V458*/ meltfptr[457])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V216*/ meltfptr[215]); - ((meltroutine_ptr_t) /*_._VALROUT___V455*/ meltfptr[454])->tabval[4] = - (melt_ptr_t) ( /*_._VALCLO___V216*/ meltfptr[215]); + NULL != /*_._VALCLO___V217*/ meltfptr[216]); + ((meltroutine_ptr_t) /*_._VALROUT___V458*/ meltfptr[457])->tabval[4] = + (melt_ptr_t) ( /*_._VALCLO___V217*/ meltfptr[216]); MELT_LOCATION ("warmelt-outobj.melt:3009:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V455*/ meltfptr[454]); + meltgc_touch ( /*_._VALROUT___V458*/ meltfptr[457]); /*putclosurout#53 */ melt_assertmsg ("putclosrout#53 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V456*/ meltfptr[455])) == + ( /*_._VALCLO___V459*/ meltfptr[458])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#53 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V455*/ meltfptr[454])) == + ( /*_._VALROUT___V458*/ meltfptr[457])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V456*/ meltfptr[455])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V455*/ meltfptr[454]); + ((meltclosure_ptr_t) /*_._VALCLO___V459*/ meltfptr[458])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V458*/ meltfptr[457]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V456*/ meltfptr[455]); + meltgc_touch ( /*_._VALCLO___V459*/ meltfptr[458]); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_267__CLASS_OBJFETCHMODVAR @#1", + melt_assertmsg ("checkobj putslot ~dsym_269__CLASS_OBJFETCHMODVAR @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V457*/ meltfptr[456])) == + ( /*_._VALDATA___V460*/ meltfptr[459])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_267__CLASS_OBJFETCHMODVAR @#1", + melt_assertmsg ("checkoff putslot ~dsym_269__CLASS_OBJFETCHMODVAR @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V457*/ - meltfptr[456])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V457*/ meltfptr[456]))->obj_vartab[1] = + ( /*_._VALDATA___V460*/ + meltfptr[459])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V460*/ meltfptr[459]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V458*/ meltfptr[457]); + /*_._VALSTR___V461*/ meltfptr[460]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V457*/ meltfptr[456]); + meltgc_touch ( /*_._VALDATA___V460*/ meltfptr[459]); - melt_dbgtrace_written_object ( /*_._VALDATA___V457*/ meltfptr[456], + melt_dbgtrace_written_object ( /*_._VALDATA___V460*/ meltfptr[459], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:3023:/ initchunk"); @@ -31075,13 +31093,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_5 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V459*/ meltfptr[458])) + ( /*_._VALROUT___V462*/ meltfptr[461])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_269__OUTPUCOD_OBJPUTMODVAR#0", + ("putroutconst constnull.drout_271__OUTPUCOD_OBJPUTMODVAR#0", NULL != ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_._VALROUT___V459*/ meltfptr[458])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V462*/ meltfptr[461])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:3023:/ initchunk"); @@ -31090,14 +31108,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_5 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V459*/ meltfptr[458])) + ( /*_._VALROUT___V462*/ meltfptr[461])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_269__OUTPUCOD_OBJPUTMODVAR#1", - NULL != ( /*_.CLASS_OBJPUTMODVAR__V75*/ meltfptr[74])); - ((meltroutine_ptr_t) /*_._VALROUT___V459*/ meltfptr[458])->tabval[1] = - (melt_ptr_t) ( /*_.CLASS_OBJPUTMODVAR__V75*/ meltfptr[74]); + ("putroutconst constnull.drout_271__OUTPUCOD_OBJPUTMODVAR#1", + NULL != ( /*_.CLASS_OBJPUTMODVAR__V76*/ meltfptr[75])); + ((meltroutine_ptr_t) /*_._VALROUT___V462*/ meltfptr[461])->tabval[1] = + (melt_ptr_t) ( /*_.CLASS_OBJPUTMODVAR__V76*/ meltfptr[75]); MELT_LOCATION ("warmelt-outobj.melt:3023:/ initchunk"); /*^putroutconst */ @@ -31105,13 +31123,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_5 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V459*/ meltfptr[458])) + ( /*_._VALROUT___V462*/ meltfptr[461])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_269__OUTPUCOD_OBJPUTMODVAR#2", + ("putroutconst constnull.drout_271__OUTPUCOD_OBJPUTMODVAR#2", NULL != ( /*_.CLASS_OBJINSTR__V69*/ meltfptr[68])); - ((meltroutine_ptr_t) /*_._VALROUT___V459*/ meltfptr[458])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V462*/ meltfptr[461])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_OBJINSTR__V69*/ meltfptr[68]); MELT_LOCATION ("warmelt-outobj.melt:3023:/ initchunk"); @@ -31120,14 +31138,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_5 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V459*/ meltfptr[458])) + ( /*_._VALROUT___V462*/ meltfptr[461])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_269__OUTPUCOD_OBJPUTMODVAR#3", + ("putroutconst constnull.drout_271__OUTPUCOD_OBJPUTMODVAR#3", NULL != ( /*_.CLASS_NORMAL_MODULE_VARIABLE_BINDING__V10*/ meltfptr[9])); - ((meltroutine_ptr_t) /*_._VALROUT___V459*/ meltfptr[458])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V462*/ meltfptr[461])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_NORMAL_MODULE_VARIABLE_BINDING__V10*/ meltfptr[9]); @@ -31136,12 +31154,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_5 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V459*/ meltfptr[458])) == + ( /*_._VALROUT___V462*/ meltfptr[461])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V264*/ meltfptr[263]); - ((meltroutine_ptr_t) /*_._VALROUT___V459*/ meltfptr[458])->tabval[4] = - (melt_ptr_t) ( /*_._VALCLO___V264*/ meltfptr[263]); + NULL != /*_._VALCLO___V265*/ meltfptr[264]); + ((meltroutine_ptr_t) /*_._VALROUT___V462*/ meltfptr[461])->tabval[4] = + (melt_ptr_t) ( /*_._VALCLO___V265*/ meltfptr[264]); MELT_LOCATION ("warmelt-outobj.melt:3023:/ initchunk"); /*^putroutconst */ @@ -31149,13 +31167,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_5 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V459*/ meltfptr[458])) + ( /*_._VALROUT___V462*/ meltfptr[461])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_269__OUTPUCOD_OBJPUTMODVAR#5", + ("putroutconst constnull.drout_271__OUTPUCOD_OBJPUTMODVAR#5", NULL != ( /*_.ADD2OUT__V14*/ meltfptr[13])); - ((meltroutine_ptr_t) /*_._VALROUT___V459*/ meltfptr[458])->tabval[5] = + ((meltroutine_ptr_t) /*_._VALROUT___V462*/ meltfptr[461])->tabval[5] = (melt_ptr_t) ( /*_.ADD2OUT__V14*/ meltfptr[13]); MELT_LOCATION ("warmelt-outobj.melt:3023:/ initchunk"); @@ -31163,12 +31181,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_5 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V459*/ meltfptr[458])) == + ( /*_._VALROUT___V462*/ meltfptr[461])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V216*/ meltfptr[215]); - ((meltroutine_ptr_t) /*_._VALROUT___V459*/ meltfptr[458])->tabval[6] = - (melt_ptr_t) ( /*_._VALCLO___V216*/ meltfptr[215]); + NULL != /*_._VALCLO___V217*/ meltfptr[216]); + ((meltroutine_ptr_t) /*_._VALROUT___V462*/ meltfptr[461])->tabval[6] = + (melt_ptr_t) ( /*_._VALCLO___V217*/ meltfptr[216]); MELT_LOCATION ("warmelt-outobj.melt:3023:/ initchunk"); /*^putroutconst */ @@ -31176,56 +31194,56 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_5 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V459*/ meltfptr[458])) + ( /*_._VALROUT___V462*/ meltfptr[461])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_269__OUTPUCOD_OBJPUTMODVAR#7", + ("putroutconst constnull.drout_271__OUTPUCOD_OBJPUTMODVAR#7", NULL != ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19])); - ((meltroutine_ptr_t) /*_._VALROUT___V459*/ meltfptr[458])->tabval[7] = + ((meltroutine_ptr_t) /*_._VALROUT___V462*/ meltfptr[461])->tabval[7] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]); MELT_LOCATION ("warmelt-outobj.melt:3023:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V459*/ meltfptr[458]); + meltgc_touch ( /*_._VALROUT___V462*/ meltfptr[461]); /*putclosurout#54 */ melt_assertmsg ("putclosrout#54 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V460*/ meltfptr[459])) == + ( /*_._VALCLO___V463*/ meltfptr[462])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#54 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V459*/ meltfptr[458])) == + ( /*_._VALROUT___V462*/ meltfptr[461])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V460*/ meltfptr[459])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V459*/ meltfptr[458]); + ((meltclosure_ptr_t) /*_._VALCLO___V463*/ meltfptr[462])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V462*/ meltfptr[461]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V460*/ meltfptr[459]); + meltgc_touch ( /*_._VALCLO___V463*/ meltfptr[462]); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_271__CLASS_OBJPUTMODVAR @#1", + melt_assertmsg ("checkobj putslot ~dsym_273__CLASS_OBJPUTMODVAR @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V461*/ meltfptr[460])) == + ( /*_._VALDATA___V464*/ meltfptr[463])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_271__CLASS_OBJPUTMODVAR @#1", + melt_assertmsg ("checkoff putslot ~dsym_273__CLASS_OBJPUTMODVAR @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V461*/ - meltfptr[460])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V461*/ meltfptr[460]))->obj_vartab[1] = + ( /*_._VALDATA___V464*/ + meltfptr[463])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V464*/ meltfptr[463]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V462*/ meltfptr[461]); + /*_._VALSTR___V465*/ meltfptr[464]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V461*/ meltfptr[460]); + meltgc_touch ( /*_._VALDATA___V464*/ meltfptr[463]); - melt_dbgtrace_written_object ( /*_._VALDATA___V461*/ meltfptr[460], + melt_dbgtrace_written_object ( /*_._VALDATA___V464*/ meltfptr[463], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:3044:/ initchunk"); @@ -31234,13 +31252,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_5 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V463*/ meltfptr[462])) + ( /*_._VALROUT___V466*/ meltfptr[465])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_273__OUTPUCOD_OBJPUTOUTARG#0", + ("putroutconst constnull.drout_275__OUTPUCOD_OBJPUTOUTARG#0", NULL != ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_._VALROUT___V463*/ meltfptr[462])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V466*/ meltfptr[465])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:3044:/ initchunk"); @@ -31249,14 +31267,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_5 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V463*/ meltfptr[462])) + ( /*_._VALROUT___V466*/ meltfptr[465])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_273__OUTPUCOD_OBJPUTOUTARG#1", - NULL != ( /*_.CLASS_OBJPUTOUTARG__V76*/ meltfptr[75])); - ((meltroutine_ptr_t) /*_._VALROUT___V463*/ meltfptr[462])->tabval[1] = - (melt_ptr_t) ( /*_.CLASS_OBJPUTOUTARG__V76*/ meltfptr[75]); + ("putroutconst constnull.drout_275__OUTPUCOD_OBJPUTOUTARG#1", + NULL != ( /*_.CLASS_OBJPUTOUTARG__V77*/ meltfptr[76])); + ((meltroutine_ptr_t) /*_._VALROUT___V466*/ meltfptr[465])->tabval[1] = + (melt_ptr_t) ( /*_.CLASS_OBJPUTOUTARG__V77*/ meltfptr[76]); MELT_LOCATION ("warmelt-outobj.melt:3044:/ initchunk"); /*^putroutconst */ @@ -31264,13 +31282,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_5 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V463*/ meltfptr[462])) + ( /*_._VALROUT___V466*/ meltfptr[465])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_273__OUTPUCOD_OBJPUTOUTARG#2", + ("putroutconst constnull.drout_275__OUTPUCOD_OBJPUTOUTARG#2", NULL != ( /*_.CLASS_OBJINSTR__V69*/ meltfptr[68])); - ((meltroutine_ptr_t) /*_._VALROUT___V463*/ meltfptr[462])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V466*/ meltfptr[465])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_OBJINSTR__V69*/ meltfptr[68]); MELT_LOCATION ("warmelt-outobj.melt:3044:/ initchunk"); @@ -31279,14 +31297,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_5 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V463*/ meltfptr[462])) + ( /*_._VALROUT___V466*/ meltfptr[465])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_273__OUTPUCOD_OBJPUTOUTARG#3", - NULL != ( /*_.CLASS_OBJCFORMAL__V70*/ meltfptr[69])); - ((meltroutine_ptr_t) /*_._VALROUT___V463*/ meltfptr[462])->tabval[3] = - (melt_ptr_t) ( /*_.CLASS_OBJCFORMAL__V70*/ meltfptr[69]); + ("putroutconst constnull.drout_275__OUTPUCOD_OBJPUTOUTARG#3", + NULL != ( /*_.CLASS_OBJCFORMAL__V71*/ meltfptr[70])); + ((meltroutine_ptr_t) /*_._VALROUT___V466*/ meltfptr[465])->tabval[3] = + (melt_ptr_t) ( /*_.CLASS_OBJCFORMAL__V71*/ meltfptr[70]); MELT_LOCATION ("warmelt-outobj.melt:3044:/ initchunk"); /*^putroutconst */ @@ -31294,13 +31312,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_5 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V463*/ meltfptr[462])) + ( /*_._VALROUT___V466*/ meltfptr[465])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_273__OUTPUCOD_OBJPUTOUTARG#4", + ("putroutconst constnull.drout_275__OUTPUCOD_OBJPUTOUTARG#4", NULL != ( /*_.CLASS_OBJLOCV__V57*/ meltfptr[56])); - ((meltroutine_ptr_t) /*_._VALROUT___V463*/ meltfptr[462])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V466*/ meltfptr[465])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_OBJLOCV__V57*/ meltfptr[56]); MELT_LOCATION ("warmelt-outobj.melt:3044:/ initchunk"); @@ -31308,12 +31326,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_5 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V463*/ meltfptr[462])) == + ( /*_._VALROUT___V466*/ meltfptr[465])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V264*/ meltfptr[263]); - ((meltroutine_ptr_t) /*_._VALROUT___V463*/ meltfptr[462])->tabval[5] = - (melt_ptr_t) ( /*_._VALCLO___V264*/ meltfptr[263]); + NULL != /*_._VALCLO___V265*/ meltfptr[264]); + ((meltroutine_ptr_t) /*_._VALROUT___V466*/ meltfptr[465])->tabval[5] = + (melt_ptr_t) ( /*_._VALCLO___V265*/ meltfptr[264]); MELT_LOCATION ("warmelt-outobj.melt:3044:/ initchunk"); /*^putroutconst */ @@ -31321,13 +31339,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_5 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V463*/ meltfptr[462])) + ( /*_._VALROUT___V466*/ meltfptr[465])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_273__OUTPUCOD_OBJPUTOUTARG#6", + ("putroutconst constnull.drout_275__OUTPUCOD_OBJPUTOUTARG#6", NULL != ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19])); - ((meltroutine_ptr_t) /*_._VALROUT___V463*/ meltfptr[462])->tabval[6] = + ((meltroutine_ptr_t) /*_._VALROUT___V466*/ meltfptr[465])->tabval[6] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]); MELT_LOCATION ("warmelt-outobj.melt:3044:/ initchunk"); @@ -31336,56 +31354,56 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_5 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V463*/ meltfptr[462])) + ( /*_._VALROUT___V466*/ meltfptr[465])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_273__OUTPUCOD_OBJPUTOUTARG#7", + ("putroutconst constnull.drout_275__OUTPUCOD_OBJPUTOUTARG#7", NULL != ( /*_.ADD2OUT__V14*/ meltfptr[13])); - ((meltroutine_ptr_t) /*_._VALROUT___V463*/ meltfptr[462])->tabval[7] = + ((meltroutine_ptr_t) /*_._VALROUT___V466*/ meltfptr[465])->tabval[7] = (melt_ptr_t) ( /*_.ADD2OUT__V14*/ meltfptr[13]); MELT_LOCATION ("warmelt-outobj.melt:3044:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V463*/ meltfptr[462]); + meltgc_touch ( /*_._VALROUT___V466*/ meltfptr[465]); /*putclosurout#55 */ melt_assertmsg ("putclosrout#55 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V464*/ meltfptr[463])) == + ( /*_._VALCLO___V467*/ meltfptr[466])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#55 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V463*/ meltfptr[462])) == + ( /*_._VALROUT___V466*/ meltfptr[465])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V464*/ meltfptr[463])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V463*/ meltfptr[462]); + ((meltclosure_ptr_t) /*_._VALCLO___V467*/ meltfptr[466])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V466*/ meltfptr[465]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V464*/ meltfptr[463]); + meltgc_touch ( /*_._VALCLO___V467*/ meltfptr[466]); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_275__CLASS_OBJPUTOUTARG @#1", + melt_assertmsg ("checkobj putslot ~dsym_277__CLASS_OBJPUTOUTARG @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V465*/ meltfptr[464])) == + ( /*_._VALDATA___V468*/ meltfptr[467])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_275__CLASS_OBJPUTOUTARG @#1", + melt_assertmsg ("checkoff putslot ~dsym_277__CLASS_OBJPUTOUTARG @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V465*/ - meltfptr[464])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V465*/ meltfptr[464]))->obj_vartab[1] = + ( /*_._VALDATA___V468*/ + meltfptr[467])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V468*/ meltfptr[467]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V466*/ meltfptr[465]); + /*_._VALSTR___V469*/ meltfptr[468]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V465*/ meltfptr[464]); + meltgc_touch ( /*_._VALDATA___V468*/ meltfptr[467]); - melt_dbgtrace_written_object ( /*_._VALDATA___V465*/ meltfptr[464], + melt_dbgtrace_written_object ( /*_._VALDATA___V468*/ meltfptr[467], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:3070:/ initchunk"); @@ -31394,12 +31412,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_5 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V467*/ meltfptr[466])) + ( /*_._VALROUT___V470*/ meltfptr[469])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_277__OUTPUCOD_OBJLOCV#0", + melt_checkmsg ("putroutconst constnull.drout_279__OUTPUCOD_OBJLOCV#0", NULL != ( /*_.CLASS_OBJLOCV__V57*/ meltfptr[56])); - ((meltroutine_ptr_t) /*_._VALROUT___V467*/ meltfptr[466])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V470*/ meltfptr[469])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJLOCV__V57*/ meltfptr[56]); MELT_LOCATION ("warmelt-outobj.melt:3070:/ initchunk"); @@ -31408,12 +31426,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_5 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V467*/ meltfptr[466])) + ( /*_._VALROUT___V470*/ meltfptr[469])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_277__OUTPUCOD_OBJLOCV#1", + melt_checkmsg ("putroutconst constnull.drout_279__OUTPUCOD_OBJLOCV#1", NULL != ( /*_.CTYPE_VALUE__V31*/ meltfptr[30])); - ((meltroutine_ptr_t) /*_._VALROUT___V467*/ meltfptr[466])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V470*/ meltfptr[469])->tabval[1] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V31*/ meltfptr[30]); MELT_LOCATION ("warmelt-outobj.melt:3070:/ initchunk"); @@ -31422,25 +31440,25 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_5 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V467*/ meltfptr[466])) + ( /*_._VALROUT___V470*/ meltfptr[469])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_277__OUTPUCOD_OBJLOCV#2", - NULL != ( /*_.CTYPE_LONG__V77*/ meltfptr[76])); - ((meltroutine_ptr_t) /*_._VALROUT___V467*/ meltfptr[466])->tabval[2] = - (melt_ptr_t) ( /*_.CTYPE_LONG__V77*/ meltfptr[76]); + melt_checkmsg ("putroutconst constnull.drout_279__OUTPUCOD_OBJLOCV#2", + NULL != ( /*_.CTYPE_LONG__V78*/ meltfptr[77])); + ((meltroutine_ptr_t) /*_._VALROUT___V470*/ meltfptr[469])->tabval[2] = + (melt_ptr_t) ( /*_.CTYPE_LONG__V78*/ meltfptr[77]); MELT_LOCATION ("warmelt-outobj.melt:3070:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V467*/ meltfptr[466])) == + ( /*_._VALROUT___V470*/ meltfptr[469])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALDATA___V197*/ meltfptr[196]); - ((meltroutine_ptr_t) /*_._VALROUT___V467*/ meltfptr[466])->tabval[3] = - (melt_ptr_t) ( /*_._VALDATA___V197*/ meltfptr[196]); + NULL != /*_._VALDATA___V198*/ meltfptr[197]); + ((meltroutine_ptr_t) /*_._VALROUT___V470*/ meltfptr[469])->tabval[3] = + (melt_ptr_t) ( /*_._VALDATA___V198*/ meltfptr[197]); MELT_LOCATION ("warmelt-outobj.melt:3070:/ initchunk"); /*^putroutconst */ @@ -31448,55 +31466,55 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_5 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V467*/ meltfptr[466])) + ( /*_._VALROUT___V470*/ meltfptr[469])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_277__OUTPUCOD_OBJLOCV#4", + melt_checkmsg ("putroutconst constnull.drout_279__OUTPUCOD_OBJLOCV#4", NULL != ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5])); - ((meltroutine_ptr_t) /*_._VALROUT___V467*/ meltfptr[466])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V470*/ meltfptr[469])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5]); MELT_LOCATION ("warmelt-outobj.melt:3070:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V467*/ meltfptr[466]); + meltgc_touch ( /*_._VALROUT___V470*/ meltfptr[469]); /*putclosurout#56 */ melt_assertmsg ("putclosrout#56 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V468*/ meltfptr[467])) == + ( /*_._VALCLO___V471*/ meltfptr[470])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#56 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V467*/ meltfptr[466])) == + ( /*_._VALROUT___V470*/ meltfptr[469])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V468*/ meltfptr[467])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V467*/ meltfptr[466]); + ((meltclosure_ptr_t) /*_._VALCLO___V471*/ meltfptr[470])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V470*/ meltfptr[469]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V468*/ meltfptr[467]); + meltgc_touch ( /*_._VALCLO___V471*/ meltfptr[470]); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_279__CTYPE_LONG @#1", + melt_assertmsg ("checkobj putslot ~dsym_281__CTYPE_LONG @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V469*/ meltfptr[468])) == + ( /*_._VALDATA___V472*/ meltfptr[471])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_279__CTYPE_LONG @#1", + melt_assertmsg ("checkoff putslot ~dsym_281__CTYPE_LONG @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V469*/ - meltfptr[468])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V469*/ meltfptr[468]))->obj_vartab[1] = + ( /*_._VALDATA___V472*/ + meltfptr[471])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V472*/ meltfptr[471]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V470*/ meltfptr[469]); + /*_._VALSTR___V473*/ meltfptr[472]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V469*/ meltfptr[468]); + meltgc_touch ( /*_._VALDATA___V472*/ meltfptr[471]); - melt_dbgtrace_written_object ( /*_._VALDATA___V469*/ meltfptr[468], + melt_dbgtrace_written_object ( /*_._VALDATA___V472*/ meltfptr[471], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:3101:/ initchunk"); @@ -31505,13 +31523,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_5 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V471*/ meltfptr[470])) + ( /*_._VALROUT___V474*/ meltfptr[473])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_281__OUTPUCOD_OBJCLOCCV#0", - NULL != ( /*_.CLASS_OBJCLOCCV__V78*/ meltfptr[77])); - ((meltroutine_ptr_t) /*_._VALROUT___V471*/ meltfptr[470])->tabval[0] = - (melt_ptr_t) ( /*_.CLASS_OBJCLOCCV__V78*/ meltfptr[77]); + melt_checkmsg ("putroutconst constnull.drout_283__OUTPUCOD_OBJCLOCCV#0", + NULL != ( /*_.CLASS_OBJCLOCCV__V79*/ meltfptr[78])); + ((meltroutine_ptr_t) /*_._VALROUT___V474*/ meltfptr[473])->tabval[0] = + (melt_ptr_t) ( /*_.CLASS_OBJCLOCCV__V79*/ meltfptr[78]); MELT_LOCATION ("warmelt-outobj.melt:3101:/ initchunk"); /*^putroutconst */ @@ -31519,12 +31537,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_5 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V471*/ meltfptr[470])) + ( /*_._VALROUT___V474*/ meltfptr[473])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_281__OUTPUCOD_OBJCLOCCV#1", + melt_checkmsg ("putroutconst constnull.drout_283__OUTPUCOD_OBJCLOCCV#1", NULL != ( /*_.CTYPE_VALUE__V31*/ meltfptr[30])); - ((meltroutine_ptr_t) /*_._VALROUT___V471*/ meltfptr[470])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V474*/ meltfptr[473])->tabval[1] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V31*/ meltfptr[30]); MELT_LOCATION ("warmelt-outobj.melt:3101:/ initchunk"); @@ -31532,12 +31550,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_5 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V471*/ meltfptr[470])) == + ( /*_._VALROUT___V474*/ meltfptr[473])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALDATA___V197*/ meltfptr[196]); - ((meltroutine_ptr_t) /*_._VALROUT___V471*/ meltfptr[470])->tabval[2] = - (melt_ptr_t) ( /*_._VALDATA___V197*/ meltfptr[196]); + NULL != /*_._VALDATA___V198*/ meltfptr[197]); + ((meltroutine_ptr_t) /*_._VALROUT___V474*/ meltfptr[473])->tabval[2] = + (melt_ptr_t) ( /*_._VALDATA___V198*/ meltfptr[197]); MELT_LOCATION ("warmelt-outobj.melt:3101:/ initchunk"); /*^putroutconst */ @@ -31545,55 +31563,55 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_5 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V471*/ meltfptr[470])) + ( /*_._VALROUT___V474*/ meltfptr[473])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_281__OUTPUCOD_OBJCLOCCV#3", + melt_checkmsg ("putroutconst constnull.drout_283__OUTPUCOD_OBJCLOCCV#3", NULL != ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5])); - ((meltroutine_ptr_t) /*_._VALROUT___V471*/ meltfptr[470])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V474*/ meltfptr[473])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5]); MELT_LOCATION ("warmelt-outobj.melt:3101:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V471*/ meltfptr[470]); + meltgc_touch ( /*_._VALROUT___V474*/ meltfptr[473]); /*putclosurout#57 */ melt_assertmsg ("putclosrout#57 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V472*/ meltfptr[471])) == + ( /*_._VALCLO___V475*/ meltfptr[474])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#57 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V471*/ meltfptr[470])) == + ( /*_._VALROUT___V474*/ meltfptr[473])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V472*/ meltfptr[471])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V471*/ meltfptr[470]); + ((meltclosure_ptr_t) /*_._VALCLO___V475*/ meltfptr[474])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V474*/ meltfptr[473]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V472*/ meltfptr[471]); + meltgc_touch ( /*_._VALCLO___V475*/ meltfptr[474]); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_283__CLASS_OBJCLOCCV @#1", + melt_assertmsg ("checkobj putslot ~dsym_285__CLASS_OBJCLOCCV @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V473*/ meltfptr[472])) == + ( /*_._VALDATA___V476*/ meltfptr[475])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_283__CLASS_OBJCLOCCV @#1", + melt_assertmsg ("checkoff putslot ~dsym_285__CLASS_OBJCLOCCV @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V473*/ - meltfptr[472])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V473*/ meltfptr[472]))->obj_vartab[1] = + ( /*_._VALDATA___V476*/ + meltfptr[475])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V476*/ meltfptr[475]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V474*/ meltfptr[473]); + /*_._VALSTR___V477*/ meltfptr[476]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V473*/ meltfptr[472]); + meltgc_touch ( /*_._VALDATA___V476*/ meltfptr[475]); - melt_dbgtrace_written_object ( /*_._VALDATA___V473*/ meltfptr[472], + melt_dbgtrace_written_object ( /*_._VALDATA___V476*/ meltfptr[475], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:3119:/ initchunk"); @@ -31602,12 +31620,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_5 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V475*/ meltfptr[474])) + ( /*_._VALROUT___V478*/ meltfptr[477])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_285__OUTPUCOD_OBJCLOHOOKV#0", + melt_checkmsg ("putroutconst constnull.drout_287__OUTPUCOD_OBJCLOHOOKV#0", NULL != ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_._VALROUT___V475*/ meltfptr[474])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V478*/ meltfptr[477])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:3119:/ initchunk"); @@ -31616,13 +31634,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_5 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V475*/ meltfptr[474])) + ( /*_._VALROUT___V478*/ meltfptr[477])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_285__OUTPUCOD_OBJCLOHOOKV#1", - NULL != ( /*_.CLASS_OBJCLOHOOKV__V79*/ meltfptr[78])); - ((meltroutine_ptr_t) /*_._VALROUT___V475*/ meltfptr[474])->tabval[1] = - (melt_ptr_t) ( /*_.CLASS_OBJCLOHOOKV__V79*/ meltfptr[78]); + melt_checkmsg ("putroutconst constnull.drout_287__OUTPUCOD_OBJCLOHOOKV#1", + NULL != ( /*_.CLASS_OBJCLOHOOKV__V80*/ meltfptr[79])); + ((meltroutine_ptr_t) /*_._VALROUT___V478*/ meltfptr[477])->tabval[1] = + (melt_ptr_t) ( /*_.CLASS_OBJCLOHOOKV__V80*/ meltfptr[79]); MELT_LOCATION ("warmelt-outobj.melt:3119:/ initchunk"); /*^putroutconst */ @@ -31630,12 +31648,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_5 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V475*/ meltfptr[474])) + ( /*_._VALROUT___V478*/ meltfptr[477])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_285__OUTPUCOD_OBJCLOHOOKV#2", + melt_checkmsg ("putroutconst constnull.drout_287__OUTPUCOD_OBJCLOHOOKV#2", NULL != ( /*_.CTYPE_VALUE__V31*/ meltfptr[30])); - ((meltroutine_ptr_t) /*_._VALROUT___V475*/ meltfptr[474])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V478*/ meltfptr[477])->tabval[2] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V31*/ meltfptr[30]); MELT_LOCATION ("warmelt-outobj.melt:3119:/ initchunk"); @@ -31643,12 +31661,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_5 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V475*/ meltfptr[474])) == + ( /*_._VALROUT___V478*/ meltfptr[477])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALDATA___V197*/ meltfptr[196]); - ((meltroutine_ptr_t) /*_._VALROUT___V475*/ meltfptr[474])->tabval[3] = - (melt_ptr_t) ( /*_._VALDATA___V197*/ meltfptr[196]); + NULL != /*_._VALDATA___V198*/ meltfptr[197]); + ((meltroutine_ptr_t) /*_._VALROUT___V478*/ meltfptr[477])->tabval[3] = + (melt_ptr_t) ( /*_._VALDATA___V198*/ meltfptr[197]); MELT_LOCATION ("warmelt-outobj.melt:3119:/ initchunk"); /*^putroutconst */ @@ -31656,55 +31674,55 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_5 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V475*/ meltfptr[474])) + ( /*_._VALROUT___V478*/ meltfptr[477])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_285__OUTPUCOD_OBJCLOHOOKV#4", + melt_checkmsg ("putroutconst constnull.drout_287__OUTPUCOD_OBJCLOHOOKV#4", NULL != ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5])); - ((meltroutine_ptr_t) /*_._VALROUT___V475*/ meltfptr[474])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V478*/ meltfptr[477])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5]); MELT_LOCATION ("warmelt-outobj.melt:3119:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V475*/ meltfptr[474]); + meltgc_touch ( /*_._VALROUT___V478*/ meltfptr[477]); /*putclosurout#58 */ melt_assertmsg ("putclosrout#58 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V476*/ meltfptr[475])) == + ( /*_._VALCLO___V479*/ meltfptr[478])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#58 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V475*/ meltfptr[474])) == + ( /*_._VALROUT___V478*/ meltfptr[477])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V476*/ meltfptr[475])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V475*/ meltfptr[474]); + ((meltclosure_ptr_t) /*_._VALCLO___V479*/ meltfptr[478])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V478*/ meltfptr[477]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V476*/ meltfptr[475]); + meltgc_touch ( /*_._VALCLO___V479*/ meltfptr[478]); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_287__CLASS_OBJCLOHOOKV @#1", + melt_assertmsg ("checkobj putslot ~dsym_289__CLASS_OBJCLOHOOKV @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V477*/ meltfptr[476])) == + ( /*_._VALDATA___V480*/ meltfptr[479])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_287__CLASS_OBJCLOHOOKV @#1", + melt_assertmsg ("checkoff putslot ~dsym_289__CLASS_OBJCLOHOOKV @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V477*/ - meltfptr[476])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V477*/ meltfptr[476]))->obj_vartab[1] = + ( /*_._VALDATA___V480*/ + meltfptr[479])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V480*/ meltfptr[479]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V478*/ meltfptr[477]); + /*_._VALSTR___V481*/ meltfptr[480]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V477*/ meltfptr[476]); + meltgc_touch ( /*_._VALDATA___V480*/ meltfptr[479]); - melt_dbgtrace_written_object ( /*_._VALDATA___V477*/ meltfptr[476], + melt_dbgtrace_written_object ( /*_._VALDATA___V480*/ meltfptr[479], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:3139:/ initchunk"); @@ -31713,13 +31731,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_5 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V479*/ meltfptr[478])) + ( /*_._VALROUT___V482*/ meltfptr[481])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_289__OUTPUCOD_OBJCONSTV#0", - NULL != ( /*_.CLASS_OBJCONSTV__V80*/ meltfptr[79])); - ((meltroutine_ptr_t) /*_._VALROUT___V479*/ meltfptr[478])->tabval[0] = - (melt_ptr_t) ( /*_.CLASS_OBJCONSTV__V80*/ meltfptr[79]); + melt_checkmsg ("putroutconst constnull.drout_291__OUTPUCOD_OBJCONSTV#0", + NULL != ( /*_.CLASS_OBJCONSTV__V81*/ meltfptr[80])); + ((meltroutine_ptr_t) /*_._VALROUT___V482*/ meltfptr[481])->tabval[0] = + (melt_ptr_t) ( /*_.CLASS_OBJCONSTV__V81*/ meltfptr[80]); MELT_LOCATION ("warmelt-outobj.melt:3139:/ initchunk"); /*^putroutconst */ @@ -31727,12 +31745,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_5 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V479*/ meltfptr[478])) + ( /*_._VALROUT___V482*/ meltfptr[481])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_289__OUTPUCOD_OBJCONSTV#1", + melt_checkmsg ("putroutconst constnull.drout_291__OUTPUCOD_OBJCONSTV#1", NULL != ( /*_.CTYPE_VALUE__V31*/ meltfptr[30])); - ((meltroutine_ptr_t) /*_._VALROUT___V479*/ meltfptr[478])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V482*/ meltfptr[481])->tabval[1] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V31*/ meltfptr[30]); MELT_LOCATION ("warmelt-outobj.melt:3139:/ initchunk"); @@ -31740,12 +31758,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_5 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V479*/ meltfptr[478])) == + ( /*_._VALROUT___V482*/ meltfptr[481])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALDATA___V197*/ meltfptr[196]); - ((meltroutine_ptr_t) /*_._VALROUT___V479*/ meltfptr[478])->tabval[2] = - (melt_ptr_t) ( /*_._VALDATA___V197*/ meltfptr[196]); + NULL != /*_._VALDATA___V198*/ meltfptr[197]); + ((meltroutine_ptr_t) /*_._VALROUT___V482*/ meltfptr[481])->tabval[2] = + (melt_ptr_t) ( /*_._VALDATA___V198*/ meltfptr[197]); MELT_LOCATION ("warmelt-outobj.melt:3139:/ initchunk"); /*^putroutconst */ @@ -31753,55 +31771,55 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_5 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V479*/ meltfptr[478])) + ( /*_._VALROUT___V482*/ meltfptr[481])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_289__OUTPUCOD_OBJCONSTV#3", + melt_checkmsg ("putroutconst constnull.drout_291__OUTPUCOD_OBJCONSTV#3", NULL != ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5])); - ((meltroutine_ptr_t) /*_._VALROUT___V479*/ meltfptr[478])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V482*/ meltfptr[481])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5]); MELT_LOCATION ("warmelt-outobj.melt:3139:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V479*/ meltfptr[478]); + meltgc_touch ( /*_._VALROUT___V482*/ meltfptr[481]); /*putclosurout#59 */ melt_assertmsg ("putclosrout#59 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V480*/ meltfptr[479])) == + ( /*_._VALCLO___V483*/ meltfptr[482])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#59 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V479*/ meltfptr[478])) == + ( /*_._VALROUT___V482*/ meltfptr[481])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V480*/ meltfptr[479])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V479*/ meltfptr[478]); + ((meltclosure_ptr_t) /*_._VALCLO___V483*/ meltfptr[482])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V482*/ meltfptr[481]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V480*/ meltfptr[479]); + meltgc_touch ( /*_._VALCLO___V483*/ meltfptr[482]); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_291__CLASS_OBJCONSTV @#1", + melt_assertmsg ("checkobj putslot ~dsym_293__CLASS_OBJCONSTV @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V481*/ meltfptr[480])) == + ( /*_._VALDATA___V484*/ meltfptr[483])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_291__CLASS_OBJCONSTV @#1", + melt_assertmsg ("checkoff putslot ~dsym_293__CLASS_OBJCONSTV @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V481*/ - meltfptr[480])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V481*/ meltfptr[480]))->obj_vartab[1] = + ( /*_._VALDATA___V484*/ + meltfptr[483])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V484*/ meltfptr[483]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V482*/ meltfptr[481]); + /*_._VALSTR___V485*/ meltfptr[484]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V481*/ meltfptr[480]); + meltgc_touch ( /*_._VALDATA___V484*/ meltfptr[483]); - melt_dbgtrace_written_object ( /*_._VALDATA___V481*/ meltfptr[480], + melt_dbgtrace_written_object ( /*_._VALDATA___V484*/ meltfptr[483], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:3158:/ initchunk"); @@ -31810,66 +31828,66 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_5 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V483*/ meltfptr[482])) + ( /*_._VALROUT___V486*/ meltfptr[485])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_293__OUTPUT_CODE_INSTRUCTIONS_LIST#0", - NULL != ( /*_.CLASS_OBJPLAINBLOCK__V81*/ meltfptr[80])); - ((meltroutine_ptr_t) /*_._VALROUT___V483*/ meltfptr[482])->tabval[0] = - (melt_ptr_t) ( /*_.CLASS_OBJPLAINBLOCK__V81*/ meltfptr[80]); + ("putroutconst constnull.drout_295__OUTPUT_CODE_INSTRUCTIONS_LIST#0", + NULL != ( /*_.CLASS_OBJPLAINBLOCK__V82*/ meltfptr[81])); + ((meltroutine_ptr_t) /*_._VALROUT___V486*/ meltfptr[485])->tabval[0] = + (melt_ptr_t) ( /*_.CLASS_OBJPLAINBLOCK__V82*/ meltfptr[81]); + + +#undef meltfram__ +} /*end of meltmod__WARMELTmiOUTOBJ__initialmeltchunk_5 */ +void +meltmod__WARMELTmiOUTOBJ__initialmeltchunk_6 (meltinitial_frame_t * + meltmeltframptr__, + char meltpredefinited[]) +{ +#define meltfram__ (*meltmeltframptr__) +#undef meltcallcount +#define meltcallcount 0L + (void) meltpredefinited; MELT_LOCATION ("warmelt-outobj.melt:3158:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V483*/ meltfptr[482])) == + ( /*_._VALROUT___V486*/ meltfptr[485])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V264*/ meltfptr[263]); - ((meltroutine_ptr_t) /*_._VALROUT___V483*/ meltfptr[482])->tabval[1] = - (melt_ptr_t) ( /*_._VALCLO___V264*/ meltfptr[263]); + NULL != /*_._VALCLO___V265*/ meltfptr[264]); + ((meltroutine_ptr_t) /*_._VALROUT___V486*/ meltfptr[485])->tabval[1] = + (melt_ptr_t) ( /*_._VALCLO___V265*/ meltfptr[264]); /*putclosurout#60 */ melt_assertmsg ("putclosrout#60 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V484*/ meltfptr[483])) == + ( /*_._VALCLO___V487*/ meltfptr[486])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#60 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V483*/ meltfptr[482])) == + ( /*_._VALROUT___V486*/ meltfptr[485])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V484*/ meltfptr[483])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V483*/ meltfptr[482]); + ((meltclosure_ptr_t) /*_._VALCLO___V487*/ meltfptr[486])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V486*/ meltfptr[485]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V484*/ meltfptr[483]); + meltgc_touch ( /*_._VALCLO___V487*/ meltfptr[486]); - -#undef meltfram__ -} /*end of meltmod__WARMELTmiOUTOBJ__initialmeltchunk_5 */ - -void -meltmod__WARMELTmiOUTOBJ__initialmeltchunk_6 (meltinitial_frame_t * - meltmeltframptr__, - char meltpredefinited[]) -{ -#define meltfram__ (*meltmeltframptr__) -#undef meltcallcount -#define meltcallcount 0L - (void) meltpredefinited; MELT_LOCATION ("warmelt-outobj.melt:3158:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V483*/ meltfptr[482])) == + ( /*_._VALROUT___V486*/ meltfptr[485])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V484*/ meltfptr[483]); - ((meltroutine_ptr_t) /*_._VALROUT___V483*/ meltfptr[482])->tabval[2] = - (melt_ptr_t) ( /*_._VALCLO___V484*/ meltfptr[483]); + NULL != /*_._VALCLO___V487*/ meltfptr[486]); + ((meltroutine_ptr_t) /*_._VALROUT___V486*/ meltfptr[485])->tabval[2] = + (melt_ptr_t) ( /*_._VALCLO___V487*/ meltfptr[486]); MELT_LOCATION ("warmelt-outobj.melt:3158:/ initchunk"); /*^putroutconst */ @@ -31877,13 +31895,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_6 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V483*/ meltfptr[482])) + ( /*_._VALROUT___V486*/ meltfptr[485])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_293__OUTPUT_CODE_INSTRUCTIONS_LIST#3", + ("putroutconst constnull.drout_295__OUTPUT_CODE_INSTRUCTIONS_LIST#3", NULL != ( /*_.CLASS_OBJPUREVALUE__V63*/ meltfptr[62])); - ((meltroutine_ptr_t) /*_._VALROUT___V483*/ meltfptr[482])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V486*/ meltfptr[485])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_OBJPUREVALUE__V63*/ meltfptr[62]); MELT_LOCATION ("warmelt-outobj.melt:3158:/ initchunk"); @@ -31892,13 +31910,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_6 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V483*/ meltfptr[482])) + ( /*_._VALROUT___V486*/ meltfptr[485])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_293__OUTPUT_CODE_INSTRUCTIONS_LIST#4", + ("putroutconst constnull.drout_295__OUTPUT_CODE_INSTRUCTIONS_LIST#4", NULL != ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19])); - ((meltroutine_ptr_t) /*_._VALROUT___V483*/ meltfptr[482])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V486*/ meltfptr[485])->tabval[4] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]); MELT_LOCATION ("warmelt-outobj.melt:3158:/ initchunk"); @@ -31906,12 +31924,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_6 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V483*/ meltfptr[482])) == + ( /*_._VALROUT___V486*/ meltfptr[485])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALDATA___V197*/ meltfptr[196]); - ((meltroutine_ptr_t) /*_._VALROUT___V483*/ meltfptr[482])->tabval[5] = - (melt_ptr_t) ( /*_._VALDATA___V197*/ meltfptr[196]); + NULL != /*_._VALDATA___V198*/ meltfptr[197]); + ((meltroutine_ptr_t) /*_._VALROUT___V486*/ meltfptr[485])->tabval[5] = + (melt_ptr_t) ( /*_._VALDATA___V198*/ meltfptr[197]); MELT_LOCATION ("warmelt-outobj.melt:3158:/ initchunk"); /*^putroutconst */ @@ -31919,41 +31937,41 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_6 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V483*/ meltfptr[482])) + ( /*_._VALROUT___V486*/ meltfptr[485])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_293__OUTPUT_CODE_INSTRUCTIONS_LIST#6", + ("putroutconst constnull.drout_295__OUTPUT_CODE_INSTRUCTIONS_LIST#6", NULL != ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5])); - ((meltroutine_ptr_t) /*_._VALROUT___V483*/ meltfptr[482])->tabval[6] = + ((meltroutine_ptr_t) /*_._VALROUT___V486*/ meltfptr[485])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5]); MELT_LOCATION ("warmelt-outobj.melt:3158:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V483*/ meltfptr[482]); + meltgc_touch ( /*_._VALROUT___V486*/ meltfptr[485]); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_295__CLASS_OBJPLAINBLOCK @#1", + melt_assertmsg ("checkobj putslot ~dsym_297__CLASS_OBJPLAINBLOCK @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V485*/ meltfptr[484])) == + ( /*_._VALDATA___V488*/ meltfptr[487])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_295__CLASS_OBJPLAINBLOCK @#1", + melt_assertmsg ("checkoff putslot ~dsym_297__CLASS_OBJPLAINBLOCK @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V485*/ - meltfptr[484])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V485*/ meltfptr[484]))->obj_vartab[1] = + ( /*_._VALDATA___V488*/ + meltfptr[487])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V488*/ meltfptr[487]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V486*/ meltfptr[485]); + /*_._VALSTR___V489*/ meltfptr[488]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V485*/ meltfptr[484]); + meltgc_touch ( /*_._VALDATA___V488*/ meltfptr[487]); - melt_dbgtrace_written_object ( /*_._VALDATA___V485*/ meltfptr[484], + melt_dbgtrace_written_object ( /*_._VALDATA___V488*/ meltfptr[487], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:3192:/ initchunk"); @@ -31962,26 +31980,26 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_6 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V487*/ meltfptr[486])) + ( /*_._VALROUT___V490*/ meltfptr[489])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_297__OUTPUCOD_OBJCHECKSIGNAL#0", - NULL != ( /*_.CLASS_OBJCHECKSIGNAL__V82*/ meltfptr[81])); - ((meltroutine_ptr_t) /*_._VALROUT___V487*/ meltfptr[486])->tabval[0] = - (melt_ptr_t) ( /*_.CLASS_OBJCHECKSIGNAL__V82*/ meltfptr[81]); + ("putroutconst constnull.drout_299__OUTPUCOD_OBJCHECKSIGNAL#0", + NULL != ( /*_.CLASS_OBJCHECKSIGNAL__V83*/ meltfptr[82])); + ((meltroutine_ptr_t) /*_._VALROUT___V490*/ meltfptr[489])->tabval[0] = + (melt_ptr_t) ( /*_.CLASS_OBJCHECKSIGNAL__V83*/ meltfptr[82]); MELT_LOCATION ("warmelt-outobj.melt:3192:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V487*/ meltfptr[486])) == + ( /*_._VALROUT___V490*/ meltfptr[489])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V268*/ meltfptr[267]); - ((meltroutine_ptr_t) /*_._VALROUT___V487*/ meltfptr[486])->tabval[1] = - (melt_ptr_t) ( /*_._VALCLO___V268*/ meltfptr[267]); + NULL != /*_._VALCLO___V269*/ meltfptr[268]); + ((meltroutine_ptr_t) /*_._VALROUT___V490*/ meltfptr[489])->tabval[1] = + (melt_ptr_t) ( /*_._VALCLO___V269*/ meltfptr[268]); MELT_LOCATION ("warmelt-outobj.melt:3192:/ initchunk"); /*^putroutconst */ @@ -31989,56 +32007,56 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_6 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V487*/ meltfptr[486])) + ( /*_._VALROUT___V490*/ meltfptr[489])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_297__OUTPUCOD_OBJCHECKSIGNAL#2", + ("putroutconst constnull.drout_299__OUTPUCOD_OBJCHECKSIGNAL#2", NULL != ( /*_.ADD2OUT__V14*/ meltfptr[13])); - ((meltroutine_ptr_t) /*_._VALROUT___V487*/ meltfptr[486])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V490*/ meltfptr[489])->tabval[2] = (melt_ptr_t) ( /*_.ADD2OUT__V14*/ meltfptr[13]); MELT_LOCATION ("warmelt-outobj.melt:3192:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V487*/ meltfptr[486]); + meltgc_touch ( /*_._VALROUT___V490*/ meltfptr[489]); /*putclosurout#61 */ melt_assertmsg ("putclosrout#61 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V488*/ meltfptr[487])) == + ( /*_._VALCLO___V491*/ meltfptr[490])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#61 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V487*/ meltfptr[486])) == + ( /*_._VALROUT___V490*/ meltfptr[489])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V488*/ meltfptr[487])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V487*/ meltfptr[486]); + ((meltclosure_ptr_t) /*_._VALCLO___V491*/ meltfptr[490])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V490*/ meltfptr[489]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V488*/ meltfptr[487]); + meltgc_touch ( /*_._VALCLO___V491*/ meltfptr[490]); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_299__CLASS_OBJCHECKSIGNAL @#1", + melt_assertmsg ("checkobj putslot ~dsym_301__CLASS_OBJCHECKSIGNAL @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V489*/ meltfptr[488])) == + ( /*_._VALDATA___V492*/ meltfptr[491])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_299__CLASS_OBJCHECKSIGNAL @#1", + melt_assertmsg ("checkoff putslot ~dsym_301__CLASS_OBJCHECKSIGNAL @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V489*/ - meltfptr[488])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V489*/ meltfptr[488]))->obj_vartab[1] = + ( /*_._VALDATA___V492*/ + meltfptr[491])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V492*/ meltfptr[491]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V490*/ meltfptr[489]); + /*_._VALSTR___V493*/ meltfptr[492]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V489*/ meltfptr[488]); + meltgc_touch ( /*_._VALDATA___V492*/ meltfptr[491]); - melt_dbgtrace_written_object ( /*_._VALDATA___V489*/ meltfptr[488], + melt_dbgtrace_written_object ( /*_._VALDATA___V492*/ meltfptr[491], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:3205:/ initchunk"); @@ -32047,25 +32065,25 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_6 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V491*/ meltfptr[490])) + ( /*_._VALROUT___V494*/ meltfptr[493])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_301__OUTPUCOD_OBJANYBLOCK#0", - NULL != ( /*_.CLASS_OBJANYBLOCK__V83*/ meltfptr[82])); - ((meltroutine_ptr_t) /*_._VALROUT___V491*/ meltfptr[490])->tabval[0] = - (melt_ptr_t) ( /*_.CLASS_OBJANYBLOCK__V83*/ meltfptr[82]); + melt_checkmsg ("putroutconst constnull.drout_303__OUTPUCOD_OBJANYBLOCK#0", + NULL != ( /*_.CLASS_OBJANYBLOCK__V84*/ meltfptr[83])); + ((meltroutine_ptr_t) /*_._VALROUT___V494*/ meltfptr[493])->tabval[0] = + (melt_ptr_t) ( /*_.CLASS_OBJANYBLOCK__V84*/ meltfptr[83]); MELT_LOCATION ("warmelt-outobj.melt:3205:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V491*/ meltfptr[490])) == + ( /*_._VALROUT___V494*/ meltfptr[493])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V264*/ meltfptr[263]); - ((meltroutine_ptr_t) /*_._VALROUT___V491*/ meltfptr[490])->tabval[1] = - (melt_ptr_t) ( /*_._VALCLO___V264*/ meltfptr[263]); + NULL != /*_._VALCLO___V265*/ meltfptr[264]); + ((meltroutine_ptr_t) /*_._VALROUT___V494*/ meltfptr[493])->tabval[1] = + (melt_ptr_t) ( /*_._VALCLO___V265*/ meltfptr[264]); MELT_LOCATION ("warmelt-outobj.melt:3205:/ initchunk"); /*^putroutconst */ @@ -32073,12 +32091,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_6 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V491*/ meltfptr[490])) + ( /*_._VALROUT___V494*/ meltfptr[493])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_301__OUTPUCOD_OBJANYBLOCK#2", + melt_checkmsg ("putroutconst constnull.drout_303__OUTPUCOD_OBJANYBLOCK#2", NULL != ( /*_.DISCR_INTEGER__V52*/ meltfptr[51])); - ((meltroutine_ptr_t) /*_._VALROUT___V491*/ meltfptr[490])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V494*/ meltfptr[493])->tabval[2] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V52*/ meltfptr[51]); MELT_LOCATION ("warmelt-outobj.melt:3205:/ initchunk"); @@ -32086,24 +32104,24 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_6 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V491*/ meltfptr[490])) == + ( /*_._VALROUT___V494*/ meltfptr[493])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V484*/ meltfptr[483]); - ((meltroutine_ptr_t) /*_._VALROUT___V491*/ meltfptr[490])->tabval[3] = - (melt_ptr_t) ( /*_._VALCLO___V484*/ meltfptr[483]); + NULL != /*_._VALCLO___V487*/ meltfptr[486]); + ((meltroutine_ptr_t) /*_._VALROUT___V494*/ meltfptr[493])->tabval[3] = + (melt_ptr_t) ( /*_._VALCLO___V487*/ meltfptr[486]); MELT_LOCATION ("warmelt-outobj.melt:3205:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V491*/ meltfptr[490])) == + ( /*_._VALROUT___V494*/ meltfptr[493])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALDATA___V197*/ meltfptr[196]); - ((meltroutine_ptr_t) /*_._VALROUT___V491*/ meltfptr[490])->tabval[4] = - (melt_ptr_t) ( /*_._VALDATA___V197*/ meltfptr[196]); + NULL != /*_._VALDATA___V198*/ meltfptr[197]); + ((meltroutine_ptr_t) /*_._VALROUT___V494*/ meltfptr[493])->tabval[4] = + (melt_ptr_t) ( /*_._VALDATA___V198*/ meltfptr[197]); MELT_LOCATION ("warmelt-outobj.melt:3205:/ initchunk"); /*^putroutconst */ @@ -32111,55 +32129,55 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_6 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V491*/ meltfptr[490])) + ( /*_._VALROUT___V494*/ meltfptr[493])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_301__OUTPUCOD_OBJANYBLOCK#5", + melt_checkmsg ("putroutconst constnull.drout_303__OUTPUCOD_OBJANYBLOCK#5", NULL != ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5])); - ((meltroutine_ptr_t) /*_._VALROUT___V491*/ meltfptr[490])->tabval[5] = + ((meltroutine_ptr_t) /*_._VALROUT___V494*/ meltfptr[493])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5]); MELT_LOCATION ("warmelt-outobj.melt:3205:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V491*/ meltfptr[490]); + meltgc_touch ( /*_._VALROUT___V494*/ meltfptr[493]); /*putclosurout#62 */ melt_assertmsg ("putclosrout#62 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V492*/ meltfptr[491])) == + ( /*_._VALCLO___V495*/ meltfptr[494])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#62 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V491*/ meltfptr[490])) == + ( /*_._VALROUT___V494*/ meltfptr[493])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V492*/ meltfptr[491])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V491*/ meltfptr[490]); + ((meltclosure_ptr_t) /*_._VALCLO___V495*/ meltfptr[494])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V494*/ meltfptr[493]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V492*/ meltfptr[491]); + meltgc_touch ( /*_._VALCLO___V495*/ meltfptr[494]); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_303__CLASS_OBJANYBLOCK @#1", + melt_assertmsg ("checkobj putslot ~dsym_305__CLASS_OBJANYBLOCK @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V493*/ meltfptr[492])) == + ( /*_._VALDATA___V496*/ meltfptr[495])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_303__CLASS_OBJANYBLOCK @#1", + melt_assertmsg ("checkoff putslot ~dsym_305__CLASS_OBJANYBLOCK @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V493*/ - meltfptr[492])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V493*/ meltfptr[492]))->obj_vartab[1] = + ( /*_._VALDATA___V496*/ + meltfptr[495])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V496*/ meltfptr[495]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V494*/ meltfptr[493]); + /*_._VALSTR___V497*/ meltfptr[496]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V493*/ meltfptr[492]); + meltgc_touch ( /*_._VALDATA___V496*/ meltfptr[495]); - melt_dbgtrace_written_object ( /*_._VALDATA___V493*/ meltfptr[492], + melt_dbgtrace_written_object ( /*_._VALDATA___V496*/ meltfptr[495], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:3230:/ initchunk"); @@ -32168,12 +32186,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_6 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V495*/ meltfptr[494])) + ( /*_._VALROUT___V498*/ meltfptr[497])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_305__OUTPUCOD_OBJFLAG#0", + melt_checkmsg ("putroutconst constnull.drout_307__OUTPUCOD_OBJFLAG#0", NULL != ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_._VALROUT___V495*/ meltfptr[494])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V498*/ meltfptr[497])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:3230:/ initchunk"); @@ -32182,13 +32200,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_6 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V495*/ meltfptr[494])) + ( /*_._VALROUT___V498*/ meltfptr[497])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_305__OUTPUCOD_OBJFLAG#1", - NULL != ( /*_.CLASS_OBJFLAG__V84*/ meltfptr[83])); - ((meltroutine_ptr_t) /*_._VALROUT___V495*/ meltfptr[494])->tabval[1] = - (melt_ptr_t) ( /*_.CLASS_OBJFLAG__V84*/ meltfptr[83]); + melt_checkmsg ("putroutconst constnull.drout_307__OUTPUCOD_OBJFLAG#1", + NULL != ( /*_.CLASS_OBJFLAG__V85*/ meltfptr[84])); + ((meltroutine_ptr_t) /*_._VALROUT___V498*/ meltfptr[497])->tabval[1] = + (melt_ptr_t) ( /*_.CLASS_OBJFLAG__V85*/ meltfptr[84]); MELT_LOCATION ("warmelt-outobj.melt:3230:/ initchunk"); /*^putroutconst */ @@ -32196,55 +32214,55 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_6 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V495*/ meltfptr[494])) + ( /*_._VALROUT___V498*/ meltfptr[497])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_305__OUTPUCOD_OBJFLAG#2", + melt_checkmsg ("putroutconst constnull.drout_307__OUTPUCOD_OBJFLAG#2", NULL != ( /*_.ADD2OUT__V14*/ meltfptr[13])); - ((meltroutine_ptr_t) /*_._VALROUT___V495*/ meltfptr[494])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V498*/ meltfptr[497])->tabval[2] = (melt_ptr_t) ( /*_.ADD2OUT__V14*/ meltfptr[13]); MELT_LOCATION ("warmelt-outobj.melt:3230:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V495*/ meltfptr[494]); + meltgc_touch ( /*_._VALROUT___V498*/ meltfptr[497]); /*putclosurout#63 */ melt_assertmsg ("putclosrout#63 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V496*/ meltfptr[495])) == + ( /*_._VALCLO___V499*/ meltfptr[498])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#63 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V495*/ meltfptr[494])) == + ( /*_._VALROUT___V498*/ meltfptr[497])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V496*/ meltfptr[495])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V495*/ meltfptr[494]); + ((meltclosure_ptr_t) /*_._VALCLO___V499*/ meltfptr[498])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V498*/ meltfptr[497]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V496*/ meltfptr[495]); + meltgc_touch ( /*_._VALCLO___V499*/ meltfptr[498]); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_307__CLASS_OBJFLAG @#1", + melt_assertmsg ("checkobj putslot ~dsym_309__CLASS_OBJFLAG @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V497*/ meltfptr[496])) == + ( /*_._VALDATA___V500*/ meltfptr[499])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_307__CLASS_OBJFLAG @#1", + melt_assertmsg ("checkoff putslot ~dsym_309__CLASS_OBJFLAG @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V497*/ - meltfptr[496])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V497*/ meltfptr[496]))->obj_vartab[1] = + ( /*_._VALDATA___V500*/ + meltfptr[499])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V500*/ meltfptr[499]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V498*/ meltfptr[497]); + /*_._VALSTR___V501*/ meltfptr[500]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V497*/ meltfptr[496]); + meltgc_touch ( /*_._VALDATA___V500*/ meltfptr[499]); - melt_dbgtrace_written_object ( /*_._VALDATA___V497*/ meltfptr[496], + melt_dbgtrace_written_object ( /*_._VALDATA___V500*/ meltfptr[499], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:3241:/ initchunk"); @@ -32253,13 +32271,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_6 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V499*/ meltfptr[498])) + ( /*_._VALROUT___V502*/ meltfptr[501])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_309__OUTPUCOD_OBJMATCHFLAGBLOCK#0", + ("putroutconst constnull.drout_311__OUTPUCOD_OBJMATCHFLAGBLOCK#0", NULL != ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_._VALROUT___V499*/ meltfptr[498])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V502*/ meltfptr[501])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:3241:/ initchunk"); @@ -32268,14 +32286,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_6 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V499*/ meltfptr[498])) + ( /*_._VALROUT___V502*/ meltfptr[501])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_309__OUTPUCOD_OBJMATCHFLAGBLOCK#1", - NULL != ( /*_.CLASS_OBJMATCHFLAGBLOCK__V85*/ meltfptr[84])); - ((meltroutine_ptr_t) /*_._VALROUT___V499*/ meltfptr[498])->tabval[1] = - (melt_ptr_t) ( /*_.CLASS_OBJMATCHFLAGBLOCK__V85*/ meltfptr[84]); + ("putroutconst constnull.drout_311__OUTPUCOD_OBJMATCHFLAGBLOCK#1", + NULL != ( /*_.CLASS_OBJMATCHFLAGBLOCK__V86*/ meltfptr[85])); + ((meltroutine_ptr_t) /*_._VALROUT___V502*/ meltfptr[501])->tabval[1] = + (melt_ptr_t) ( /*_.CLASS_OBJMATCHFLAGBLOCK__V86*/ meltfptr[85]); MELT_LOCATION ("warmelt-outobj.melt:3241:/ initchunk"); /*^putroutconst */ @@ -32283,13 +32301,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_6 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V499*/ meltfptr[498])) + ( /*_._VALROUT___V502*/ meltfptr[501])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_309__OUTPUCOD_OBJMATCHFLAGBLOCK#2", + ("putroutconst constnull.drout_311__OUTPUCOD_OBJMATCHFLAGBLOCK#2", NULL != ( /*_.CLASS_OBJINSTR__V69*/ meltfptr[68])); - ((meltroutine_ptr_t) /*_._VALROUT___V499*/ meltfptr[498])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V502*/ meltfptr[501])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_OBJINSTR__V69*/ meltfptr[68]); MELT_LOCATION ("warmelt-outobj.melt:3241:/ initchunk"); @@ -32298,26 +32316,26 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_6 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V499*/ meltfptr[498])) + ( /*_._VALROUT___V502*/ meltfptr[501])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_309__OUTPUCOD_OBJMATCHFLAGBLOCK#3", - NULL != ( /*_.CLASS_OBJANYBLOCK__V83*/ meltfptr[82])); - ((meltroutine_ptr_t) /*_._VALROUT___V499*/ meltfptr[498])->tabval[3] = - (melt_ptr_t) ( /*_.CLASS_OBJANYBLOCK__V83*/ meltfptr[82]); + ("putroutconst constnull.drout_311__OUTPUCOD_OBJMATCHFLAGBLOCK#3", + NULL != ( /*_.CLASS_OBJANYBLOCK__V84*/ meltfptr[83])); + ((meltroutine_ptr_t) /*_._VALROUT___V502*/ meltfptr[501])->tabval[3] = + (melt_ptr_t) ( /*_.CLASS_OBJANYBLOCK__V84*/ meltfptr[83]); MELT_LOCATION ("warmelt-outobj.melt:3241:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V499*/ meltfptr[498])) == + ( /*_._VALROUT___V502*/ meltfptr[501])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V264*/ meltfptr[263]); - ((meltroutine_ptr_t) /*_._VALROUT___V499*/ meltfptr[498])->tabval[4] = - (melt_ptr_t) ( /*_._VALCLO___V264*/ meltfptr[263]); + NULL != /*_._VALCLO___V265*/ meltfptr[264]); + ((meltroutine_ptr_t) /*_._VALROUT___V502*/ meltfptr[501])->tabval[4] = + (melt_ptr_t) ( /*_._VALCLO___V265*/ meltfptr[264]); MELT_LOCATION ("warmelt-outobj.melt:3241:/ initchunk"); /*^putroutconst */ @@ -32325,14 +32343,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_6 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V499*/ meltfptr[498])) + ( /*_._VALROUT___V502*/ meltfptr[501])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_309__OUTPUCOD_OBJMATCHFLAGBLOCK#5", - NULL != ( /*_.CLASS_OBJFLAG__V84*/ meltfptr[83])); - ((meltroutine_ptr_t) /*_._VALROUT___V499*/ meltfptr[498])->tabval[5] = - (melt_ptr_t) ( /*_.CLASS_OBJFLAG__V84*/ meltfptr[83]); + ("putroutconst constnull.drout_311__OUTPUCOD_OBJMATCHFLAGBLOCK#5", + NULL != ( /*_.CLASS_OBJFLAG__V85*/ meltfptr[84])); + ((meltroutine_ptr_t) /*_._VALROUT___V502*/ meltfptr[501])->tabval[5] = + (melt_ptr_t) ( /*_.CLASS_OBJFLAG__V85*/ meltfptr[84]); MELT_LOCATION ("warmelt-outobj.melt:3241:/ initchunk"); /*^putroutconst */ @@ -32340,13 +32358,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_6 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V499*/ meltfptr[498])) + ( /*_._VALROUT___V502*/ meltfptr[501])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_309__OUTPUCOD_OBJMATCHFLAGBLOCK#6", + ("putroutconst constnull.drout_311__OUTPUCOD_OBJMATCHFLAGBLOCK#6", NULL != ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19])); - ((meltroutine_ptr_t) /*_._VALROUT___V499*/ meltfptr[498])->tabval[6] = + ((meltroutine_ptr_t) /*_._VALROUT___V502*/ meltfptr[501])->tabval[6] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]); MELT_LOCATION ("warmelt-outobj.melt:3241:/ initchunk"); @@ -32354,54 +32372,54 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_6 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V499*/ meltfptr[498])) == + ( /*_._VALROUT___V502*/ meltfptr[501])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V484*/ meltfptr[483]); - ((meltroutine_ptr_t) /*_._VALROUT___V499*/ meltfptr[498])->tabval[7] = - (melt_ptr_t) ( /*_._VALCLO___V484*/ meltfptr[483]); + NULL != /*_._VALCLO___V487*/ meltfptr[486]); + ((meltroutine_ptr_t) /*_._VALROUT___V502*/ meltfptr[501])->tabval[7] = + (melt_ptr_t) ( /*_._VALCLO___V487*/ meltfptr[486]); MELT_LOCATION ("warmelt-outobj.melt:3241:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V499*/ meltfptr[498]); + meltgc_touch ( /*_._VALROUT___V502*/ meltfptr[501]); /*putclosurout#64 */ melt_assertmsg ("putclosrout#64 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V500*/ meltfptr[499])) == + ( /*_._VALCLO___V503*/ meltfptr[502])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#64 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V499*/ meltfptr[498])) == + ( /*_._VALROUT___V502*/ meltfptr[501])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V500*/ meltfptr[499])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V499*/ meltfptr[498]); + ((meltclosure_ptr_t) /*_._VALCLO___V503*/ meltfptr[502])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V502*/ meltfptr[501]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V500*/ meltfptr[499]); + meltgc_touch ( /*_._VALCLO___V503*/ meltfptr[502]); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_311__CLASS_OBJMATCHFLAGBLOCK @#1", + melt_assertmsg ("checkobj putslot ~dsym_313__CLASS_OBJMATCHFLAGBLOCK @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V501*/ meltfptr[500])) == + ( /*_._VALDATA___V504*/ meltfptr[503])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_311__CLASS_OBJMATCHFLAGBLOCK @#1", + melt_assertmsg ("checkoff putslot ~dsym_313__CLASS_OBJMATCHFLAGBLOCK @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V501*/ - meltfptr[500])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V501*/ meltfptr[500]))->obj_vartab[1] = + ( /*_._VALDATA___V504*/ + meltfptr[503])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V504*/ meltfptr[503]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V502*/ meltfptr[501]); + /*_._VALSTR___V505*/ meltfptr[504]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V501*/ meltfptr[500]); + meltgc_touch ( /*_._VALDATA___V504*/ meltfptr[503]); - melt_dbgtrace_written_object ( /*_._VALDATA___V501*/ meltfptr[500], + melt_dbgtrace_written_object ( /*_._VALDATA___V504*/ meltfptr[503], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:3293:/ initchunk"); @@ -32410,14 +32428,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_6 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V503*/ meltfptr[502])) + ( /*_._VALROUT___V506*/ meltfptr[505])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_313__OUTPUCOD_OBJMULTIALLOCBLOCK#0", - NULL != ( /*_.CLASS_OBJMULTIALLOCBLOCK__V86*/ meltfptr[85])); - ((meltroutine_ptr_t) /*_._VALROUT___V503*/ meltfptr[502])->tabval[0] = - (melt_ptr_t) ( /*_.CLASS_OBJMULTIALLOCBLOCK__V86*/ meltfptr[85]); + ("putroutconst constnull.drout_315__OUTPUCOD_OBJMULTIALLOCBLOCK#0", + NULL != ( /*_.CLASS_OBJMULTIALLOCBLOCK__V87*/ meltfptr[86])); + ((meltroutine_ptr_t) /*_._VALROUT___V506*/ meltfptr[505])->tabval[0] = + (melt_ptr_t) ( /*_.CLASS_OBJMULTIALLOCBLOCK__V87*/ meltfptr[86]); MELT_LOCATION ("warmelt-outobj.melt:3293:/ initchunk"); /*^putroutconst */ @@ -32425,13 +32443,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_6 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V503*/ meltfptr[502])) + ( /*_._VALROUT___V506*/ meltfptr[505])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_313__OUTPUCOD_OBJMULTIALLOCBLOCK#1", + ("putroutconst constnull.drout_315__OUTPUCOD_OBJMULTIALLOCBLOCK#1", NULL != ( /*_.DISCR_INTEGER__V52*/ meltfptr[51])); - ((meltroutine_ptr_t) /*_._VALROUT___V503*/ meltfptr[502])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V506*/ meltfptr[505])->tabval[1] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V52*/ meltfptr[51]); MELT_LOCATION ("warmelt-outobj.melt:3293:/ initchunk"); @@ -32440,13 +32458,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_6 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V503*/ meltfptr[502])) + ( /*_._VALROUT___V506*/ meltfptr[505])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_313__OUTPUCOD_OBJMULTIALLOCBLOCK#2", + ("putroutconst constnull.drout_315__OUTPUCOD_OBJMULTIALLOCBLOCK#2", NULL != ( /*_.DISCR_STRBUF__V68*/ meltfptr[67])); - ((meltroutine_ptr_t) /*_._VALROUT___V503*/ meltfptr[502])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V506*/ meltfptr[505])->tabval[2] = (melt_ptr_t) ( /*_.DISCR_STRBUF__V68*/ meltfptr[67]); MELT_LOCATION ("warmelt-outobj.melt:3293:/ initchunk"); @@ -32455,26 +32473,26 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_6 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V503*/ meltfptr[502])) + ( /*_._VALROUT___V506*/ meltfptr[505])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_313__OUTPUCOD_OBJMULTIALLOCBLOCK#3", - NULL != ( /*_.DISCR_VERBATIM_STRING__V87*/ meltfptr[86])); - ((meltroutine_ptr_t) /*_._VALROUT___V503*/ meltfptr[502])->tabval[3] = - (melt_ptr_t) ( /*_.DISCR_VERBATIM_STRING__V87*/ meltfptr[86]); + ("putroutconst constnull.drout_315__OUTPUCOD_OBJMULTIALLOCBLOCK#3", + NULL != ( /*_.DISCR_VERBATIM_STRING__V88*/ meltfptr[87])); + ((meltroutine_ptr_t) /*_._VALROUT___V506*/ meltfptr[505])->tabval[3] = + (melt_ptr_t) ( /*_.DISCR_VERBATIM_STRING__V88*/ meltfptr[87]); MELT_LOCATION ("warmelt-outobj.melt:3293:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V503*/ meltfptr[502])) == + ( /*_._VALROUT___V506*/ meltfptr[505])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V264*/ meltfptr[263]); - ((meltroutine_ptr_t) /*_._VALROUT___V503*/ meltfptr[502])->tabval[4] = - (melt_ptr_t) ( /*_._VALCLO___V264*/ meltfptr[263]); + NULL != /*_._VALCLO___V265*/ meltfptr[264]); + ((meltroutine_ptr_t) /*_._VALROUT___V506*/ meltfptr[505])->tabval[4] = + (melt_ptr_t) ( /*_._VALCLO___V265*/ meltfptr[264]); MELT_LOCATION ("warmelt-outobj.melt:3293:/ initchunk"); /*^putroutconst */ @@ -32482,13 +32500,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_6 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V503*/ meltfptr[502])) + ( /*_._VALROUT___V506*/ meltfptr[505])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_313__OUTPUCOD_OBJMULTIALLOCBLOCK#5", + ("putroutconst constnull.drout_315__OUTPUCOD_OBJMULTIALLOCBLOCK#5", NULL != ( /*_.CLASS_OBJINITELEM__V19*/ meltfptr[18])); - ((meltroutine_ptr_t) /*_._VALROUT___V503*/ meltfptr[502])->tabval[5] = + ((meltroutine_ptr_t) /*_._VALROUT___V506*/ meltfptr[505])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_OBJINITELEM__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-outobj.melt:3293:/ initchunk"); @@ -32497,13 +32515,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_6 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V503*/ meltfptr[502])) + ( /*_._VALROUT___V506*/ meltfptr[505])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_313__OUTPUCOD_OBJMULTIALLOCBLOCK#6", + ("putroutconst constnull.drout_315__OUTPUCOD_OBJMULTIALLOCBLOCK#6", NULL != ( /*_.OUTPUT_C_DECLINIT__V18*/ meltfptr[17])); - ((meltroutine_ptr_t) /*_._VALROUT___V503*/ meltfptr[502])->tabval[6] = + ((meltroutine_ptr_t) /*_._VALROUT___V506*/ meltfptr[505])->tabval[6] = (melt_ptr_t) ( /*_.OUTPUT_C_DECLINIT__V18*/ meltfptr[17]); MELT_LOCATION ("warmelt-outobj.melt:3293:/ initchunk"); @@ -32511,12 +32529,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_6 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V503*/ meltfptr[502])) == + ( /*_._VALROUT___V506*/ meltfptr[505])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALDATA___V197*/ meltfptr[196]); - ((meltroutine_ptr_t) /*_._VALROUT___V503*/ meltfptr[502])->tabval[7] = - (melt_ptr_t) ( /*_._VALDATA___V197*/ meltfptr[196]); + NULL != /*_._VALDATA___V198*/ meltfptr[197]); + ((meltroutine_ptr_t) /*_._VALROUT___V506*/ meltfptr[505])->tabval[7] = + (melt_ptr_t) ( /*_._VALDATA___V198*/ meltfptr[197]); MELT_LOCATION ("warmelt-outobj.melt:3293:/ initchunk"); /*^putroutconst */ @@ -32524,13 +32542,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_6 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V503*/ meltfptr[502])) + ( /*_._VALROUT___V506*/ meltfptr[505])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_313__OUTPUCOD_OBJMULTIALLOCBLOCK#8", + ("putroutconst constnull.drout_315__OUTPUCOD_OBJMULTIALLOCBLOCK#8", NULL != ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5])); - ((meltroutine_ptr_t) /*_._VALROUT___V503*/ meltfptr[502])->tabval[8] = + ((meltroutine_ptr_t) /*_._VALROUT___V506*/ meltfptr[505])->tabval[8] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5]); MELT_LOCATION ("warmelt-outobj.melt:3293:/ initchunk"); @@ -32539,13 +32557,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_6 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V503*/ meltfptr[502])) + ( /*_._VALROUT___V506*/ meltfptr[505])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_313__OUTPUCOD_OBJMULTIALLOCBLOCK#9", + ("putroutconst constnull.drout_315__OUTPUCOD_OBJMULTIALLOCBLOCK#9", NULL != ( /*_.OUTPUT_C_INITIAL_FILL__V21*/ meltfptr[20])); - ((meltroutine_ptr_t) /*_._VALROUT___V503*/ meltfptr[502])->tabval[9] = + ((meltroutine_ptr_t) /*_._VALROUT___V506*/ meltfptr[505])->tabval[9] = (melt_ptr_t) ( /*_.OUTPUT_C_INITIAL_FILL__V21*/ meltfptr[20]); MELT_LOCATION ("warmelt-outobj.melt:3293:/ initchunk"); @@ -32553,77 +32571,77 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_6 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V503*/ meltfptr[502])) == + ( /*_._VALROUT___V506*/ meltfptr[505])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V484*/ meltfptr[483]); - ((meltroutine_ptr_t) /*_._VALROUT___V503*/ meltfptr[502])->tabval[10] = - (melt_ptr_t) ( /*_._VALCLO___V484*/ meltfptr[483]); + NULL != /*_._VALCLO___V487*/ meltfptr[486]); + ((meltroutine_ptr_t) /*_._VALROUT___V506*/ meltfptr[505])->tabval[10] = + (melt_ptr_t) ( /*_._VALCLO___V487*/ meltfptr[486]); MELT_LOCATION ("warmelt-outobj.melt:3293:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V503*/ meltfptr[502]); + meltgc_touch ( /*_._VALROUT___V506*/ meltfptr[505]); /*putclosurout#65 */ melt_assertmsg ("putclosrout#65 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V504*/ meltfptr[503])) == + ( /*_._VALCLO___V507*/ meltfptr[506])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#65 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V503*/ meltfptr[502])) == + ( /*_._VALROUT___V506*/ meltfptr[505])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V504*/ meltfptr[503])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V503*/ meltfptr[502]); + ((meltclosure_ptr_t) /*_._VALCLO___V507*/ meltfptr[506])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V506*/ meltfptr[505]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V504*/ meltfptr[503]); + meltgc_touch ( /*_._VALCLO___V507*/ meltfptr[506]); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_315__CLASS_OBJMULTIALLOCBLOCK @#1", + melt_assertmsg ("checkobj putslot ~dsym_317__CLASS_OBJMULTIALLOCBLOCK @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V505*/ meltfptr[504])) == + ( /*_._VALDATA___V508*/ meltfptr[507])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_315__CLASS_OBJMULTIALLOCBLOCK @#1", + melt_assertmsg ("checkoff putslot ~dsym_317__CLASS_OBJMULTIALLOCBLOCK @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V505*/ - meltfptr[504])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V505*/ meltfptr[504]))->obj_vartab[1] = + ( /*_._VALDATA___V508*/ + meltfptr[507])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V508*/ meltfptr[507]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V506*/ meltfptr[505]); + /*_._VALSTR___V509*/ meltfptr[508]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V505*/ meltfptr[504]); + meltgc_touch ( /*_._VALDATA___V508*/ meltfptr[507]); - melt_dbgtrace_written_object ( /*_._VALDATA___V505*/ meltfptr[504], + melt_dbgtrace_written_object ( /*_._VALDATA___V508*/ meltfptr[507], "new static instance"); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_317__DISCR_VERBATIM_STRING @#1", + melt_assertmsg ("checkobj putslot ~dsym_319__DISCR_VERBATIM_STRING @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V507*/ meltfptr[506])) == + ( /*_._VALDATA___V510*/ meltfptr[509])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_317__DISCR_VERBATIM_STRING @#1", + melt_assertmsg ("checkoff putslot ~dsym_319__DISCR_VERBATIM_STRING @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V507*/ - meltfptr[506])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V507*/ meltfptr[506]))->obj_vartab[1] = + ( /*_._VALDATA___V510*/ + meltfptr[509])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V510*/ meltfptr[509]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V508*/ meltfptr[507]); + /*_._VALSTR___V511*/ meltfptr[510]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V507*/ meltfptr[506]); + meltgc_touch ( /*_._VALDATA___V510*/ meltfptr[509]); - melt_dbgtrace_written_object ( /*_._VALDATA___V507*/ meltfptr[506], + melt_dbgtrace_written_object ( /*_._VALDATA___V510*/ meltfptr[509], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:3365:/ initchunk"); @@ -32632,14 +32650,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_6 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V509*/ meltfptr[508])) + ( /*_._VALROUT___V512*/ meltfptr[511])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_319__OUTPUCOD_OBJCITERBLOCK#0", - NULL != ( /*_.CLASS_OBJCITERBLOCK__V88*/ meltfptr[87])); - ((meltroutine_ptr_t) /*_._VALROUT___V509*/ meltfptr[508])->tabval[0] = - (melt_ptr_t) ( /*_.CLASS_OBJCITERBLOCK__V88*/ meltfptr[87]); + ("putroutconst constnull.drout_321__OUTPUCOD_OBJCITERBLOCK#0", + NULL != ( /*_.CLASS_OBJCITERBLOCK__V89*/ meltfptr[88])); + ((meltroutine_ptr_t) /*_._VALROUT___V512*/ meltfptr[511])->tabval[0] = + (melt_ptr_t) ( /*_.CLASS_OBJCITERBLOCK__V89*/ meltfptr[88]); MELT_LOCATION ("warmelt-outobj.melt:3365:/ initchunk"); /*^putroutconst */ @@ -32647,13 +32665,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_6 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V509*/ meltfptr[508])) + ( /*_._VALROUT___V512*/ meltfptr[511])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_319__OUTPUCOD_OBJCITERBLOCK#1", + ("putroutconst constnull.drout_321__OUTPUCOD_OBJCITERBLOCK#1", NULL != ( /*_.DISCR_INTEGER__V52*/ meltfptr[51])); - ((meltroutine_ptr_t) /*_._VALROUT___V509*/ meltfptr[508])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V512*/ meltfptr[511])->tabval[1] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V52*/ meltfptr[51]); MELT_LOCATION ("warmelt-outobj.melt:3365:/ initchunk"); @@ -32662,26 +32680,26 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_6 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V509*/ meltfptr[508])) + ( /*_._VALROUT___V512*/ meltfptr[511])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_319__OUTPUCOD_OBJCITERBLOCK#2", - NULL != ( /*_.CLASS_CITERATOR__V89*/ meltfptr[88])); - ((meltroutine_ptr_t) /*_._VALROUT___V509*/ meltfptr[508])->tabval[2] = - (melt_ptr_t) ( /*_.CLASS_CITERATOR__V89*/ meltfptr[88]); + ("putroutconst constnull.drout_321__OUTPUCOD_OBJCITERBLOCK#2", + NULL != ( /*_.CLASS_CITERATOR__V90*/ meltfptr[89])); + ((meltroutine_ptr_t) /*_._VALROUT___V512*/ meltfptr[511])->tabval[2] = + (melt_ptr_t) ( /*_.CLASS_CITERATOR__V90*/ meltfptr[89]); MELT_LOCATION ("warmelt-outobj.melt:3365:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V509*/ meltfptr[508])) == + ( /*_._VALROUT___V512*/ meltfptr[511])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V264*/ meltfptr[263]); - ((meltroutine_ptr_t) /*_._VALROUT___V509*/ meltfptr[508])->tabval[3] = - (melt_ptr_t) ( /*_._VALCLO___V264*/ meltfptr[263]); + NULL != /*_._VALCLO___V265*/ meltfptr[264]); + ((meltroutine_ptr_t) /*_._VALROUT___V512*/ meltfptr[511])->tabval[3] = + (melt_ptr_t) ( /*_._VALCLO___V265*/ meltfptr[264]); MELT_LOCATION ("warmelt-outobj.melt:3365:/ initchunk"); /*^putroutconst */ @@ -32689,13 +32707,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_6 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V509*/ meltfptr[508])) + ( /*_._VALROUT___V512*/ meltfptr[511])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_319__OUTPUCOD_OBJCITERBLOCK#4", + ("putroutconst constnull.drout_321__OUTPUCOD_OBJCITERBLOCK#4", NULL != ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19])); - ((meltroutine_ptr_t) /*_._VALROUT___V509*/ meltfptr[508])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V512*/ meltfptr[511])->tabval[4] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]); MELT_LOCATION ("warmelt-outobj.melt:3365:/ initchunk"); @@ -32703,12 +32721,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_6 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V509*/ meltfptr[508])) == + ( /*_._VALROUT___V512*/ meltfptr[511])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALDATA___V197*/ meltfptr[196]); - ((meltroutine_ptr_t) /*_._VALROUT___V509*/ meltfptr[508])->tabval[5] = - (melt_ptr_t) ( /*_._VALDATA___V197*/ meltfptr[196]); + NULL != /*_._VALDATA___V198*/ meltfptr[197]); + ((meltroutine_ptr_t) /*_._VALROUT___V512*/ meltfptr[511])->tabval[5] = + (melt_ptr_t) ( /*_._VALDATA___V198*/ meltfptr[197]); MELT_LOCATION ("warmelt-outobj.melt:3365:/ initchunk"); /*^putroutconst */ @@ -32716,13 +32734,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_6 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V509*/ meltfptr[508])) + ( /*_._VALROUT___V512*/ meltfptr[511])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_319__OUTPUCOD_OBJCITERBLOCK#6", + ("putroutconst constnull.drout_321__OUTPUCOD_OBJCITERBLOCK#6", NULL != ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5])); - ((meltroutine_ptr_t) /*_._VALROUT___V509*/ meltfptr[508])->tabval[6] = + ((meltroutine_ptr_t) /*_._VALROUT___V512*/ meltfptr[511])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5]); MELT_LOCATION ("warmelt-outobj.melt:3365:/ initchunk"); @@ -32730,77 +32748,77 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_6 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V509*/ meltfptr[508])) == + ( /*_._VALROUT___V512*/ meltfptr[511])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V484*/ meltfptr[483]); - ((meltroutine_ptr_t) /*_._VALROUT___V509*/ meltfptr[508])->tabval[7] = - (melt_ptr_t) ( /*_._VALCLO___V484*/ meltfptr[483]); + NULL != /*_._VALCLO___V487*/ meltfptr[486]); + ((meltroutine_ptr_t) /*_._VALROUT___V512*/ meltfptr[511])->tabval[7] = + (melt_ptr_t) ( /*_._VALCLO___V487*/ meltfptr[486]); MELT_LOCATION ("warmelt-outobj.melt:3365:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V509*/ meltfptr[508]); + meltgc_touch ( /*_._VALROUT___V512*/ meltfptr[511]); /*putclosurout#66 */ melt_assertmsg ("putclosrout#66 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V510*/ meltfptr[509])) == + ( /*_._VALCLO___V513*/ meltfptr[512])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#66 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V509*/ meltfptr[508])) == + ( /*_._VALROUT___V512*/ meltfptr[511])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V510*/ meltfptr[509])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V509*/ meltfptr[508]); + ((meltclosure_ptr_t) /*_._VALCLO___V513*/ meltfptr[512])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V512*/ meltfptr[511]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V510*/ meltfptr[509]); + meltgc_touch ( /*_._VALCLO___V513*/ meltfptr[512]); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_321__CLASS_OBJCITERBLOCK @#1", + melt_assertmsg ("checkobj putslot ~dsym_323__CLASS_OBJCITERBLOCK @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V511*/ meltfptr[510])) == + ( /*_._VALDATA___V514*/ meltfptr[513])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_321__CLASS_OBJCITERBLOCK @#1", + melt_assertmsg ("checkoff putslot ~dsym_323__CLASS_OBJCITERBLOCK @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V511*/ - meltfptr[510])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V511*/ meltfptr[510]))->obj_vartab[1] = + ( /*_._VALDATA___V514*/ + meltfptr[513])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V514*/ meltfptr[513]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V512*/ meltfptr[511]); + /*_._VALSTR___V515*/ meltfptr[514]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V511*/ meltfptr[510]); + meltgc_touch ( /*_._VALDATA___V514*/ meltfptr[513]); - melt_dbgtrace_written_object ( /*_._VALDATA___V511*/ meltfptr[510], + melt_dbgtrace_written_object ( /*_._VALDATA___V514*/ meltfptr[513], "new static instance"); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_323__CLASS_CITERATOR @#1", + melt_assertmsg ("checkobj putslot ~dsym_325__CLASS_CITERATOR @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V513*/ meltfptr[512])) == + ( /*_._VALDATA___V516*/ meltfptr[515])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_323__CLASS_CITERATOR @#1", + melt_assertmsg ("checkoff putslot ~dsym_325__CLASS_CITERATOR @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V513*/ - meltfptr[512])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V513*/ meltfptr[512]))->obj_vartab[1] = + ( /*_._VALDATA___V516*/ + meltfptr[515])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V516*/ meltfptr[515]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V514*/ meltfptr[513]); + /*_._VALSTR___V517*/ meltfptr[516]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V513*/ meltfptr[512]); + meltgc_touch ( /*_._VALDATA___V516*/ meltfptr[515]); - melt_dbgtrace_written_object ( /*_._VALDATA___V513*/ meltfptr[512], + melt_dbgtrace_written_object ( /*_._VALDATA___V516*/ meltfptr[515], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:3420:/ initchunk"); @@ -32809,14 +32827,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_6 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V515*/ meltfptr[514])) + ( /*_._VALROUT___V518*/ meltfptr[517])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_325__OUTPUCOD_OBJCOMMENTINSTR#0", - NULL != ( /*_.CLASS_OBJCOMMENTINSTR__V90*/ meltfptr[89])); - ((meltroutine_ptr_t) /*_._VALROUT___V515*/ meltfptr[514])->tabval[0] = - (melt_ptr_t) ( /*_.CLASS_OBJCOMMENTINSTR__V90*/ meltfptr[89]); + ("putroutconst constnull.drout_327__OUTPUCOD_OBJCOMMENTINSTR#0", + NULL != ( /*_.CLASS_OBJCOMMENTINSTR__V91*/ meltfptr[90])); + ((meltroutine_ptr_t) /*_._VALROUT___V518*/ meltfptr[517])->tabval[0] = + (melt_ptr_t) ( /*_.CLASS_OBJCOMMENTINSTR__V91*/ meltfptr[90]); MELT_LOCATION ("warmelt-outobj.melt:3420:/ initchunk"); /*^putroutconst */ @@ -32824,13 +32842,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_6 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V515*/ meltfptr[514])) + ( /*_._VALROUT___V518*/ meltfptr[517])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_325__OUTPUCOD_OBJCOMMENTINSTR#1", + ("putroutconst constnull.drout_327__OUTPUCOD_OBJCOMMENTINSTR#1", NULL != ( /*_.DISCR_STRBUF__V68*/ meltfptr[67])); - ((meltroutine_ptr_t) /*_._VALROUT___V515*/ meltfptr[514])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V518*/ meltfptr[517])->tabval[1] = (melt_ptr_t) ( /*_.DISCR_STRBUF__V68*/ meltfptr[67]); MELT_LOCATION ("warmelt-outobj.melt:3420:/ initchunk"); @@ -32839,13 +32857,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_6 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V515*/ meltfptr[514])) + ( /*_._VALROUT___V518*/ meltfptr[517])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_325__OUTPUCOD_OBJCOMMENTINSTR#2", + ("putroutconst constnull.drout_327__OUTPUCOD_OBJCOMMENTINSTR#2", NULL != ( /*_.DISCR_STRING__V53*/ meltfptr[52])); - ((meltroutine_ptr_t) /*_._VALROUT___V515*/ meltfptr[514])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V518*/ meltfptr[517])->tabval[2] = (melt_ptr_t) ( /*_.DISCR_STRING__V53*/ meltfptr[52]); MELT_LOCATION ("warmelt-outobj.melt:3420:/ initchunk"); @@ -32853,24 +32871,24 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_6 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V515*/ meltfptr[514])) == + ( /*_._VALROUT___V518*/ meltfptr[517])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V264*/ meltfptr[263]); - ((meltroutine_ptr_t) /*_._VALROUT___V515*/ meltfptr[514])->tabval[3] = - (melt_ptr_t) ( /*_._VALCLO___V264*/ meltfptr[263]); + NULL != /*_._VALCLO___V265*/ meltfptr[264]); + ((meltroutine_ptr_t) /*_._VALROUT___V518*/ meltfptr[517])->tabval[3] = + (melt_ptr_t) ( /*_._VALCLO___V265*/ meltfptr[264]); MELT_LOCATION ("warmelt-outobj.melt:3420:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V515*/ meltfptr[514])) == + ( /*_._VALROUT___V518*/ meltfptr[517])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALDATA___V197*/ meltfptr[196]); - ((meltroutine_ptr_t) /*_._VALROUT___V515*/ meltfptr[514])->tabval[4] = - (melt_ptr_t) ( /*_._VALDATA___V197*/ meltfptr[196]); + NULL != /*_._VALDATA___V198*/ meltfptr[197]); + ((meltroutine_ptr_t) /*_._VALROUT___V518*/ meltfptr[517])->tabval[4] = + (melt_ptr_t) ( /*_._VALDATA___V198*/ meltfptr[197]); MELT_LOCATION ("warmelt-outobj.melt:3420:/ initchunk"); /*^putroutconst */ @@ -32878,56 +32896,56 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_6 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V515*/ meltfptr[514])) + ( /*_._VALROUT___V518*/ meltfptr[517])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_325__OUTPUCOD_OBJCOMMENTINSTR#5", + ("putroutconst constnull.drout_327__OUTPUCOD_OBJCOMMENTINSTR#5", NULL != ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5])); - ((meltroutine_ptr_t) /*_._VALROUT___V515*/ meltfptr[514])->tabval[5] = + ((meltroutine_ptr_t) /*_._VALROUT___V518*/ meltfptr[517])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5]); MELT_LOCATION ("warmelt-outobj.melt:3420:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V515*/ meltfptr[514]); + meltgc_touch ( /*_._VALROUT___V518*/ meltfptr[517]); /*putclosurout#67 */ melt_assertmsg ("putclosrout#67 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V516*/ meltfptr[515])) == + ( /*_._VALCLO___V519*/ meltfptr[518])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#67 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V515*/ meltfptr[514])) == + ( /*_._VALROUT___V518*/ meltfptr[517])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V516*/ meltfptr[515])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V515*/ meltfptr[514]); + ((meltclosure_ptr_t) /*_._VALCLO___V519*/ meltfptr[518])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V518*/ meltfptr[517]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V516*/ meltfptr[515]); + meltgc_touch ( /*_._VALCLO___V519*/ meltfptr[518]); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_327__CLASS_OBJCOMMENTINSTR @#1", + melt_assertmsg ("checkobj putslot ~dsym_329__CLASS_OBJCOMMENTINSTR @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V517*/ meltfptr[516])) == + ( /*_._VALDATA___V520*/ meltfptr[519])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_327__CLASS_OBJCOMMENTINSTR @#1", + melt_assertmsg ("checkoff putslot ~dsym_329__CLASS_OBJCOMMENTINSTR @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V517*/ - meltfptr[516])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V517*/ meltfptr[516]))->obj_vartab[1] = + ( /*_._VALDATA___V520*/ + meltfptr[519])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V520*/ meltfptr[519]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V518*/ meltfptr[517]); + /*_._VALSTR___V521*/ meltfptr[520]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V517*/ meltfptr[516]); + meltgc_touch ( /*_._VALDATA___V520*/ meltfptr[519]); - melt_dbgtrace_written_object ( /*_._VALDATA___V517*/ meltfptr[516], + melt_dbgtrace_written_object ( /*_._VALDATA___V520*/ meltfptr[519], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:3441:/ initchunk"); @@ -32936,26 +32954,26 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_6 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V519*/ meltfptr[518])) + ( /*_._VALROUT___V522*/ meltfptr[521])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_329__OUTPUCOD_OBJCOMMENTEDBLOCK#0", - NULL != ( /*_.CLASS_OBJCOMMENTEDBLOCK__V91*/ meltfptr[90])); - ((meltroutine_ptr_t) /*_._VALROUT___V519*/ meltfptr[518])->tabval[0] = - (melt_ptr_t) ( /*_.CLASS_OBJCOMMENTEDBLOCK__V91*/ meltfptr[90]); + ("putroutconst constnull.drout_331__OUTPUCOD_OBJCOMMENTEDBLOCK#0", + NULL != ( /*_.CLASS_OBJCOMMENTEDBLOCK__V92*/ meltfptr[91])); + ((meltroutine_ptr_t) /*_._VALROUT___V522*/ meltfptr[521])->tabval[0] = + (melt_ptr_t) ( /*_.CLASS_OBJCOMMENTEDBLOCK__V92*/ meltfptr[91]); MELT_LOCATION ("warmelt-outobj.melt:3441:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V519*/ meltfptr[518])) == + ( /*_._VALROUT___V522*/ meltfptr[521])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V264*/ meltfptr[263]); - ((meltroutine_ptr_t) /*_._VALROUT___V519*/ meltfptr[518])->tabval[1] = - (melt_ptr_t) ( /*_._VALCLO___V264*/ meltfptr[263]); + NULL != /*_._VALCLO___V265*/ meltfptr[264]); + ((meltroutine_ptr_t) /*_._VALROUT___V522*/ meltfptr[521])->tabval[1] = + (melt_ptr_t) ( /*_._VALCLO___V265*/ meltfptr[264]); MELT_LOCATION ("warmelt-outobj.melt:3441:/ initchunk"); /*^putroutconst */ @@ -32963,13 +32981,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_6 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V519*/ meltfptr[518])) + ( /*_._VALROUT___V522*/ meltfptr[521])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_329__OUTPUCOD_OBJCOMMENTEDBLOCK#2", + ("putroutconst constnull.drout_331__OUTPUCOD_OBJCOMMENTEDBLOCK#2", NULL != ( /*_.DISCR_INTEGER__V52*/ meltfptr[51])); - ((meltroutine_ptr_t) /*_._VALROUT___V519*/ meltfptr[518])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V522*/ meltfptr[521])->tabval[2] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V52*/ meltfptr[51]); MELT_LOCATION ("warmelt-outobj.melt:3441:/ initchunk"); @@ -32978,13 +32996,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_6 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V519*/ meltfptr[518])) + ( /*_._VALROUT___V522*/ meltfptr[521])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_329__OUTPUCOD_OBJCOMMENTEDBLOCK#3", + ("putroutconst constnull.drout_331__OUTPUCOD_OBJCOMMENTEDBLOCK#3", NULL != ( /*_.DISCR_STRBUF__V68*/ meltfptr[67])); - ((meltroutine_ptr_t) /*_._VALROUT___V519*/ meltfptr[518])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V522*/ meltfptr[521])->tabval[3] = (melt_ptr_t) ( /*_.DISCR_STRBUF__V68*/ meltfptr[67]); MELT_LOCATION ("warmelt-outobj.melt:3441:/ initchunk"); @@ -32993,13 +33011,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_6 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V519*/ meltfptr[518])) + ( /*_._VALROUT___V522*/ meltfptr[521])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_329__OUTPUCOD_OBJCOMMENTEDBLOCK#4", + ("putroutconst constnull.drout_331__OUTPUCOD_OBJCOMMENTEDBLOCK#4", NULL != ( /*_.DISCR_STRING__V53*/ meltfptr[52])); - ((meltroutine_ptr_t) /*_._VALROUT___V519*/ meltfptr[518])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V522*/ meltfptr[521])->tabval[4] = (melt_ptr_t) ( /*_.DISCR_STRING__V53*/ meltfptr[52]); MELT_LOCATION ("warmelt-outobj.melt:3441:/ initchunk"); @@ -33007,24 +33025,24 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_6 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V519*/ meltfptr[518])) == + ( /*_._VALROUT___V522*/ meltfptr[521])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V484*/ meltfptr[483]); - ((meltroutine_ptr_t) /*_._VALROUT___V519*/ meltfptr[518])->tabval[5] = - (melt_ptr_t) ( /*_._VALCLO___V484*/ meltfptr[483]); + NULL != /*_._VALCLO___V487*/ meltfptr[486]); + ((meltroutine_ptr_t) /*_._VALROUT___V522*/ meltfptr[521])->tabval[5] = + (melt_ptr_t) ( /*_._VALCLO___V487*/ meltfptr[486]); MELT_LOCATION ("warmelt-outobj.melt:3441:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V519*/ meltfptr[518])) == + ( /*_._VALROUT___V522*/ meltfptr[521])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALDATA___V197*/ meltfptr[196]); - ((meltroutine_ptr_t) /*_._VALROUT___V519*/ meltfptr[518])->tabval[6] = - (melt_ptr_t) ( /*_._VALDATA___V197*/ meltfptr[196]); + NULL != /*_._VALDATA___V198*/ meltfptr[197]); + ((meltroutine_ptr_t) /*_._VALROUT___V522*/ meltfptr[521])->tabval[6] = + (melt_ptr_t) ( /*_._VALDATA___V198*/ meltfptr[197]); MELT_LOCATION ("warmelt-outobj.melt:3441:/ initchunk"); /*^putroutconst */ @@ -33032,108 +33050,108 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_6 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V519*/ meltfptr[518])) + ( /*_._VALROUT___V522*/ meltfptr[521])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_329__OUTPUCOD_OBJCOMMENTEDBLOCK#7", + ("putroutconst constnull.drout_331__OUTPUCOD_OBJCOMMENTEDBLOCK#7", NULL != ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5])); - ((meltroutine_ptr_t) /*_._VALROUT___V519*/ meltfptr[518])->tabval[7] = + ((meltroutine_ptr_t) /*_._VALROUT___V522*/ meltfptr[521])->tabval[7] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5]); MELT_LOCATION ("warmelt-outobj.melt:3441:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V519*/ meltfptr[518]); + meltgc_touch ( /*_._VALROUT___V522*/ meltfptr[521]); /*putclosurout#68 */ melt_assertmsg ("putclosrout#68 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V520*/ meltfptr[519])) == + ( /*_._VALCLO___V523*/ meltfptr[522])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#68 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V519*/ meltfptr[518])) == + ( /*_._VALROUT___V522*/ meltfptr[521])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V520*/ meltfptr[519])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V519*/ meltfptr[518]); + ((meltclosure_ptr_t) /*_._VALCLO___V523*/ meltfptr[522])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V522*/ meltfptr[521]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V520*/ meltfptr[519]); + meltgc_touch ( /*_._VALCLO___V523*/ meltfptr[522]); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_331__CLASS_OBJCOMMENTEDBLOCK @#1", + melt_assertmsg ("checkobj putslot ~dsym_333__CLASS_OBJCOMMENTEDBLOCK @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V521*/ meltfptr[520])) == + ( /*_._VALDATA___V524*/ meltfptr[523])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_331__CLASS_OBJCOMMENTEDBLOCK @#1", + melt_assertmsg ("checkoff putslot ~dsym_333__CLASS_OBJCOMMENTEDBLOCK @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V521*/ - meltfptr[520])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V521*/ meltfptr[520]))->obj_vartab[1] = + ( /*_._VALDATA___V524*/ + meltfptr[523])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V524*/ meltfptr[523]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V522*/ meltfptr[521]); + /*_._VALSTR___V525*/ meltfptr[524]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V521*/ meltfptr[520]); + meltgc_touch ( /*_._VALDATA___V524*/ meltfptr[523]); - melt_dbgtrace_written_object ( /*_._VALDATA___V521*/ meltfptr[520], + melt_dbgtrace_written_object ( /*_._VALDATA___V524*/ meltfptr[523], "new static instance"); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_333__LABELCOUNTREF @#1", + melt_assertmsg ("checkobj putslot ~dsym_335__LABELCOUNTREF @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V523*/ meltfptr[522])) == + ( /*_._VALDATA___V526*/ meltfptr[525])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_333__LABELCOUNTREF @#1", + melt_assertmsg ("checkoff putslot ~dsym_335__LABELCOUNTREF @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V523*/ - meltfptr[522])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V523*/ meltfptr[522]))->obj_vartab[1] = + ( /*_._VALDATA___V526*/ + meltfptr[525])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V526*/ meltfptr[525]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V524*/ meltfptr[523]); + /*_._VALSTR___V527*/ meltfptr[526]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V523*/ meltfptr[522]); + meltgc_touch ( /*_._VALDATA___V526*/ meltfptr[525]); - melt_dbgtrace_written_object ( /*_._VALDATA___V523*/ meltfptr[522], + melt_dbgtrace_written_object ( /*_._VALDATA___V526*/ meltfptr[525], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:3479:/ initchunk"); /*^putslot */ /*putslot */ - melt_assertmsg ("checkobj putslot ~dobj_335__LABELCOUNTREF @#0", + melt_assertmsg ("checkobj putslot ~dobj_337__LABELCOUNTREF @#0", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V525*/ meltfptr[524])) == + ( /*_._VALDATA___V528*/ meltfptr[527])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dobj_335__LABELCOUNTREF @#0", + melt_assertmsg ("checkoff putslot ~dobj_337__LABELCOUNTREF @#0", (0 >= 0 && 0 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V525*/ - meltfptr[524])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V525*/ meltfptr[524]))->obj_vartab[0] = + ( /*_._VALDATA___V528*/ + meltfptr[527])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V528*/ meltfptr[527]))->obj_vartab[0] = (melt_ptr_t) ( - /*_._VALBXINT___V526*/ meltfptr[525]); + /*_._VALBXINT___V529*/ meltfptr[528]); MELT_LOCATION ("warmelt-outobj.melt:3479:/ initchunk"); /*^touch */ /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V525*/ meltfptr[524]); + meltgc_touch ( /*_._VALDATA___V528*/ meltfptr[527]); MELT_LOCATION ("warmelt-outobj.melt:3479:/ initchunk"); /*^touchobj */ - melt_dbgtrace_written_object ( /*_._VALDATA___V525*/ meltfptr[524], + melt_dbgtrace_written_object ( /*_._VALDATA___V528*/ meltfptr[527], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:3480:/ initchunk"); @@ -33142,13 +33160,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_6 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V527*/ meltfptr[526])) + ( /*_._VALROUT___V530*/ meltfptr[529])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_337__OUTPUCOD_OBJLABELINSTR#0", + ("putroutconst constnull.drout_339__OUTPUCOD_OBJLABELINSTR#0", NULL != ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_._VALROUT___V527*/ meltfptr[526])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V530*/ meltfptr[529])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:3480:/ initchunk"); @@ -33157,40 +33175,53 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_6 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V527*/ meltfptr[526])) + ( /*_._VALROUT___V530*/ meltfptr[529])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_337__OUTPUCOD_OBJLABELINSTR#1", - NULL != ( /*_.CLASS_OBJLABELINSTR__V92*/ meltfptr[91])); - ((meltroutine_ptr_t) /*_._VALROUT___V527*/ meltfptr[526])->tabval[1] = - (melt_ptr_t) ( /*_.CLASS_OBJLABELINSTR__V92*/ meltfptr[91]); + ("putroutconst constnull.drout_339__OUTPUCOD_OBJLABELINSTR#1", + NULL != ( /*_.CLASS_OBJLABELINSTR__V93*/ meltfptr[92])); + ((meltroutine_ptr_t) /*_._VALROUT___V530*/ meltfptr[529])->tabval[1] = + (melt_ptr_t) ( /*_.CLASS_OBJLABELINSTR__V93*/ meltfptr[92]); MELT_LOCATION ("warmelt-outobj.melt:3480:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V527*/ meltfptr[526])) == + ( /*_._VALROUT___V530*/ meltfptr[529])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALDATA___V525*/ meltfptr[524]); - ((meltroutine_ptr_t) /*_._VALROUT___V527*/ meltfptr[526])->tabval[2] = - (melt_ptr_t) ( /*_._VALDATA___V525*/ meltfptr[524]); + NULL != /*_._VALDATA___V528*/ meltfptr[527]); + ((meltroutine_ptr_t) /*_._VALROUT___V530*/ meltfptr[529])->tabval[2] = + (melt_ptr_t) ( /*_._VALDATA___V528*/ meltfptr[527]); + +#undef meltfram__ +} /*end of meltmod__WARMELTmiOUTOBJ__initialmeltchunk_6 */ + +void +meltmod__WARMELTmiOUTOBJ__initialmeltchunk_7 (meltinitial_frame_t * + meltmeltframptr__, + char meltpredefinited[]) +{ +#define meltfram__ (*meltmeltframptr__) +#undef meltcallcount +#define meltcallcount 0L + (void) meltpredefinited; MELT_LOCATION ("warmelt-outobj.melt:3480:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V527*/ meltfptr[526])) + ( /*_._VALROUT___V530*/ meltfptr[529])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_337__OUTPUCOD_OBJLABELINSTR#3", + ("putroutconst constnull.drout_339__OUTPUCOD_OBJLABELINSTR#3", NULL != ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5])); - ((meltroutine_ptr_t) /*_._VALROUT___V527*/ meltfptr[526])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V530*/ meltfptr[529])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5]); MELT_LOCATION ("warmelt-outobj.melt:3480:/ initchunk"); @@ -33199,14 +33230,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_6 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V527*/ meltfptr[526])) + ( /*_._VALROUT___V530*/ meltfptr[529])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_337__OUTPUCOD_OBJLABELINSTR#4", - NULL != ( /*_.SET_CONTENT__V93*/ meltfptr[92])); - ((meltroutine_ptr_t) /*_._VALROUT___V527*/ meltfptr[526])->tabval[4] = - (melt_ptr_t) ( /*_.SET_CONTENT__V93*/ meltfptr[92]); + ("putroutconst constnull.drout_339__OUTPUCOD_OBJLABELINSTR#4", + NULL != ( /*_.SET_CONTENT__V94*/ meltfptr[93])); + ((meltroutine_ptr_t) /*_._VALROUT___V530*/ meltfptr[529])->tabval[4] = + (melt_ptr_t) ( /*_.SET_CONTENT__V94*/ meltfptr[93]); MELT_LOCATION ("warmelt-outobj.melt:3480:/ initchunk"); /*^putroutconst */ @@ -33214,66 +33245,53 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_6 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V527*/ meltfptr[526])) + ( /*_._VALROUT___V530*/ meltfptr[529])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_337__OUTPUCOD_OBJLABELINSTR#5", - NULL != ( /*_.STRING4OUT__V94*/ meltfptr[93])); - ((meltroutine_ptr_t) /*_._VALROUT___V527*/ meltfptr[526])->tabval[5] = - (melt_ptr_t) ( /*_.STRING4OUT__V94*/ meltfptr[93]); - + ("putroutconst constnull.drout_339__OUTPUCOD_OBJLABELINSTR#5", + NULL != ( /*_.STRING4OUT__V95*/ meltfptr[94])); + ((meltroutine_ptr_t) /*_._VALROUT___V530*/ meltfptr[529])->tabval[5] = + (melt_ptr_t) ( /*_.STRING4OUT__V95*/ meltfptr[94]); -#undef meltfram__ -} /*end of meltmod__WARMELTmiOUTOBJ__initialmeltchunk_6 */ - -void -meltmod__WARMELTmiOUTOBJ__initialmeltchunk_7 (meltinitial_frame_t * - meltmeltframptr__, - char meltpredefinited[]) -{ -#define meltfram__ (*meltmeltframptr__) -#undef meltcallcount -#define meltcallcount 0L - (void) meltpredefinited; MELT_LOCATION ("warmelt-outobj.melt:3480:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V527*/ meltfptr[526])) + ( /*_._VALROUT___V530*/ meltfptr[529])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_337__OUTPUCOD_OBJLABELINSTR#6", - NULL != ( /*_.DISCR_VERBATIM_STRING__V87*/ meltfptr[86])); - ((meltroutine_ptr_t) /*_._VALROUT___V527*/ meltfptr[526])->tabval[6] = - (melt_ptr_t) ( /*_.DISCR_VERBATIM_STRING__V87*/ meltfptr[86]); + ("putroutconst constnull.drout_339__OUTPUCOD_OBJLABELINSTR#6", + NULL != ( /*_.DISCR_VERBATIM_STRING__V88*/ meltfptr[87])); + ((meltroutine_ptr_t) /*_._VALROUT___V530*/ meltfptr[529])->tabval[6] = + (melt_ptr_t) ( /*_.DISCR_VERBATIM_STRING__V88*/ meltfptr[87]); MELT_LOCATION ("warmelt-outobj.melt:3480:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V527*/ meltfptr[526])) == + ( /*_._VALROUT___V530*/ meltfptr[529])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALDATA___V197*/ meltfptr[196]); - ((meltroutine_ptr_t) /*_._VALROUT___V527*/ meltfptr[526])->tabval[7] = - (melt_ptr_t) ( /*_._VALDATA___V197*/ meltfptr[196]); + NULL != /*_._VALDATA___V198*/ meltfptr[197]); + ((meltroutine_ptr_t) /*_._VALROUT___V530*/ meltfptr[529])->tabval[7] = + (melt_ptr_t) ( /*_._VALDATA___V198*/ meltfptr[197]); MELT_LOCATION ("warmelt-outobj.melt:3480:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V527*/ meltfptr[526])) == + ( /*_._VALROUT___V530*/ meltfptr[529])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V264*/ meltfptr[263]); - ((meltroutine_ptr_t) /*_._VALROUT___V527*/ meltfptr[526])->tabval[8] = - (melt_ptr_t) ( /*_._VALCLO___V264*/ meltfptr[263]); + NULL != /*_._VALCLO___V265*/ meltfptr[264]); + ((meltroutine_ptr_t) /*_._VALROUT___V530*/ meltfptr[529])->tabval[8] = + (melt_ptr_t) ( /*_._VALCLO___V265*/ meltfptr[264]); MELT_LOCATION ("warmelt-outobj.melt:3480:/ initchunk"); /*^putroutconst */ @@ -33281,102 +33299,102 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_7 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V527*/ meltfptr[526])) + ( /*_._VALROUT___V530*/ meltfptr[529])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_337__OUTPUCOD_OBJLABELINSTR#9", + ("putroutconst constnull.drout_339__OUTPUCOD_OBJLABELINSTR#9", NULL != ( /*_.ADD2OUT__V14*/ meltfptr[13])); - ((meltroutine_ptr_t) /*_._VALROUT___V527*/ meltfptr[526])->tabval[9] = + ((meltroutine_ptr_t) /*_._VALROUT___V530*/ meltfptr[529])->tabval[9] = (melt_ptr_t) ( /*_.ADD2OUT__V14*/ meltfptr[13]); MELT_LOCATION ("warmelt-outobj.melt:3480:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V527*/ meltfptr[526]); + meltgc_touch ( /*_._VALROUT___V530*/ meltfptr[529]); /*putclosurout#69 */ melt_assertmsg ("putclosrout#69 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V528*/ meltfptr[527])) == + ( /*_._VALCLO___V531*/ meltfptr[530])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#69 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V527*/ meltfptr[526])) == + ( /*_._VALROUT___V530*/ meltfptr[529])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V528*/ meltfptr[527])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V527*/ meltfptr[526]); + ((meltclosure_ptr_t) /*_._VALCLO___V531*/ meltfptr[530])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V530*/ meltfptr[529]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V528*/ meltfptr[527]); + meltgc_touch ( /*_._VALCLO___V531*/ meltfptr[530]); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_339__CLASS_OBJLABELINSTR @#1", + melt_assertmsg ("checkobj putslot ~dsym_341__CLASS_OBJLABELINSTR @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V529*/ meltfptr[528])) == + ( /*_._VALDATA___V532*/ meltfptr[531])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_339__CLASS_OBJLABELINSTR @#1", + melt_assertmsg ("checkoff putslot ~dsym_341__CLASS_OBJLABELINSTR @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V529*/ - meltfptr[528])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V529*/ meltfptr[528]))->obj_vartab[1] = + ( /*_._VALDATA___V532*/ + meltfptr[531])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V532*/ meltfptr[531]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V530*/ meltfptr[529]); + /*_._VALSTR___V533*/ meltfptr[532]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V529*/ meltfptr[528]); + meltgc_touch ( /*_._VALDATA___V532*/ meltfptr[531]); - melt_dbgtrace_written_object ( /*_._VALDATA___V529*/ meltfptr[528], + melt_dbgtrace_written_object ( /*_._VALDATA___V532*/ meltfptr[531], "new static instance"); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_341__SET_CONTENT @#1", + melt_assertmsg ("checkobj putslot ~dsym_343__SET_CONTENT @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V531*/ meltfptr[530])) == + ( /*_._VALDATA___V534*/ meltfptr[533])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_341__SET_CONTENT @#1", + melt_assertmsg ("checkoff putslot ~dsym_343__SET_CONTENT @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V531*/ - meltfptr[530])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V531*/ meltfptr[530]))->obj_vartab[1] = + ( /*_._VALDATA___V534*/ + meltfptr[533])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V534*/ meltfptr[533]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V532*/ meltfptr[531]); + /*_._VALSTR___V535*/ meltfptr[534]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V531*/ meltfptr[530]); + meltgc_touch ( /*_._VALDATA___V534*/ meltfptr[533]); - melt_dbgtrace_written_object ( /*_._VALDATA___V531*/ meltfptr[530], + melt_dbgtrace_written_object ( /*_._VALDATA___V534*/ meltfptr[533], "new static instance"); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_343__STRING4OUT @#1", + melt_assertmsg ("checkobj putslot ~dsym_345__STRING4OUT @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V533*/ meltfptr[532])) == + ( /*_._VALDATA___V536*/ meltfptr[535])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_343__STRING4OUT @#1", + melt_assertmsg ("checkoff putslot ~dsym_345__STRING4OUT @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V533*/ - meltfptr[532])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V533*/ meltfptr[532]))->obj_vartab[1] = + ( /*_._VALDATA___V536*/ + meltfptr[535])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V536*/ meltfptr[535]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V534*/ meltfptr[533]); + /*_._VALSTR___V537*/ meltfptr[536]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V533*/ meltfptr[532]); + meltgc_touch ( /*_._VALDATA___V536*/ meltfptr[535]); - melt_dbgtrace_written_object ( /*_._VALDATA___V533*/ meltfptr[532], + melt_dbgtrace_written_object ( /*_._VALDATA___V536*/ meltfptr[535], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:3515:/ initchunk"); @@ -33385,38 +33403,38 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_7 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V535*/ meltfptr[534])) + ( /*_._VALROUT___V538*/ meltfptr[537])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_345__OUTPUCOD_OBJGOTOINSTR#0", - NULL != ( /*_.CLASS_OBJGOTOINSTR__V95*/ meltfptr[94])); - ((meltroutine_ptr_t) /*_._VALROUT___V535*/ meltfptr[534])->tabval[0] = - (melt_ptr_t) ( /*_.CLASS_OBJGOTOINSTR__V95*/ meltfptr[94]); + ("putroutconst constnull.drout_347__OUTPUCOD_OBJGOTOINSTR#0", + NULL != ( /*_.CLASS_OBJGOTOINSTR__V96*/ meltfptr[95])); + ((meltroutine_ptr_t) /*_._VALROUT___V538*/ meltfptr[537])->tabval[0] = + (melt_ptr_t) ( /*_.CLASS_OBJGOTOINSTR__V96*/ meltfptr[95]); MELT_LOCATION ("warmelt-outobj.melt:3515:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V535*/ meltfptr[534])) == + ( /*_._VALROUT___V538*/ meltfptr[537])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V264*/ meltfptr[263]); - ((meltroutine_ptr_t) /*_._VALROUT___V535*/ meltfptr[534])->tabval[1] = - (melt_ptr_t) ( /*_._VALCLO___V264*/ meltfptr[263]); + NULL != /*_._VALCLO___V265*/ meltfptr[264]); + ((meltroutine_ptr_t) /*_._VALROUT___V538*/ meltfptr[537])->tabval[1] = + (melt_ptr_t) ( /*_._VALCLO___V265*/ meltfptr[264]); MELT_LOCATION ("warmelt-outobj.melt:3515:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V535*/ meltfptr[534])) == + ( /*_._VALROUT___V538*/ meltfptr[537])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALDATA___V197*/ meltfptr[196]); - ((meltroutine_ptr_t) /*_._VALROUT___V535*/ meltfptr[534])->tabval[2] = - (melt_ptr_t) ( /*_._VALDATA___V197*/ meltfptr[196]); + NULL != /*_._VALDATA___V198*/ meltfptr[197]); + ((meltroutine_ptr_t) /*_._VALROUT___V538*/ meltfptr[537])->tabval[2] = + (melt_ptr_t) ( /*_._VALDATA___V198*/ meltfptr[197]); MELT_LOCATION ("warmelt-outobj.melt:3515:/ initchunk"); /*^putroutconst */ @@ -33424,56 +33442,56 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_7 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V535*/ meltfptr[534])) + ( /*_._VALROUT___V538*/ meltfptr[537])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_345__OUTPUCOD_OBJGOTOINSTR#3", + ("putroutconst constnull.drout_347__OUTPUCOD_OBJGOTOINSTR#3", NULL != ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5])); - ((meltroutine_ptr_t) /*_._VALROUT___V535*/ meltfptr[534])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V538*/ meltfptr[537])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5]); MELT_LOCATION ("warmelt-outobj.melt:3515:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V535*/ meltfptr[534]); + meltgc_touch ( /*_._VALROUT___V538*/ meltfptr[537]); /*putclosurout#70 */ melt_assertmsg ("putclosrout#70 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V536*/ meltfptr[535])) == + ( /*_._VALCLO___V539*/ meltfptr[538])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#70 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V535*/ meltfptr[534])) == + ( /*_._VALROUT___V538*/ meltfptr[537])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V536*/ meltfptr[535])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V535*/ meltfptr[534]); + ((meltclosure_ptr_t) /*_._VALCLO___V539*/ meltfptr[538])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V538*/ meltfptr[537]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V536*/ meltfptr[535]); + meltgc_touch ( /*_._VALCLO___V539*/ meltfptr[538]); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_347__CLASS_OBJGOTOINSTR @#1", + melt_assertmsg ("checkobj putslot ~dsym_349__CLASS_OBJGOTOINSTR @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V537*/ meltfptr[536])) == + ( /*_._VALDATA___V540*/ meltfptr[539])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_347__CLASS_OBJGOTOINSTR @#1", + melt_assertmsg ("checkoff putslot ~dsym_349__CLASS_OBJGOTOINSTR @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V537*/ - meltfptr[536])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V537*/ meltfptr[536]))->obj_vartab[1] = + ( /*_._VALDATA___V540*/ + meltfptr[539])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V540*/ meltfptr[539]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V538*/ meltfptr[537]); + /*_._VALSTR___V541*/ meltfptr[540]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V537*/ meltfptr[536]); + meltgc_touch ( /*_._VALDATA___V540*/ meltfptr[539]); - melt_dbgtrace_written_object ( /*_._VALDATA___V537*/ meltfptr[536], + melt_dbgtrace_written_object ( /*_._VALDATA___V540*/ meltfptr[539], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:3532:/ initchunk"); @@ -33482,12 +33500,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_7 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V539*/ meltfptr[538])) + ( /*_._VALROUT___V542*/ meltfptr[541])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_349__ADD2SBUF_CLONSYM#0", + melt_checkmsg ("putroutconst constnull.drout_351__ADD2SBUF_CLONSYM#0", NULL != ( /*_.CLASS_CLONED_SYMBOL__V12*/ meltfptr[11])); - ((meltroutine_ptr_t) /*_._VALROUT___V539*/ meltfptr[538])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V542*/ meltfptr[541])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_CLONED_SYMBOL__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-outobj.melt:3532:/ initchunk"); @@ -33495,12 +33513,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_7 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V539*/ meltfptr[538])) == + ( /*_._VALROUT___V542*/ meltfptr[541])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALDATA___V197*/ meltfptr[196]); - ((meltroutine_ptr_t) /*_._VALROUT___V539*/ meltfptr[538])->tabval[1] = - (melt_ptr_t) ( /*_._VALDATA___V197*/ meltfptr[196]); + NULL != /*_._VALDATA___V198*/ meltfptr[197]); + ((meltroutine_ptr_t) /*_._VALROUT___V542*/ meltfptr[541])->tabval[1] = + (melt_ptr_t) ( /*_._VALDATA___V198*/ meltfptr[197]); MELT_LOCATION ("warmelt-outobj.melt:3532:/ initchunk"); /*^putroutconst */ @@ -33508,33 +33526,33 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_7 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V539*/ meltfptr[538])) + ( /*_._VALROUT___V542*/ meltfptr[541])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_349__ADD2SBUF_CLONSYM#2", + melt_checkmsg ("putroutconst constnull.drout_351__ADD2SBUF_CLONSYM#2", NULL != ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5])); - ((meltroutine_ptr_t) /*_._VALROUT___V539*/ meltfptr[538])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V542*/ meltfptr[541])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5]); MELT_LOCATION ("warmelt-outobj.melt:3532:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V539*/ meltfptr[538]); + meltgc_touch ( /*_._VALROUT___V542*/ meltfptr[541]); /*putclosurout#71 */ melt_assertmsg ("putclosrout#71 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V540*/ meltfptr[539])) == + ( /*_._VALCLO___V543*/ meltfptr[542])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#71 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V539*/ meltfptr[538])) == + ( /*_._VALROUT___V542*/ meltfptr[541])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V540*/ meltfptr[539])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V539*/ meltfptr[538]); + ((meltclosure_ptr_t) /*_._VALCLO___V543*/ meltfptr[542])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V542*/ meltfptr[541]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V540*/ meltfptr[539]); + meltgc_touch ( /*_._VALCLO___V543*/ meltfptr[542]); MELT_LOCATION ("warmelt-outobj.melt:3545:/ initchunk"); /*^putroutconst */ @@ -33542,13 +33560,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_7 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V541*/ meltfptr[540])) + ( /*_._VALROUT___V544*/ meltfptr[543])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_351__OUTPUCOD_OBJLOOP#0", - NULL != ( /*_.CLASS_OBJLOOP__V96*/ meltfptr[95])); - ((meltroutine_ptr_t) /*_._VALROUT___V541*/ meltfptr[540])->tabval[0] = - (melt_ptr_t) ( /*_.CLASS_OBJLOOP__V96*/ meltfptr[95]); + melt_checkmsg ("putroutconst constnull.drout_353__OUTPUCOD_OBJLOOP#0", + NULL != ( /*_.CLASS_OBJLOOP__V97*/ meltfptr[96])); + ((meltroutine_ptr_t) /*_._VALROUT___V544*/ meltfptr[543])->tabval[0] = + (melt_ptr_t) ( /*_.CLASS_OBJLOOP__V97*/ meltfptr[96]); MELT_LOCATION ("warmelt-outobj.melt:3545:/ initchunk"); /*^putroutconst */ @@ -33556,12 +33574,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_7 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V541*/ meltfptr[540])) + ( /*_._VALROUT___V544*/ meltfptr[543])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_351__OUTPUCOD_OBJLOOP#1", + melt_checkmsg ("putroutconst constnull.drout_353__OUTPUCOD_OBJLOOP#1", NULL != ( /*_.DISCR_INTEGER__V52*/ meltfptr[51])); - ((meltroutine_ptr_t) /*_._VALROUT___V541*/ meltfptr[540])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V544*/ meltfptr[543])->tabval[1] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V52*/ meltfptr[51]); MELT_LOCATION ("warmelt-outobj.melt:3545:/ initchunk"); @@ -33570,12 +33588,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_7 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V541*/ meltfptr[540])) + ( /*_._VALROUT___V544*/ meltfptr[543])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_351__OUTPUCOD_OBJLOOP#2", + melt_checkmsg ("putroutconst constnull.drout_353__OUTPUCOD_OBJLOOP#2", NULL != ( /*_.CLASS_CLONED_SYMBOL__V12*/ meltfptr[11])); - ((meltroutine_ptr_t) /*_._VALROUT___V541*/ meltfptr[540])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V544*/ meltfptr[543])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_CLONED_SYMBOL__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-outobj.melt:3545:/ initchunk"); @@ -33583,24 +33601,24 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_7 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V541*/ meltfptr[540])) == + ( /*_._VALROUT___V544*/ meltfptr[543])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V264*/ meltfptr[263]); - ((meltroutine_ptr_t) /*_._VALROUT___V541*/ meltfptr[540])->tabval[3] = - (melt_ptr_t) ( /*_._VALCLO___V264*/ meltfptr[263]); + NULL != /*_._VALCLO___V265*/ meltfptr[264]); + ((meltroutine_ptr_t) /*_._VALROUT___V544*/ meltfptr[543])->tabval[3] = + (melt_ptr_t) ( /*_._VALCLO___V265*/ meltfptr[264]); MELT_LOCATION ("warmelt-outobj.melt:3545:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V541*/ meltfptr[540])) == + ( /*_._VALROUT___V544*/ meltfptr[543])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V540*/ meltfptr[539]); - ((meltroutine_ptr_t) /*_._VALROUT___V541*/ meltfptr[540])->tabval[4] = - (melt_ptr_t) ( /*_._VALCLO___V540*/ meltfptr[539]); + NULL != /*_._VALCLO___V543*/ meltfptr[542]); + ((meltroutine_ptr_t) /*_._VALROUT___V544*/ meltfptr[543])->tabval[4] = + (melt_ptr_t) ( /*_._VALCLO___V543*/ meltfptr[542]); MELT_LOCATION ("warmelt-outobj.melt:3545:/ initchunk"); /*^putroutconst */ @@ -33608,12 +33626,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_7 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V541*/ meltfptr[540])) + ( /*_._VALROUT___V544*/ meltfptr[543])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_351__OUTPUCOD_OBJLOOP#5", + melt_checkmsg ("putroutconst constnull.drout_353__OUTPUCOD_OBJLOOP#5", NULL != ( /*_.LIST_EVERY__V56*/ meltfptr[55])); - ((meltroutine_ptr_t) /*_._VALROUT___V541*/ meltfptr[540])->tabval[5] = + ((meltroutine_ptr_t) /*_._VALROUT___V544*/ meltfptr[543])->tabval[5] = (melt_ptr_t) ( /*_.LIST_EVERY__V56*/ meltfptr[55]); MELT_LOCATION ("warmelt-outobj.melt:3545:/ initchunk"); @@ -33622,12 +33640,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_7 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V541*/ meltfptr[540])) + ( /*_._VALROUT___V544*/ meltfptr[543])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_351__OUTPUCOD_OBJLOOP#6", + melt_checkmsg ("putroutconst constnull.drout_353__OUTPUCOD_OBJLOOP#6", NULL != ( /*_.CLASS_OBJPUREVALUE__V63*/ meltfptr[62])); - ((meltroutine_ptr_t) /*_._VALROUT___V541*/ meltfptr[540])->tabval[6] = + ((meltroutine_ptr_t) /*_._VALROUT___V544*/ meltfptr[543])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_OBJPUREVALUE__V63*/ meltfptr[62]); MELT_LOCATION ("warmelt-outobj.melt:3545:/ initchunk"); @@ -33636,12 +33654,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_7 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V541*/ meltfptr[540])) + ( /*_._VALROUT___V544*/ meltfptr[543])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_351__OUTPUCOD_OBJLOOP#7", + melt_checkmsg ("putroutconst constnull.drout_353__OUTPUCOD_OBJLOOP#7", NULL != ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19])); - ((meltroutine_ptr_t) /*_._VALROUT___V541*/ meltfptr[540])->tabval[7] = + ((meltroutine_ptr_t) /*_._VALROUT___V544*/ meltfptr[543])->tabval[7] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]); MELT_LOCATION ("warmelt-outobj.melt:3564:/ initchunk"); @@ -33650,12 +33668,12 @@ meltmod__WARMELTmiOUTOBJ__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___V545*/ meltfptr[544])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_355__LAMBDA_#0", + melt_checkmsg ("putroutconst constnull.drout_357__LAMBDA_#0", NULL != ( /*_.CLASS_OBJPUREVALUE__V63*/ meltfptr[62])); - ((meltroutine_ptr_t) /*_._VALROUT___V542*/ meltfptr[541])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V545*/ meltfptr[544])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJPUREVALUE__V63*/ meltfptr[62]); MELT_LOCATION ("warmelt-outobj.melt:3564:/ initchunk"); @@ -33664,18 +33682,18 @@ meltmod__WARMELTmiOUTOBJ__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___V545*/ meltfptr[544])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_355__LAMBDA_#1", + melt_checkmsg ("putroutconst constnull.drout_357__LAMBDA_#1", NULL != ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19])); - ((meltroutine_ptr_t) /*_._VALROUT___V542*/ meltfptr[541])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V545*/ meltfptr[544])->tabval[1] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]); MELT_LOCATION ("warmelt-outobj.melt:3564:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V542*/ meltfptr[541]); + meltgc_touch ( /*_._VALROUT___V545*/ meltfptr[544]); MELT_LOCATION ("warmelt-outobj.melt:3545:/ initchunk"); /*^putroutconst */ @@ -33683,13 +33701,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_7 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V541*/ meltfptr[540])) + ( /*_._VALROUT___V544*/ meltfptr[543])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_351__OUTPUCOD_OBJLOOP#8", - NULL != ( /*_._VALROUT___V542*/ meltfptr[541])); - ((meltroutine_ptr_t) /*_._VALROUT___V541*/ meltfptr[540])->tabval[8] = - (melt_ptr_t) ( /*_._VALROUT___V542*/ meltfptr[541]); + melt_checkmsg ("putroutconst constnull.drout_353__OUTPUCOD_OBJLOOP#8", + NULL != ( /*_._VALROUT___V545*/ meltfptr[544])); + ((meltroutine_ptr_t) /*_._VALROUT___V544*/ meltfptr[543])->tabval[8] = + (melt_ptr_t) ( /*_._VALROUT___V545*/ meltfptr[544]); MELT_LOCATION ("warmelt-outobj.melt:3545:/ initchunk"); /*^putroutconst */ @@ -33697,12 +33715,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_7 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V541*/ meltfptr[540])) + ( /*_._VALROUT___V544*/ meltfptr[543])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_351__OUTPUCOD_OBJLOOP#9", + melt_checkmsg ("putroutconst constnull.drout_353__OUTPUCOD_OBJLOOP#9", NULL != ( /*_.CLASS_OBJPUREVALUE__V63*/ meltfptr[62])); - ((meltroutine_ptr_t) /*_._VALROUT___V541*/ meltfptr[540])->tabval[9] = + ((meltroutine_ptr_t) /*_._VALROUT___V544*/ meltfptr[543])->tabval[9] = (melt_ptr_t) ( /*_.CLASS_OBJPUREVALUE__V63*/ meltfptr[62]); MELT_LOCATION ("warmelt-outobj.melt:3545:/ initchunk"); @@ -33711,12 +33729,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_7 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V541*/ meltfptr[540])) + ( /*_._VALROUT___V544*/ meltfptr[543])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_351__OUTPUCOD_OBJLOOP#10", + melt_checkmsg ("putroutconst constnull.drout_353__OUTPUCOD_OBJLOOP#10", NULL != ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19])); - ((meltroutine_ptr_t) /*_._VALROUT___V541*/ meltfptr[540])->tabval[10] = + ((meltroutine_ptr_t) /*_._VALROUT___V544*/ meltfptr[543])->tabval[10] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]); MELT_LOCATION ("warmelt-outobj.melt:3545:/ initchunk"); @@ -33724,12 +33742,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_7 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V541*/ meltfptr[540])) == + ( /*_._VALROUT___V544*/ meltfptr[543])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALDATA___V197*/ meltfptr[196]); - ((meltroutine_ptr_t) /*_._VALROUT___V541*/ meltfptr[540])->tabval[11] = - (melt_ptr_t) ( /*_._VALDATA___V197*/ meltfptr[196]); + NULL != /*_._VALDATA___V198*/ meltfptr[197]); + ((meltroutine_ptr_t) /*_._VALROUT___V544*/ meltfptr[543])->tabval[11] = + (melt_ptr_t) ( /*_._VALDATA___V198*/ meltfptr[197]); MELT_LOCATION ("warmelt-outobj.melt:3545:/ initchunk"); /*^putroutconst */ @@ -33737,12 +33755,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_7 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V541*/ meltfptr[540])) + ( /*_._VALROUT___V544*/ meltfptr[543])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_351__OUTPUCOD_OBJLOOP#12", + melt_checkmsg ("putroutconst constnull.drout_353__OUTPUCOD_OBJLOOP#12", NULL != ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5])); - ((meltroutine_ptr_t) /*_._VALROUT___V541*/ meltfptr[540])->tabval[12] = + ((meltroutine_ptr_t) /*_._VALROUT___V544*/ meltfptr[543])->tabval[12] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5]); MELT_LOCATION ("warmelt-outobj.melt:3586:/ initchunk"); @@ -33751,12 +33769,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_7 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V543*/ meltfptr[542])) + ( /*_._VALROUT___V546*/ meltfptr[545])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_356__LAMBDA_#0", + melt_checkmsg ("putroutconst constnull.drout_358__LAMBDA_#0", NULL != ( /*_.CLASS_OBJPUREVALUE__V63*/ meltfptr[62])); - ((meltroutine_ptr_t) /*_._VALROUT___V543*/ meltfptr[542])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V546*/ meltfptr[545])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJPUREVALUE__V63*/ meltfptr[62]); MELT_LOCATION ("warmelt-outobj.melt:3586:/ initchunk"); @@ -33765,12 +33783,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_7 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V543*/ meltfptr[542])) + ( /*_._VALROUT___V546*/ meltfptr[545])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_356__LAMBDA_#1", + melt_checkmsg ("putroutconst constnull.drout_358__LAMBDA_#1", NULL != ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19])); - ((meltroutine_ptr_t) /*_._VALROUT___V543*/ meltfptr[542])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V546*/ meltfptr[545])->tabval[1] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]); MELT_LOCATION ("warmelt-outobj.melt:3586:/ initchunk"); @@ -33778,12 +33796,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_7 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V543*/ meltfptr[542])) == + ( /*_._VALROUT___V546*/ meltfptr[545])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALDATA___V197*/ meltfptr[196]); - ((meltroutine_ptr_t) /*_._VALROUT___V543*/ meltfptr[542])->tabval[2] = - (melt_ptr_t) ( /*_._VALDATA___V197*/ meltfptr[196]); + NULL != /*_._VALDATA___V198*/ meltfptr[197]); + ((meltroutine_ptr_t) /*_._VALROUT___V546*/ meltfptr[545])->tabval[2] = + (melt_ptr_t) ( /*_._VALDATA___V198*/ meltfptr[197]); MELT_LOCATION ("warmelt-outobj.melt:3586:/ initchunk"); /*^putroutconst */ @@ -33791,18 +33809,18 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_7 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V543*/ meltfptr[542])) + ( /*_._VALROUT___V546*/ meltfptr[545])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_356__LAMBDA_#3", + melt_checkmsg ("putroutconst constnull.drout_358__LAMBDA_#3", NULL != ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5])); - ((meltroutine_ptr_t) /*_._VALROUT___V543*/ meltfptr[542])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V546*/ meltfptr[545])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5]); MELT_LOCATION ("warmelt-outobj.melt:3586:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V543*/ meltfptr[542]); + meltgc_touch ( /*_._VALROUT___V546*/ meltfptr[545]); MELT_LOCATION ("warmelt-outobj.melt:3545:/ initchunk"); /*^putroutconst */ @@ -33810,25 +33828,25 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_7 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V541*/ meltfptr[540])) + ( /*_._VALROUT___V544*/ meltfptr[543])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_351__OUTPUCOD_OBJLOOP#13", - NULL != ( /*_._VALROUT___V543*/ meltfptr[542])); - ((meltroutine_ptr_t) /*_._VALROUT___V541*/ meltfptr[540])->tabval[13] = - (melt_ptr_t) ( /*_._VALROUT___V543*/ meltfptr[542]); + melt_checkmsg ("putroutconst constnull.drout_353__OUTPUCOD_OBJLOOP#13", + NULL != ( /*_._VALROUT___V546*/ meltfptr[545])); + ((meltroutine_ptr_t) /*_._VALROUT___V544*/ meltfptr[543])->tabval[13] = + (melt_ptr_t) ( /*_._VALROUT___V546*/ meltfptr[545]); MELT_LOCATION ("warmelt-outobj.melt:3545:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V541*/ meltfptr[540])) == + ( /*_._VALROUT___V544*/ meltfptr[543])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALDATA___V197*/ meltfptr[196]); - ((meltroutine_ptr_t) /*_._VALROUT___V541*/ meltfptr[540])->tabval[14] = - (melt_ptr_t) ( /*_._VALDATA___V197*/ meltfptr[196]); + NULL != /*_._VALDATA___V198*/ meltfptr[197]); + ((meltroutine_ptr_t) /*_._VALROUT___V544*/ meltfptr[543])->tabval[14] = + (melt_ptr_t) ( /*_._VALDATA___V198*/ meltfptr[197]); MELT_LOCATION ("warmelt-outobj.melt:3545:/ initchunk"); /*^putroutconst */ @@ -33836,55 +33854,55 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_7 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V541*/ meltfptr[540])) + ( /*_._VALROUT___V544*/ meltfptr[543])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_351__OUTPUCOD_OBJLOOP#15", + melt_checkmsg ("putroutconst constnull.drout_353__OUTPUCOD_OBJLOOP#15", NULL != ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5])); - ((meltroutine_ptr_t) /*_._VALROUT___V541*/ meltfptr[540])->tabval[15] = + ((meltroutine_ptr_t) /*_._VALROUT___V544*/ meltfptr[543])->tabval[15] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5]); MELT_LOCATION ("warmelt-outobj.melt:3545:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V541*/ meltfptr[540]); + meltgc_touch ( /*_._VALROUT___V544*/ meltfptr[543]); /*putclosurout#72 */ melt_assertmsg ("putclosrout#72 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V544*/ meltfptr[543])) == + ( /*_._VALCLO___V547*/ meltfptr[546])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#72 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V541*/ meltfptr[540])) == + ( /*_._VALROUT___V544*/ meltfptr[543])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V544*/ meltfptr[543])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V541*/ meltfptr[540]); + ((meltclosure_ptr_t) /*_._VALCLO___V547*/ meltfptr[546])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V544*/ meltfptr[543]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V544*/ meltfptr[543]); + meltgc_touch ( /*_._VALCLO___V547*/ meltfptr[546]); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_353__CLASS_OBJLOOP @#1", + melt_assertmsg ("checkobj putslot ~dsym_355__CLASS_OBJLOOP @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V545*/ meltfptr[544])) == + ( /*_._VALDATA___V548*/ meltfptr[547])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_353__CLASS_OBJLOOP @#1", + melt_assertmsg ("checkoff putslot ~dsym_355__CLASS_OBJLOOP @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V545*/ - meltfptr[544])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V545*/ meltfptr[544]))->obj_vartab[1] = + ( /*_._VALDATA___V548*/ + meltfptr[547])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V548*/ meltfptr[547]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V546*/ meltfptr[545]); + /*_._VALSTR___V549*/ meltfptr[548]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V545*/ meltfptr[544]); + meltgc_touch ( /*_._VALDATA___V548*/ meltfptr[547]); - melt_dbgtrace_written_object ( /*_._VALDATA___V545*/ meltfptr[544], + melt_dbgtrace_written_object ( /*_._VALDATA___V548*/ meltfptr[547], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:3604:/ initchunk"); @@ -33893,13 +33911,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_7 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V547*/ meltfptr[546])) + ( /*_._VALROUT___V550*/ meltfptr[549])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_357__OUTPUCOD_OBJEXIT#0", - NULL != ( /*_.CLASS_OBJEXIT__V97*/ meltfptr[96])); - ((meltroutine_ptr_t) /*_._VALROUT___V547*/ meltfptr[546])->tabval[0] = - (melt_ptr_t) ( /*_.CLASS_OBJEXIT__V97*/ meltfptr[96]); + melt_checkmsg ("putroutconst constnull.drout_359__OUTPUCOD_OBJEXIT#0", + NULL != ( /*_.CLASS_OBJEXIT__V98*/ meltfptr[97])); + ((meltroutine_ptr_t) /*_._VALROUT___V550*/ meltfptr[549])->tabval[0] = + (melt_ptr_t) ( /*_.CLASS_OBJEXIT__V98*/ meltfptr[97]); MELT_LOCATION ("warmelt-outobj.melt:3604:/ initchunk"); /*^putroutconst */ @@ -33907,12 +33925,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_7 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V547*/ meltfptr[546])) + ( /*_._VALROUT___V550*/ meltfptr[549])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_357__OUTPUCOD_OBJEXIT#1", + melt_checkmsg ("putroutconst constnull.drout_359__OUTPUCOD_OBJEXIT#1", NULL != ( /*_.CLASS_CLONED_SYMBOL__V12*/ meltfptr[11])); - ((meltroutine_ptr_t) /*_._VALROUT___V547*/ meltfptr[546])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V550*/ meltfptr[549])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_CLONED_SYMBOL__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-outobj.melt:3604:/ initchunk"); @@ -33920,36 +33938,36 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_7 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V547*/ meltfptr[546])) == + ( /*_._VALROUT___V550*/ meltfptr[549])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V264*/ meltfptr[263]); - ((meltroutine_ptr_t) /*_._VALROUT___V547*/ meltfptr[546])->tabval[2] = - (melt_ptr_t) ( /*_._VALCLO___V264*/ meltfptr[263]); + NULL != /*_._VALCLO___V265*/ meltfptr[264]); + ((meltroutine_ptr_t) /*_._VALROUT___V550*/ meltfptr[549])->tabval[2] = + (melt_ptr_t) ( /*_._VALCLO___V265*/ meltfptr[264]); MELT_LOCATION ("warmelt-outobj.melt:3604:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V547*/ meltfptr[546])) == + ( /*_._VALROUT___V550*/ meltfptr[549])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V540*/ meltfptr[539]); - ((meltroutine_ptr_t) /*_._VALROUT___V547*/ meltfptr[546])->tabval[3] = - (melt_ptr_t) ( /*_._VALCLO___V540*/ meltfptr[539]); + NULL != /*_._VALCLO___V543*/ meltfptr[542]); + ((meltroutine_ptr_t) /*_._VALROUT___V550*/ meltfptr[549])->tabval[3] = + (melt_ptr_t) ( /*_._VALCLO___V543*/ meltfptr[542]); MELT_LOCATION ("warmelt-outobj.melt:3604:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V547*/ meltfptr[546])) == + ( /*_._VALROUT___V550*/ meltfptr[549])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALDATA___V197*/ meltfptr[196]); - ((meltroutine_ptr_t) /*_._VALROUT___V547*/ meltfptr[546])->tabval[4] = - (melt_ptr_t) ( /*_._VALDATA___V197*/ meltfptr[196]); + NULL != /*_._VALDATA___V198*/ meltfptr[197]); + ((meltroutine_ptr_t) /*_._VALROUT___V550*/ meltfptr[549])->tabval[4] = + (melt_ptr_t) ( /*_._VALDATA___V198*/ meltfptr[197]); MELT_LOCATION ("warmelt-outobj.melt:3604:/ initchunk"); /*^putroutconst */ @@ -33957,55 +33975,55 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_7 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V547*/ meltfptr[546])) + ( /*_._VALROUT___V550*/ meltfptr[549])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_357__OUTPUCOD_OBJEXIT#5", + melt_checkmsg ("putroutconst constnull.drout_359__OUTPUCOD_OBJEXIT#5", NULL != ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5])); - ((meltroutine_ptr_t) /*_._VALROUT___V547*/ meltfptr[546])->tabval[5] = + ((meltroutine_ptr_t) /*_._VALROUT___V550*/ meltfptr[549])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5]); MELT_LOCATION ("warmelt-outobj.melt:3604:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V547*/ meltfptr[546]); + meltgc_touch ( /*_._VALROUT___V550*/ meltfptr[549]); /*putclosurout#73 */ melt_assertmsg ("putclosrout#73 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V548*/ meltfptr[547])) == + ( /*_._VALCLO___V551*/ meltfptr[550])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#73 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V547*/ meltfptr[546])) == + ( /*_._VALROUT___V550*/ meltfptr[549])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V548*/ meltfptr[547])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V547*/ meltfptr[546]); + ((meltclosure_ptr_t) /*_._VALCLO___V551*/ meltfptr[550])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V550*/ meltfptr[549]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V548*/ meltfptr[547]); + meltgc_touch ( /*_._VALCLO___V551*/ meltfptr[550]); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_359__CLASS_OBJEXIT @#1", + melt_assertmsg ("checkobj putslot ~dsym_361__CLASS_OBJEXIT @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V549*/ meltfptr[548])) == + ( /*_._VALDATA___V552*/ meltfptr[551])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_359__CLASS_OBJEXIT @#1", + melt_assertmsg ("checkoff putslot ~dsym_361__CLASS_OBJEXIT @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V549*/ - meltfptr[548])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V549*/ meltfptr[548]))->obj_vartab[1] = + ( /*_._VALDATA___V552*/ + meltfptr[551])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V552*/ meltfptr[551]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V550*/ meltfptr[549]); + /*_._VALSTR___V553*/ meltfptr[552]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V549*/ meltfptr[548]); + meltgc_touch ( /*_._VALDATA___V552*/ meltfptr[551]); - melt_dbgtrace_written_object ( /*_._VALDATA___V549*/ meltfptr[548], + melt_dbgtrace_written_object ( /*_._VALDATA___V552*/ meltfptr[551], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:3624:/ initchunk"); @@ -34014,13 +34032,13 @@ meltmod__WARMELTmiOUTOBJ__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___V554*/ meltfptr[553])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_361__OUTPUCOD_OBJAGAIN#0", - NULL != ( /*_.CLASS_OBJAGAIN__V98*/ meltfptr[97])); - ((meltroutine_ptr_t) /*_._VALROUT___V551*/ meltfptr[550])->tabval[0] = - (melt_ptr_t) ( /*_.CLASS_OBJAGAIN__V98*/ meltfptr[97]); + melt_checkmsg ("putroutconst constnull.drout_363__OUTPUCOD_OBJAGAIN#0", + NULL != ( /*_.CLASS_OBJAGAIN__V99*/ meltfptr[98])); + ((meltroutine_ptr_t) /*_._VALROUT___V554*/ meltfptr[553])->tabval[0] = + (melt_ptr_t) ( /*_.CLASS_OBJAGAIN__V99*/ meltfptr[98]); MELT_LOCATION ("warmelt-outobj.melt:3624:/ initchunk"); /*^putroutconst */ @@ -34028,12 +34046,12 @@ meltmod__WARMELTmiOUTOBJ__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___V554*/ meltfptr[553])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_361__OUTPUCOD_OBJAGAIN#1", + melt_checkmsg ("putroutconst constnull.drout_363__OUTPUCOD_OBJAGAIN#1", NULL != ( /*_.CLASS_CLONED_SYMBOL__V12*/ meltfptr[11])); - ((meltroutine_ptr_t) /*_._VALROUT___V551*/ meltfptr[550])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V554*/ meltfptr[553])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_CLONED_SYMBOL__V12*/ meltfptr[11]); MELT_LOCATION ("warmelt-outobj.melt:3624:/ initchunk"); @@ -34041,36 +34059,36 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_7 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V551*/ meltfptr[550])) == + ( /*_._VALROUT___V554*/ meltfptr[553])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V264*/ meltfptr[263]); - ((meltroutine_ptr_t) /*_._VALROUT___V551*/ meltfptr[550])->tabval[2] = - (melt_ptr_t) ( /*_._VALCLO___V264*/ meltfptr[263]); + NULL != /*_._VALCLO___V265*/ meltfptr[264]); + ((meltroutine_ptr_t) /*_._VALROUT___V554*/ meltfptr[553])->tabval[2] = + (melt_ptr_t) ( /*_._VALCLO___V265*/ meltfptr[264]); MELT_LOCATION ("warmelt-outobj.melt:3624:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V551*/ meltfptr[550])) == + ( /*_._VALROUT___V554*/ meltfptr[553])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V540*/ meltfptr[539]); - ((meltroutine_ptr_t) /*_._VALROUT___V551*/ meltfptr[550])->tabval[3] = - (melt_ptr_t) ( /*_._VALCLO___V540*/ meltfptr[539]); + NULL != /*_._VALCLO___V543*/ meltfptr[542]); + ((meltroutine_ptr_t) /*_._VALROUT___V554*/ meltfptr[553])->tabval[3] = + (melt_ptr_t) ( /*_._VALCLO___V543*/ meltfptr[542]); MELT_LOCATION ("warmelt-outobj.melt:3624:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V551*/ meltfptr[550])) == + ( /*_._VALROUT___V554*/ meltfptr[553])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALDATA___V197*/ meltfptr[196]); - ((meltroutine_ptr_t) /*_._VALROUT___V551*/ meltfptr[550])->tabval[4] = - (melt_ptr_t) ( /*_._VALDATA___V197*/ meltfptr[196]); + NULL != /*_._VALDATA___V198*/ meltfptr[197]); + ((meltroutine_ptr_t) /*_._VALROUT___V554*/ meltfptr[553])->tabval[4] = + (melt_ptr_t) ( /*_._VALDATA___V198*/ meltfptr[197]); MELT_LOCATION ("warmelt-outobj.melt:3624:/ initchunk"); /*^putroutconst */ @@ -34078,55 +34096,55 @@ meltmod__WARMELTmiOUTOBJ__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___V554*/ meltfptr[553])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_361__OUTPUCOD_OBJAGAIN#5", + melt_checkmsg ("putroutconst constnull.drout_363__OUTPUCOD_OBJAGAIN#5", NULL != ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5])); - ((meltroutine_ptr_t) /*_._VALROUT___V551*/ meltfptr[550])->tabval[5] = + ((meltroutine_ptr_t) /*_._VALROUT___V554*/ meltfptr[553])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5]); MELT_LOCATION ("warmelt-outobj.melt:3624:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V551*/ meltfptr[550]); + meltgc_touch ( /*_._VALROUT___V554*/ meltfptr[553]); /*putclosurout#74 */ melt_assertmsg ("putclosrout#74 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V552*/ meltfptr[551])) == + ( /*_._VALCLO___V555*/ meltfptr[554])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#74 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V551*/ meltfptr[550])) == + ( /*_._VALROUT___V554*/ meltfptr[553])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V552*/ meltfptr[551])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V551*/ meltfptr[550]); + ((meltclosure_ptr_t) /*_._VALCLO___V555*/ meltfptr[554])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V554*/ meltfptr[553]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V552*/ meltfptr[551]); + meltgc_touch ( /*_._VALCLO___V555*/ meltfptr[554]); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_363__CLASS_OBJAGAIN @#1", + melt_assertmsg ("checkobj putslot ~dsym_365__CLASS_OBJAGAIN @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V553*/ meltfptr[552])) == + ( /*_._VALDATA___V556*/ meltfptr[555])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_363__CLASS_OBJAGAIN @#1", + melt_assertmsg ("checkoff putslot ~dsym_365__CLASS_OBJAGAIN @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V553*/ - meltfptr[552])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V553*/ meltfptr[552]))->obj_vartab[1] = + ( /*_._VALDATA___V556*/ + meltfptr[555])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V556*/ meltfptr[555]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V554*/ meltfptr[553]); + /*_._VALSTR___V557*/ meltfptr[556]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V553*/ meltfptr[552]); + meltgc_touch ( /*_._VALDATA___V556*/ meltfptr[555]); - melt_dbgtrace_written_object ( /*_._VALDATA___V553*/ meltfptr[552], + melt_dbgtrace_written_object ( /*_._VALDATA___V556*/ meltfptr[555], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:3643:/ initchunk"); @@ -34135,13 +34153,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_7 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V555*/ meltfptr[554])) + ( /*_._VALROUT___V558*/ meltfptr[557])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_365__OUTPUCOD_OBJCOMPUTE#0", - NULL != ( /*_.CLASS_OBJCOMPUTE__V99*/ meltfptr[98])); - ((meltroutine_ptr_t) /*_._VALROUT___V555*/ meltfptr[554])->tabval[0] = - (melt_ptr_t) ( /*_.CLASS_OBJCOMPUTE__V99*/ meltfptr[98]); + melt_checkmsg ("putroutconst constnull.drout_367__OUTPUCOD_OBJCOMPUTE#0", + NULL != ( /*_.CLASS_OBJCOMPUTE__V100*/ meltfptr[99])); + ((meltroutine_ptr_t) /*_._VALROUT___V558*/ meltfptr[557])->tabval[0] = + (melt_ptr_t) ( /*_.CLASS_OBJCOMPUTE__V100*/ meltfptr[99]); MELT_LOCATION ("warmelt-outobj.melt:3643:/ initchunk"); /*^putroutconst */ @@ -34149,12 +34167,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_7 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V555*/ meltfptr[554])) + ( /*_._VALROUT___V558*/ meltfptr[557])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_365__OUTPUCOD_OBJCOMPUTE#1", + melt_checkmsg ("putroutconst constnull.drout_367__OUTPUCOD_OBJCOMPUTE#1", NULL != ( /*_.DISCR_INTEGER__V52*/ meltfptr[51])); - ((meltroutine_ptr_t) /*_._VALROUT___V555*/ meltfptr[554])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V558*/ meltfptr[557])->tabval[1] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V52*/ meltfptr[51]); MELT_LOCATION ("warmelt-outobj.melt:3643:/ initchunk"); @@ -34162,12 +34180,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_7 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V555*/ meltfptr[554])) == + ( /*_._VALROUT___V558*/ meltfptr[557])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V264*/ meltfptr[263]); - ((meltroutine_ptr_t) /*_._VALROUT___V555*/ meltfptr[554])->tabval[2] = - (melt_ptr_t) ( /*_._VALCLO___V264*/ meltfptr[263]); + NULL != /*_._VALCLO___V265*/ meltfptr[264]); + ((meltroutine_ptr_t) /*_._VALROUT___V558*/ meltfptr[557])->tabval[2] = + (melt_ptr_t) ( /*_._VALCLO___V265*/ meltfptr[264]); MELT_LOCATION ("warmelt-outobj.melt:3643:/ initchunk"); /*^putroutconst */ @@ -34175,12 +34193,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_7 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V555*/ meltfptr[554])) + ( /*_._VALROUT___V558*/ meltfptr[557])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_365__OUTPUCOD_OBJCOMPUTE#3", + melt_checkmsg ("putroutconst constnull.drout_367__OUTPUCOD_OBJCOMPUTE#3", NULL != ( /*_.LIST_EVERY__V56*/ meltfptr[55])); - ((meltroutine_ptr_t) /*_._VALROUT___V555*/ meltfptr[554])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V558*/ meltfptr[557])->tabval[3] = (melt_ptr_t) ( /*_.LIST_EVERY__V56*/ meltfptr[55]); MELT_LOCATION ("warmelt-outobj.melt:3643:/ initchunk"); @@ -34189,12 +34207,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_7 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V555*/ meltfptr[554])) + ( /*_._VALROUT___V558*/ meltfptr[557])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_365__OUTPUCOD_OBJCOMPUTE#4", + melt_checkmsg ("putroutconst constnull.drout_367__OUTPUCOD_OBJCOMPUTE#4", NULL != ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19])); - ((meltroutine_ptr_t) /*_._VALROUT___V555*/ meltfptr[554])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V558*/ meltfptr[557])->tabval[4] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]); MELT_LOCATION ("warmelt-outobj.melt:3654:/ initchunk"); @@ -34203,18 +34221,18 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_7 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V556*/ meltfptr[555])) + ( /*_._VALROUT___V559*/ meltfptr[558])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_369__LAMBDA_#0", + melt_checkmsg ("putroutconst constnull.drout_371__LAMBDA_#0", NULL != ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19])); - ((meltroutine_ptr_t) /*_._VALROUT___V556*/ meltfptr[555])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V559*/ meltfptr[558])->tabval[0] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]); MELT_LOCATION ("warmelt-outobj.melt:3654:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V556*/ meltfptr[555]); + meltgc_touch ( /*_._VALROUT___V559*/ meltfptr[558]); MELT_LOCATION ("warmelt-outobj.melt:3643:/ initchunk"); /*^putroutconst */ @@ -34222,13 +34240,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_7 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V555*/ meltfptr[554])) + ( /*_._VALROUT___V558*/ meltfptr[557])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_365__OUTPUCOD_OBJCOMPUTE#5", - NULL != ( /*_._VALROUT___V556*/ meltfptr[555])); - ((meltroutine_ptr_t) /*_._VALROUT___V555*/ meltfptr[554])->tabval[5] = - (melt_ptr_t) ( /*_._VALROUT___V556*/ meltfptr[555]); + melt_checkmsg ("putroutconst constnull.drout_367__OUTPUCOD_OBJCOMPUTE#5", + NULL != ( /*_._VALROUT___V559*/ meltfptr[558])); + ((meltroutine_ptr_t) /*_._VALROUT___V558*/ meltfptr[557])->tabval[5] = + (melt_ptr_t) ( /*_._VALROUT___V559*/ meltfptr[558]); MELT_LOCATION ("warmelt-outobj.melt:3643:/ initchunk"); /*^putroutconst */ @@ -34236,12 +34254,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_7 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V555*/ meltfptr[554])) + ( /*_._VALROUT___V558*/ meltfptr[557])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_365__OUTPUCOD_OBJCOMPUTE#6", + melt_checkmsg ("putroutconst constnull.drout_367__OUTPUCOD_OBJCOMPUTE#6", NULL != ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19])); - ((meltroutine_ptr_t) /*_._VALROUT___V555*/ meltfptr[554])->tabval[6] = + ((meltroutine_ptr_t) /*_._VALROUT___V558*/ meltfptr[557])->tabval[6] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]); MELT_LOCATION ("warmelt-outobj.melt:3643:/ initchunk"); @@ -34249,12 +34267,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_7 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V555*/ meltfptr[554])) == + ( /*_._VALROUT___V558*/ meltfptr[557])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALDATA___V197*/ meltfptr[196]); - ((meltroutine_ptr_t) /*_._VALROUT___V555*/ meltfptr[554])->tabval[7] = - (melt_ptr_t) ( /*_._VALDATA___V197*/ meltfptr[196]); + NULL != /*_._VALDATA___V198*/ meltfptr[197]); + ((meltroutine_ptr_t) /*_._VALROUT___V558*/ meltfptr[557])->tabval[7] = + (melt_ptr_t) ( /*_._VALDATA___V198*/ meltfptr[197]); MELT_LOCATION ("warmelt-outobj.melt:3643:/ initchunk"); /*^putroutconst */ @@ -34262,12 +34280,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_7 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V555*/ meltfptr[554])) + ( /*_._VALROUT___V558*/ meltfptr[557])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_365__OUTPUCOD_OBJCOMPUTE#8", + melt_checkmsg ("putroutconst constnull.drout_367__OUTPUCOD_OBJCOMPUTE#8", NULL != ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5])); - ((meltroutine_ptr_t) /*_._VALROUT___V555*/ meltfptr[554])->tabval[8] = + ((meltroutine_ptr_t) /*_._VALROUT___V558*/ meltfptr[557])->tabval[8] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5]); MELT_LOCATION ("warmelt-outobj.melt:3663:/ initchunk"); @@ -34276,12 +34294,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_7 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V557*/ meltfptr[556])) + ( /*_._VALROUT___V560*/ meltfptr[559])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_370__LAMBDA_#0", + melt_checkmsg ("putroutconst constnull.drout_372__LAMBDA_#0", NULL != ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19])); - ((meltroutine_ptr_t) /*_._VALROUT___V557*/ meltfptr[556])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V560*/ meltfptr[559])->tabval[0] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]); MELT_LOCATION ("warmelt-outobj.melt:3663:/ initchunk"); @@ -34289,12 +34307,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_7 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V557*/ meltfptr[556])) == + ( /*_._VALROUT___V560*/ meltfptr[559])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALDATA___V197*/ meltfptr[196]); - ((meltroutine_ptr_t) /*_._VALROUT___V557*/ meltfptr[556])->tabval[1] = - (melt_ptr_t) ( /*_._VALDATA___V197*/ meltfptr[196]); + NULL != /*_._VALDATA___V198*/ meltfptr[197]); + ((meltroutine_ptr_t) /*_._VALROUT___V560*/ meltfptr[559])->tabval[1] = + (melt_ptr_t) ( /*_._VALDATA___V198*/ meltfptr[197]); MELT_LOCATION ("warmelt-outobj.melt:3663:/ initchunk"); /*^putroutconst */ @@ -34302,18 +34320,18 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_7 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V557*/ meltfptr[556])) + ( /*_._VALROUT___V560*/ meltfptr[559])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_370__LAMBDA_#2", + melt_checkmsg ("putroutconst constnull.drout_372__LAMBDA_#2", NULL != ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5])); - ((meltroutine_ptr_t) /*_._VALROUT___V557*/ meltfptr[556])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V560*/ meltfptr[559])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5]); MELT_LOCATION ("warmelt-outobj.melt:3663:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V557*/ meltfptr[556]); + meltgc_touch ( /*_._VALROUT___V560*/ meltfptr[559]); MELT_LOCATION ("warmelt-outobj.melt:3643:/ initchunk"); /*^putroutconst */ @@ -34321,13 +34339,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_7 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V555*/ meltfptr[554])) + ( /*_._VALROUT___V558*/ meltfptr[557])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_365__OUTPUCOD_OBJCOMPUTE#9", - NULL != ( /*_._VALROUT___V557*/ meltfptr[556])); - ((meltroutine_ptr_t) /*_._VALROUT___V555*/ meltfptr[554])->tabval[9] = - (melt_ptr_t) ( /*_._VALROUT___V557*/ meltfptr[556]); + melt_checkmsg ("putroutconst constnull.drout_367__OUTPUCOD_OBJCOMPUTE#9", + NULL != ( /*_._VALROUT___V560*/ meltfptr[559])); + ((meltroutine_ptr_t) /*_._VALROUT___V558*/ meltfptr[557])->tabval[9] = + (melt_ptr_t) ( /*_._VALROUT___V560*/ meltfptr[559]); MELT_LOCATION ("warmelt-outobj.melt:3643:/ initchunk"); /*^putroutconst */ @@ -34335,13 +34353,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_7 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V555*/ meltfptr[554])) + ( /*_._VALROUT___V558*/ meltfptr[557])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_365__OUTPUCOD_OBJCOMPUTE#10", - NULL != ( /*_.MULTIPLE_EVERY__V100*/ meltfptr[99])); - ((meltroutine_ptr_t) /*_._VALROUT___V555*/ meltfptr[554])->tabval[10] = - (melt_ptr_t) ( /*_.MULTIPLE_EVERY__V100*/ meltfptr[99]); + melt_checkmsg ("putroutconst constnull.drout_367__OUTPUCOD_OBJCOMPUTE#10", + NULL != ( /*_.MULTIPLE_EVERY__V101*/ meltfptr[100])); + ((meltroutine_ptr_t) /*_._VALROUT___V558*/ meltfptr[557])->tabval[10] = + (melt_ptr_t) ( /*_.MULTIPLE_EVERY__V101*/ meltfptr[100]); MELT_LOCATION ("warmelt-outobj.melt:3643:/ initchunk"); /*^putroutconst */ @@ -34349,12 +34367,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_7 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V555*/ meltfptr[554])) + ( /*_._VALROUT___V558*/ meltfptr[557])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_365__OUTPUCOD_OBJCOMPUTE#11", + melt_checkmsg ("putroutconst constnull.drout_367__OUTPUCOD_OBJCOMPUTE#11", NULL != ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19])); - ((meltroutine_ptr_t) /*_._VALROUT___V555*/ meltfptr[554])->tabval[11] = + ((meltroutine_ptr_t) /*_._VALROUT___V558*/ meltfptr[557])->tabval[11] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]); MELT_LOCATION ("warmelt-outobj.melt:3643:/ initchunk"); @@ -34362,12 +34380,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_7 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V555*/ meltfptr[554])) == + ( /*_._VALROUT___V558*/ meltfptr[557])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALDATA___V197*/ meltfptr[196]); - ((meltroutine_ptr_t) /*_._VALROUT___V555*/ meltfptr[554])->tabval[12] = - (melt_ptr_t) ( /*_._VALDATA___V197*/ meltfptr[196]); + NULL != /*_._VALDATA___V198*/ meltfptr[197]); + ((meltroutine_ptr_t) /*_._VALROUT___V558*/ meltfptr[557])->tabval[12] = + (melt_ptr_t) ( /*_._VALDATA___V198*/ meltfptr[197]); MELT_LOCATION ("warmelt-outobj.melt:3643:/ initchunk"); /*^putroutconst */ @@ -34375,12 +34393,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_7 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V555*/ meltfptr[554])) + ( /*_._VALROUT___V558*/ meltfptr[557])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_365__OUTPUCOD_OBJCOMPUTE#13", + melt_checkmsg ("putroutconst constnull.drout_367__OUTPUCOD_OBJCOMPUTE#13", NULL != ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5])); - ((meltroutine_ptr_t) /*_._VALROUT___V555*/ meltfptr[554])->tabval[13] = + ((meltroutine_ptr_t) /*_._VALROUT___V558*/ meltfptr[557])->tabval[13] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5]); MELT_LOCATION ("warmelt-outobj.melt:3673:/ initchunk"); @@ -34389,12 +34407,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_7 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V558*/ meltfptr[557])) + ( /*_._VALROUT___V561*/ meltfptr[560])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_373__LAMBDA_#0", + melt_checkmsg ("putroutconst constnull.drout_375__LAMBDA_#0", NULL != ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19])); - ((meltroutine_ptr_t) /*_._VALROUT___V558*/ meltfptr[557])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V561*/ meltfptr[560])->tabval[0] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]); MELT_LOCATION ("warmelt-outobj.melt:3673:/ initchunk"); @@ -34402,12 +34420,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_7 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V558*/ meltfptr[557])) == + ( /*_._VALROUT___V561*/ meltfptr[560])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALDATA___V197*/ meltfptr[196]); - ((meltroutine_ptr_t) /*_._VALROUT___V558*/ meltfptr[557])->tabval[1] = - (melt_ptr_t) ( /*_._VALDATA___V197*/ meltfptr[196]); + NULL != /*_._VALDATA___V198*/ meltfptr[197]); + ((meltroutine_ptr_t) /*_._VALROUT___V561*/ meltfptr[560])->tabval[1] = + (melt_ptr_t) ( /*_._VALDATA___V198*/ meltfptr[197]); MELT_LOCATION ("warmelt-outobj.melt:3673:/ initchunk"); /*^putroutconst */ @@ -34415,18 +34433,18 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_7 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V558*/ meltfptr[557])) + ( /*_._VALROUT___V561*/ meltfptr[560])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_373__LAMBDA_#2", + melt_checkmsg ("putroutconst constnull.drout_375__LAMBDA_#2", NULL != ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5])); - ((meltroutine_ptr_t) /*_._VALROUT___V558*/ meltfptr[557])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V561*/ meltfptr[560])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5]); MELT_LOCATION ("warmelt-outobj.melt:3673:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V558*/ meltfptr[557]); + meltgc_touch ( /*_._VALROUT___V561*/ meltfptr[560]); MELT_LOCATION ("warmelt-outobj.melt:3643:/ initchunk"); /*^putroutconst */ @@ -34434,13 +34452,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_7 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V555*/ meltfptr[554])) + ( /*_._VALROUT___V558*/ meltfptr[557])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_365__OUTPUCOD_OBJCOMPUTE#14", - NULL != ( /*_._VALROUT___V558*/ meltfptr[557])); - ((meltroutine_ptr_t) /*_._VALROUT___V555*/ meltfptr[554])->tabval[14] = - (melt_ptr_t) ( /*_._VALROUT___V558*/ meltfptr[557]); + melt_checkmsg ("putroutconst constnull.drout_367__OUTPUCOD_OBJCOMPUTE#14", + NULL != ( /*_._VALROUT___V561*/ meltfptr[560])); + ((meltroutine_ptr_t) /*_._VALROUT___V558*/ meltfptr[557])->tabval[14] = + (melt_ptr_t) ( /*_._VALROUT___V561*/ meltfptr[560]); MELT_LOCATION ("warmelt-outobj.melt:3643:/ initchunk"); /*^putroutconst */ @@ -34448,12 +34466,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_7 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V555*/ meltfptr[554])) + ( /*_._VALROUT___V558*/ meltfptr[557])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_365__OUTPUCOD_OBJCOMPUTE#15", + melt_checkmsg ("putroutconst constnull.drout_367__OUTPUCOD_OBJCOMPUTE#15", NULL != ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19])); - ((meltroutine_ptr_t) /*_._VALROUT___V555*/ meltfptr[554])->tabval[15] = + ((meltroutine_ptr_t) /*_._VALROUT___V558*/ meltfptr[557])->tabval[15] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]); MELT_LOCATION ("warmelt-outobj.melt:3643:/ initchunk"); @@ -34461,12 +34479,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_7 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V555*/ meltfptr[554])) == + ( /*_._VALROUT___V558*/ meltfptr[557])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALDATA___V197*/ meltfptr[196]); - ((meltroutine_ptr_t) /*_._VALROUT___V555*/ meltfptr[554])->tabval[16] = - (melt_ptr_t) ( /*_._VALDATA___V197*/ meltfptr[196]); + NULL != /*_._VALDATA___V198*/ meltfptr[197]); + ((meltroutine_ptr_t) /*_._VALROUT___V558*/ meltfptr[557])->tabval[16] = + (melt_ptr_t) ( /*_._VALDATA___V198*/ meltfptr[197]); MELT_LOCATION ("warmelt-outobj.melt:3643:/ initchunk"); /*^putroutconst */ @@ -34474,78 +34492,78 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_7 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V555*/ meltfptr[554])) + ( /*_._VALROUT___V558*/ meltfptr[557])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_365__OUTPUCOD_OBJCOMPUTE#17", + melt_checkmsg ("putroutconst constnull.drout_367__OUTPUCOD_OBJCOMPUTE#17", NULL != ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5])); - ((meltroutine_ptr_t) /*_._VALROUT___V555*/ meltfptr[554])->tabval[17] = + ((meltroutine_ptr_t) /*_._VALROUT___V558*/ meltfptr[557])->tabval[17] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5]); MELT_LOCATION ("warmelt-outobj.melt:3643:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V555*/ meltfptr[554]); + meltgc_touch ( /*_._VALROUT___V558*/ meltfptr[557]); /*putclosurout#75 */ melt_assertmsg ("putclosrout#75 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V559*/ meltfptr[558])) == + ( /*_._VALCLO___V562*/ meltfptr[561])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#75 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V555*/ meltfptr[554])) == + ( /*_._VALROUT___V558*/ meltfptr[557])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V559*/ meltfptr[558])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V555*/ meltfptr[554]); + ((meltclosure_ptr_t) /*_._VALCLO___V562*/ meltfptr[561])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V558*/ meltfptr[557]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V559*/ meltfptr[558]); + meltgc_touch ( /*_._VALCLO___V562*/ meltfptr[561]); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_367__CLASS_OBJCOMPUTE @#1", + melt_assertmsg ("checkobj putslot ~dsym_369__CLASS_OBJCOMPUTE @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V560*/ meltfptr[559])) == + ( /*_._VALDATA___V563*/ meltfptr[562])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_367__CLASS_OBJCOMPUTE @#1", + melt_assertmsg ("checkoff putslot ~dsym_369__CLASS_OBJCOMPUTE @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V560*/ - meltfptr[559])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V560*/ meltfptr[559]))->obj_vartab[1] = + ( /*_._VALDATA___V563*/ + meltfptr[562])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V563*/ meltfptr[562]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V561*/ meltfptr[560]); + /*_._VALSTR___V564*/ meltfptr[563]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V560*/ meltfptr[559]); + meltgc_touch ( /*_._VALDATA___V563*/ meltfptr[562]); - melt_dbgtrace_written_object ( /*_._VALDATA___V560*/ meltfptr[559], + melt_dbgtrace_written_object ( /*_._VALDATA___V563*/ meltfptr[562], "new static instance"); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_371__MULTIPLE_EVERY @#1", + melt_assertmsg ("checkobj putslot ~dsym_373__MULTIPLE_EVERY @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V562*/ meltfptr[561])) == + ( /*_._VALDATA___V565*/ meltfptr[564])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_371__MULTIPLE_EVERY @#1", + melt_assertmsg ("checkoff putslot ~dsym_373__MULTIPLE_EVERY @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V562*/ - meltfptr[561])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V562*/ meltfptr[561]))->obj_vartab[1] = + ( /*_._VALDATA___V565*/ + meltfptr[564])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V565*/ meltfptr[564]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V563*/ meltfptr[562]); + /*_._VALSTR___V566*/ meltfptr[565]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V562*/ meltfptr[561]); + meltgc_touch ( /*_._VALDATA___V565*/ meltfptr[564]); - melt_dbgtrace_written_object ( /*_._VALDATA___V562*/ meltfptr[561], + melt_dbgtrace_written_object ( /*_._VALDATA___V565*/ meltfptr[564], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:3689:/ initchunk"); @@ -34554,38 +34572,51 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_7 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V564*/ meltfptr[563])) + ( /*_._VALROUT___V567*/ meltfptr[566])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_374__OUTPUCOD_OBJCOND#0", - NULL != ( /*_.CLASS_OBJCOND__V101*/ meltfptr[100])); - ((meltroutine_ptr_t) /*_._VALROUT___V564*/ meltfptr[563])->tabval[0] = - (melt_ptr_t) ( /*_.CLASS_OBJCOND__V101*/ meltfptr[100]); + melt_checkmsg ("putroutconst constnull.drout_376__OUTPUCOD_OBJCOND#0", + NULL != ( /*_.CLASS_OBJCOND__V102*/ meltfptr[101])); + ((meltroutine_ptr_t) /*_._VALROUT___V567*/ meltfptr[566])->tabval[0] = + (melt_ptr_t) ( /*_.CLASS_OBJCOND__V102*/ meltfptr[101]); MELT_LOCATION ("warmelt-outobj.melt:3689:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V564*/ meltfptr[563])) == + ( /*_._VALROUT___V567*/ meltfptr[566])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V264*/ meltfptr[263]); - ((meltroutine_ptr_t) /*_._VALROUT___V564*/ meltfptr[563])->tabval[1] = - (melt_ptr_t) ( /*_._VALCLO___V264*/ meltfptr[263]); + NULL != /*_._VALCLO___V265*/ meltfptr[264]); + ((meltroutine_ptr_t) /*_._VALROUT___V567*/ meltfptr[566])->tabval[1] = + (melt_ptr_t) ( /*_._VALCLO___V265*/ meltfptr[264]); + +#undef meltfram__ +} /*end of meltmod__WARMELTmiOUTOBJ__initialmeltchunk_7 */ + +void +meltmod__WARMELTmiOUTOBJ__initialmeltchunk_8 (meltinitial_frame_t * + meltmeltframptr__, + char meltpredefinited[]) +{ +#define meltfram__ (*meltmeltframptr__) +#undef meltcallcount +#define meltcallcount 0L + (void) meltpredefinited; MELT_LOCATION ("warmelt-outobj.melt:3689:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V564*/ meltfptr[563])) + ( /*_._VALROUT___V567*/ meltfptr[566])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_374__OUTPUCOD_OBJCOND#2", + melt_checkmsg ("putroutconst constnull.drout_376__OUTPUCOD_OBJCOND#2", NULL != ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19])); - ((meltroutine_ptr_t) /*_._VALROUT___V564*/ meltfptr[563])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V567*/ meltfptr[566])->tabval[2] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]); MELT_LOCATION ("warmelt-outobj.melt:3689:/ initchunk"); @@ -34594,12 +34625,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_7 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V564*/ meltfptr[563])) + ( /*_._VALROUT___V567*/ meltfptr[566])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_374__OUTPUCOD_OBJCOND#3", + melt_checkmsg ("putroutconst constnull.drout_376__OUTPUCOD_OBJCOND#3", NULL != ( /*_.CLASS_OBJPUREVALUE__V63*/ meltfptr[62])); - ((meltroutine_ptr_t) /*_._VALROUT___V564*/ meltfptr[563])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V567*/ meltfptr[566])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_OBJPUREVALUE__V63*/ meltfptr[62]); MELT_LOCATION ("warmelt-outobj.melt:3689:/ initchunk"); @@ -34607,81 +34638,68 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_7 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V564*/ meltfptr[563])) == + ( /*_._VALROUT___V567*/ meltfptr[566])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALDATA___V197*/ meltfptr[196]); - ((meltroutine_ptr_t) /*_._VALROUT___V564*/ meltfptr[563])->tabval[4] = - (melt_ptr_t) ( /*_._VALDATA___V197*/ meltfptr[196]); - + NULL != /*_._VALDATA___V198*/ meltfptr[197]); + ((meltroutine_ptr_t) /*_._VALROUT___V567*/ meltfptr[566])->tabval[4] = + (melt_ptr_t) ( /*_._VALDATA___V198*/ meltfptr[197]); -#undef meltfram__ -} /*end of meltmod__WARMELTmiOUTOBJ__initialmeltchunk_7 */ - -void -meltmod__WARMELTmiOUTOBJ__initialmeltchunk_8 (meltinitial_frame_t * - meltmeltframptr__, - char meltpredefinited[]) -{ -#define meltfram__ (*meltmeltframptr__) -#undef meltcallcount -#define meltcallcount 0L - (void) meltpredefinited; MELT_LOCATION ("warmelt-outobj.melt:3689:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V564*/ meltfptr[563])) + ( /*_._VALROUT___V567*/ meltfptr[566])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_374__OUTPUCOD_OBJCOND#5", + melt_checkmsg ("putroutconst constnull.drout_376__OUTPUCOD_OBJCOND#5", NULL != ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5])); - ((meltroutine_ptr_t) /*_._VALROUT___V564*/ meltfptr[563])->tabval[5] = + ((meltroutine_ptr_t) /*_._VALROUT___V567*/ meltfptr[566])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5]); MELT_LOCATION ("warmelt-outobj.melt:3689:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V564*/ meltfptr[563]); + meltgc_touch ( /*_._VALROUT___V567*/ meltfptr[566]); /*putclosurout#76 */ melt_assertmsg ("putclosrout#76 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V565*/ meltfptr[564])) == + ( /*_._VALCLO___V568*/ meltfptr[567])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#76 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V564*/ meltfptr[563])) == + ( /*_._VALROUT___V567*/ meltfptr[566])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V565*/ meltfptr[564])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V564*/ meltfptr[563]); + ((meltclosure_ptr_t) /*_._VALCLO___V568*/ meltfptr[567])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V567*/ meltfptr[566]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V565*/ meltfptr[564]); + meltgc_touch ( /*_._VALCLO___V568*/ meltfptr[567]); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_376__CLASS_OBJCOND @#1", + melt_assertmsg ("checkobj putslot ~dsym_378__CLASS_OBJCOND @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V566*/ meltfptr[565])) == + ( /*_._VALDATA___V569*/ meltfptr[568])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_376__CLASS_OBJCOND @#1", + melt_assertmsg ("checkoff putslot ~dsym_378__CLASS_OBJCOND @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V566*/ - meltfptr[565])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V566*/ meltfptr[565]))->obj_vartab[1] = + ( /*_._VALDATA___V569*/ + meltfptr[568])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V569*/ meltfptr[568]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V567*/ meltfptr[566]); + /*_._VALSTR___V570*/ meltfptr[569]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V566*/ meltfptr[565]); + meltgc_touch ( /*_._VALDATA___V569*/ meltfptr[568]); - melt_dbgtrace_written_object ( /*_._VALDATA___V566*/ meltfptr[565], + melt_dbgtrace_written_object ( /*_._VALDATA___V569*/ meltfptr[568], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:3731:/ initchunk"); @@ -34690,37 +34708,37 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_8 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V568*/ meltfptr[567])) + ( /*_._VALROUT___V571*/ meltfptr[570])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_378__OUTPUCOD_OBJCPPIF#0", - NULL != ( /*_.CLASS_OBJCPPIF__V102*/ meltfptr[101])); - ((meltroutine_ptr_t) /*_._VALROUT___V568*/ meltfptr[567])->tabval[0] = - (melt_ptr_t) ( /*_.CLASS_OBJCPPIF__V102*/ meltfptr[101]); + melt_checkmsg ("putroutconst constnull.drout_380__OUTPUCOD_OBJCPPIF#0", + NULL != ( /*_.CLASS_OBJCPPIF__V103*/ meltfptr[102])); + ((meltroutine_ptr_t) /*_._VALROUT___V571*/ meltfptr[570])->tabval[0] = + (melt_ptr_t) ( /*_.CLASS_OBJCPPIF__V103*/ meltfptr[102]); MELT_LOCATION ("warmelt-outobj.melt:3731:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V568*/ meltfptr[567])) == + ( /*_._VALROUT___V571*/ meltfptr[570])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V268*/ meltfptr[267]); - ((meltroutine_ptr_t) /*_._VALROUT___V568*/ meltfptr[567])->tabval[1] = - (melt_ptr_t) ( /*_._VALCLO___V268*/ meltfptr[267]); + NULL != /*_._VALCLO___V269*/ meltfptr[268]); + ((meltroutine_ptr_t) /*_._VALROUT___V571*/ meltfptr[570])->tabval[1] = + (melt_ptr_t) ( /*_._VALCLO___V269*/ meltfptr[268]); MELT_LOCATION ("warmelt-outobj.melt:3731:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V568*/ meltfptr[567])) == + ( /*_._VALROUT___V571*/ meltfptr[570])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V264*/ meltfptr[263]); - ((meltroutine_ptr_t) /*_._VALROUT___V568*/ meltfptr[567])->tabval[2] = - (melt_ptr_t) ( /*_._VALCLO___V264*/ meltfptr[263]); + NULL != /*_._VALCLO___V265*/ meltfptr[264]); + ((meltroutine_ptr_t) /*_._VALROUT___V571*/ meltfptr[570])->tabval[2] = + (melt_ptr_t) ( /*_._VALCLO___V265*/ meltfptr[264]); MELT_LOCATION ("warmelt-outobj.melt:3731:/ initchunk"); /*^putroutconst */ @@ -34728,12 +34746,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_8 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V568*/ meltfptr[567])) + ( /*_._VALROUT___V571*/ meltfptr[570])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_378__OUTPUCOD_OBJCPPIF#3", + melt_checkmsg ("putroutconst constnull.drout_380__OUTPUCOD_OBJCPPIF#3", NULL != ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19])); - ((meltroutine_ptr_t) /*_._VALROUT___V568*/ meltfptr[567])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V571*/ meltfptr[570])->tabval[3] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]); MELT_LOCATION ("warmelt-outobj.melt:3731:/ initchunk"); @@ -34741,12 +34759,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_8 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V568*/ meltfptr[567])) == + ( /*_._VALROUT___V571*/ meltfptr[570])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALDATA___V197*/ meltfptr[196]); - ((meltroutine_ptr_t) /*_._VALROUT___V568*/ meltfptr[567])->tabval[4] = - (melt_ptr_t) ( /*_._VALDATA___V197*/ meltfptr[196]); + NULL != /*_._VALDATA___V198*/ meltfptr[197]); + ((meltroutine_ptr_t) /*_._VALROUT___V571*/ meltfptr[570])->tabval[4] = + (melt_ptr_t) ( /*_._VALDATA___V198*/ meltfptr[197]); MELT_LOCATION ("warmelt-outobj.melt:3731:/ initchunk"); /*^putroutconst */ @@ -34754,55 +34772,55 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_8 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V568*/ meltfptr[567])) + ( /*_._VALROUT___V571*/ meltfptr[570])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_378__OUTPUCOD_OBJCPPIF#5", + melt_checkmsg ("putroutconst constnull.drout_380__OUTPUCOD_OBJCPPIF#5", NULL != ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5])); - ((meltroutine_ptr_t) /*_._VALROUT___V568*/ meltfptr[567])->tabval[5] = + ((meltroutine_ptr_t) /*_._VALROUT___V571*/ meltfptr[570])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5]); MELT_LOCATION ("warmelt-outobj.melt:3731:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V568*/ meltfptr[567]); + meltgc_touch ( /*_._VALROUT___V571*/ meltfptr[570]); /*putclosurout#77 */ melt_assertmsg ("putclosrout#77 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V569*/ meltfptr[568])) == + ( /*_._VALCLO___V572*/ meltfptr[571])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#77 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V568*/ meltfptr[567])) == + ( /*_._VALROUT___V571*/ meltfptr[570])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V569*/ meltfptr[568])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V568*/ meltfptr[567]); + ((meltclosure_ptr_t) /*_._VALCLO___V572*/ meltfptr[571])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V571*/ meltfptr[570]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V569*/ meltfptr[568]); + meltgc_touch ( /*_._VALCLO___V572*/ meltfptr[571]); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_380__CLASS_OBJCPPIF @#1", + melt_assertmsg ("checkobj putslot ~dsym_382__CLASS_OBJCPPIF @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V570*/ meltfptr[569])) == + ( /*_._VALDATA___V573*/ meltfptr[572])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_380__CLASS_OBJCPPIF @#1", + melt_assertmsg ("checkoff putslot ~dsym_382__CLASS_OBJCPPIF @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V570*/ - meltfptr[569])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V570*/ meltfptr[569]))->obj_vartab[1] = + ( /*_._VALDATA___V573*/ + meltfptr[572])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V573*/ meltfptr[572]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V571*/ meltfptr[570]); + /*_._VALSTR___V574*/ meltfptr[573]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V570*/ meltfptr[569]); + meltgc_touch ( /*_._VALDATA___V573*/ meltfptr[572]); - melt_dbgtrace_written_object ( /*_._VALDATA___V570*/ meltfptr[569], + melt_dbgtrace_written_object ( /*_._VALDATA___V573*/ meltfptr[572], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:3764:/ initchunk"); @@ -34811,14 +34829,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_8 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V572*/ meltfptr[571])) + ( /*_._VALROUT___V575*/ meltfptr[574])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_382__OUTPUCOD_OBJINTERNSYMBOL#0", - NULL != ( /*_.CLASS_OBJINTERNSYMBOL__V103*/ meltfptr[102])); - ((meltroutine_ptr_t) /*_._VALROUT___V572*/ meltfptr[571])->tabval[0] = - (melt_ptr_t) ( /*_.CLASS_OBJINTERNSYMBOL__V103*/ meltfptr[102]); + ("putroutconst constnull.drout_384__OUTPUCOD_OBJINTERNSYMBOL#0", + NULL != ( /*_.CLASS_OBJINTERNSYMBOL__V104*/ meltfptr[103])); + ((meltroutine_ptr_t) /*_._VALROUT___V575*/ meltfptr[574])->tabval[0] = + (melt_ptr_t) ( /*_.CLASS_OBJINTERNSYMBOL__V104*/ meltfptr[103]); MELT_LOCATION ("warmelt-outobj.melt:3764:/ initchunk"); /*^putroutconst */ @@ -34826,13 +34844,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_8 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V572*/ meltfptr[571])) + ( /*_._VALROUT___V575*/ meltfptr[574])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_382__OUTPUCOD_OBJINTERNSYMBOL#1", + ("putroutconst constnull.drout_384__OUTPUCOD_OBJINTERNSYMBOL#1", NULL != ( /*_.CLASS_OBJINITOBJECT__V32*/ meltfptr[31])); - ((meltroutine_ptr_t) /*_._VALROUT___V572*/ meltfptr[571])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V575*/ meltfptr[574])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_OBJINITOBJECT__V32*/ meltfptr[31]); MELT_LOCATION ("warmelt-outobj.melt:3764:/ initchunk"); @@ -34841,26 +34859,26 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_8 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V572*/ meltfptr[571])) + ( /*_._VALROUT___V575*/ meltfptr[574])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_382__OUTPUCOD_OBJINTERNSYMBOL#2", - NULL != ( /*_.CLASS_NREP_DATASYMBOL__V104*/ meltfptr[103])); - ((meltroutine_ptr_t) /*_._VALROUT___V572*/ meltfptr[571])->tabval[2] = - (melt_ptr_t) ( /*_.CLASS_NREP_DATASYMBOL__V104*/ meltfptr[103]); + ("putroutconst constnull.drout_384__OUTPUCOD_OBJINTERNSYMBOL#2", + NULL != ( /*_.CLASS_NREP_DATASYMBOL__V105*/ meltfptr[104])); + ((meltroutine_ptr_t) /*_._VALROUT___V575*/ meltfptr[574])->tabval[2] = + (melt_ptr_t) ( /*_.CLASS_NREP_DATASYMBOL__V105*/ meltfptr[104]); MELT_LOCATION ("warmelt-outobj.melt:3764:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V572*/ meltfptr[571])) == + ( /*_._VALROUT___V575*/ meltfptr[574])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V264*/ meltfptr[263]); - ((meltroutine_ptr_t) /*_._VALROUT___V572*/ meltfptr[571])->tabval[3] = - (melt_ptr_t) ( /*_._VALCLO___V264*/ meltfptr[263]); + NULL != /*_._VALCLO___V265*/ meltfptr[264]); + ((meltroutine_ptr_t) /*_._VALROUT___V575*/ meltfptr[574])->tabval[3] = + (melt_ptr_t) ( /*_._VALCLO___V265*/ meltfptr[264]); MELT_LOCATION ("warmelt-outobj.melt:3764:/ initchunk"); /*^putroutconst */ @@ -34868,13 +34886,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_8 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V572*/ meltfptr[571])) + ( /*_._VALROUT___V575*/ meltfptr[574])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_382__OUTPUCOD_OBJINTERNSYMBOL#4", + ("putroutconst constnull.drout_384__OUTPUCOD_OBJINTERNSYMBOL#4", NULL != ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19])); - ((meltroutine_ptr_t) /*_._VALROUT___V572*/ meltfptr[571])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V575*/ meltfptr[574])->tabval[4] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]); MELT_LOCATION ("warmelt-outobj.melt:3764:/ initchunk"); @@ -34882,12 +34900,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_8 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V572*/ meltfptr[571])) == + ( /*_._VALROUT___V575*/ meltfptr[574])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALDATA___V197*/ meltfptr[196]); - ((meltroutine_ptr_t) /*_._VALROUT___V572*/ meltfptr[571])->tabval[5] = - (melt_ptr_t) ( /*_._VALDATA___V197*/ meltfptr[196]); + NULL != /*_._VALDATA___V198*/ meltfptr[197]); + ((meltroutine_ptr_t) /*_._VALROUT___V575*/ meltfptr[574])->tabval[5] = + (melt_ptr_t) ( /*_._VALDATA___V198*/ meltfptr[197]); MELT_LOCATION ("warmelt-outobj.melt:3764:/ initchunk"); /*^putroutconst */ @@ -34895,79 +34913,79 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_8 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V572*/ meltfptr[571])) + ( /*_._VALROUT___V575*/ meltfptr[574])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_382__OUTPUCOD_OBJINTERNSYMBOL#6", + ("putroutconst constnull.drout_384__OUTPUCOD_OBJINTERNSYMBOL#6", NULL != ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5])); - ((meltroutine_ptr_t) /*_._VALROUT___V572*/ meltfptr[571])->tabval[6] = + ((meltroutine_ptr_t) /*_._VALROUT___V575*/ meltfptr[574])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5]); MELT_LOCATION ("warmelt-outobj.melt:3764:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V572*/ meltfptr[571]); + meltgc_touch ( /*_._VALROUT___V575*/ meltfptr[574]); /*putclosurout#78 */ melt_assertmsg ("putclosrout#78 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V573*/ meltfptr[572])) == + ( /*_._VALCLO___V576*/ meltfptr[575])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#78 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V572*/ meltfptr[571])) == + ( /*_._VALROUT___V575*/ meltfptr[574])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V573*/ meltfptr[572])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V572*/ meltfptr[571]); + ((meltclosure_ptr_t) /*_._VALCLO___V576*/ meltfptr[575])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V575*/ meltfptr[574]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V573*/ meltfptr[572]); + meltgc_touch ( /*_._VALCLO___V576*/ meltfptr[575]); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_384__CLASS_OBJINTERNSYMBOL @#1", + melt_assertmsg ("checkobj putslot ~dsym_386__CLASS_OBJINTERNSYMBOL @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V574*/ meltfptr[573])) == + ( /*_._VALDATA___V577*/ meltfptr[576])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_384__CLASS_OBJINTERNSYMBOL @#1", + melt_assertmsg ("checkoff putslot ~dsym_386__CLASS_OBJINTERNSYMBOL @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V574*/ - meltfptr[573])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V574*/ meltfptr[573]))->obj_vartab[1] = + ( /*_._VALDATA___V577*/ + meltfptr[576])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V577*/ meltfptr[576]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V575*/ meltfptr[574]); + /*_._VALSTR___V578*/ meltfptr[577]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V574*/ meltfptr[573]); + meltgc_touch ( /*_._VALDATA___V577*/ meltfptr[576]); - melt_dbgtrace_written_object ( /*_._VALDATA___V574*/ meltfptr[573], + melt_dbgtrace_written_object ( /*_._VALDATA___V577*/ meltfptr[576], "new static instance"); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_386__CLASS_NREP_DATASYMBOL @#1", + melt_assertmsg ("checkobj putslot ~dsym_388__CLASS_NREP_DATASYMBOL @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V576*/ meltfptr[575])) == + ( /*_._VALDATA___V579*/ meltfptr[578])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_386__CLASS_NREP_DATASYMBOL @#1", + melt_assertmsg ("checkoff putslot ~dsym_388__CLASS_NREP_DATASYMBOL @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V576*/ - meltfptr[575])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V576*/ meltfptr[575]))->obj_vartab[1] = + ( /*_._VALDATA___V579*/ + meltfptr[578])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V579*/ meltfptr[578]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V577*/ meltfptr[576]); + /*_._VALSTR___V580*/ meltfptr[579]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V576*/ meltfptr[575]); + meltgc_touch ( /*_._VALDATA___V579*/ meltfptr[578]); - melt_dbgtrace_written_object ( /*_._VALDATA___V576*/ meltfptr[575], + melt_dbgtrace_written_object ( /*_._VALDATA___V579*/ meltfptr[578], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:3789:/ initchunk"); @@ -34976,14 +34994,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_8 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V578*/ meltfptr[577])) + ( /*_._VALROUT___V581*/ meltfptr[580])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_388__OUTPUCOD_OBJINTERNKEYWORD#0", - NULL != ( /*_.CLASS_OBJINTERNKEYWORD__V105*/ meltfptr[104])); - ((meltroutine_ptr_t) /*_._VALROUT___V578*/ meltfptr[577])->tabval[0] = - (melt_ptr_t) ( /*_.CLASS_OBJINTERNKEYWORD__V105*/ meltfptr[104]); + ("putroutconst constnull.drout_390__OUTPUCOD_OBJINTERNKEYWORD#0", + NULL != ( /*_.CLASS_OBJINTERNKEYWORD__V106*/ meltfptr[105])); + ((meltroutine_ptr_t) /*_._VALROUT___V581*/ meltfptr[580])->tabval[0] = + (melt_ptr_t) ( /*_.CLASS_OBJINTERNKEYWORD__V106*/ meltfptr[105]); MELT_LOCATION ("warmelt-outobj.melt:3789:/ initchunk"); /*^putroutconst */ @@ -34991,26 +35009,26 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_8 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V578*/ meltfptr[577])) + ( /*_._VALROUT___V581*/ meltfptr[580])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_388__OUTPUCOD_OBJINTERNKEYWORD#1", - NULL != ( /*_.CLASS_NREP_DATAKEYWORD__V106*/ meltfptr[105])); - ((meltroutine_ptr_t) /*_._VALROUT___V578*/ meltfptr[577])->tabval[1] = - (melt_ptr_t) ( /*_.CLASS_NREP_DATAKEYWORD__V106*/ meltfptr[105]); + ("putroutconst constnull.drout_390__OUTPUCOD_OBJINTERNKEYWORD#1", + NULL != ( /*_.CLASS_NREP_DATAKEYWORD__V107*/ meltfptr[106])); + ((meltroutine_ptr_t) /*_._VALROUT___V581*/ meltfptr[580])->tabval[1] = + (melt_ptr_t) ( /*_.CLASS_NREP_DATAKEYWORD__V107*/ meltfptr[106]); MELT_LOCATION ("warmelt-outobj.melt:3789:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V578*/ meltfptr[577])) == + ( /*_._VALROUT___V581*/ meltfptr[580])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V264*/ meltfptr[263]); - ((meltroutine_ptr_t) /*_._VALROUT___V578*/ meltfptr[577])->tabval[2] = - (melt_ptr_t) ( /*_._VALCLO___V264*/ meltfptr[263]); + NULL != /*_._VALCLO___V265*/ meltfptr[264]); + ((meltroutine_ptr_t) /*_._VALROUT___V581*/ meltfptr[580])->tabval[2] = + (melt_ptr_t) ( /*_._VALCLO___V265*/ meltfptr[264]); MELT_LOCATION ("warmelt-outobj.melt:3789:/ initchunk"); /*^putroutconst */ @@ -35018,13 +35036,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_8 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V578*/ meltfptr[577])) + ( /*_._VALROUT___V581*/ meltfptr[580])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_388__OUTPUCOD_OBJINTERNKEYWORD#3", + ("putroutconst constnull.drout_390__OUTPUCOD_OBJINTERNKEYWORD#3", NULL != ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19])); - ((meltroutine_ptr_t) /*_._VALROUT___V578*/ meltfptr[577])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V581*/ meltfptr[580])->tabval[3] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]); MELT_LOCATION ("warmelt-outobj.melt:3789:/ initchunk"); @@ -35032,12 +35050,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_8 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V578*/ meltfptr[577])) == + ( /*_._VALROUT___V581*/ meltfptr[580])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALDATA___V197*/ meltfptr[196]); - ((meltroutine_ptr_t) /*_._VALROUT___V578*/ meltfptr[577])->tabval[4] = - (melt_ptr_t) ( /*_._VALDATA___V197*/ meltfptr[196]); + NULL != /*_._VALDATA___V198*/ meltfptr[197]); + ((meltroutine_ptr_t) /*_._VALROUT___V581*/ meltfptr[580])->tabval[4] = + (melt_ptr_t) ( /*_._VALDATA___V198*/ meltfptr[197]); MELT_LOCATION ("warmelt-outobj.melt:3789:/ initchunk"); /*^putroutconst */ @@ -35045,79 +35063,79 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_8 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V578*/ meltfptr[577])) + ( /*_._VALROUT___V581*/ meltfptr[580])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_388__OUTPUCOD_OBJINTERNKEYWORD#5", + ("putroutconst constnull.drout_390__OUTPUCOD_OBJINTERNKEYWORD#5", NULL != ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5])); - ((meltroutine_ptr_t) /*_._VALROUT___V578*/ meltfptr[577])->tabval[5] = + ((meltroutine_ptr_t) /*_._VALROUT___V581*/ meltfptr[580])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5]); MELT_LOCATION ("warmelt-outobj.melt:3789:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V578*/ meltfptr[577]); + meltgc_touch ( /*_._VALROUT___V581*/ meltfptr[580]); /*putclosurout#79 */ melt_assertmsg ("putclosrout#79 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V579*/ meltfptr[578])) == + ( /*_._VALCLO___V582*/ meltfptr[581])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#79 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V578*/ meltfptr[577])) == + ( /*_._VALROUT___V581*/ meltfptr[580])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V579*/ meltfptr[578])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V578*/ meltfptr[577]); + ((meltclosure_ptr_t) /*_._VALCLO___V582*/ meltfptr[581])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V581*/ meltfptr[580]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V579*/ meltfptr[578]); + meltgc_touch ( /*_._VALCLO___V582*/ meltfptr[581]); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_390__CLASS_OBJINTERNKEYWORD @#1", + melt_assertmsg ("checkobj putslot ~dsym_392__CLASS_OBJINTERNKEYWORD @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V580*/ meltfptr[579])) == + ( /*_._VALDATA___V583*/ meltfptr[582])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_390__CLASS_OBJINTERNKEYWORD @#1", + melt_assertmsg ("checkoff putslot ~dsym_392__CLASS_OBJINTERNKEYWORD @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V580*/ - meltfptr[579])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V580*/ meltfptr[579]))->obj_vartab[1] = + ( /*_._VALDATA___V583*/ + meltfptr[582])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V583*/ meltfptr[582]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V581*/ meltfptr[580]); + /*_._VALSTR___V584*/ meltfptr[583]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V580*/ meltfptr[579]); + meltgc_touch ( /*_._VALDATA___V583*/ meltfptr[582]); - melt_dbgtrace_written_object ( /*_._VALDATA___V580*/ meltfptr[579], + melt_dbgtrace_written_object ( /*_._VALDATA___V583*/ meltfptr[582], "new static instance"); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_392__CLASS_NREP_DATAKEYWORD @#1", + melt_assertmsg ("checkobj putslot ~dsym_394__CLASS_NREP_DATAKEYWORD @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V582*/ meltfptr[581])) == + ( /*_._VALDATA___V585*/ meltfptr[584])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_392__CLASS_NREP_DATAKEYWORD @#1", + melt_assertmsg ("checkoff putslot ~dsym_394__CLASS_NREP_DATAKEYWORD @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V582*/ - meltfptr[581])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V582*/ meltfptr[581]))->obj_vartab[1] = + ( /*_._VALDATA___V585*/ + meltfptr[584])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V585*/ meltfptr[584]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V583*/ meltfptr[582]); + /*_._VALSTR___V586*/ meltfptr[585]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V582*/ meltfptr[581]); + meltgc_touch ( /*_._VALDATA___V585*/ meltfptr[584]); - melt_dbgtrace_written_object ( /*_._VALDATA___V582*/ meltfptr[581], + melt_dbgtrace_written_object ( /*_._VALDATA___V585*/ meltfptr[584], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:3813:/ initchunk"); @@ -35126,14 +35144,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_8 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V584*/ meltfptr[583])) + ( /*_._VALROUT___V587*/ meltfptr[586])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_394__OUTPUCOD_OBJGETNAMEDSYMBOL#0", - NULL != ( /*_.CLASS_OBJGETNAMEDSYMBOL__V107*/ meltfptr[106])); - ((meltroutine_ptr_t) /*_._VALROUT___V584*/ meltfptr[583])->tabval[0] = - (melt_ptr_t) ( /*_.CLASS_OBJGETNAMEDSYMBOL__V107*/ meltfptr[106]); + ("putroutconst constnull.drout_396__OUTPUCOD_OBJGETNAMEDSYMBOL#0", + NULL != ( /*_.CLASS_OBJGETNAMEDSYMBOL__V108*/ meltfptr[107])); + ((meltroutine_ptr_t) /*_._VALROUT___V587*/ meltfptr[586])->tabval[0] = + (melt_ptr_t) ( /*_.CLASS_OBJGETNAMEDSYMBOL__V108*/ meltfptr[107]); MELT_LOCATION ("warmelt-outobj.melt:3813:/ initchunk"); /*^putroutconst */ @@ -35141,13 +35159,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_8 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V584*/ meltfptr[583])) + ( /*_._VALROUT___V587*/ meltfptr[586])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_394__OUTPUCOD_OBJGETNAMEDSYMBOL#1", + ("putroutconst constnull.drout_396__OUTPUCOD_OBJGETNAMEDSYMBOL#1", NULL != ( /*_.CLASS_OBJINITOBJECT__V32*/ meltfptr[31])); - ((meltroutine_ptr_t) /*_._VALROUT___V584*/ meltfptr[583])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V587*/ meltfptr[586])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_OBJINITOBJECT__V32*/ meltfptr[31]); MELT_LOCATION ("warmelt-outobj.melt:3813:/ initchunk"); @@ -35156,26 +35174,26 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_8 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V584*/ meltfptr[583])) + ( /*_._VALROUT___V587*/ meltfptr[586])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_394__OUTPUCOD_OBJGETNAMEDSYMBOL#2", - NULL != ( /*_.CLASS_NREP_DATASYMBOL__V104*/ meltfptr[103])); - ((meltroutine_ptr_t) /*_._VALROUT___V584*/ meltfptr[583])->tabval[2] = - (melt_ptr_t) ( /*_.CLASS_NREP_DATASYMBOL__V104*/ meltfptr[103]); + ("putroutconst constnull.drout_396__OUTPUCOD_OBJGETNAMEDSYMBOL#2", + NULL != ( /*_.CLASS_NREP_DATASYMBOL__V105*/ meltfptr[104])); + ((meltroutine_ptr_t) /*_._VALROUT___V587*/ meltfptr[586])->tabval[2] = + (melt_ptr_t) ( /*_.CLASS_NREP_DATASYMBOL__V105*/ meltfptr[104]); MELT_LOCATION ("warmelt-outobj.melt:3813:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V584*/ meltfptr[583])) == + ( /*_._VALROUT___V587*/ meltfptr[586])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V264*/ meltfptr[263]); - ((meltroutine_ptr_t) /*_._VALROUT___V584*/ meltfptr[583])->tabval[3] = - (melt_ptr_t) ( /*_._VALCLO___V264*/ meltfptr[263]); + NULL != /*_._VALCLO___V265*/ meltfptr[264]); + ((meltroutine_ptr_t) /*_._VALROUT___V587*/ meltfptr[586])->tabval[3] = + (melt_ptr_t) ( /*_._VALCLO___V265*/ meltfptr[264]); MELT_LOCATION ("warmelt-outobj.melt:3813:/ initchunk"); /*^putroutconst */ @@ -35183,13 +35201,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_8 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V584*/ meltfptr[583])) + ( /*_._VALROUT___V587*/ meltfptr[586])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_394__OUTPUCOD_OBJGETNAMEDSYMBOL#4", + ("putroutconst constnull.drout_396__OUTPUCOD_OBJGETNAMEDSYMBOL#4", NULL != ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19])); - ((meltroutine_ptr_t) /*_._VALROUT___V584*/ meltfptr[583])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V587*/ meltfptr[586])->tabval[4] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]); MELT_LOCATION ("warmelt-outobj.melt:3813:/ initchunk"); @@ -35198,13 +35216,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_8 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V584*/ meltfptr[583])) + ( /*_._VALROUT___V587*/ meltfptr[586])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_394__OUTPUCOD_OBJGETNAMEDSYMBOL#5", + ("putroutconst constnull.drout_396__OUTPUCOD_OBJGETNAMEDSYMBOL#5", NULL != ( /*_.ADD2OUT__V14*/ meltfptr[13])); - ((meltroutine_ptr_t) /*_._VALROUT___V584*/ meltfptr[583])->tabval[5] = + ((meltroutine_ptr_t) /*_._VALROUT___V587*/ meltfptr[586])->tabval[5] = (melt_ptr_t) ( /*_.ADD2OUT__V14*/ meltfptr[13]); MELT_LOCATION ("warmelt-outobj.melt:3813:/ initchunk"); @@ -35212,12 +35230,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_8 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V584*/ meltfptr[583])) == + ( /*_._VALROUT___V587*/ meltfptr[586])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALDATA___V197*/ meltfptr[196]); - ((meltroutine_ptr_t) /*_._VALROUT___V584*/ meltfptr[583])->tabval[6] = - (melt_ptr_t) ( /*_._VALDATA___V197*/ meltfptr[196]); + NULL != /*_._VALDATA___V198*/ meltfptr[197]); + ((meltroutine_ptr_t) /*_._VALROUT___V587*/ meltfptr[586])->tabval[6] = + (melt_ptr_t) ( /*_._VALDATA___V198*/ meltfptr[197]); MELT_LOCATION ("warmelt-outobj.melt:3813:/ initchunk"); /*^putroutconst */ @@ -35225,56 +35243,56 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_8 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V584*/ meltfptr[583])) + ( /*_._VALROUT___V587*/ meltfptr[586])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_394__OUTPUCOD_OBJGETNAMEDSYMBOL#7", + ("putroutconst constnull.drout_396__OUTPUCOD_OBJGETNAMEDSYMBOL#7", NULL != ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5])); - ((meltroutine_ptr_t) /*_._VALROUT___V584*/ meltfptr[583])->tabval[7] = + ((meltroutine_ptr_t) /*_._VALROUT___V587*/ meltfptr[586])->tabval[7] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5]); MELT_LOCATION ("warmelt-outobj.melt:3813:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V584*/ meltfptr[583]); + meltgc_touch ( /*_._VALROUT___V587*/ meltfptr[586]); /*putclosurout#80 */ melt_assertmsg ("putclosrout#80 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V585*/ meltfptr[584])) == + ( /*_._VALCLO___V588*/ meltfptr[587])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#80 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V584*/ meltfptr[583])) == + ( /*_._VALROUT___V587*/ meltfptr[586])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V585*/ meltfptr[584])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V584*/ meltfptr[583]); + ((meltclosure_ptr_t) /*_._VALCLO___V588*/ meltfptr[587])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V587*/ meltfptr[586]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V585*/ meltfptr[584]); + meltgc_touch ( /*_._VALCLO___V588*/ meltfptr[587]); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_396__CLASS_OBJGETNAMEDSYMBOL @#1", + melt_assertmsg ("checkobj putslot ~dsym_398__CLASS_OBJGETNAMEDSYMBOL @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V586*/ meltfptr[585])) == + ( /*_._VALDATA___V589*/ meltfptr[588])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_396__CLASS_OBJGETNAMEDSYMBOL @#1", + melt_assertmsg ("checkoff putslot ~dsym_398__CLASS_OBJGETNAMEDSYMBOL @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V586*/ - meltfptr[585])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V586*/ meltfptr[585]))->obj_vartab[1] = + ( /*_._VALDATA___V589*/ + meltfptr[588])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V589*/ meltfptr[588]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V587*/ meltfptr[586]); + /*_._VALSTR___V590*/ meltfptr[589]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V586*/ meltfptr[585]); + meltgc_touch ( /*_._VALDATA___V589*/ meltfptr[588]); - melt_dbgtrace_written_object ( /*_._VALDATA___V586*/ meltfptr[585], + melt_dbgtrace_written_object ( /*_._VALDATA___V589*/ meltfptr[588], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:3864:/ initchunk"); @@ -35283,14 +35301,14 @@ meltmod__WARMELTmiOUTOBJ__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___V591*/ meltfptr[590])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_398__OUTPUCOD_OBJGETNAMEDKEYWORD#0", - NULL != ( /*_.CLASS_OBJGETNAMEDKEYWORD__V108*/ meltfptr[107])); - ((meltroutine_ptr_t) /*_._VALROUT___V588*/ meltfptr[587])->tabval[0] = - (melt_ptr_t) ( /*_.CLASS_OBJGETNAMEDKEYWORD__V108*/ meltfptr[107]); + ("putroutconst constnull.drout_400__OUTPUCOD_OBJGETNAMEDKEYWORD#0", + NULL != ( /*_.CLASS_OBJGETNAMEDKEYWORD__V109*/ meltfptr[108])); + ((meltroutine_ptr_t) /*_._VALROUT___V591*/ meltfptr[590])->tabval[0] = + (melt_ptr_t) ( /*_.CLASS_OBJGETNAMEDKEYWORD__V109*/ meltfptr[108]); MELT_LOCATION ("warmelt-outobj.melt:3864:/ initchunk"); /*^putroutconst */ @@ -35298,13 +35316,13 @@ meltmod__WARMELTmiOUTOBJ__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___V591*/ meltfptr[590])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_398__OUTPUCOD_OBJGETNAMEDKEYWORD#1", + ("putroutconst constnull.drout_400__OUTPUCOD_OBJGETNAMEDKEYWORD#1", NULL != ( /*_.CLASS_OBJINITOBJECT__V32*/ meltfptr[31])); - ((meltroutine_ptr_t) /*_._VALROUT___V588*/ meltfptr[587])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V591*/ meltfptr[590])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_OBJINITOBJECT__V32*/ meltfptr[31]); MELT_LOCATION ("warmelt-outobj.melt:3864:/ initchunk"); @@ -35313,26 +35331,26 @@ meltmod__WARMELTmiOUTOBJ__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___V591*/ meltfptr[590])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_398__OUTPUCOD_OBJGETNAMEDKEYWORD#2", - NULL != ( /*_.CLASS_NREP_DATAKEYWORD__V106*/ meltfptr[105])); - ((meltroutine_ptr_t) /*_._VALROUT___V588*/ meltfptr[587])->tabval[2] = - (melt_ptr_t) ( /*_.CLASS_NREP_DATAKEYWORD__V106*/ meltfptr[105]); + ("putroutconst constnull.drout_400__OUTPUCOD_OBJGETNAMEDKEYWORD#2", + NULL != ( /*_.CLASS_NREP_DATAKEYWORD__V107*/ meltfptr[106])); + ((meltroutine_ptr_t) /*_._VALROUT___V591*/ meltfptr[590])->tabval[2] = + (melt_ptr_t) ( /*_.CLASS_NREP_DATAKEYWORD__V107*/ meltfptr[106]); MELT_LOCATION ("warmelt-outobj.melt:3864:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V588*/ meltfptr[587])) == + ( /*_._VALROUT___V591*/ meltfptr[590])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V264*/ meltfptr[263]); - ((meltroutine_ptr_t) /*_._VALROUT___V588*/ meltfptr[587])->tabval[3] = - (melt_ptr_t) ( /*_._VALCLO___V264*/ meltfptr[263]); + NULL != /*_._VALCLO___V265*/ meltfptr[264]); + ((meltroutine_ptr_t) /*_._VALROUT___V591*/ meltfptr[590])->tabval[3] = + (melt_ptr_t) ( /*_._VALCLO___V265*/ meltfptr[264]); MELT_LOCATION ("warmelt-outobj.melt:3864:/ initchunk"); /*^putroutconst */ @@ -35340,13 +35358,13 @@ meltmod__WARMELTmiOUTOBJ__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___V591*/ meltfptr[590])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_398__OUTPUCOD_OBJGETNAMEDKEYWORD#4", + ("putroutconst constnull.drout_400__OUTPUCOD_OBJGETNAMEDKEYWORD#4", NULL != ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19])); - ((meltroutine_ptr_t) /*_._VALROUT___V588*/ meltfptr[587])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V591*/ meltfptr[590])->tabval[4] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]); MELT_LOCATION ("warmelt-outobj.melt:3864:/ initchunk"); @@ -35354,12 +35372,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_8 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V588*/ meltfptr[587])) == + ( /*_._VALROUT___V591*/ meltfptr[590])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALDATA___V197*/ meltfptr[196]); - ((meltroutine_ptr_t) /*_._VALROUT___V588*/ meltfptr[587])->tabval[5] = - (melt_ptr_t) ( /*_._VALDATA___V197*/ meltfptr[196]); + NULL != /*_._VALDATA___V198*/ meltfptr[197]); + ((meltroutine_ptr_t) /*_._VALROUT___V591*/ meltfptr[590])->tabval[5] = + (melt_ptr_t) ( /*_._VALDATA___V198*/ meltfptr[197]); MELT_LOCATION ("warmelt-outobj.melt:3864:/ initchunk"); /*^putroutconst */ @@ -35367,56 +35385,56 @@ meltmod__WARMELTmiOUTOBJ__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___V591*/ meltfptr[590])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_398__OUTPUCOD_OBJGETNAMEDKEYWORD#6", + ("putroutconst constnull.drout_400__OUTPUCOD_OBJGETNAMEDKEYWORD#6", NULL != ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5])); - ((meltroutine_ptr_t) /*_._VALROUT___V588*/ meltfptr[587])->tabval[6] = + ((meltroutine_ptr_t) /*_._VALROUT___V591*/ meltfptr[590])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5]); MELT_LOCATION ("warmelt-outobj.melt:3864:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V588*/ meltfptr[587]); + meltgc_touch ( /*_._VALROUT___V591*/ meltfptr[590]); /*putclosurout#81 */ melt_assertmsg ("putclosrout#81 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V589*/ meltfptr[588])) == + ( /*_._VALCLO___V592*/ meltfptr[591])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#81 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V588*/ meltfptr[587])) == + ( /*_._VALROUT___V591*/ meltfptr[590])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V589*/ meltfptr[588])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V588*/ meltfptr[587]); + ((meltclosure_ptr_t) /*_._VALCLO___V592*/ meltfptr[591])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V591*/ meltfptr[590]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V589*/ meltfptr[588]); + meltgc_touch ( /*_._VALCLO___V592*/ meltfptr[591]); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_400__CLASS_OBJGETNAMEDKEYWORD @#1", + melt_assertmsg ("checkobj putslot ~dsym_402__CLASS_OBJGETNAMEDKEYWORD @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V590*/ meltfptr[589])) == + ( /*_._VALDATA___V593*/ meltfptr[592])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_400__CLASS_OBJGETNAMEDKEYWORD @#1", + melt_assertmsg ("checkoff putslot ~dsym_402__CLASS_OBJGETNAMEDKEYWORD @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V590*/ - meltfptr[589])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V590*/ meltfptr[589]))->obj_vartab[1] = + ( /*_._VALDATA___V593*/ + meltfptr[592])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V593*/ meltfptr[592]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V591*/ meltfptr[590]); + /*_._VALSTR___V594*/ meltfptr[593]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V590*/ meltfptr[589]); + meltgc_touch ( /*_._VALDATA___V593*/ meltfptr[592]); - melt_dbgtrace_written_object ( /*_._VALDATA___V590*/ meltfptr[589], + melt_dbgtrace_written_object ( /*_._VALDATA___V593*/ meltfptr[592], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:3900:/ initchunk"); @@ -35425,13 +35443,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_8 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V592*/ meltfptr[591])) + ( /*_._VALROUT___V595*/ meltfptr[594])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_402__OUTPUCOD_OBJAPPLY#0", - NULL != ( /*_.CLASS_OBJAPPLY__V109*/ meltfptr[108])); - ((meltroutine_ptr_t) /*_._VALROUT___V592*/ meltfptr[591])->tabval[0] = - (melt_ptr_t) ( /*_.CLASS_OBJAPPLY__V109*/ meltfptr[108]); + melt_checkmsg ("putroutconst constnull.drout_404__OUTPUCOD_OBJAPPLY#0", + NULL != ( /*_.CLASS_OBJAPPLY__V110*/ meltfptr[109])); + ((meltroutine_ptr_t) /*_._VALROUT___V595*/ meltfptr[594])->tabval[0] = + (melt_ptr_t) ( /*_.CLASS_OBJAPPLY__V110*/ meltfptr[109]); MELT_LOCATION ("warmelt-outobj.melt:3900:/ initchunk"); /*^putroutconst */ @@ -35439,12 +35457,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_8 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V592*/ meltfptr[591])) + ( /*_._VALROUT___V595*/ meltfptr[594])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_402__OUTPUCOD_OBJAPPLY#1", + melt_checkmsg ("putroutconst constnull.drout_404__OUTPUCOD_OBJAPPLY#1", NULL != ( /*_.DISCR_LIST__V65*/ meltfptr[64])); - ((meltroutine_ptr_t) /*_._VALROUT___V592*/ meltfptr[591])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V595*/ meltfptr[594])->tabval[1] = (melt_ptr_t) ( /*_.DISCR_LIST__V65*/ meltfptr[64]); MELT_LOCATION ("warmelt-outobj.melt:3900:/ initchunk"); @@ -35453,12 +35471,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_8 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V592*/ meltfptr[591])) + ( /*_._VALROUT___V595*/ meltfptr[594])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_402__OUTPUCOD_OBJAPPLY#2", + melt_checkmsg ("putroutconst constnull.drout_404__OUTPUCOD_OBJAPPLY#2", NULL != ( /*_.DISCR_INTEGER__V52*/ meltfptr[51])); - ((meltroutine_ptr_t) /*_._VALROUT___V592*/ meltfptr[591])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V595*/ meltfptr[594])->tabval[2] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V52*/ meltfptr[51]); MELT_LOCATION ("warmelt-outobj.melt:3900:/ initchunk"); @@ -35466,12 +35484,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_8 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V592*/ meltfptr[591])) == + ( /*_._VALROUT___V595*/ meltfptr[594])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V264*/ meltfptr[263]); - ((meltroutine_ptr_t) /*_._VALROUT___V592*/ meltfptr[591])->tabval[3] = - (melt_ptr_t) ( /*_._VALCLO___V264*/ meltfptr[263]); + NULL != /*_._VALCLO___V265*/ meltfptr[264]); + ((meltroutine_ptr_t) /*_._VALROUT___V595*/ meltfptr[594])->tabval[3] = + (melt_ptr_t) ( /*_._VALCLO___V265*/ meltfptr[264]); MELT_LOCATION ("warmelt-outobj.melt:3900:/ initchunk"); /*^putroutconst */ @@ -35479,12 +35497,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_8 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V592*/ meltfptr[591])) + ( /*_._VALROUT___V595*/ meltfptr[594])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_402__OUTPUCOD_OBJAPPLY#4", + melt_checkmsg ("putroutconst constnull.drout_404__OUTPUCOD_OBJAPPLY#4", NULL != ( /*_.CLASS_OBJINSTR__V69*/ meltfptr[68])); - ((meltroutine_ptr_t) /*_._VALROUT___V592*/ meltfptr[591])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V595*/ meltfptr[594])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_OBJINSTR__V69*/ meltfptr[68]); MELT_LOCATION ("warmelt-outobj.melt:3900:/ initchunk"); @@ -35493,13 +35511,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_8 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V592*/ meltfptr[591])) + ( /*_._VALROUT___V595*/ meltfptr[594])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_402__OUTPUCOD_OBJAPPLY#5", - NULL != ( /*_.GET_CTYPE__V110*/ meltfptr[109])); - ((meltroutine_ptr_t) /*_._VALROUT___V592*/ meltfptr[591])->tabval[5] = - (melt_ptr_t) ( /*_.GET_CTYPE__V110*/ meltfptr[109]); + melt_checkmsg ("putroutconst constnull.drout_404__OUTPUCOD_OBJAPPLY#5", + NULL != ( /*_.GET_CTYPE__V111*/ meltfptr[110])); + ((meltroutine_ptr_t) /*_._VALROUT___V595*/ meltfptr[594])->tabval[5] = + (melt_ptr_t) ( /*_.GET_CTYPE__V111*/ meltfptr[110]); MELT_LOCATION ("warmelt-outobj.melt:3900:/ initchunk"); /*^putroutconst */ @@ -35507,12 +35525,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_8 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V592*/ meltfptr[591])) + ( /*_._VALROUT___V595*/ meltfptr[594])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_402__OUTPUCOD_OBJAPPLY#6", + melt_checkmsg ("putroutconst constnull.drout_404__OUTPUCOD_OBJAPPLY#6", NULL != ( /*_.CLASS_CTYPE__V28*/ meltfptr[27])); - ((meltroutine_ptr_t) /*_._VALROUT___V592*/ meltfptr[591])->tabval[6] = + ((meltroutine_ptr_t) /*_._VALROUT___V595*/ meltfptr[594])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_CTYPE__V28*/ meltfptr[27]); MELT_LOCATION ("warmelt-outobj.melt:3900:/ initchunk"); @@ -35521,12 +35539,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_8 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V592*/ meltfptr[591])) + ( /*_._VALROUT___V595*/ meltfptr[594])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_402__OUTPUCOD_OBJAPPLY#7", + melt_checkmsg ("putroutconst constnull.drout_404__OUTPUCOD_OBJAPPLY#7", NULL != ( /*_.CLASS_OBJNIL__V25*/ meltfptr[24])); - ((meltroutine_ptr_t) /*_._VALROUT___V592*/ meltfptr[591])->tabval[7] = + ((meltroutine_ptr_t) /*_._VALROUT___V595*/ meltfptr[594])->tabval[7] = (melt_ptr_t) ( /*_.CLASS_OBJNIL__V25*/ meltfptr[24]); MELT_LOCATION ("warmelt-outobj.melt:3900:/ initchunk"); @@ -35535,12 +35553,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_8 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V592*/ meltfptr[591])) + ( /*_._VALROUT___V595*/ meltfptr[594])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_402__OUTPUCOD_OBJAPPLY#8", + melt_checkmsg ("putroutconst constnull.drout_404__OUTPUCOD_OBJAPPLY#8", NULL != ( /*_.CTYPE_VALUE__V31*/ meltfptr[30])); - ((meltroutine_ptr_t) /*_._VALROUT___V592*/ meltfptr[591])->tabval[8] = + ((meltroutine_ptr_t) /*_._VALROUT___V595*/ meltfptr[594])->tabval[8] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V31*/ meltfptr[30]); MELT_LOCATION ("warmelt-outobj.melt:3900:/ initchunk"); @@ -35549,12 +35567,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_8 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V592*/ meltfptr[591])) + ( /*_._VALROUT___V595*/ meltfptr[594])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_402__OUTPUCOD_OBJAPPLY#9", + melt_checkmsg ("putroutconst constnull.drout_404__OUTPUCOD_OBJAPPLY#9", NULL != ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19])); - ((meltroutine_ptr_t) /*_._VALROUT___V592*/ meltfptr[591])->tabval[9] = + ((meltroutine_ptr_t) /*_._VALROUT___V595*/ meltfptr[594])->tabval[9] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]); MELT_LOCATION ("warmelt-outobj.melt:3900:/ initchunk"); @@ -35562,12 +35580,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_8 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V592*/ meltfptr[591])) == + ( /*_._VALROUT___V595*/ meltfptr[594])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALDATA___V197*/ meltfptr[196]); - ((meltroutine_ptr_t) /*_._VALROUT___V592*/ meltfptr[591])->tabval[10] = - (melt_ptr_t) ( /*_._VALDATA___V197*/ meltfptr[196]); + NULL != /*_._VALDATA___V198*/ meltfptr[197]); + ((meltroutine_ptr_t) /*_._VALROUT___V595*/ meltfptr[594])->tabval[10] = + (melt_ptr_t) ( /*_._VALDATA___V198*/ meltfptr[197]); MELT_LOCATION ("warmelt-outobj.melt:3900:/ initchunk"); /*^putroutconst */ @@ -35575,12 +35593,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_8 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V592*/ meltfptr[591])) + ( /*_._VALROUT___V595*/ meltfptr[594])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_402__OUTPUCOD_OBJAPPLY#11", + melt_checkmsg ("putroutconst constnull.drout_404__OUTPUCOD_OBJAPPLY#11", NULL != ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5])); - ((meltroutine_ptr_t) /*_._VALROUT___V592*/ meltfptr[591])->tabval[11] = + ((meltroutine_ptr_t) /*_._VALROUT___V595*/ meltfptr[594])->tabval[11] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5]); MELT_LOCATION ("warmelt-outobj.melt:3900:/ initchunk"); @@ -35589,12 +35607,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_8 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V592*/ meltfptr[591])) + ( /*_._VALROUT___V595*/ meltfptr[594])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_402__OUTPUCOD_OBJAPPLY#12", + melt_checkmsg ("putroutconst constnull.drout_404__OUTPUCOD_OBJAPPLY#12", NULL != ( /*_.LIST_EVERY__V56*/ meltfptr[55])); - ((meltroutine_ptr_t) /*_._VALROUT___V592*/ meltfptr[591])->tabval[12] = + ((meltroutine_ptr_t) /*_._VALROUT___V595*/ meltfptr[594])->tabval[12] = (melt_ptr_t) ( /*_.LIST_EVERY__V56*/ meltfptr[55]); MELT_LOCATION ("warmelt-outobj.melt:3900:/ initchunk"); @@ -35603,12 +35621,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_8 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V592*/ meltfptr[591])) + ( /*_._VALROUT___V595*/ meltfptr[594])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_402__OUTPUCOD_OBJAPPLY#13", + melt_checkmsg ("putroutconst constnull.drout_404__OUTPUCOD_OBJAPPLY#13", NULL != ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19])); - ((meltroutine_ptr_t) /*_._VALROUT___V592*/ meltfptr[591])->tabval[13] = + ((meltroutine_ptr_t) /*_._VALROUT___V595*/ meltfptr[594])->tabval[13] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]); MELT_LOCATION ("warmelt-outobj.melt:3900:/ initchunk"); @@ -35616,12 +35634,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_8 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V592*/ meltfptr[591])) == + ( /*_._VALROUT___V595*/ meltfptr[594])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALDATA___V197*/ meltfptr[196]); - ((meltroutine_ptr_t) /*_._VALROUT___V592*/ meltfptr[591])->tabval[14] = - (melt_ptr_t) ( /*_._VALDATA___V197*/ meltfptr[196]); + NULL != /*_._VALDATA___V198*/ meltfptr[197]); + ((meltroutine_ptr_t) /*_._VALROUT___V595*/ meltfptr[594])->tabval[14] = + (melt_ptr_t) ( /*_._VALDATA___V198*/ meltfptr[197]); MELT_LOCATION ("warmelt-outobj.melt:3900:/ initchunk"); /*^putroutconst */ @@ -35629,12 +35647,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_8 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V592*/ meltfptr[591])) + ( /*_._VALROUT___V595*/ meltfptr[594])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_402__OUTPUCOD_OBJAPPLY#15", + melt_checkmsg ("putroutconst constnull.drout_404__OUTPUCOD_OBJAPPLY#15", NULL != ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5])); - ((meltroutine_ptr_t) /*_._VALROUT___V592*/ meltfptr[591])->tabval[15] = + ((meltroutine_ptr_t) /*_._VALROUT___V595*/ meltfptr[594])->tabval[15] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5]); MELT_LOCATION ("warmelt-outobj.melt:3958:/ initchunk"); @@ -35643,12 +35661,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_8 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V593*/ meltfptr[592])) + ( /*_._VALROUT___V596*/ meltfptr[595])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_408__LAMBDA_#0", + melt_checkmsg ("putroutconst constnull.drout_410__LAMBDA_#0", NULL != ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19])); - ((meltroutine_ptr_t) /*_._VALROUT___V593*/ meltfptr[592])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V596*/ meltfptr[595])->tabval[0] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]); MELT_LOCATION ("warmelt-outobj.melt:3958:/ initchunk"); @@ -35656,12 +35674,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_8 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V593*/ meltfptr[592])) == + ( /*_._VALROUT___V596*/ meltfptr[595])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALDATA___V197*/ meltfptr[196]); - ((meltroutine_ptr_t) /*_._VALROUT___V593*/ meltfptr[592])->tabval[1] = - (melt_ptr_t) ( /*_._VALDATA___V197*/ meltfptr[196]); + NULL != /*_._VALDATA___V198*/ meltfptr[197]); + ((meltroutine_ptr_t) /*_._VALROUT___V596*/ meltfptr[595])->tabval[1] = + (melt_ptr_t) ( /*_._VALDATA___V198*/ meltfptr[197]); MELT_LOCATION ("warmelt-outobj.melt:3958:/ initchunk"); /*^putroutconst */ @@ -35669,18 +35687,18 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_8 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V593*/ meltfptr[592])) + ( /*_._VALROUT___V596*/ meltfptr[595])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_408__LAMBDA_#2", + melt_checkmsg ("putroutconst constnull.drout_410__LAMBDA_#2", NULL != ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5])); - ((meltroutine_ptr_t) /*_._VALROUT___V593*/ meltfptr[592])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V596*/ meltfptr[595])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5]); MELT_LOCATION ("warmelt-outobj.melt:3958:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V593*/ meltfptr[592]); + meltgc_touch ( /*_._VALROUT___V596*/ meltfptr[595]); MELT_LOCATION ("warmelt-outobj.melt:3900:/ initchunk"); /*^putroutconst */ @@ -35688,13 +35706,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_8 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V592*/ meltfptr[591])) + ( /*_._VALROUT___V595*/ meltfptr[594])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_402__OUTPUCOD_OBJAPPLY#16", - NULL != ( /*_._VALROUT___V593*/ meltfptr[592])); - ((meltroutine_ptr_t) /*_._VALROUT___V592*/ meltfptr[591])->tabval[16] = - (melt_ptr_t) ( /*_._VALROUT___V593*/ meltfptr[592]); + melt_checkmsg ("putroutconst constnull.drout_404__OUTPUCOD_OBJAPPLY#16", + NULL != ( /*_._VALROUT___V596*/ meltfptr[595])); + ((meltroutine_ptr_t) /*_._VALROUT___V595*/ meltfptr[594])->tabval[16] = + (melt_ptr_t) ( /*_._VALROUT___V596*/ meltfptr[595]); MELT_LOCATION ("warmelt-outobj.melt:3900:/ initchunk"); /*^putroutconst */ @@ -35702,78 +35720,78 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_8 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V592*/ meltfptr[591])) + ( /*_._VALROUT___V595*/ meltfptr[594])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_402__OUTPUCOD_OBJAPPLY#17", - NULL != ( /*_._VALROUT___V594*/ meltfptr[593])); - ((meltroutine_ptr_t) /*_._VALROUT___V592*/ meltfptr[591])->tabval[17] = - (melt_ptr_t) ( /*_._VALROUT___V594*/ meltfptr[593]); + melt_checkmsg ("putroutconst constnull.drout_404__OUTPUCOD_OBJAPPLY#17", + NULL != ( /*_._VALROUT___V597*/ meltfptr[596])); + ((meltroutine_ptr_t) /*_._VALROUT___V595*/ meltfptr[594])->tabval[17] = + (melt_ptr_t) ( /*_._VALROUT___V597*/ meltfptr[596]); MELT_LOCATION ("warmelt-outobj.melt:3900:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V592*/ meltfptr[591]); + meltgc_touch ( /*_._VALROUT___V595*/ meltfptr[594]); /*putclosurout#82 */ melt_assertmsg ("putclosrout#82 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V595*/ meltfptr[594])) == + ( /*_._VALCLO___V598*/ meltfptr[597])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#82 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V592*/ meltfptr[591])) == + ( /*_._VALROUT___V595*/ meltfptr[594])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V595*/ meltfptr[594])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V592*/ meltfptr[591]); + ((meltclosure_ptr_t) /*_._VALCLO___V598*/ meltfptr[597])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V595*/ meltfptr[594]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V595*/ meltfptr[594]); + meltgc_touch ( /*_._VALCLO___V598*/ meltfptr[597]); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_404__CLASS_OBJAPPLY @#1", + melt_assertmsg ("checkobj putslot ~dsym_406__CLASS_OBJAPPLY @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V596*/ meltfptr[595])) == + ( /*_._VALDATA___V599*/ meltfptr[598])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_404__CLASS_OBJAPPLY @#1", + melt_assertmsg ("checkoff putslot ~dsym_406__CLASS_OBJAPPLY @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V596*/ - meltfptr[595])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V596*/ meltfptr[595]))->obj_vartab[1] = + ( /*_._VALDATA___V599*/ + meltfptr[598])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V599*/ meltfptr[598]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V597*/ meltfptr[596]); + /*_._VALSTR___V600*/ meltfptr[599]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V596*/ meltfptr[595]); + meltgc_touch ( /*_._VALDATA___V599*/ meltfptr[598]); - melt_dbgtrace_written_object ( /*_._VALDATA___V596*/ meltfptr[595], + melt_dbgtrace_written_object ( /*_._VALDATA___V599*/ meltfptr[598], "new static instance"); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_406__GET_CTYPE @#1", + melt_assertmsg ("checkobj putslot ~dsym_408__GET_CTYPE @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V598*/ meltfptr[597])) == + ( /*_._VALDATA___V601*/ meltfptr[600])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_406__GET_CTYPE @#1", + melt_assertmsg ("checkoff putslot ~dsym_408__GET_CTYPE @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V598*/ - meltfptr[597])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V598*/ meltfptr[597]))->obj_vartab[1] = + ( /*_._VALDATA___V601*/ + meltfptr[600])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V601*/ meltfptr[600]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V599*/ meltfptr[598]); + /*_._VALSTR___V602*/ meltfptr[601]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V598*/ meltfptr[597]); + meltgc_touch ( /*_._VALDATA___V601*/ meltfptr[600]); - melt_dbgtrace_written_object ( /*_._VALDATA___V598*/ meltfptr[597], + melt_dbgtrace_written_object ( /*_._VALDATA___V601*/ meltfptr[600], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:3997:/ initchunk"); @@ -35782,13 +35800,13 @@ meltmod__WARMELTmiOUTOBJ__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___V603*/ meltfptr[602])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_410__OUTPUCOD_OBJMSEND#0", - NULL != ( /*_.CLASS_OBJMSEND__V111*/ meltfptr[110])); - ((meltroutine_ptr_t) /*_._VALROUT___V600*/ meltfptr[599])->tabval[0] = - (melt_ptr_t) ( /*_.CLASS_OBJMSEND__V111*/ meltfptr[110]); + melt_checkmsg ("putroutconst constnull.drout_412__OUTPUCOD_OBJMSEND#0", + NULL != ( /*_.CLASS_OBJMSEND__V112*/ meltfptr[111])); + ((meltroutine_ptr_t) /*_._VALROUT___V603*/ meltfptr[602])->tabval[0] = + (melt_ptr_t) ( /*_.CLASS_OBJMSEND__V112*/ meltfptr[111]); MELT_LOCATION ("warmelt-outobj.melt:3997:/ initchunk"); /*^putroutconst */ @@ -35796,12 +35814,12 @@ meltmod__WARMELTmiOUTOBJ__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___V603*/ meltfptr[602])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_410__OUTPUCOD_OBJMSEND#1", + melt_checkmsg ("putroutconst constnull.drout_412__OUTPUCOD_OBJMSEND#1", NULL != ( /*_.DISCR_LIST__V65*/ meltfptr[64])); - ((meltroutine_ptr_t) /*_._VALROUT___V600*/ meltfptr[599])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V603*/ meltfptr[602])->tabval[1] = (melt_ptr_t) ( /*_.DISCR_LIST__V65*/ meltfptr[64]); MELT_LOCATION ("warmelt-outobj.melt:3997:/ initchunk"); @@ -35810,12 +35828,12 @@ meltmod__WARMELTmiOUTOBJ__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___V603*/ meltfptr[602])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_410__OUTPUCOD_OBJMSEND#2", + melt_checkmsg ("putroutconst constnull.drout_412__OUTPUCOD_OBJMSEND#2", NULL != ( /*_.DISCR_INTEGER__V52*/ meltfptr[51])); - ((meltroutine_ptr_t) /*_._VALROUT___V600*/ meltfptr[599])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V603*/ meltfptr[602])->tabval[2] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V52*/ meltfptr[51]); MELT_LOCATION ("warmelt-outobj.melt:3997:/ initchunk"); @@ -35823,12 +35841,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_8 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V600*/ meltfptr[599])) == + ( /*_._VALROUT___V603*/ meltfptr[602])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V264*/ meltfptr[263]); - ((meltroutine_ptr_t) /*_._VALROUT___V600*/ meltfptr[599])->tabval[3] = - (melt_ptr_t) ( /*_._VALCLO___V264*/ meltfptr[263]); + NULL != /*_._VALCLO___V265*/ meltfptr[264]); + ((meltroutine_ptr_t) /*_._VALROUT___V603*/ meltfptr[602])->tabval[3] = + (melt_ptr_t) ( /*_._VALCLO___V265*/ meltfptr[264]); MELT_LOCATION ("warmelt-outobj.melt:3997:/ initchunk"); /*^putroutconst */ @@ -35836,13 +35854,13 @@ meltmod__WARMELTmiOUTOBJ__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___V603*/ meltfptr[602])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_410__OUTPUCOD_OBJMSEND#4", - NULL != ( /*_.GET_CTYPE__V110*/ meltfptr[109])); - ((meltroutine_ptr_t) /*_._VALROUT___V600*/ meltfptr[599])->tabval[4] = - (melt_ptr_t) ( /*_.GET_CTYPE__V110*/ meltfptr[109]); + melt_checkmsg ("putroutconst constnull.drout_412__OUTPUCOD_OBJMSEND#4", + NULL != ( /*_.GET_CTYPE__V111*/ meltfptr[110])); + ((meltroutine_ptr_t) /*_._VALROUT___V603*/ meltfptr[602])->tabval[4] = + (melt_ptr_t) ( /*_.GET_CTYPE__V111*/ meltfptr[110]); MELT_LOCATION ("warmelt-outobj.melt:3997:/ initchunk"); /*^putroutconst */ @@ -35850,12 +35868,12 @@ meltmod__WARMELTmiOUTOBJ__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___V603*/ meltfptr[602])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_410__OUTPUCOD_OBJMSEND#5", + melt_checkmsg ("putroutconst constnull.drout_412__OUTPUCOD_OBJMSEND#5", NULL != ( /*_.CLASS_CTYPE__V28*/ meltfptr[27])); - ((meltroutine_ptr_t) /*_._VALROUT___V600*/ meltfptr[599])->tabval[5] = + ((meltroutine_ptr_t) /*_._VALROUT___V603*/ meltfptr[602])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_CTYPE__V28*/ meltfptr[27]); MELT_LOCATION ("warmelt-outobj.melt:3997:/ initchunk"); @@ -35864,12 +35882,12 @@ meltmod__WARMELTmiOUTOBJ__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___V603*/ meltfptr[602])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_410__OUTPUCOD_OBJMSEND#6", + melt_checkmsg ("putroutconst constnull.drout_412__OUTPUCOD_OBJMSEND#6", NULL != ( /*_.CLASS_OBJNIL__V25*/ meltfptr[24])); - ((meltroutine_ptr_t) /*_._VALROUT___V600*/ meltfptr[599])->tabval[6] = + ((meltroutine_ptr_t) /*_._VALROUT___V603*/ meltfptr[602])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_OBJNIL__V25*/ meltfptr[24]); MELT_LOCATION ("warmelt-outobj.melt:3997:/ initchunk"); @@ -35878,12 +35896,12 @@ meltmod__WARMELTmiOUTOBJ__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___V603*/ meltfptr[602])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_410__OUTPUCOD_OBJMSEND#7", + melt_checkmsg ("putroutconst constnull.drout_412__OUTPUCOD_OBJMSEND#7", NULL != ( /*_.CTYPE_VALUE__V31*/ meltfptr[30])); - ((meltroutine_ptr_t) /*_._VALROUT___V600*/ meltfptr[599])->tabval[7] = + ((meltroutine_ptr_t) /*_._VALROUT___V603*/ meltfptr[602])->tabval[7] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V31*/ meltfptr[30]); MELT_LOCATION ("warmelt-outobj.melt:3997:/ initchunk"); @@ -35892,12 +35910,12 @@ meltmod__WARMELTmiOUTOBJ__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___V603*/ meltfptr[602])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_410__OUTPUCOD_OBJMSEND#8", + melt_checkmsg ("putroutconst constnull.drout_412__OUTPUCOD_OBJMSEND#8", NULL != ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19])); - ((meltroutine_ptr_t) /*_._VALROUT___V600*/ meltfptr[599])->tabval[8] = + ((meltroutine_ptr_t) /*_._VALROUT___V603*/ meltfptr[602])->tabval[8] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]); MELT_LOCATION ("warmelt-outobj.melt:3997:/ initchunk"); @@ -35905,12 +35923,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_8 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V600*/ meltfptr[599])) == + ( /*_._VALROUT___V603*/ meltfptr[602])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALDATA___V197*/ meltfptr[196]); - ((meltroutine_ptr_t) /*_._VALROUT___V600*/ meltfptr[599])->tabval[9] = - (melt_ptr_t) ( /*_._VALDATA___V197*/ meltfptr[196]); + NULL != /*_._VALDATA___V198*/ meltfptr[197]); + ((meltroutine_ptr_t) /*_._VALROUT___V603*/ meltfptr[602])->tabval[9] = + (melt_ptr_t) ( /*_._VALDATA___V198*/ meltfptr[197]); MELT_LOCATION ("warmelt-outobj.melt:3997:/ initchunk"); /*^putroutconst */ @@ -35918,12 +35936,12 @@ meltmod__WARMELTmiOUTOBJ__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___V603*/ meltfptr[602])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_410__OUTPUCOD_OBJMSEND#10", + melt_checkmsg ("putroutconst constnull.drout_412__OUTPUCOD_OBJMSEND#10", NULL != ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5])); - ((meltroutine_ptr_t) /*_._VALROUT___V600*/ meltfptr[599])->tabval[10] = + ((meltroutine_ptr_t) /*_._VALROUT___V603*/ meltfptr[602])->tabval[10] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5]); MELT_LOCATION ("warmelt-outobj.melt:3997:/ initchunk"); @@ -35932,12 +35950,12 @@ meltmod__WARMELTmiOUTOBJ__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___V603*/ meltfptr[602])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_410__OUTPUCOD_OBJMSEND#11", + melt_checkmsg ("putroutconst constnull.drout_412__OUTPUCOD_OBJMSEND#11", NULL != ( /*_.LIST_EVERY__V56*/ meltfptr[55])); - ((meltroutine_ptr_t) /*_._VALROUT___V600*/ meltfptr[599])->tabval[11] = + ((meltroutine_ptr_t) /*_._VALROUT___V603*/ meltfptr[602])->tabval[11] = (melt_ptr_t) ( /*_.LIST_EVERY__V56*/ meltfptr[55]); MELT_LOCATION ("warmelt-outobj.melt:3997:/ initchunk"); @@ -35946,55 +35964,68 @@ meltmod__WARMELTmiOUTOBJ__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___V603*/ meltfptr[602])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_410__OUTPUCOD_OBJMSEND#12", - NULL != ( /*_._VALROUT___V601*/ meltfptr[600])); - ((meltroutine_ptr_t) /*_._VALROUT___V600*/ meltfptr[599])->tabval[12] = - (melt_ptr_t) ( /*_._VALROUT___V601*/ meltfptr[600]); + melt_checkmsg ("putroutconst constnull.drout_412__OUTPUCOD_OBJMSEND#12", + NULL != ( /*_._VALROUT___V604*/ meltfptr[603])); + ((meltroutine_ptr_t) /*_._VALROUT___V603*/ meltfptr[602])->tabval[12] = + (melt_ptr_t) ( /*_._VALROUT___V604*/ meltfptr[603]); MELT_LOCATION ("warmelt-outobj.melt:3997:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V600*/ meltfptr[599]); + meltgc_touch ( /*_._VALROUT___V603*/ meltfptr[602]); /*putclosurout#83 */ melt_assertmsg ("putclosrout#83 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V602*/ meltfptr[601])) == + ( /*_._VALCLO___V605*/ meltfptr[604])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#83 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V600*/ meltfptr[599])) == + ( /*_._VALROUT___V603*/ meltfptr[602])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V602*/ meltfptr[601])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V600*/ meltfptr[599]); + ((meltclosure_ptr_t) /*_._VALCLO___V605*/ meltfptr[604])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V603*/ meltfptr[602]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V602*/ meltfptr[601]); + meltgc_touch ( /*_._VALCLO___V605*/ meltfptr[604]); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_412__CLASS_OBJMSEND @#1", + melt_assertmsg ("checkobj putslot ~dsym_414__CLASS_OBJMSEND @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V603*/ meltfptr[602])) == + ( /*_._VALDATA___V606*/ meltfptr[605])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_412__CLASS_OBJMSEND @#1", + melt_assertmsg ("checkoff putslot ~dsym_414__CLASS_OBJMSEND @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V603*/ - meltfptr[602])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V603*/ meltfptr[602]))->obj_vartab[1] = + ( /*_._VALDATA___V606*/ + meltfptr[605])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V606*/ meltfptr[605]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V604*/ meltfptr[603]); + /*_._VALSTR___V607*/ meltfptr[606]); - /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V603*/ meltfptr[602]); + +#undef meltfram__ +} /*end of meltmod__WARMELTmiOUTOBJ__initialmeltchunk_8 */ + +void +meltmod__WARMELTmiOUTOBJ__initialmeltchunk_9 (meltinitial_frame_t * + meltmeltframptr__, + char meltpredefinited[]) +{ +#define meltfram__ (*meltmeltframptr__) +#undef meltcallcount +#define meltcallcount 0L + (void) meltpredefinited; +/*touch:_VALUEDATA_*/ + meltgc_touch ( /*_._VALDATA___V606*/ meltfptr[605]); - melt_dbgtrace_written_object ( /*_._VALDATA___V603*/ meltfptr[602], + melt_dbgtrace_written_object ( /*_._VALDATA___V606*/ meltfptr[605], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:4095:/ initchunk"); @@ -36003,41 +36034,28 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_8 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V605*/ meltfptr[604])) + ( /*_._VALROUT___V608*/ meltfptr[607])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_415__OUTPUCOD_OBJMULTIAPPLY#0", - NULL != ( /*_.CLASS_OBJMULTIAPPLY__V112*/ meltfptr[111])); - ((meltroutine_ptr_t) /*_._VALROUT___V605*/ meltfptr[604])->tabval[0] = - (melt_ptr_t) ( /*_.CLASS_OBJMULTIAPPLY__V112*/ meltfptr[111]); - - -#undef meltfram__ -} /*end of meltmod__WARMELTmiOUTOBJ__initialmeltchunk_8 */ + ("putroutconst constnull.drout_417__OUTPUCOD_OBJMULTIAPPLY#0", + NULL != ( /*_.CLASS_OBJMULTIAPPLY__V113*/ meltfptr[112])); + ((meltroutine_ptr_t) /*_._VALROUT___V608*/ meltfptr[607])->tabval[0] = + (melt_ptr_t) ( /*_.CLASS_OBJMULTIAPPLY__V113*/ meltfptr[112]); -void -meltmod__WARMELTmiOUTOBJ__initialmeltchunk_9 (meltinitial_frame_t * - meltmeltframptr__, - char meltpredefinited[]) -{ -#define meltfram__ (*meltmeltframptr__) -#undef meltcallcount -#define meltcallcount 0L - (void) meltpredefinited; MELT_LOCATION ("warmelt-outobj.melt:4095:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V605*/ meltfptr[604])) + ( /*_._VALROUT___V608*/ meltfptr[607])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_415__OUTPUCOD_OBJMULTIAPPLY#1", + ("putroutconst constnull.drout_417__OUTPUCOD_OBJMULTIAPPLY#1", NULL != ( /*_.DISCR_LIST__V65*/ meltfptr[64])); - ((meltroutine_ptr_t) /*_._VALROUT___V605*/ meltfptr[604])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V608*/ meltfptr[607])->tabval[1] = (melt_ptr_t) ( /*_.DISCR_LIST__V65*/ meltfptr[64]); MELT_LOCATION ("warmelt-outobj.melt:4095:/ initchunk"); @@ -36046,13 +36064,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V605*/ meltfptr[604])) + ( /*_._VALROUT___V608*/ meltfptr[607])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_415__OUTPUCOD_OBJMULTIAPPLY#2", + ("putroutconst constnull.drout_417__OUTPUCOD_OBJMULTIAPPLY#2", NULL != ( /*_.DISCR_INTEGER__V52*/ meltfptr[51])); - ((meltroutine_ptr_t) /*_._VALROUT___V605*/ meltfptr[604])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V608*/ meltfptr[607])->tabval[2] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V52*/ meltfptr[51]); MELT_LOCATION ("warmelt-outobj.melt:4095:/ initchunk"); @@ -36060,12 +36078,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_9 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V605*/ meltfptr[604])) == + ( /*_._VALROUT___V608*/ meltfptr[607])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V264*/ meltfptr[263]); - ((meltroutine_ptr_t) /*_._VALROUT___V605*/ meltfptr[604])->tabval[3] = - (melt_ptr_t) ( /*_._VALCLO___V264*/ meltfptr[263]); + NULL != /*_._VALCLO___V265*/ meltfptr[264]); + ((meltroutine_ptr_t) /*_._VALROUT___V608*/ meltfptr[607])->tabval[3] = + (melt_ptr_t) ( /*_._VALCLO___V265*/ meltfptr[264]); MELT_LOCATION ("warmelt-outobj.melt:4095:/ initchunk"); /*^putroutconst */ @@ -36073,14 +36091,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V605*/ meltfptr[604])) + ( /*_._VALROUT___V608*/ meltfptr[607])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_415__OUTPUCOD_OBJMULTIAPPLY#4", - NULL != ( /*_.MULTIPLE_EVERY__V100*/ meltfptr[99])); - ((meltroutine_ptr_t) /*_._VALROUT___V605*/ meltfptr[604])->tabval[4] = - (melt_ptr_t) ( /*_.MULTIPLE_EVERY__V100*/ meltfptr[99]); + ("putroutconst constnull.drout_417__OUTPUCOD_OBJMULTIAPPLY#4", + NULL != ( /*_.MULTIPLE_EVERY__V101*/ meltfptr[100])); + ((meltroutine_ptr_t) /*_._VALROUT___V608*/ meltfptr[607])->tabval[4] = + (melt_ptr_t) ( /*_.MULTIPLE_EVERY__V101*/ meltfptr[100]); MELT_LOCATION ("warmelt-outobj.melt:4095:/ initchunk"); /*^putroutconst */ @@ -36088,14 +36106,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V605*/ meltfptr[604])) + ( /*_._VALROUT___V608*/ meltfptr[607])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_415__OUTPUCOD_OBJMULTIAPPLY#5", - NULL != ( /*_.GET_CTYPE__V110*/ meltfptr[109])); - ((meltroutine_ptr_t) /*_._VALROUT___V605*/ meltfptr[604])->tabval[5] = - (melt_ptr_t) ( /*_.GET_CTYPE__V110*/ meltfptr[109]); + ("putroutconst constnull.drout_417__OUTPUCOD_OBJMULTIAPPLY#5", + NULL != ( /*_.GET_CTYPE__V111*/ meltfptr[110])); + ((meltroutine_ptr_t) /*_._VALROUT___V608*/ meltfptr[607])->tabval[5] = + (melt_ptr_t) ( /*_.GET_CTYPE__V111*/ meltfptr[110]); MELT_LOCATION ("warmelt-outobj.melt:4141:/ initchunk"); /*^putroutconst */ @@ -36103,18 +36121,18 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V606*/ meltfptr[605])) + ( /*_._VALROUT___V609*/ meltfptr[608])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_419__LAMBDA_#0", - NULL != ( /*_.GET_CTYPE__V110*/ meltfptr[109])); - ((meltroutine_ptr_t) /*_._VALROUT___V606*/ meltfptr[605])->tabval[0] = - (melt_ptr_t) ( /*_.GET_CTYPE__V110*/ meltfptr[109]); + melt_checkmsg ("putroutconst constnull.drout_421__LAMBDA_#0", + NULL != ( /*_.GET_CTYPE__V111*/ meltfptr[110])); + ((meltroutine_ptr_t) /*_._VALROUT___V609*/ meltfptr[608])->tabval[0] = + (melt_ptr_t) ( /*_.GET_CTYPE__V111*/ meltfptr[110]); MELT_LOCATION ("warmelt-outobj.melt:4141:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V606*/ meltfptr[605]); + meltgc_touch ( /*_._VALROUT___V609*/ meltfptr[608]); MELT_LOCATION ("warmelt-outobj.melt:4095:/ initchunk"); /*^putroutconst */ @@ -36122,14 +36140,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V605*/ meltfptr[604])) + ( /*_._VALROUT___V608*/ meltfptr[607])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_415__OUTPUCOD_OBJMULTIAPPLY#6", - NULL != ( /*_._VALROUT___V606*/ meltfptr[605])); - ((meltroutine_ptr_t) /*_._VALROUT___V605*/ meltfptr[604])->tabval[6] = - (melt_ptr_t) ( /*_._VALROUT___V606*/ meltfptr[605]); + ("putroutconst constnull.drout_417__OUTPUCOD_OBJMULTIAPPLY#6", + NULL != ( /*_._VALROUT___V609*/ meltfptr[608])); + ((meltroutine_ptr_t) /*_._VALROUT___V608*/ meltfptr[607])->tabval[6] = + (melt_ptr_t) ( /*_._VALROUT___V609*/ meltfptr[608]); MELT_LOCATION ("warmelt-outobj.melt:4095:/ initchunk"); /*^putroutconst */ @@ -36137,14 +36155,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V605*/ meltfptr[604])) + ( /*_._VALROUT___V608*/ meltfptr[607])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_415__OUTPUCOD_OBJMULTIAPPLY#7", - NULL != ( /*_.GET_CTYPE__V110*/ meltfptr[109])); - ((meltroutine_ptr_t) /*_._VALROUT___V605*/ meltfptr[604])->tabval[7] = - (melt_ptr_t) ( /*_.GET_CTYPE__V110*/ meltfptr[109]); + ("putroutconst constnull.drout_417__OUTPUCOD_OBJMULTIAPPLY#7", + NULL != ( /*_.GET_CTYPE__V111*/ meltfptr[110])); + ((meltroutine_ptr_t) /*_._VALROUT___V608*/ meltfptr[607])->tabval[7] = + (melt_ptr_t) ( /*_.GET_CTYPE__V111*/ meltfptr[110]); MELT_LOCATION ("warmelt-outobj.melt:4095:/ initchunk"); /*^putroutconst */ @@ -36152,13 +36170,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V605*/ meltfptr[604])) + ( /*_._VALROUT___V608*/ meltfptr[607])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_415__OUTPUCOD_OBJMULTIAPPLY#8", + ("putroutconst constnull.drout_417__OUTPUCOD_OBJMULTIAPPLY#8", NULL != ( /*_.CLASS_CTYPE__V28*/ meltfptr[27])); - ((meltroutine_ptr_t) /*_._VALROUT___V605*/ meltfptr[604])->tabval[8] = + ((meltroutine_ptr_t) /*_._VALROUT___V608*/ meltfptr[607])->tabval[8] = (melt_ptr_t) ( /*_.CLASS_CTYPE__V28*/ meltfptr[27]); MELT_LOCATION ("warmelt-outobj.melt:4095:/ initchunk"); @@ -36167,13 +36185,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V605*/ meltfptr[604])) + ( /*_._VALROUT___V608*/ meltfptr[607])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_415__OUTPUCOD_OBJMULTIAPPLY#9", + ("putroutconst constnull.drout_417__OUTPUCOD_OBJMULTIAPPLY#9", NULL != ( /*_.CTYPE_VALUE__V31*/ meltfptr[30])); - ((meltroutine_ptr_t) /*_._VALROUT___V605*/ meltfptr[604])->tabval[9] = + ((meltroutine_ptr_t) /*_._VALROUT___V608*/ meltfptr[607])->tabval[9] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V31*/ meltfptr[30]); MELT_LOCATION ("warmelt-outobj.melt:4095:/ initchunk"); @@ -36182,13 +36200,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V605*/ meltfptr[604])) + ( /*_._VALROUT___V608*/ meltfptr[607])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_415__OUTPUCOD_OBJMULTIAPPLY#10", + ("putroutconst constnull.drout_417__OUTPUCOD_OBJMULTIAPPLY#10", NULL != ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19])); - ((meltroutine_ptr_t) /*_._VALROUT___V605*/ meltfptr[604])->tabval[10] = + ((meltroutine_ptr_t) /*_._VALROUT___V608*/ meltfptr[607])->tabval[10] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]); MELT_LOCATION ("warmelt-outobj.melt:4095:/ initchunk"); @@ -36196,12 +36214,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_9 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V605*/ meltfptr[604])) == + ( /*_._VALROUT___V608*/ meltfptr[607])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALDATA___V197*/ meltfptr[196]); - ((meltroutine_ptr_t) /*_._VALROUT___V605*/ meltfptr[604])->tabval[11] = - (melt_ptr_t) ( /*_._VALDATA___V197*/ meltfptr[196]); + NULL != /*_._VALDATA___V198*/ meltfptr[197]); + ((meltroutine_ptr_t) /*_._VALROUT___V608*/ meltfptr[607])->tabval[11] = + (melt_ptr_t) ( /*_._VALDATA___V198*/ meltfptr[197]); MELT_LOCATION ("warmelt-outobj.melt:4095:/ initchunk"); /*^putroutconst */ @@ -36209,13 +36227,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V605*/ meltfptr[604])) + ( /*_._VALROUT___V608*/ meltfptr[607])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_415__OUTPUCOD_OBJMULTIAPPLY#12", + ("putroutconst constnull.drout_417__OUTPUCOD_OBJMULTIAPPLY#12", NULL != ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5])); - ((meltroutine_ptr_t) /*_._VALROUT___V605*/ meltfptr[604])->tabval[12] = + ((meltroutine_ptr_t) /*_._VALROUT___V608*/ meltfptr[607])->tabval[12] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5]); MELT_LOCATION ("warmelt-outobj.melt:4095:/ initchunk"); @@ -36224,14 +36242,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V605*/ meltfptr[604])) + ( /*_._VALROUT___V608*/ meltfptr[607])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_415__OUTPUCOD_OBJMULTIAPPLY#13", - NULL != ( /*_.GET_CTYPE__V110*/ meltfptr[109])); - ((meltroutine_ptr_t) /*_._VALROUT___V605*/ meltfptr[604])->tabval[13] = - (melt_ptr_t) ( /*_.GET_CTYPE__V110*/ meltfptr[109]); + ("putroutconst constnull.drout_417__OUTPUCOD_OBJMULTIAPPLY#13", + NULL != ( /*_.GET_CTYPE__V111*/ meltfptr[110])); + ((meltroutine_ptr_t) /*_._VALROUT___V608*/ meltfptr[607])->tabval[13] = + (melt_ptr_t) ( /*_.GET_CTYPE__V111*/ meltfptr[110]); MELT_LOCATION ("warmelt-outobj.melt:4095:/ initchunk"); /*^putroutconst */ @@ -36239,13 +36257,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V605*/ meltfptr[604])) + ( /*_._VALROUT___V608*/ meltfptr[607])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_415__OUTPUCOD_OBJMULTIAPPLY#14", + ("putroutconst constnull.drout_417__OUTPUCOD_OBJMULTIAPPLY#14", NULL != ( /*_.CLASS_CTYPE__V28*/ meltfptr[27])); - ((meltroutine_ptr_t) /*_._VALROUT___V605*/ meltfptr[604])->tabval[14] = + ((meltroutine_ptr_t) /*_._VALROUT___V608*/ meltfptr[607])->tabval[14] = (melt_ptr_t) ( /*_.CLASS_CTYPE__V28*/ meltfptr[27]); MELT_LOCATION ("warmelt-outobj.melt:4095:/ initchunk"); @@ -36253,12 +36271,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_9 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V605*/ meltfptr[604])) == + ( /*_._VALROUT___V608*/ meltfptr[607])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V264*/ meltfptr[263]); - ((meltroutine_ptr_t) /*_._VALROUT___V605*/ meltfptr[604])->tabval[15] = - (melt_ptr_t) ( /*_._VALCLO___V264*/ meltfptr[263]); + NULL != /*_._VALCLO___V265*/ meltfptr[264]); + ((meltroutine_ptr_t) /*_._VALROUT___V608*/ meltfptr[607])->tabval[15] = + (melt_ptr_t) ( /*_._VALCLO___V265*/ meltfptr[264]); MELT_LOCATION ("warmelt-outobj.melt:4095:/ initchunk"); /*^putroutconst */ @@ -36266,13 +36284,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V605*/ meltfptr[604])) + ( /*_._VALROUT___V608*/ meltfptr[607])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_415__OUTPUCOD_OBJMULTIAPPLY#16", + ("putroutconst constnull.drout_417__OUTPUCOD_OBJMULTIAPPLY#16", NULL != ( /*_.CTYPE_VALUE__V31*/ meltfptr[30])); - ((meltroutine_ptr_t) /*_._VALROUT___V605*/ meltfptr[604])->tabval[16] = + ((meltroutine_ptr_t) /*_._VALROUT___V608*/ meltfptr[607])->tabval[16] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V31*/ meltfptr[30]); MELT_LOCATION ("warmelt-outobj.melt:4095:/ initchunk"); @@ -36281,13 +36299,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V605*/ meltfptr[604])) + ( /*_._VALROUT___V608*/ meltfptr[607])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_415__OUTPUCOD_OBJMULTIAPPLY#17", + ("putroutconst constnull.drout_417__OUTPUCOD_OBJMULTIAPPLY#17", NULL != ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19])); - ((meltroutine_ptr_t) /*_._VALROUT___V605*/ meltfptr[604])->tabval[17] = + ((meltroutine_ptr_t) /*_._VALROUT___V608*/ meltfptr[607])->tabval[17] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]); MELT_LOCATION ("warmelt-outobj.melt:4184:/ initchunk"); @@ -36296,13 +36314,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V607*/ meltfptr[606])) + ( /*_._VALROUT___V610*/ meltfptr[609])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_420__LAMBDA_#0", - NULL != ( /*_.GET_CTYPE__V110*/ meltfptr[109])); - ((meltroutine_ptr_t) /*_._VALROUT___V607*/ meltfptr[606])->tabval[0] = - (melt_ptr_t) ( /*_.GET_CTYPE__V110*/ meltfptr[109]); + melt_checkmsg ("putroutconst constnull.drout_422__LAMBDA_#0", + NULL != ( /*_.GET_CTYPE__V111*/ meltfptr[110])); + ((meltroutine_ptr_t) /*_._VALROUT___V610*/ meltfptr[609])->tabval[0] = + (melt_ptr_t) ( /*_.GET_CTYPE__V111*/ meltfptr[110]); MELT_LOCATION ("warmelt-outobj.melt:4184:/ initchunk"); /*^putroutconst */ @@ -36310,12 +36328,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V607*/ meltfptr[606])) + ( /*_._VALROUT___V610*/ meltfptr[609])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_420__LAMBDA_#1", + melt_checkmsg ("putroutconst constnull.drout_422__LAMBDA_#1", NULL != ( /*_.CLASS_CTYPE__V28*/ meltfptr[27])); - ((meltroutine_ptr_t) /*_._VALROUT___V607*/ meltfptr[606])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V610*/ meltfptr[609])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_CTYPE__V28*/ meltfptr[27]); MELT_LOCATION ("warmelt-outobj.melt:4184:/ initchunk"); @@ -36323,12 +36341,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_9 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V607*/ meltfptr[606])) == + ( /*_._VALROUT___V610*/ meltfptr[609])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V264*/ meltfptr[263]); - ((meltroutine_ptr_t) /*_._VALROUT___V607*/ meltfptr[606])->tabval[2] = - (melt_ptr_t) ( /*_._VALCLO___V264*/ meltfptr[263]); + NULL != /*_._VALCLO___V265*/ meltfptr[264]); + ((meltroutine_ptr_t) /*_._VALROUT___V610*/ meltfptr[609])->tabval[2] = + (melt_ptr_t) ( /*_._VALCLO___V265*/ meltfptr[264]); MELT_LOCATION ("warmelt-outobj.melt:4184:/ initchunk"); /*^putroutconst */ @@ -36336,12 +36354,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V607*/ meltfptr[606])) + ( /*_._VALROUT___V610*/ meltfptr[609])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_420__LAMBDA_#3", + melt_checkmsg ("putroutconst constnull.drout_422__LAMBDA_#3", NULL != ( /*_.CTYPE_VALUE__V31*/ meltfptr[30])); - ((meltroutine_ptr_t) /*_._VALROUT___V607*/ meltfptr[606])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V610*/ meltfptr[609])->tabval[3] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V31*/ meltfptr[30]); MELT_LOCATION ("warmelt-outobj.melt:4184:/ initchunk"); @@ -36350,18 +36368,18 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V607*/ meltfptr[606])) + ( /*_._VALROUT___V610*/ meltfptr[609])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_420__LAMBDA_#4", + melt_checkmsg ("putroutconst constnull.drout_422__LAMBDA_#4", NULL != ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19])); - ((meltroutine_ptr_t) /*_._VALROUT___V607*/ meltfptr[606])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V610*/ meltfptr[609])->tabval[4] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]); MELT_LOCATION ("warmelt-outobj.melt:4184:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V607*/ meltfptr[606]); + meltgc_touch ( /*_._VALROUT___V610*/ meltfptr[609]); MELT_LOCATION ("warmelt-outobj.melt:4095:/ initchunk"); /*^putroutconst */ @@ -36369,14 +36387,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V605*/ meltfptr[604])) + ( /*_._VALROUT___V608*/ meltfptr[607])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_415__OUTPUCOD_OBJMULTIAPPLY#18", - NULL != ( /*_._VALROUT___V607*/ meltfptr[606])); - ((meltroutine_ptr_t) /*_._VALROUT___V605*/ meltfptr[604])->tabval[18] = - (melt_ptr_t) ( /*_._VALROUT___V607*/ meltfptr[606]); + ("putroutconst constnull.drout_417__OUTPUCOD_OBJMULTIAPPLY#18", + NULL != ( /*_._VALROUT___V610*/ meltfptr[609])); + ((meltroutine_ptr_t) /*_._VALROUT___V608*/ meltfptr[607])->tabval[18] = + (melt_ptr_t) ( /*_._VALROUT___V610*/ meltfptr[609]); MELT_LOCATION ("warmelt-outobj.melt:4095:/ initchunk"); /*^putroutconst */ @@ -36384,13 +36402,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V605*/ meltfptr[604])) + ( /*_._VALROUT___V608*/ meltfptr[607])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_415__OUTPUCOD_OBJMULTIAPPLY#19", + ("putroutconst constnull.drout_417__OUTPUCOD_OBJMULTIAPPLY#19", NULL != ( /*_.LIST_EVERY__V56*/ meltfptr[55])); - ((meltroutine_ptr_t) /*_._VALROUT___V605*/ meltfptr[604])->tabval[19] = + ((meltroutine_ptr_t) /*_._VALROUT___V608*/ meltfptr[607])->tabval[19] = (melt_ptr_t) ( /*_.LIST_EVERY__V56*/ meltfptr[55]); MELT_LOCATION ("warmelt-outobj.melt:4095:/ initchunk"); @@ -36399,13 +36417,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V605*/ meltfptr[604])) + ( /*_._VALROUT___V608*/ meltfptr[607])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_415__OUTPUCOD_OBJMULTIAPPLY#20", + ("putroutconst constnull.drout_417__OUTPUCOD_OBJMULTIAPPLY#20", NULL != ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19])); - ((meltroutine_ptr_t) /*_._VALROUT___V605*/ meltfptr[604])->tabval[20] = + ((meltroutine_ptr_t) /*_._VALROUT___V608*/ meltfptr[607])->tabval[20] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]); MELT_LOCATION ("warmelt-outobj.melt:4212:/ initchunk"); @@ -36414,18 +36432,18 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V608*/ meltfptr[607])) + ( /*_._VALROUT___V611*/ meltfptr[610])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_421__LAMBDA_#0", + melt_checkmsg ("putroutconst constnull.drout_423__LAMBDA_#0", NULL != ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19])); - ((meltroutine_ptr_t) /*_._VALROUT___V608*/ meltfptr[607])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V611*/ meltfptr[610])->tabval[0] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]); MELT_LOCATION ("warmelt-outobj.melt:4212:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V608*/ meltfptr[607]); + meltgc_touch ( /*_._VALROUT___V611*/ meltfptr[610]); MELT_LOCATION ("warmelt-outobj.melt:4095:/ initchunk"); /*^putroutconst */ @@ -36433,14 +36451,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V605*/ meltfptr[604])) + ( /*_._VALROUT___V608*/ meltfptr[607])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_415__OUTPUCOD_OBJMULTIAPPLY#21", - NULL != ( /*_._VALROUT___V608*/ meltfptr[607])); - ((meltroutine_ptr_t) /*_._VALROUT___V605*/ meltfptr[604])->tabval[21] = - (melt_ptr_t) ( /*_._VALROUT___V608*/ meltfptr[607]); + ("putroutconst constnull.drout_417__OUTPUCOD_OBJMULTIAPPLY#21", + NULL != ( /*_._VALROUT___V611*/ meltfptr[610])); + ((meltroutine_ptr_t) /*_._VALROUT___V608*/ meltfptr[607])->tabval[21] = + (melt_ptr_t) ( /*_._VALROUT___V611*/ meltfptr[610]); MELT_LOCATION ("warmelt-outobj.melt:4095:/ initchunk"); /*^putroutconst */ @@ -36448,14 +36466,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V605*/ meltfptr[604])) + ( /*_._VALROUT___V608*/ meltfptr[607])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_415__OUTPUCOD_OBJMULTIAPPLY#22", - NULL != ( /*_._VALROUT___V609*/ meltfptr[608])); - ((meltroutine_ptr_t) /*_._VALROUT___V605*/ meltfptr[604])->tabval[22] = - (melt_ptr_t) ( /*_._VALROUT___V609*/ meltfptr[608]); + ("putroutconst constnull.drout_417__OUTPUCOD_OBJMULTIAPPLY#22", + NULL != ( /*_._VALROUT___V612*/ meltfptr[611])); + ((meltroutine_ptr_t) /*_._VALROUT___V608*/ meltfptr[607])->tabval[22] = + (melt_ptr_t) ( /*_._VALROUT___V612*/ meltfptr[611]); MELT_LOCATION ("warmelt-outobj.melt:4095:/ initchunk"); /*^putroutconst */ @@ -36463,56 +36481,56 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V605*/ meltfptr[604])) + ( /*_._VALROUT___V608*/ meltfptr[607])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_415__OUTPUCOD_OBJMULTIAPPLY#23", - NULL != ( /*_._VALROUT___V610*/ meltfptr[609])); - ((meltroutine_ptr_t) /*_._VALROUT___V605*/ meltfptr[604])->tabval[23] = - (melt_ptr_t) ( /*_._VALROUT___V610*/ meltfptr[609]); + ("putroutconst constnull.drout_417__OUTPUCOD_OBJMULTIAPPLY#23", + NULL != ( /*_._VALROUT___V613*/ meltfptr[612])); + ((meltroutine_ptr_t) /*_._VALROUT___V608*/ meltfptr[607])->tabval[23] = + (melt_ptr_t) ( /*_._VALROUT___V613*/ meltfptr[612]); MELT_LOCATION ("warmelt-outobj.melt:4095:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V605*/ meltfptr[604]); + meltgc_touch ( /*_._VALROUT___V608*/ meltfptr[607]); /*putclosurout#84 */ melt_assertmsg ("putclosrout#84 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V611*/ meltfptr[610])) == + ( /*_._VALCLO___V614*/ meltfptr[613])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#84 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V605*/ meltfptr[604])) == + ( /*_._VALROUT___V608*/ meltfptr[607])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V611*/ meltfptr[610])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V605*/ meltfptr[604]); + ((meltclosure_ptr_t) /*_._VALCLO___V614*/ meltfptr[613])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V608*/ meltfptr[607]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V611*/ meltfptr[610]); + meltgc_touch ( /*_._VALCLO___V614*/ meltfptr[613]); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_417__CLASS_OBJMULTIAPPLY @#1", + melt_assertmsg ("checkobj putslot ~dsym_419__CLASS_OBJMULTIAPPLY @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V612*/ meltfptr[611])) == + ( /*_._VALDATA___V615*/ meltfptr[614])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_417__CLASS_OBJMULTIAPPLY @#1", + melt_assertmsg ("checkoff putslot ~dsym_419__CLASS_OBJMULTIAPPLY @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V612*/ - meltfptr[611])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V612*/ meltfptr[611]))->obj_vartab[1] = + ( /*_._VALDATA___V615*/ + meltfptr[614])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V615*/ meltfptr[614]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V613*/ meltfptr[612]); + /*_._VALSTR___V616*/ meltfptr[615]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V612*/ meltfptr[611]); + meltgc_touch ( /*_._VALDATA___V615*/ meltfptr[614]); - melt_dbgtrace_written_object ( /*_._VALDATA___V612*/ meltfptr[611], + melt_dbgtrace_written_object ( /*_._VALDATA___V615*/ meltfptr[614], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:4260:/ initchunk"); @@ -36521,14 +36539,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V614*/ meltfptr[613])) + ( /*_._VALROUT___V617*/ meltfptr[616])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_424__OUTPUCOD_OBJMULTIMSEND#0", - NULL != ( /*_.CLASS_OBJMULTIMSEND__V113*/ meltfptr[112])); - ((meltroutine_ptr_t) /*_._VALROUT___V614*/ meltfptr[613])->tabval[0] = - (melt_ptr_t) ( /*_.CLASS_OBJMULTIMSEND__V113*/ meltfptr[112]); + ("putroutconst constnull.drout_426__OUTPUCOD_OBJMULTIMSEND#0", + NULL != ( /*_.CLASS_OBJMULTIMSEND__V114*/ meltfptr[113])); + ((meltroutine_ptr_t) /*_._VALROUT___V617*/ meltfptr[616])->tabval[0] = + (melt_ptr_t) ( /*_.CLASS_OBJMULTIMSEND__V114*/ meltfptr[113]); MELT_LOCATION ("warmelt-outobj.melt:4260:/ initchunk"); /*^putroutconst */ @@ -36536,13 +36554,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V614*/ meltfptr[613])) + ( /*_._VALROUT___V617*/ meltfptr[616])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_424__OUTPUCOD_OBJMULTIMSEND#1", + ("putroutconst constnull.drout_426__OUTPUCOD_OBJMULTIMSEND#1", NULL != ( /*_.DISCR_LIST__V65*/ meltfptr[64])); - ((meltroutine_ptr_t) /*_._VALROUT___V614*/ meltfptr[613])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V617*/ meltfptr[616])->tabval[1] = (melt_ptr_t) ( /*_.DISCR_LIST__V65*/ meltfptr[64]); MELT_LOCATION ("warmelt-outobj.melt:4260:/ initchunk"); @@ -36551,13 +36569,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V614*/ meltfptr[613])) + ( /*_._VALROUT___V617*/ meltfptr[616])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_424__OUTPUCOD_OBJMULTIMSEND#2", + ("putroutconst constnull.drout_426__OUTPUCOD_OBJMULTIMSEND#2", NULL != ( /*_.DISCR_INTEGER__V52*/ meltfptr[51])); - ((meltroutine_ptr_t) /*_._VALROUT___V614*/ meltfptr[613])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V617*/ meltfptr[616])->tabval[2] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V52*/ meltfptr[51]); MELT_LOCATION ("warmelt-outobj.melt:4260:/ initchunk"); @@ -36565,12 +36583,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_9 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V614*/ meltfptr[613])) == + ( /*_._VALROUT___V617*/ meltfptr[616])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V264*/ meltfptr[263]); - ((meltroutine_ptr_t) /*_._VALROUT___V614*/ meltfptr[613])->tabval[3] = - (melt_ptr_t) ( /*_._VALCLO___V264*/ meltfptr[263]); + NULL != /*_._VALCLO___V265*/ meltfptr[264]); + ((meltroutine_ptr_t) /*_._VALROUT___V617*/ meltfptr[616])->tabval[3] = + (melt_ptr_t) ( /*_._VALCLO___V265*/ meltfptr[264]); MELT_LOCATION ("warmelt-outobj.melt:4260:/ initchunk"); /*^putroutconst */ @@ -36578,14 +36596,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V614*/ meltfptr[613])) + ( /*_._VALROUT___V617*/ meltfptr[616])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_424__OUTPUCOD_OBJMULTIMSEND#4", - NULL != ( /*_.MULTIPLE_EVERY__V100*/ meltfptr[99])); - ((meltroutine_ptr_t) /*_._VALROUT___V614*/ meltfptr[613])->tabval[4] = - (melt_ptr_t) ( /*_.MULTIPLE_EVERY__V100*/ meltfptr[99]); + ("putroutconst constnull.drout_426__OUTPUCOD_OBJMULTIMSEND#4", + NULL != ( /*_.MULTIPLE_EVERY__V101*/ meltfptr[100])); + ((meltroutine_ptr_t) /*_._VALROUT___V617*/ meltfptr[616])->tabval[4] = + (melt_ptr_t) ( /*_.MULTIPLE_EVERY__V101*/ meltfptr[100]); MELT_LOCATION ("warmelt-outobj.melt:4260:/ initchunk"); /*^putroutconst */ @@ -36593,14 +36611,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V614*/ meltfptr[613])) + ( /*_._VALROUT___V617*/ meltfptr[616])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_424__OUTPUCOD_OBJMULTIMSEND#5", - NULL != ( /*_.GET_CTYPE__V110*/ meltfptr[109])); - ((meltroutine_ptr_t) /*_._VALROUT___V614*/ meltfptr[613])->tabval[5] = - (melt_ptr_t) ( /*_.GET_CTYPE__V110*/ meltfptr[109]); + ("putroutconst constnull.drout_426__OUTPUCOD_OBJMULTIMSEND#5", + NULL != ( /*_.GET_CTYPE__V111*/ meltfptr[110])); + ((meltroutine_ptr_t) /*_._VALROUT___V617*/ meltfptr[616])->tabval[5] = + (melt_ptr_t) ( /*_.GET_CTYPE__V111*/ meltfptr[110]); MELT_LOCATION ("warmelt-outobj.melt:4293:/ initchunk"); /*^putroutconst */ @@ -36608,18 +36626,18 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V615*/ meltfptr[614])) + ( /*_._VALROUT___V618*/ meltfptr[617])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_428__LAMBDA_#0", - NULL != ( /*_.GET_CTYPE__V110*/ meltfptr[109])); - ((meltroutine_ptr_t) /*_._VALROUT___V615*/ meltfptr[614])->tabval[0] = - (melt_ptr_t) ( /*_.GET_CTYPE__V110*/ meltfptr[109]); + melt_checkmsg ("putroutconst constnull.drout_430__LAMBDA_#0", + NULL != ( /*_.GET_CTYPE__V111*/ meltfptr[110])); + ((meltroutine_ptr_t) /*_._VALROUT___V618*/ meltfptr[617])->tabval[0] = + (melt_ptr_t) ( /*_.GET_CTYPE__V111*/ meltfptr[110]); MELT_LOCATION ("warmelt-outobj.melt:4293:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V615*/ meltfptr[614]); + meltgc_touch ( /*_._VALROUT___V618*/ meltfptr[617]); MELT_LOCATION ("warmelt-outobj.melt:4260:/ initchunk"); /*^putroutconst */ @@ -36627,14 +36645,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V614*/ meltfptr[613])) + ( /*_._VALROUT___V617*/ meltfptr[616])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_424__OUTPUCOD_OBJMULTIMSEND#6", - NULL != ( /*_._VALROUT___V615*/ meltfptr[614])); - ((meltroutine_ptr_t) /*_._VALROUT___V614*/ meltfptr[613])->tabval[6] = - (melt_ptr_t) ( /*_._VALROUT___V615*/ meltfptr[614]); + ("putroutconst constnull.drout_426__OUTPUCOD_OBJMULTIMSEND#6", + NULL != ( /*_._VALROUT___V618*/ meltfptr[617])); + ((meltroutine_ptr_t) /*_._VALROUT___V617*/ meltfptr[616])->tabval[6] = + (melt_ptr_t) ( /*_._VALROUT___V618*/ meltfptr[617]); MELT_LOCATION ("warmelt-outobj.melt:4260:/ initchunk"); /*^putroutconst */ @@ -36642,14 +36660,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V614*/ meltfptr[613])) + ( /*_._VALROUT___V617*/ meltfptr[616])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_424__OUTPUCOD_OBJMULTIMSEND#7", - NULL != ( /*_.GET_CTYPE__V110*/ meltfptr[109])); - ((meltroutine_ptr_t) /*_._VALROUT___V614*/ meltfptr[613])->tabval[7] = - (melt_ptr_t) ( /*_.GET_CTYPE__V110*/ meltfptr[109]); + ("putroutconst constnull.drout_426__OUTPUCOD_OBJMULTIMSEND#7", + NULL != ( /*_.GET_CTYPE__V111*/ meltfptr[110])); + ((meltroutine_ptr_t) /*_._VALROUT___V617*/ meltfptr[616])->tabval[7] = + (melt_ptr_t) ( /*_.GET_CTYPE__V111*/ meltfptr[110]); MELT_LOCATION ("warmelt-outobj.melt:4260:/ initchunk"); /*^putroutconst */ @@ -36657,13 +36675,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V614*/ meltfptr[613])) + ( /*_._VALROUT___V617*/ meltfptr[616])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_424__OUTPUCOD_OBJMULTIMSEND#8", + ("putroutconst constnull.drout_426__OUTPUCOD_OBJMULTIMSEND#8", NULL != ( /*_.CLASS_CTYPE__V28*/ meltfptr[27])); - ((meltroutine_ptr_t) /*_._VALROUT___V614*/ meltfptr[613])->tabval[8] = + ((meltroutine_ptr_t) /*_._VALROUT___V617*/ meltfptr[616])->tabval[8] = (melt_ptr_t) ( /*_.CLASS_CTYPE__V28*/ meltfptr[27]); MELT_LOCATION ("warmelt-outobj.melt:4260:/ initchunk"); @@ -36672,13 +36690,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V614*/ meltfptr[613])) + ( /*_._VALROUT___V617*/ meltfptr[616])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_424__OUTPUCOD_OBJMULTIMSEND#9", + ("putroutconst constnull.drout_426__OUTPUCOD_OBJMULTIMSEND#9", NULL != ( /*_.CTYPE_VALUE__V31*/ meltfptr[30])); - ((meltroutine_ptr_t) /*_._VALROUT___V614*/ meltfptr[613])->tabval[9] = + ((meltroutine_ptr_t) /*_._VALROUT___V617*/ meltfptr[616])->tabval[9] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V31*/ meltfptr[30]); MELT_LOCATION ("warmelt-outobj.melt:4260:/ initchunk"); @@ -36687,13 +36705,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V614*/ meltfptr[613])) + ( /*_._VALROUT___V617*/ meltfptr[616])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_424__OUTPUCOD_OBJMULTIMSEND#10", + ("putroutconst constnull.drout_426__OUTPUCOD_OBJMULTIMSEND#10", NULL != ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19])); - ((meltroutine_ptr_t) /*_._VALROUT___V614*/ meltfptr[613])->tabval[10] = + ((meltroutine_ptr_t) /*_._VALROUT___V617*/ meltfptr[616])->tabval[10] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]); MELT_LOCATION ("warmelt-outobj.melt:4260:/ initchunk"); @@ -36701,12 +36719,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_9 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V614*/ meltfptr[613])) == + ( /*_._VALROUT___V617*/ meltfptr[616])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALDATA___V197*/ meltfptr[196]); - ((meltroutine_ptr_t) /*_._VALROUT___V614*/ meltfptr[613])->tabval[11] = - (melt_ptr_t) ( /*_._VALDATA___V197*/ meltfptr[196]); + NULL != /*_._VALDATA___V198*/ meltfptr[197]); + ((meltroutine_ptr_t) /*_._VALROUT___V617*/ meltfptr[616])->tabval[11] = + (melt_ptr_t) ( /*_._VALDATA___V198*/ meltfptr[197]); MELT_LOCATION ("warmelt-outobj.melt:4260:/ initchunk"); /*^putroutconst */ @@ -36714,13 +36732,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V614*/ meltfptr[613])) + ( /*_._VALROUT___V617*/ meltfptr[616])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_424__OUTPUCOD_OBJMULTIMSEND#12", + ("putroutconst constnull.drout_426__OUTPUCOD_OBJMULTIMSEND#12", NULL != ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5])); - ((meltroutine_ptr_t) /*_._VALROUT___V614*/ meltfptr[613])->tabval[12] = + ((meltroutine_ptr_t) /*_._VALROUT___V617*/ meltfptr[616])->tabval[12] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5]); MELT_LOCATION ("warmelt-outobj.melt:4260:/ initchunk"); @@ -36729,14 +36747,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V614*/ meltfptr[613])) + ( /*_._VALROUT___V617*/ meltfptr[616])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_424__OUTPUCOD_OBJMULTIMSEND#13", - NULL != ( /*_.GET_CTYPE__V110*/ meltfptr[109])); - ((meltroutine_ptr_t) /*_._VALROUT___V614*/ meltfptr[613])->tabval[13] = - (melt_ptr_t) ( /*_.GET_CTYPE__V110*/ meltfptr[109]); + ("putroutconst constnull.drout_426__OUTPUCOD_OBJMULTIMSEND#13", + NULL != ( /*_.GET_CTYPE__V111*/ meltfptr[110])); + ((meltroutine_ptr_t) /*_._VALROUT___V617*/ meltfptr[616])->tabval[13] = + (melt_ptr_t) ( /*_.GET_CTYPE__V111*/ meltfptr[110]); MELT_LOCATION ("warmelt-outobj.melt:4260:/ initchunk"); /*^putroutconst */ @@ -36744,13 +36762,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V614*/ meltfptr[613])) + ( /*_._VALROUT___V617*/ meltfptr[616])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_424__OUTPUCOD_OBJMULTIMSEND#14", + ("putroutconst constnull.drout_426__OUTPUCOD_OBJMULTIMSEND#14", NULL != ( /*_.CLASS_CTYPE__V28*/ meltfptr[27])); - ((meltroutine_ptr_t) /*_._VALROUT___V614*/ meltfptr[613])->tabval[14] = + ((meltroutine_ptr_t) /*_._VALROUT___V617*/ meltfptr[616])->tabval[14] = (melt_ptr_t) ( /*_.CLASS_CTYPE__V28*/ meltfptr[27]); MELT_LOCATION ("warmelt-outobj.melt:4260:/ initchunk"); @@ -36758,12 +36776,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_9 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V614*/ meltfptr[613])) == + ( /*_._VALROUT___V617*/ meltfptr[616])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V264*/ meltfptr[263]); - ((meltroutine_ptr_t) /*_._VALROUT___V614*/ meltfptr[613])->tabval[15] = - (melt_ptr_t) ( /*_._VALCLO___V264*/ meltfptr[263]); + NULL != /*_._VALCLO___V265*/ meltfptr[264]); + ((meltroutine_ptr_t) /*_._VALROUT___V617*/ meltfptr[616])->tabval[15] = + (melt_ptr_t) ( /*_._VALCLO___V265*/ meltfptr[264]); MELT_LOCATION ("warmelt-outobj.melt:4260:/ initchunk"); /*^putroutconst */ @@ -36771,13 +36789,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V614*/ meltfptr[613])) + ( /*_._VALROUT___V617*/ meltfptr[616])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_424__OUTPUCOD_OBJMULTIMSEND#16", + ("putroutconst constnull.drout_426__OUTPUCOD_OBJMULTIMSEND#16", NULL != ( /*_.CTYPE_VALUE__V31*/ meltfptr[30])); - ((meltroutine_ptr_t) /*_._VALROUT___V614*/ meltfptr[613])->tabval[16] = + ((meltroutine_ptr_t) /*_._VALROUT___V617*/ meltfptr[616])->tabval[16] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V31*/ meltfptr[30]); MELT_LOCATION ("warmelt-outobj.melt:4260:/ initchunk"); @@ -36786,13 +36804,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V614*/ meltfptr[613])) + ( /*_._VALROUT___V617*/ meltfptr[616])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_424__OUTPUCOD_OBJMULTIMSEND#17", + ("putroutconst constnull.drout_426__OUTPUCOD_OBJMULTIMSEND#17", NULL != ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19])); - ((meltroutine_ptr_t) /*_._VALROUT___V614*/ meltfptr[613])->tabval[17] = + ((meltroutine_ptr_t) /*_._VALROUT___V617*/ meltfptr[616])->tabval[17] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]); MELT_LOCATION ("warmelt-outobj.melt:4343:/ initchunk"); @@ -36801,13 +36819,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V616*/ meltfptr[615])) + ( /*_._VALROUT___V619*/ meltfptr[618])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_429__LAMBDA_#0", - NULL != ( /*_.GET_CTYPE__V110*/ meltfptr[109])); - ((meltroutine_ptr_t) /*_._VALROUT___V616*/ meltfptr[615])->tabval[0] = - (melt_ptr_t) ( /*_.GET_CTYPE__V110*/ meltfptr[109]); + melt_checkmsg ("putroutconst constnull.drout_431__LAMBDA_#0", + NULL != ( /*_.GET_CTYPE__V111*/ meltfptr[110])); + ((meltroutine_ptr_t) /*_._VALROUT___V619*/ meltfptr[618])->tabval[0] = + (melt_ptr_t) ( /*_.GET_CTYPE__V111*/ meltfptr[110]); MELT_LOCATION ("warmelt-outobj.melt:4343:/ initchunk"); /*^putroutconst */ @@ -36815,12 +36833,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V616*/ meltfptr[615])) + ( /*_._VALROUT___V619*/ meltfptr[618])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_429__LAMBDA_#1", + melt_checkmsg ("putroutconst constnull.drout_431__LAMBDA_#1", NULL != ( /*_.CLASS_CTYPE__V28*/ meltfptr[27])); - ((meltroutine_ptr_t) /*_._VALROUT___V616*/ meltfptr[615])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V619*/ meltfptr[618])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_CTYPE__V28*/ meltfptr[27]); MELT_LOCATION ("warmelt-outobj.melt:4343:/ initchunk"); @@ -36828,12 +36846,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_9 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V616*/ meltfptr[615])) == + ( /*_._VALROUT___V619*/ meltfptr[618])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V264*/ meltfptr[263]); - ((meltroutine_ptr_t) /*_._VALROUT___V616*/ meltfptr[615])->tabval[2] = - (melt_ptr_t) ( /*_._VALCLO___V264*/ meltfptr[263]); + NULL != /*_._VALCLO___V265*/ meltfptr[264]); + ((meltroutine_ptr_t) /*_._VALROUT___V619*/ meltfptr[618])->tabval[2] = + (melt_ptr_t) ( /*_._VALCLO___V265*/ meltfptr[264]); MELT_LOCATION ("warmelt-outobj.melt:4343:/ initchunk"); /*^putroutconst */ @@ -36841,12 +36859,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V616*/ meltfptr[615])) + ( /*_._VALROUT___V619*/ meltfptr[618])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_429__LAMBDA_#3", + melt_checkmsg ("putroutconst constnull.drout_431__LAMBDA_#3", NULL != ( /*_.CTYPE_VALUE__V31*/ meltfptr[30])); - ((meltroutine_ptr_t) /*_._VALROUT___V616*/ meltfptr[615])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V619*/ meltfptr[618])->tabval[3] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V31*/ meltfptr[30]); MELT_LOCATION ("warmelt-outobj.melt:4343:/ initchunk"); @@ -36855,18 +36873,18 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V616*/ meltfptr[615])) + ( /*_._VALROUT___V619*/ meltfptr[618])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_429__LAMBDA_#4", + melt_checkmsg ("putroutconst constnull.drout_431__LAMBDA_#4", NULL != ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19])); - ((meltroutine_ptr_t) /*_._VALROUT___V616*/ meltfptr[615])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V619*/ meltfptr[618])->tabval[4] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]); MELT_LOCATION ("warmelt-outobj.melt:4343:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V616*/ meltfptr[615]); + meltgc_touch ( /*_._VALROUT___V619*/ meltfptr[618]); MELT_LOCATION ("warmelt-outobj.melt:4260:/ initchunk"); /*^putroutconst */ @@ -36874,14 +36892,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V614*/ meltfptr[613])) + ( /*_._VALROUT___V617*/ meltfptr[616])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_424__OUTPUCOD_OBJMULTIMSEND#18", - NULL != ( /*_._VALROUT___V616*/ meltfptr[615])); - ((meltroutine_ptr_t) /*_._VALROUT___V614*/ meltfptr[613])->tabval[18] = - (melt_ptr_t) ( /*_._VALROUT___V616*/ meltfptr[615]); + ("putroutconst constnull.drout_426__OUTPUCOD_OBJMULTIMSEND#18", + NULL != ( /*_._VALROUT___V619*/ meltfptr[618])); + ((meltroutine_ptr_t) /*_._VALROUT___V617*/ meltfptr[616])->tabval[18] = + (melt_ptr_t) ( /*_._VALROUT___V619*/ meltfptr[618]); MELT_LOCATION ("warmelt-outobj.melt:4260:/ initchunk"); /*^putroutconst */ @@ -36889,13 +36907,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V614*/ meltfptr[613])) + ( /*_._VALROUT___V617*/ meltfptr[616])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_424__OUTPUCOD_OBJMULTIMSEND#19", + ("putroutconst constnull.drout_426__OUTPUCOD_OBJMULTIMSEND#19", NULL != ( /*_.LIST_EVERY__V56*/ meltfptr[55])); - ((meltroutine_ptr_t) /*_._VALROUT___V614*/ meltfptr[613])->tabval[19] = + ((meltroutine_ptr_t) /*_._VALROUT___V617*/ meltfptr[616])->tabval[19] = (melt_ptr_t) ( /*_.LIST_EVERY__V56*/ meltfptr[55]); MELT_LOCATION ("warmelt-outobj.melt:4260:/ initchunk"); @@ -36904,13 +36922,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V614*/ meltfptr[613])) + ( /*_._VALROUT___V617*/ meltfptr[616])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_424__OUTPUCOD_OBJMULTIMSEND#20", + ("putroutconst constnull.drout_426__OUTPUCOD_OBJMULTIMSEND#20", NULL != ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19])); - ((meltroutine_ptr_t) /*_._VALROUT___V614*/ meltfptr[613])->tabval[20] = + ((meltroutine_ptr_t) /*_._VALROUT___V617*/ meltfptr[616])->tabval[20] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]); MELT_LOCATION ("warmelt-outobj.melt:4371:/ initchunk"); @@ -36919,18 +36937,18 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V617*/ meltfptr[616])) + ( /*_._VALROUT___V620*/ meltfptr[619])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_430__LAMBDA_#0", + melt_checkmsg ("putroutconst constnull.drout_432__LAMBDA_#0", NULL != ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19])); - ((meltroutine_ptr_t) /*_._VALROUT___V617*/ meltfptr[616])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V620*/ meltfptr[619])->tabval[0] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]); MELT_LOCATION ("warmelt-outobj.melt:4371:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V617*/ meltfptr[616]); + meltgc_touch ( /*_._VALROUT___V620*/ meltfptr[619]); MELT_LOCATION ("warmelt-outobj.melt:4260:/ initchunk"); /*^putroutconst */ @@ -36938,14 +36956,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V614*/ meltfptr[613])) + ( /*_._VALROUT___V617*/ meltfptr[616])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_424__OUTPUCOD_OBJMULTIMSEND#21", - NULL != ( /*_._VALROUT___V617*/ meltfptr[616])); - ((meltroutine_ptr_t) /*_._VALROUT___V614*/ meltfptr[613])->tabval[21] = - (melt_ptr_t) ( /*_._VALROUT___V617*/ meltfptr[616]); + ("putroutconst constnull.drout_426__OUTPUCOD_OBJMULTIMSEND#21", + NULL != ( /*_._VALROUT___V620*/ meltfptr[619])); + ((meltroutine_ptr_t) /*_._VALROUT___V617*/ meltfptr[616])->tabval[21] = + (melt_ptr_t) ( /*_._VALROUT___V620*/ meltfptr[619]); MELT_LOCATION ("warmelt-outobj.melt:4260:/ initchunk"); /*^putroutconst */ @@ -36953,14 +36971,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V614*/ meltfptr[613])) + ( /*_._VALROUT___V617*/ meltfptr[616])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_424__OUTPUCOD_OBJMULTIMSEND#22", - NULL != ( /*_._VALROUT___V618*/ meltfptr[617])); - ((meltroutine_ptr_t) /*_._VALROUT___V614*/ meltfptr[613])->tabval[22] = - (melt_ptr_t) ( /*_._VALROUT___V618*/ meltfptr[617]); + ("putroutconst constnull.drout_426__OUTPUCOD_OBJMULTIMSEND#22", + NULL != ( /*_._VALROUT___V621*/ meltfptr[620])); + ((meltroutine_ptr_t) /*_._VALROUT___V617*/ meltfptr[616])->tabval[22] = + (melt_ptr_t) ( /*_._VALROUT___V621*/ meltfptr[620]); MELT_LOCATION ("warmelt-outobj.melt:4260:/ initchunk"); /*^putroutconst */ @@ -36968,56 +36986,56 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V614*/ meltfptr[613])) + ( /*_._VALROUT___V617*/ meltfptr[616])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_424__OUTPUCOD_OBJMULTIMSEND#23", - NULL != ( /*_._VALROUT___V619*/ meltfptr[618])); - ((meltroutine_ptr_t) /*_._VALROUT___V614*/ meltfptr[613])->tabval[23] = - (melt_ptr_t) ( /*_._VALROUT___V619*/ meltfptr[618]); + ("putroutconst constnull.drout_426__OUTPUCOD_OBJMULTIMSEND#23", + NULL != ( /*_._VALROUT___V622*/ meltfptr[621])); + ((meltroutine_ptr_t) /*_._VALROUT___V617*/ meltfptr[616])->tabval[23] = + (melt_ptr_t) ( /*_._VALROUT___V622*/ meltfptr[621]); MELT_LOCATION ("warmelt-outobj.melt:4260:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V614*/ meltfptr[613]); + meltgc_touch ( /*_._VALROUT___V617*/ meltfptr[616]); /*putclosurout#85 */ melt_assertmsg ("putclosrout#85 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V620*/ meltfptr[619])) == + ( /*_._VALCLO___V623*/ meltfptr[622])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#85 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V614*/ meltfptr[613])) == + ( /*_._VALROUT___V617*/ meltfptr[616])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V620*/ meltfptr[619])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V614*/ meltfptr[613]); + ((meltclosure_ptr_t) /*_._VALCLO___V623*/ meltfptr[622])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V617*/ meltfptr[616]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V620*/ meltfptr[619]); + meltgc_touch ( /*_._VALCLO___V623*/ meltfptr[622]); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_426__CLASS_OBJMULTIMSEND @#1", + melt_assertmsg ("checkobj putslot ~dsym_428__CLASS_OBJMULTIMSEND @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V621*/ meltfptr[620])) == + ( /*_._VALDATA___V624*/ meltfptr[623])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_426__CLASS_OBJMULTIMSEND @#1", + melt_assertmsg ("checkoff putslot ~dsym_428__CLASS_OBJMULTIMSEND @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V621*/ - meltfptr[620])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V621*/ meltfptr[620]))->obj_vartab[1] = + ( /*_._VALDATA___V624*/ + meltfptr[623])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V624*/ meltfptr[623]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V622*/ meltfptr[621]); + /*_._VALSTR___V625*/ meltfptr[624]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V621*/ meltfptr[620]); + meltgc_touch ( /*_._VALDATA___V624*/ meltfptr[623]); - melt_dbgtrace_written_object ( /*_._VALDATA___V621*/ meltfptr[620], + melt_dbgtrace_written_object ( /*_._VALDATA___V624*/ meltfptr[623], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:4415:/ initchunk"); @@ -37026,25 +37044,25 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V623*/ meltfptr[622])) + ( /*_._VALROUT___V626*/ meltfptr[625])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_433__OUTPUCOD_OBJCLEAR#0", - NULL != ( /*_.CLASS_OBJCLEAR__V114*/ meltfptr[113])); - ((meltroutine_ptr_t) /*_._VALROUT___V623*/ meltfptr[622])->tabval[0] = - (melt_ptr_t) ( /*_.CLASS_OBJCLEAR__V114*/ meltfptr[113]); + melt_checkmsg ("putroutconst constnull.drout_435__OUTPUCOD_OBJCLEAR#0", + NULL != ( /*_.CLASS_OBJCLEAR__V115*/ meltfptr[114])); + ((meltroutine_ptr_t) /*_._VALROUT___V626*/ meltfptr[625])->tabval[0] = + (melt_ptr_t) ( /*_.CLASS_OBJCLEAR__V115*/ meltfptr[114]); MELT_LOCATION ("warmelt-outobj.melt:4415:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V623*/ meltfptr[622])) == + ( /*_._VALROUT___V626*/ meltfptr[625])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V264*/ meltfptr[263]); - ((meltroutine_ptr_t) /*_._VALROUT___V623*/ meltfptr[622])->tabval[1] = - (melt_ptr_t) ( /*_._VALCLO___V264*/ meltfptr[263]); + NULL != /*_._VALCLO___V265*/ meltfptr[264]); + ((meltroutine_ptr_t) /*_._VALROUT___V626*/ meltfptr[625])->tabval[1] = + (melt_ptr_t) ( /*_._VALCLO___V265*/ meltfptr[264]); MELT_LOCATION ("warmelt-outobj.melt:4415:/ initchunk"); /*^putroutconst */ @@ -37052,12 +37070,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V623*/ meltfptr[622])) + ( /*_._VALROUT___V626*/ meltfptr[625])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_433__OUTPUCOD_OBJCLEAR#2", + melt_checkmsg ("putroutconst constnull.drout_435__OUTPUCOD_OBJCLEAR#2", NULL != ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19])); - ((meltroutine_ptr_t) /*_._VALROUT___V623*/ meltfptr[622])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V626*/ meltfptr[625])->tabval[2] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]); MELT_LOCATION ("warmelt-outobj.melt:4415:/ initchunk"); @@ -37065,12 +37083,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_9 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V623*/ meltfptr[622])) == + ( /*_._VALROUT___V626*/ meltfptr[625])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALDATA___V197*/ meltfptr[196]); - ((meltroutine_ptr_t) /*_._VALROUT___V623*/ meltfptr[622])->tabval[3] = - (melt_ptr_t) ( /*_._VALDATA___V197*/ meltfptr[196]); + NULL != /*_._VALDATA___V198*/ meltfptr[197]); + ((meltroutine_ptr_t) /*_._VALROUT___V626*/ meltfptr[625])->tabval[3] = + (melt_ptr_t) ( /*_._VALDATA___V198*/ meltfptr[197]); MELT_LOCATION ("warmelt-outobj.melt:4415:/ initchunk"); /*^putroutconst */ @@ -37078,55 +37096,55 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V623*/ meltfptr[622])) + ( /*_._VALROUT___V626*/ meltfptr[625])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_433__OUTPUCOD_OBJCLEAR#4", + melt_checkmsg ("putroutconst constnull.drout_435__OUTPUCOD_OBJCLEAR#4", NULL != ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5])); - ((meltroutine_ptr_t) /*_._VALROUT___V623*/ meltfptr[622])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V626*/ meltfptr[625])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5]); MELT_LOCATION ("warmelt-outobj.melt:4415:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V623*/ meltfptr[622]); + meltgc_touch ( /*_._VALROUT___V626*/ meltfptr[625]); /*putclosurout#86 */ melt_assertmsg ("putclosrout#86 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V624*/ meltfptr[623])) == + ( /*_._VALCLO___V627*/ meltfptr[626])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#86 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V623*/ meltfptr[622])) == + ( /*_._VALROUT___V626*/ meltfptr[625])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V624*/ meltfptr[623])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V623*/ meltfptr[622]); + ((meltclosure_ptr_t) /*_._VALCLO___V627*/ meltfptr[626])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V626*/ meltfptr[625]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V624*/ meltfptr[623]); + meltgc_touch ( /*_._VALCLO___V627*/ meltfptr[626]); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_435__CLASS_OBJCLEAR @#1", + melt_assertmsg ("checkobj putslot ~dsym_437__CLASS_OBJCLEAR @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V625*/ meltfptr[624])) == + ( /*_._VALDATA___V628*/ meltfptr[627])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_435__CLASS_OBJCLEAR @#1", + melt_assertmsg ("checkoff putslot ~dsym_437__CLASS_OBJCLEAR @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V625*/ - meltfptr[624])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V625*/ meltfptr[624]))->obj_vartab[1] = + ( /*_._VALDATA___V628*/ + meltfptr[627])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V628*/ meltfptr[627]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V626*/ meltfptr[625]); + /*_._VALSTR___V629*/ meltfptr[628]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V625*/ meltfptr[624]); + meltgc_touch ( /*_._VALDATA___V628*/ meltfptr[627]); - melt_dbgtrace_written_object ( /*_._VALDATA___V625*/ meltfptr[624], + melt_dbgtrace_written_object ( /*_._VALDATA___V628*/ meltfptr[627], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:4431:/ initchunk"); @@ -37135,14 +37153,14 @@ meltmod__WARMELTmiOUTOBJ__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___V630*/ meltfptr[629])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_437__OUTPUCOD_OBJRAWALLOCOBJ#0", - NULL != ( /*_.CLASS_OBJRAWALLOCOBJ__V115*/ meltfptr[114])); - ((meltroutine_ptr_t) /*_._VALROUT___V627*/ meltfptr[626])->tabval[0] = - (melt_ptr_t) ( /*_.CLASS_OBJRAWALLOCOBJ__V115*/ meltfptr[114]); + ("putroutconst constnull.drout_439__OUTPUCOD_OBJRAWALLOCOBJ#0", + NULL != ( /*_.CLASS_OBJRAWALLOCOBJ__V116*/ meltfptr[115])); + ((meltroutine_ptr_t) /*_._VALROUT___V630*/ meltfptr[629])->tabval[0] = + (melt_ptr_t) ( /*_.CLASS_OBJRAWALLOCOBJ__V116*/ meltfptr[115]); MELT_LOCATION ("warmelt-outobj.melt:4431:/ initchunk"); /*^putroutconst */ @@ -37150,13 +37168,13 @@ meltmod__WARMELTmiOUTOBJ__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___V630*/ meltfptr[629])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_437__OUTPUCOD_OBJRAWALLOCOBJ#1", + ("putroutconst constnull.drout_439__OUTPUCOD_OBJRAWALLOCOBJ#1", NULL != ( /*_.DISCR_INTEGER__V52*/ meltfptr[51])); - ((meltroutine_ptr_t) /*_._VALROUT___V627*/ meltfptr[626])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V630*/ meltfptr[629])->tabval[1] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V52*/ meltfptr[51]); MELT_LOCATION ("warmelt-outobj.melt:4431:/ initchunk"); @@ -37165,13 +37183,13 @@ meltmod__WARMELTmiOUTOBJ__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___V630*/ meltfptr[629])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_437__OUTPUCOD_OBJRAWALLOCOBJ#2", + ("putroutconst constnull.drout_439__OUTPUCOD_OBJRAWALLOCOBJ#2", NULL != ( /*_.CLASS_OBJVALUE__V27*/ meltfptr[26])); - ((meltroutine_ptr_t) /*_._VALROUT___V627*/ meltfptr[626])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V630*/ meltfptr[629])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_OBJVALUE__V27*/ meltfptr[26]); MELT_LOCATION ("warmelt-outobj.melt:4431:/ initchunk"); @@ -37179,12 +37197,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_9 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V627*/ meltfptr[626])) == + ( /*_._VALROUT___V630*/ meltfptr[629])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V264*/ meltfptr[263]); - ((meltroutine_ptr_t) /*_._VALROUT___V627*/ meltfptr[626])->tabval[3] = - (melt_ptr_t) ( /*_._VALCLO___V264*/ meltfptr[263]); + NULL != /*_._VALCLO___V265*/ meltfptr[264]); + ((meltroutine_ptr_t) /*_._VALROUT___V630*/ meltfptr[629])->tabval[3] = + (melt_ptr_t) ( /*_._VALCLO___V265*/ meltfptr[264]); MELT_LOCATION ("warmelt-outobj.melt:4431:/ initchunk"); /*^putroutconst */ @@ -37192,13 +37210,13 @@ meltmod__WARMELTmiOUTOBJ__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___V630*/ meltfptr[629])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_437__OUTPUCOD_OBJRAWALLOCOBJ#4", + ("putroutconst constnull.drout_439__OUTPUCOD_OBJRAWALLOCOBJ#4", NULL != ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19])); - ((meltroutine_ptr_t) /*_._VALROUT___V627*/ meltfptr[626])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V630*/ meltfptr[629])->tabval[4] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]); MELT_LOCATION ("warmelt-outobj.melt:4431:/ initchunk"); @@ -37206,12 +37224,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_9 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V627*/ meltfptr[626])) == + ( /*_._VALROUT___V630*/ meltfptr[629])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALDATA___V197*/ meltfptr[196]); - ((meltroutine_ptr_t) /*_._VALROUT___V627*/ meltfptr[626])->tabval[5] = - (melt_ptr_t) ( /*_._VALDATA___V197*/ meltfptr[196]); + NULL != /*_._VALDATA___V198*/ meltfptr[197]); + ((meltroutine_ptr_t) /*_._VALROUT___V630*/ meltfptr[629])->tabval[5] = + (melt_ptr_t) ( /*_._VALDATA___V198*/ meltfptr[197]); MELT_LOCATION ("warmelt-outobj.melt:4431:/ initchunk"); /*^putroutconst */ @@ -37219,56 +37237,56 @@ meltmod__WARMELTmiOUTOBJ__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___V630*/ meltfptr[629])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_437__OUTPUCOD_OBJRAWALLOCOBJ#6", + ("putroutconst constnull.drout_439__OUTPUCOD_OBJRAWALLOCOBJ#6", NULL != ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5])); - ((meltroutine_ptr_t) /*_._VALROUT___V627*/ meltfptr[626])->tabval[6] = + ((meltroutine_ptr_t) /*_._VALROUT___V630*/ meltfptr[629])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5]); MELT_LOCATION ("warmelt-outobj.melt:4431:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V627*/ meltfptr[626]); + meltgc_touch ( /*_._VALROUT___V630*/ meltfptr[629]); /*putclosurout#87 */ melt_assertmsg ("putclosrout#87 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V628*/ meltfptr[627])) == + ( /*_._VALCLO___V631*/ meltfptr[630])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#87 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V627*/ meltfptr[626])) == + ( /*_._VALROUT___V630*/ meltfptr[629])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V628*/ meltfptr[627])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V627*/ meltfptr[626]); + ((meltclosure_ptr_t) /*_._VALCLO___V631*/ meltfptr[630])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V630*/ meltfptr[629]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V628*/ meltfptr[627]); + meltgc_touch ( /*_._VALCLO___V631*/ meltfptr[630]); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_439__CLASS_OBJRAWALLOCOBJ @#1", + melt_assertmsg ("checkobj putslot ~dsym_441__CLASS_OBJRAWALLOCOBJ @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V629*/ meltfptr[628])) == + ( /*_._VALDATA___V632*/ meltfptr[631])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_439__CLASS_OBJRAWALLOCOBJ @#1", + melt_assertmsg ("checkoff putslot ~dsym_441__CLASS_OBJRAWALLOCOBJ @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V629*/ - meltfptr[628])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V629*/ meltfptr[628]))->obj_vartab[1] = + ( /*_._VALDATA___V632*/ + meltfptr[631])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V632*/ meltfptr[631]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V630*/ meltfptr[629]); + /*_._VALSTR___V633*/ meltfptr[632]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V629*/ meltfptr[628]); + meltgc_touch ( /*_._VALDATA___V632*/ meltfptr[631]); - melt_dbgtrace_written_object ( /*_._VALDATA___V629*/ meltfptr[628], + melt_dbgtrace_written_object ( /*_._VALDATA___V632*/ meltfptr[631], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:4469:/ initchunk"); @@ -37277,14 +37295,14 @@ meltmod__WARMELTmiOUTOBJ__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___V634*/ meltfptr[633])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_441__OUTPUCOD_OBJNEWCLOSURE#0", - NULL != ( /*_.CLASS_OBJNEWCLOSURE__V116*/ meltfptr[115])); - ((meltroutine_ptr_t) /*_._VALROUT___V631*/ meltfptr[630])->tabval[0] = - (melt_ptr_t) ( /*_.CLASS_OBJNEWCLOSURE__V116*/ meltfptr[115]); + ("putroutconst constnull.drout_443__OUTPUCOD_OBJNEWCLOSURE#0", + NULL != ( /*_.CLASS_OBJNEWCLOSURE__V117*/ meltfptr[116])); + ((meltroutine_ptr_t) /*_._VALROUT___V634*/ meltfptr[633])->tabval[0] = + (melt_ptr_t) ( /*_.CLASS_OBJNEWCLOSURE__V117*/ meltfptr[116]); MELT_LOCATION ("warmelt-outobj.melt:4469:/ initchunk"); /*^putroutconst */ @@ -37292,13 +37310,13 @@ meltmod__WARMELTmiOUTOBJ__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___V634*/ meltfptr[633])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_441__OUTPUCOD_OBJNEWCLOSURE#1", + ("putroutconst constnull.drout_443__OUTPUCOD_OBJNEWCLOSURE#1", NULL != ( /*_.DISCR_INTEGER__V52*/ meltfptr[51])); - ((meltroutine_ptr_t) /*_._VALROUT___V631*/ meltfptr[630])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V634*/ meltfptr[633])->tabval[1] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V52*/ meltfptr[51]); MELT_LOCATION ("warmelt-outobj.melt:4469:/ initchunk"); @@ -37306,12 +37324,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_9 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V631*/ meltfptr[630])) == + ( /*_._VALROUT___V634*/ meltfptr[633])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V264*/ meltfptr[263]); - ((meltroutine_ptr_t) /*_._VALROUT___V631*/ meltfptr[630])->tabval[2] = - (melt_ptr_t) ( /*_._VALCLO___V264*/ meltfptr[263]); + NULL != /*_._VALCLO___V265*/ meltfptr[264]); + ((meltroutine_ptr_t) /*_._VALROUT___V634*/ meltfptr[633])->tabval[2] = + (melt_ptr_t) ( /*_._VALCLO___V265*/ meltfptr[264]); MELT_LOCATION ("warmelt-outobj.melt:4469:/ initchunk"); /*^putroutconst */ @@ -37319,13 +37337,13 @@ meltmod__WARMELTmiOUTOBJ__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___V634*/ meltfptr[633])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_441__OUTPUCOD_OBJNEWCLOSURE#3", + ("putroutconst constnull.drout_443__OUTPUCOD_OBJNEWCLOSURE#3", NULL != ( /*_.LIST_EVERY__V56*/ meltfptr[55])); - ((meltroutine_ptr_t) /*_._VALROUT___V631*/ meltfptr[630])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V634*/ meltfptr[633])->tabval[3] = (melt_ptr_t) ( /*_.LIST_EVERY__V56*/ meltfptr[55]); MELT_LOCATION ("warmelt-outobj.melt:4469:/ initchunk"); @@ -37334,13 +37352,13 @@ meltmod__WARMELTmiOUTOBJ__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___V634*/ meltfptr[633])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_441__OUTPUCOD_OBJNEWCLOSURE#4", + ("putroutconst constnull.drout_443__OUTPUCOD_OBJNEWCLOSURE#4", NULL != ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19])); - ((meltroutine_ptr_t) /*_._VALROUT___V631*/ meltfptr[630])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V634*/ meltfptr[633])->tabval[4] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]); MELT_LOCATION ("warmelt-outobj.melt:4469:/ initchunk"); @@ -37348,12 +37366,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_9 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V631*/ meltfptr[630])) == + ( /*_._VALROUT___V634*/ meltfptr[633])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALDATA___V197*/ meltfptr[196]); - ((meltroutine_ptr_t) /*_._VALROUT___V631*/ meltfptr[630])->tabval[5] = - (melt_ptr_t) ( /*_._VALDATA___V197*/ meltfptr[196]); + NULL != /*_._VALDATA___V198*/ meltfptr[197]); + ((meltroutine_ptr_t) /*_._VALROUT___V634*/ meltfptr[633])->tabval[5] = + (melt_ptr_t) ( /*_._VALDATA___V198*/ meltfptr[197]); MELT_LOCATION ("warmelt-outobj.melt:4469:/ initchunk"); /*^putroutconst */ @@ -37361,13 +37379,13 @@ meltmod__WARMELTmiOUTOBJ__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___V634*/ meltfptr[633])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_441__OUTPUCOD_OBJNEWCLOSURE#6", + ("putroutconst constnull.drout_443__OUTPUCOD_OBJNEWCLOSURE#6", NULL != ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5])); - ((meltroutine_ptr_t) /*_._VALROUT___V631*/ meltfptr[630])->tabval[6] = + ((meltroutine_ptr_t) /*_._VALROUT___V634*/ meltfptr[633])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5]); MELT_LOCATION ("warmelt-outobj.melt:4482:/ initchunk"); @@ -37376,12 +37394,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V632*/ meltfptr[631])) + ( /*_._VALROUT___V635*/ meltfptr[634])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_445__LAMBDA_#0", + melt_checkmsg ("putroutconst constnull.drout_447__LAMBDA_#0", NULL != ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19])); - ((meltroutine_ptr_t) /*_._VALROUT___V632*/ meltfptr[631])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V635*/ meltfptr[634])->tabval[0] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]); MELT_LOCATION ("warmelt-outobj.melt:4482:/ initchunk"); @@ -37389,12 +37407,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_9 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V632*/ meltfptr[631])) == + ( /*_._VALROUT___V635*/ meltfptr[634])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALDATA___V197*/ meltfptr[196]); - ((meltroutine_ptr_t) /*_._VALROUT___V632*/ meltfptr[631])->tabval[1] = - (melt_ptr_t) ( /*_._VALDATA___V197*/ meltfptr[196]); + NULL != /*_._VALDATA___V198*/ meltfptr[197]); + ((meltroutine_ptr_t) /*_._VALROUT___V635*/ meltfptr[634])->tabval[1] = + (melt_ptr_t) ( /*_._VALDATA___V198*/ meltfptr[197]); MELT_LOCATION ("warmelt-outobj.melt:4482:/ initchunk"); /*^putroutconst */ @@ -37402,18 +37420,18 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V632*/ meltfptr[631])) + ( /*_._VALROUT___V635*/ meltfptr[634])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_445__LAMBDA_#2", + melt_checkmsg ("putroutconst constnull.drout_447__LAMBDA_#2", NULL != ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5])); - ((meltroutine_ptr_t) /*_._VALROUT___V632*/ meltfptr[631])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V635*/ meltfptr[634])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5]); MELT_LOCATION ("warmelt-outobj.melt:4482:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V632*/ meltfptr[631]); + meltgc_touch ( /*_._VALROUT___V635*/ meltfptr[634]); MELT_LOCATION ("warmelt-outobj.melt:4469:/ initchunk"); /*^putroutconst */ @@ -37421,14 +37439,14 @@ meltmod__WARMELTmiOUTOBJ__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___V634*/ meltfptr[633])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_441__OUTPUCOD_OBJNEWCLOSURE#7", - NULL != ( /*_._VALROUT___V632*/ meltfptr[631])); - ((meltroutine_ptr_t) /*_._VALROUT___V631*/ meltfptr[630])->tabval[7] = - (melt_ptr_t) ( /*_._VALROUT___V632*/ meltfptr[631]); + ("putroutconst constnull.drout_443__OUTPUCOD_OBJNEWCLOSURE#7", + NULL != ( /*_._VALROUT___V635*/ meltfptr[634])); + ((meltroutine_ptr_t) /*_._VALROUT___V634*/ meltfptr[633])->tabval[7] = + (melt_ptr_t) ( /*_._VALROUT___V635*/ meltfptr[634]); MELT_LOCATION ("warmelt-outobj.melt:4469:/ initchunk"); /*^putroutconst */ @@ -37436,13 +37454,13 @@ meltmod__WARMELTmiOUTOBJ__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___V634*/ meltfptr[633])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_441__OUTPUCOD_OBJNEWCLOSURE#8", + ("putroutconst constnull.drout_443__OUTPUCOD_OBJNEWCLOSURE#8", NULL != ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19])); - ((meltroutine_ptr_t) /*_._VALROUT___V631*/ meltfptr[630])->tabval[8] = + ((meltroutine_ptr_t) /*_._VALROUT___V634*/ meltfptr[633])->tabval[8] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]); MELT_LOCATION ("warmelt-outobj.melt:4469:/ initchunk"); @@ -37450,12 +37468,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_9 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V631*/ meltfptr[630])) == + ( /*_._VALROUT___V634*/ meltfptr[633])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALDATA___V197*/ meltfptr[196]); - ((meltroutine_ptr_t) /*_._VALROUT___V631*/ meltfptr[630])->tabval[9] = - (melt_ptr_t) ( /*_._VALDATA___V197*/ meltfptr[196]); + NULL != /*_._VALDATA___V198*/ meltfptr[197]); + ((meltroutine_ptr_t) /*_._VALROUT___V634*/ meltfptr[633])->tabval[9] = + (melt_ptr_t) ( /*_._VALDATA___V198*/ meltfptr[197]); MELT_LOCATION ("warmelt-outobj.melt:4469:/ initchunk"); /*^putroutconst */ @@ -37463,56 +37481,56 @@ meltmod__WARMELTmiOUTOBJ__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___V634*/ meltfptr[633])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_441__OUTPUCOD_OBJNEWCLOSURE#10", + ("putroutconst constnull.drout_443__OUTPUCOD_OBJNEWCLOSURE#10", NULL != ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5])); - ((meltroutine_ptr_t) /*_._VALROUT___V631*/ meltfptr[630])->tabval[10] = + ((meltroutine_ptr_t) /*_._VALROUT___V634*/ meltfptr[633])->tabval[10] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5]); MELT_LOCATION ("warmelt-outobj.melt:4469:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V631*/ meltfptr[630]); + meltgc_touch ( /*_._VALROUT___V634*/ meltfptr[633]); /*putclosurout#88 */ melt_assertmsg ("putclosrout#88 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V633*/ meltfptr[632])) == + ( /*_._VALCLO___V636*/ meltfptr[635])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#88 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V631*/ meltfptr[630])) == + ( /*_._VALROUT___V634*/ meltfptr[633])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V633*/ meltfptr[632])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V631*/ meltfptr[630]); + ((meltclosure_ptr_t) /*_._VALCLO___V636*/ meltfptr[635])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V634*/ meltfptr[633]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V633*/ meltfptr[632]); + meltgc_touch ( /*_._VALCLO___V636*/ meltfptr[635]); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_443__CLASS_OBJNEWCLOSURE @#1", + melt_assertmsg ("checkobj putslot ~dsym_445__CLASS_OBJNEWCLOSURE @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V634*/ meltfptr[633])) == + ( /*_._VALDATA___V637*/ meltfptr[636])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_443__CLASS_OBJNEWCLOSURE @#1", + melt_assertmsg ("checkoff putslot ~dsym_445__CLASS_OBJNEWCLOSURE @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V634*/ - meltfptr[633])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V634*/ meltfptr[633]))->obj_vartab[1] = + ( /*_._VALDATA___V637*/ + meltfptr[636])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V637*/ meltfptr[636]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V635*/ meltfptr[634]); + /*_._VALSTR___V638*/ meltfptr[637]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V634*/ meltfptr[633]); + meltgc_touch ( /*_._VALDATA___V637*/ meltfptr[636]); - melt_dbgtrace_written_object ( /*_._VALDATA___V634*/ meltfptr[633], + melt_dbgtrace_written_object ( /*_._VALDATA___V637*/ meltfptr[636], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:4502:/ initchunk"); @@ -37521,25 +37539,38 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V636*/ meltfptr[635])) + ( /*_._VALROUT___V639*/ meltfptr[638])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_446__OUTPUCOD_OBJTOUCH#0", - NULL != ( /*_.CLASS_OBJTOUCH__V117*/ meltfptr[116])); - ((meltroutine_ptr_t) /*_._VALROUT___V636*/ meltfptr[635])->tabval[0] = - (melt_ptr_t) ( /*_.CLASS_OBJTOUCH__V117*/ meltfptr[116]); + melt_checkmsg ("putroutconst constnull.drout_448__OUTPUCOD_OBJTOUCH#0", + NULL != ( /*_.CLASS_OBJTOUCH__V118*/ meltfptr[117])); + ((meltroutine_ptr_t) /*_._VALROUT___V639*/ meltfptr[638])->tabval[0] = + (melt_ptr_t) ( /*_.CLASS_OBJTOUCH__V118*/ meltfptr[117]); + + +#undef meltfram__ +} /*end of meltmod__WARMELTmiOUTOBJ__initialmeltchunk_9 */ +void +meltmod__WARMELTmiOUTOBJ__initialmeltchunk_10 (meltinitial_frame_t * + meltmeltframptr__, + char meltpredefinited[]) +{ +#define meltfram__ (*meltmeltframptr__) +#undef meltcallcount +#define meltcallcount 0L + (void) meltpredefinited; MELT_LOCATION ("warmelt-outobj.melt:4502:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V636*/ meltfptr[635])) == + ( /*_._VALROUT___V639*/ meltfptr[638])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V264*/ meltfptr[263]); - ((meltroutine_ptr_t) /*_._VALROUT___V636*/ meltfptr[635])->tabval[1] = - (melt_ptr_t) ( /*_._VALCLO___V264*/ meltfptr[263]); + NULL != /*_._VALCLO___V265*/ meltfptr[264]); + ((meltroutine_ptr_t) /*_._VALROUT___V639*/ meltfptr[638])->tabval[1] = + (melt_ptr_t) ( /*_._VALCLO___V265*/ meltfptr[264]); MELT_LOCATION ("warmelt-outobj.melt:4502:/ initchunk"); /*^putroutconst */ @@ -37547,68 +37578,55 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_9 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V636*/ meltfptr[635])) + ( /*_._VALROUT___V639*/ meltfptr[638])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_446__OUTPUCOD_OBJTOUCH#2", + melt_checkmsg ("putroutconst constnull.drout_448__OUTPUCOD_OBJTOUCH#2", NULL != ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19])); - ((meltroutine_ptr_t) /*_._VALROUT___V636*/ meltfptr[635])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V639*/ meltfptr[638])->tabval[2] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]); MELT_LOCATION ("warmelt-outobj.melt:4502:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V636*/ meltfptr[635]); - - -#undef meltfram__ -} /*end of meltmod__WARMELTmiOUTOBJ__initialmeltchunk_9 */ + meltgc_touch ( /*_._VALROUT___V639*/ meltfptr[638]); -void -meltmod__WARMELTmiOUTOBJ__initialmeltchunk_10 (meltinitial_frame_t * - meltmeltframptr__, - char meltpredefinited[]) -{ -#define meltfram__ (*meltmeltframptr__) -#undef meltcallcount -#define meltcallcount 0L - (void) meltpredefinited; -/*putclosurout#89*/ + /*putclosurout#89 */ melt_assertmsg ("putclosrout#89 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V637*/ meltfptr[636])) == + ( /*_._VALCLO___V640*/ meltfptr[639])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#89 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V636*/ meltfptr[635])) == + ( /*_._VALROUT___V639*/ meltfptr[638])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V637*/ meltfptr[636])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V636*/ meltfptr[635]); + ((meltclosure_ptr_t) /*_._VALCLO___V640*/ meltfptr[639])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V639*/ meltfptr[638]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V637*/ meltfptr[636]); + meltgc_touch ( /*_._VALCLO___V640*/ meltfptr[639]); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_448__CLASS_OBJTOUCH @#1", + melt_assertmsg ("checkobj putslot ~dsym_450__CLASS_OBJTOUCH @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V638*/ meltfptr[637])) == + ( /*_._VALDATA___V641*/ meltfptr[640])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_448__CLASS_OBJTOUCH @#1", + melt_assertmsg ("checkoff putslot ~dsym_450__CLASS_OBJTOUCH @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V638*/ - meltfptr[637])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V638*/ meltfptr[637]))->obj_vartab[1] = + ( /*_._VALDATA___V641*/ + meltfptr[640])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V641*/ meltfptr[640]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V639*/ meltfptr[638]); + /*_._VALSTR___V642*/ meltfptr[641]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V638*/ meltfptr[637]); + meltgc_touch ( /*_._VALDATA___V641*/ meltfptr[640]); - melt_dbgtrace_written_object ( /*_._VALDATA___V638*/ meltfptr[637], + melt_dbgtrace_written_object ( /*_._VALDATA___V641*/ meltfptr[640], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:4527:/ initchunk"); @@ -37617,26 +37635,26 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_10 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V640*/ meltfptr[639])) + ( /*_._VALROUT___V643*/ meltfptr[642])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_450__OUTPUCOD_DBGTRACEWRITEOBJ#0", - NULL != ( /*_.CLASS_OBJDBGTRACEWRITEOBJ__V118*/ meltfptr[117])); - ((meltroutine_ptr_t) /*_._VALROUT___V640*/ meltfptr[639])->tabval[0] = - (melt_ptr_t) ( /*_.CLASS_OBJDBGTRACEWRITEOBJ__V118*/ meltfptr[117]); + ("putroutconst constnull.drout_452__OUTPUCOD_DBGTRACEWRITEOBJ#0", + NULL != ( /*_.CLASS_OBJDBGTRACEWRITEOBJ__V119*/ meltfptr[118])); + ((meltroutine_ptr_t) /*_._VALROUT___V643*/ meltfptr[642])->tabval[0] = + (melt_ptr_t) ( /*_.CLASS_OBJDBGTRACEWRITEOBJ__V119*/ meltfptr[118]); MELT_LOCATION ("warmelt-outobj.melt:4527:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V640*/ meltfptr[639])) == + ( /*_._VALROUT___V643*/ meltfptr[642])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V264*/ meltfptr[263]); - ((meltroutine_ptr_t) /*_._VALROUT___V640*/ meltfptr[639])->tabval[1] = - (melt_ptr_t) ( /*_._VALCLO___V264*/ meltfptr[263]); + NULL != /*_._VALCLO___V265*/ meltfptr[264]); + ((meltroutine_ptr_t) /*_._VALROUT___V643*/ meltfptr[642])->tabval[1] = + (melt_ptr_t) ( /*_._VALCLO___V265*/ meltfptr[264]); MELT_LOCATION ("warmelt-outobj.melt:4527:/ initchunk"); /*^putroutconst */ @@ -37644,56 +37662,56 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_10 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V640*/ meltfptr[639])) + ( /*_._VALROUT___V643*/ meltfptr[642])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_450__OUTPUCOD_DBGTRACEWRITEOBJ#2", + ("putroutconst constnull.drout_452__OUTPUCOD_DBGTRACEWRITEOBJ#2", NULL != ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19])); - ((meltroutine_ptr_t) /*_._VALROUT___V640*/ meltfptr[639])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V643*/ meltfptr[642])->tabval[2] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]); MELT_LOCATION ("warmelt-outobj.melt:4527:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V640*/ meltfptr[639]); + meltgc_touch ( /*_._VALROUT___V643*/ meltfptr[642]); /*putclosurout#90 */ melt_assertmsg ("putclosrout#90 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V641*/ meltfptr[640])) == + ( /*_._VALCLO___V644*/ meltfptr[643])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#90 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V640*/ meltfptr[639])) == + ( /*_._VALROUT___V643*/ meltfptr[642])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V641*/ meltfptr[640])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V640*/ meltfptr[639]); + ((meltclosure_ptr_t) /*_._VALCLO___V644*/ meltfptr[643])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V643*/ meltfptr[642]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V641*/ meltfptr[640]); + meltgc_touch ( /*_._VALCLO___V644*/ meltfptr[643]); /*putslot */ melt_assertmsg - ("checkobj putslot ~dsym_452__CLASS_OBJDBGTRACEWRITEOBJ @#1", - melt_magic_discr ((melt_ptr_t) ( /*_._VALDATA___V642*/ meltfptr[641])) == + ("checkobj putslot ~dsym_454__CLASS_OBJDBGTRACEWRITEOBJ @#1", + melt_magic_discr ((melt_ptr_t) ( /*_._VALDATA___V645*/ meltfptr[644])) == MELTOBMAG_OBJECT); melt_assertmsg - ("checkoff putslot ~dsym_452__CLASS_OBJDBGTRACEWRITEOBJ @#1", + ("checkoff putslot ~dsym_454__CLASS_OBJDBGTRACEWRITEOBJ @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V642*/ meltfptr[641])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V642*/ meltfptr[641]))->obj_vartab[1] = + ( /*_._VALDATA___V645*/ meltfptr[644])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V645*/ meltfptr[644]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V643*/ meltfptr[642]); + /*_._VALSTR___V646*/ meltfptr[645]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V642*/ meltfptr[641]); + meltgc_touch ( /*_._VALDATA___V645*/ meltfptr[644]); - melt_dbgtrace_written_object ( /*_._VALDATA___V642*/ meltfptr[641], + melt_dbgtrace_written_object ( /*_._VALDATA___V645*/ meltfptr[644], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:4547:/ initchunk"); @@ -37702,37 +37720,37 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_10 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V644*/ meltfptr[643])) + ( /*_._VALROUT___V647*/ meltfptr[646])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_454__OUTPUCOD_OBJPUTUPLE#0", - NULL != ( /*_.CLASS_OBJPUTUPLE__V119*/ meltfptr[118])); - ((meltroutine_ptr_t) /*_._VALROUT___V644*/ meltfptr[643])->tabval[0] = - (melt_ptr_t) ( /*_.CLASS_OBJPUTUPLE__V119*/ meltfptr[118]); + melt_checkmsg ("putroutconst constnull.drout_456__OUTPUCOD_OBJPUTUPLE#0", + NULL != ( /*_.CLASS_OBJPUTUPLE__V120*/ meltfptr[119])); + ((meltroutine_ptr_t) /*_._VALROUT___V647*/ meltfptr[646])->tabval[0] = + (melt_ptr_t) ( /*_.CLASS_OBJPUTUPLE__V120*/ meltfptr[119]); MELT_LOCATION ("warmelt-outobj.melt:4547:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V644*/ meltfptr[643])) == + ( /*_._VALROUT___V647*/ meltfptr[646])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V376*/ meltfptr[375]); - ((meltroutine_ptr_t) /*_._VALROUT___V644*/ meltfptr[643])->tabval[1] = - (melt_ptr_t) ( /*_._VALCLO___V376*/ meltfptr[375]); + NULL != /*_._VALCLO___V377*/ meltfptr[376]); + ((meltroutine_ptr_t) /*_._VALROUT___V647*/ meltfptr[646])->tabval[1] = + (melt_ptr_t) ( /*_._VALCLO___V377*/ meltfptr[376]); MELT_LOCATION ("warmelt-outobj.melt:4547:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V644*/ meltfptr[643])) == + ( /*_._VALROUT___V647*/ meltfptr[646])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V264*/ meltfptr[263]); - ((meltroutine_ptr_t) /*_._VALROUT___V644*/ meltfptr[643])->tabval[2] = - (melt_ptr_t) ( /*_._VALCLO___V264*/ meltfptr[263]); + NULL != /*_._VALCLO___V265*/ meltfptr[264]); + ((meltroutine_ptr_t) /*_._VALROUT___V647*/ meltfptr[646])->tabval[2] = + (melt_ptr_t) ( /*_._VALCLO___V265*/ meltfptr[264]); MELT_LOCATION ("warmelt-outobj.melt:4547:/ initchunk"); /*^putroutconst */ @@ -37740,12 +37758,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_10 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V644*/ meltfptr[643])) + ( /*_._VALROUT___V647*/ meltfptr[646])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_454__OUTPUCOD_OBJPUTUPLE#3", + melt_checkmsg ("putroutconst constnull.drout_456__OUTPUCOD_OBJPUTUPLE#3", NULL != ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19])); - ((meltroutine_ptr_t) /*_._VALROUT___V644*/ meltfptr[643])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V647*/ meltfptr[646])->tabval[3] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]); MELT_LOCATION ("warmelt-outobj.melt:4547:/ initchunk"); @@ -37753,12 +37771,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_10 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V644*/ meltfptr[643])) == + ( /*_._VALROUT___V647*/ meltfptr[646])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALDATA___V197*/ meltfptr[196]); - ((meltroutine_ptr_t) /*_._VALROUT___V644*/ meltfptr[643])->tabval[4] = - (melt_ptr_t) ( /*_._VALDATA___V197*/ meltfptr[196]); + NULL != /*_._VALDATA___V198*/ meltfptr[197]); + ((meltroutine_ptr_t) /*_._VALROUT___V647*/ meltfptr[646])->tabval[4] = + (melt_ptr_t) ( /*_._VALDATA___V198*/ meltfptr[197]); MELT_LOCATION ("warmelt-outobj.melt:4547:/ initchunk"); /*^putroutconst */ @@ -37766,107 +37784,107 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_10 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V644*/ meltfptr[643])) + ( /*_._VALROUT___V647*/ meltfptr[646])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_454__OUTPUCOD_OBJPUTUPLE#5", + melt_checkmsg ("putroutconst constnull.drout_456__OUTPUCOD_OBJPUTUPLE#5", NULL != ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5])); - ((meltroutine_ptr_t) /*_._VALROUT___V644*/ meltfptr[643])->tabval[5] = + ((meltroutine_ptr_t) /*_._VALROUT___V647*/ meltfptr[646])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5]); MELT_LOCATION ("warmelt-outobj.melt:4547:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V644*/ meltfptr[643]); + meltgc_touch ( /*_._VALROUT___V647*/ meltfptr[646]); /*putclosurout#91 */ melt_assertmsg ("putclosrout#91 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V645*/ meltfptr[644])) == + ( /*_._VALCLO___V648*/ meltfptr[647])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#91 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V644*/ meltfptr[643])) == + ( /*_._VALROUT___V647*/ meltfptr[646])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V645*/ meltfptr[644])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V644*/ meltfptr[643]); + ((meltclosure_ptr_t) /*_._VALCLO___V648*/ meltfptr[647])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V647*/ meltfptr[646]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V645*/ meltfptr[644]); + meltgc_touch ( /*_._VALCLO___V648*/ meltfptr[647]); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_456__CLASS_OBJPUTUPLE @#1", + melt_assertmsg ("checkobj putslot ~dsym_458__CLASS_OBJPUTUPLE @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V646*/ meltfptr[645])) == + ( /*_._VALDATA___V649*/ meltfptr[648])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_456__CLASS_OBJPUTUPLE @#1", + melt_assertmsg ("checkoff putslot ~dsym_458__CLASS_OBJPUTUPLE @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V646*/ - meltfptr[645])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V646*/ meltfptr[645]))->obj_vartab[1] = + ( /*_._VALDATA___V649*/ + meltfptr[648])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V649*/ meltfptr[648]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V647*/ meltfptr[646]); + /*_._VALSTR___V650*/ meltfptr[649]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V646*/ meltfptr[645]); + meltgc_touch ( /*_._VALDATA___V649*/ meltfptr[648]); - melt_dbgtrace_written_object ( /*_._VALDATA___V646*/ meltfptr[645], + melt_dbgtrace_written_object ( /*_._VALDATA___V649*/ meltfptr[648], "new static instance"); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_458__OBJPUTPAIRHEAD_COUNTER @#1", + melt_assertmsg ("checkobj putslot ~dsym_460__OBJPUTPAIRHEAD_COUNTER @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V648*/ meltfptr[647])) == + ( /*_._VALDATA___V651*/ meltfptr[650])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_458__OBJPUTPAIRHEAD_COUNTER @#1", + melt_assertmsg ("checkoff putslot ~dsym_460__OBJPUTPAIRHEAD_COUNTER @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V648*/ - meltfptr[647])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V648*/ meltfptr[647]))->obj_vartab[1] = + ( /*_._VALDATA___V651*/ + meltfptr[650])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V651*/ meltfptr[650]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V649*/ meltfptr[648]); + /*_._VALSTR___V652*/ meltfptr[651]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V648*/ meltfptr[647]); + meltgc_touch ( /*_._VALDATA___V651*/ meltfptr[650]); - melt_dbgtrace_written_object ( /*_._VALDATA___V648*/ meltfptr[647], + melt_dbgtrace_written_object ( /*_._VALDATA___V651*/ meltfptr[650], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:4620:/ initchunk"); /*^putslot */ /*putslot */ - melt_assertmsg ("checkobj putslot ~dobj_460__OBJPUTPAIRHEAD_COUNTER @#0", + melt_assertmsg ("checkobj putslot ~dobj_462__OBJPUTPAIRHEAD_COUNTER @#0", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V650*/ meltfptr[649])) == + ( /*_._VALDATA___V653*/ meltfptr[652])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dobj_460__OBJPUTPAIRHEAD_COUNTER @#0", + melt_assertmsg ("checkoff putslot ~dobj_462__OBJPUTPAIRHEAD_COUNTER @#0", (0 >= 0 && 0 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V650*/ - meltfptr[649])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V650*/ meltfptr[649]))->obj_vartab[0] = + ( /*_._VALDATA___V653*/ + meltfptr[652])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V653*/ meltfptr[652]))->obj_vartab[0] = (melt_ptr_t) ( - /*_._VALBXINT___V651*/ meltfptr[650]); + /*_._VALBXINT___V654*/ meltfptr[653]); MELT_LOCATION ("warmelt-outobj.melt:4620:/ initchunk"); /*^touch */ /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V650*/ meltfptr[649]); + meltgc_touch ( /*_._VALDATA___V653*/ meltfptr[652]); MELT_LOCATION ("warmelt-outobj.melt:4620:/ initchunk"); /*^touchobj */ - melt_dbgtrace_written_object ( /*_._VALDATA___V650*/ meltfptr[649], + melt_dbgtrace_written_object ( /*_._VALDATA___V653*/ meltfptr[652], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:4622:/ initchunk"); @@ -37875,14 +37893,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_10 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V652*/ meltfptr[651])) + ( /*_._VALROUT___V655*/ meltfptr[654])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_462__OUTPUCOD_OBJPUTPAIRHEAD#0", - NULL != ( /*_.CLASS_OBJPUTPAIR__V120*/ meltfptr[119])); - ((meltroutine_ptr_t) /*_._VALROUT___V652*/ meltfptr[651])->tabval[0] = - (melt_ptr_t) ( /*_.CLASS_OBJPUTPAIR__V120*/ meltfptr[119]); + ("putroutconst constnull.drout_464__OUTPUCOD_OBJPUTPAIRHEAD#0", + NULL != ( /*_.CLASS_OBJPUTPAIR__V121*/ meltfptr[120])); + ((meltroutine_ptr_t) /*_._VALROUT___V655*/ meltfptr[654])->tabval[0] = + (melt_ptr_t) ( /*_.CLASS_OBJPUTPAIR__V121*/ meltfptr[120]); MELT_LOCATION ("warmelt-outobj.melt:4622:/ initchunk"); /*^putroutconst */ @@ -37890,26 +37908,26 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_10 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V652*/ meltfptr[651])) + ( /*_._VALROUT___V655*/ meltfptr[654])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_462__OUTPUCOD_OBJPUTPAIRHEAD#1", - NULL != ( /*_.CLASS_OBJPUTPAIRHEAD__V121*/ meltfptr[120])); - ((meltroutine_ptr_t) /*_._VALROUT___V652*/ meltfptr[651])->tabval[1] = - (melt_ptr_t) ( /*_.CLASS_OBJPUTPAIRHEAD__V121*/ meltfptr[120]); + ("putroutconst constnull.drout_464__OUTPUCOD_OBJPUTPAIRHEAD#1", + NULL != ( /*_.CLASS_OBJPUTPAIRHEAD__V122*/ meltfptr[121])); + ((meltroutine_ptr_t) /*_._VALROUT___V655*/ meltfptr[654])->tabval[1] = + (melt_ptr_t) ( /*_.CLASS_OBJPUTPAIRHEAD__V122*/ meltfptr[121]); MELT_LOCATION ("warmelt-outobj.melt:4622:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V652*/ meltfptr[651])) == + ( /*_._VALROUT___V655*/ meltfptr[654])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALDATA___V650*/ meltfptr[649]); - ((meltroutine_ptr_t) /*_._VALROUT___V652*/ meltfptr[651])->tabval[2] = - (melt_ptr_t) ( /*_._VALDATA___V650*/ meltfptr[649]); + NULL != /*_._VALDATA___V653*/ meltfptr[652]); + ((meltroutine_ptr_t) /*_._VALROUT___V655*/ meltfptr[654])->tabval[2] = + (melt_ptr_t) ( /*_._VALDATA___V653*/ meltfptr[652]); MELT_LOCATION ("warmelt-outobj.melt:4622:/ initchunk"); /*^putroutconst */ @@ -37917,13 +37935,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_10 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V652*/ meltfptr[651])) + ( /*_._VALROUT___V655*/ meltfptr[654])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_462__OUTPUCOD_OBJPUTPAIRHEAD#3", + ("putroutconst constnull.drout_464__OUTPUCOD_OBJPUTPAIRHEAD#3", NULL != ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5])); - ((meltroutine_ptr_t) /*_._VALROUT___V652*/ meltfptr[651])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V655*/ meltfptr[654])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5]); MELT_LOCATION ("warmelt-outobj.melt:4622:/ initchunk"); @@ -37931,12 +37949,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_10 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V652*/ meltfptr[651])) == + ( /*_._VALROUT___V655*/ meltfptr[654])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V264*/ meltfptr[263]); - ((meltroutine_ptr_t) /*_._VALROUT___V652*/ meltfptr[651])->tabval[4] = - (melt_ptr_t) ( /*_._VALCLO___V264*/ meltfptr[263]); + NULL != /*_._VALCLO___V265*/ meltfptr[264]); + ((meltroutine_ptr_t) /*_._VALROUT___V655*/ meltfptr[654])->tabval[4] = + (melt_ptr_t) ( /*_._VALCLO___V265*/ meltfptr[264]); MELT_LOCATION ("warmelt-outobj.melt:4622:/ initchunk"); /*^putroutconst */ @@ -37944,13 +37962,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_10 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V652*/ meltfptr[651])) + ( /*_._VALROUT___V655*/ meltfptr[654])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_462__OUTPUCOD_OBJPUTPAIRHEAD#5", + ("putroutconst constnull.drout_464__OUTPUCOD_OBJPUTPAIRHEAD#5", NULL != ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19])); - ((meltroutine_ptr_t) /*_._VALROUT___V652*/ meltfptr[651])->tabval[5] = + ((meltroutine_ptr_t) /*_._VALROUT___V655*/ meltfptr[654])->tabval[5] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]); MELT_LOCATION ("warmelt-outobj.melt:4622:/ initchunk"); @@ -37958,77 +37976,77 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_10 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V652*/ meltfptr[651])) == + ( /*_._VALROUT___V655*/ meltfptr[654])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALDATA___V197*/ meltfptr[196]); - ((meltroutine_ptr_t) /*_._VALROUT___V652*/ meltfptr[651])->tabval[6] = - (melt_ptr_t) ( /*_._VALDATA___V197*/ meltfptr[196]); + NULL != /*_._VALDATA___V198*/ meltfptr[197]); + ((meltroutine_ptr_t) /*_._VALROUT___V655*/ meltfptr[654])->tabval[6] = + (melt_ptr_t) ( /*_._VALDATA___V198*/ meltfptr[197]); MELT_LOCATION ("warmelt-outobj.melt:4622:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V652*/ meltfptr[651]); + meltgc_touch ( /*_._VALROUT___V655*/ meltfptr[654]); /*putclosurout#92 */ melt_assertmsg ("putclosrout#92 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V653*/ meltfptr[652])) == + ( /*_._VALCLO___V656*/ meltfptr[655])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#92 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V652*/ meltfptr[651])) == + ( /*_._VALROUT___V655*/ meltfptr[654])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V653*/ meltfptr[652])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V652*/ meltfptr[651]); + ((meltclosure_ptr_t) /*_._VALCLO___V656*/ meltfptr[655])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V655*/ meltfptr[654]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V653*/ meltfptr[652]); + meltgc_touch ( /*_._VALCLO___V656*/ meltfptr[655]); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_464__CLASS_OBJPUTPAIR @#1", + melt_assertmsg ("checkobj putslot ~dsym_466__CLASS_OBJPUTPAIR @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V654*/ meltfptr[653])) == + ( /*_._VALDATA___V657*/ meltfptr[656])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_464__CLASS_OBJPUTPAIR @#1", + melt_assertmsg ("checkoff putslot ~dsym_466__CLASS_OBJPUTPAIR @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V654*/ - meltfptr[653])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V654*/ meltfptr[653]))->obj_vartab[1] = + ( /*_._VALDATA___V657*/ + meltfptr[656])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V657*/ meltfptr[656]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V655*/ meltfptr[654]); + /*_._VALSTR___V658*/ meltfptr[657]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V654*/ meltfptr[653]); + meltgc_touch ( /*_._VALDATA___V657*/ meltfptr[656]); - melt_dbgtrace_written_object ( /*_._VALDATA___V654*/ meltfptr[653], + melt_dbgtrace_written_object ( /*_._VALDATA___V657*/ meltfptr[656], "new static instance"); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_466__CLASS_OBJPUTPAIRHEAD @#1", + melt_assertmsg ("checkobj putslot ~dsym_468__CLASS_OBJPUTPAIRHEAD @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V656*/ meltfptr[655])) == + ( /*_._VALDATA___V659*/ meltfptr[658])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_466__CLASS_OBJPUTPAIRHEAD @#1", + melt_assertmsg ("checkoff putslot ~dsym_468__CLASS_OBJPUTPAIRHEAD @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V656*/ - meltfptr[655])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V656*/ meltfptr[655]))->obj_vartab[1] = + ( /*_._VALDATA___V659*/ + meltfptr[658])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V659*/ meltfptr[658]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V657*/ meltfptr[656]); + /*_._VALSTR___V660*/ meltfptr[659]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V656*/ meltfptr[655]); + meltgc_touch ( /*_._VALDATA___V659*/ meltfptr[658]); - melt_dbgtrace_written_object ( /*_._VALDATA___V656*/ meltfptr[655], + melt_dbgtrace_written_object ( /*_._VALDATA___V659*/ meltfptr[658], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:4651:/ initchunk"); @@ -38037,14 +38055,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_10 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V658*/ meltfptr[657])) + ( /*_._VALROUT___V661*/ meltfptr[660])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_468__OUTPUCOD_OBJPUTPAIRTAIL#0", - NULL != ( /*_.CLASS_OBJPUTPAIR__V120*/ meltfptr[119])); - ((meltroutine_ptr_t) /*_._VALROUT___V658*/ meltfptr[657])->tabval[0] = - (melt_ptr_t) ( /*_.CLASS_OBJPUTPAIR__V120*/ meltfptr[119]); + ("putroutconst constnull.drout_470__OUTPUCOD_OBJPUTPAIRTAIL#0", + NULL != ( /*_.CLASS_OBJPUTPAIR__V121*/ meltfptr[120])); + ((meltroutine_ptr_t) /*_._VALROUT___V661*/ meltfptr[660])->tabval[0] = + (melt_ptr_t) ( /*_.CLASS_OBJPUTPAIR__V121*/ meltfptr[120]); MELT_LOCATION ("warmelt-outobj.melt:4651:/ initchunk"); /*^putroutconst */ @@ -38052,26 +38070,26 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_10 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V658*/ meltfptr[657])) + ( /*_._VALROUT___V661*/ meltfptr[660])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_468__OUTPUCOD_OBJPUTPAIRTAIL#1", - NULL != ( /*_.CLASS_OBJPUTPAIRTAIL__V122*/ meltfptr[121])); - ((meltroutine_ptr_t) /*_._VALROUT___V658*/ meltfptr[657])->tabval[1] = - (melt_ptr_t) ( /*_.CLASS_OBJPUTPAIRTAIL__V122*/ meltfptr[121]); + ("putroutconst constnull.drout_470__OUTPUCOD_OBJPUTPAIRTAIL#1", + NULL != ( /*_.CLASS_OBJPUTPAIRTAIL__V123*/ meltfptr[122])); + ((meltroutine_ptr_t) /*_._VALROUT___V661*/ meltfptr[660])->tabval[1] = + (melt_ptr_t) ( /*_.CLASS_OBJPUTPAIRTAIL__V123*/ meltfptr[122]); MELT_LOCATION ("warmelt-outobj.melt:4651:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V658*/ meltfptr[657])) == + ( /*_._VALROUT___V661*/ meltfptr[660])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V264*/ meltfptr[263]); - ((meltroutine_ptr_t) /*_._VALROUT___V658*/ meltfptr[657])->tabval[2] = - (melt_ptr_t) ( /*_._VALCLO___V264*/ meltfptr[263]); + NULL != /*_._VALCLO___V265*/ meltfptr[264]); + ((meltroutine_ptr_t) /*_._VALROUT___V661*/ meltfptr[660])->tabval[2] = + (melt_ptr_t) ( /*_._VALCLO___V265*/ meltfptr[264]); MELT_LOCATION ("warmelt-outobj.melt:4651:/ initchunk"); /*^putroutconst */ @@ -38079,13 +38097,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_10 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V658*/ meltfptr[657])) + ( /*_._VALROUT___V661*/ meltfptr[660])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_468__OUTPUCOD_OBJPUTPAIRTAIL#3", + ("putroutconst constnull.drout_470__OUTPUCOD_OBJPUTPAIRTAIL#3", NULL != ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19])); - ((meltroutine_ptr_t) /*_._VALROUT___V658*/ meltfptr[657])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V661*/ meltfptr[660])->tabval[3] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]); MELT_LOCATION ("warmelt-outobj.melt:4651:/ initchunk"); @@ -38093,12 +38111,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_10 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V658*/ meltfptr[657])) == + ( /*_._VALROUT___V661*/ meltfptr[660])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALDATA___V197*/ meltfptr[196]); - ((meltroutine_ptr_t) /*_._VALROUT___V658*/ meltfptr[657])->tabval[4] = - (melt_ptr_t) ( /*_._VALDATA___V197*/ meltfptr[196]); + NULL != /*_._VALDATA___V198*/ meltfptr[197]); + ((meltroutine_ptr_t) /*_._VALROUT___V661*/ meltfptr[660])->tabval[4] = + (melt_ptr_t) ( /*_._VALDATA___V198*/ meltfptr[197]); MELT_LOCATION ("warmelt-outobj.melt:4651:/ initchunk"); /*^putroutconst */ @@ -38106,56 +38124,56 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_10 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V658*/ meltfptr[657])) + ( /*_._VALROUT___V661*/ meltfptr[660])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_468__OUTPUCOD_OBJPUTPAIRTAIL#5", + ("putroutconst constnull.drout_470__OUTPUCOD_OBJPUTPAIRTAIL#5", NULL != ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5])); - ((meltroutine_ptr_t) /*_._VALROUT___V658*/ meltfptr[657])->tabval[5] = + ((meltroutine_ptr_t) /*_._VALROUT___V661*/ meltfptr[660])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5]); MELT_LOCATION ("warmelt-outobj.melt:4651:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V658*/ meltfptr[657]); + meltgc_touch ( /*_._VALROUT___V661*/ meltfptr[660]); /*putclosurout#93 */ melt_assertmsg ("putclosrout#93 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V659*/ meltfptr[658])) == + ( /*_._VALCLO___V662*/ meltfptr[661])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#93 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V658*/ meltfptr[657])) == + ( /*_._VALROUT___V661*/ meltfptr[660])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V659*/ meltfptr[658])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V658*/ meltfptr[657]); + ((meltclosure_ptr_t) /*_._VALCLO___V662*/ meltfptr[661])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V661*/ meltfptr[660]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V659*/ meltfptr[658]); + meltgc_touch ( /*_._VALCLO___V662*/ meltfptr[661]); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_470__CLASS_OBJPUTPAIRTAIL @#1", + melt_assertmsg ("checkobj putslot ~dsym_472__CLASS_OBJPUTPAIRTAIL @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V660*/ meltfptr[659])) == + ( /*_._VALDATA___V663*/ meltfptr[662])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_470__CLASS_OBJPUTPAIRTAIL @#1", + melt_assertmsg ("checkoff putslot ~dsym_472__CLASS_OBJPUTPAIRTAIL @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V660*/ - meltfptr[659])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V660*/ meltfptr[659]))->obj_vartab[1] = + ( /*_._VALDATA___V663*/ + meltfptr[662])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V663*/ meltfptr[662]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V661*/ meltfptr[660]); + /*_._VALSTR___V664*/ meltfptr[663]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V660*/ meltfptr[659]); + meltgc_touch ( /*_._VALDATA___V663*/ meltfptr[662]); - melt_dbgtrace_written_object ( /*_._VALDATA___V660*/ meltfptr[659], + melt_dbgtrace_written_object ( /*_._VALDATA___V663*/ meltfptr[662], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:4677:/ initchunk"); @@ -38164,25 +38182,25 @@ meltmod__WARMELTmiOUTOBJ__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___V665*/ meltfptr[664])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_472__OUTPUCOD_OBJPUTLIST#0", - NULL != ( /*_.CLASS_OBJPUTLIST__V123*/ meltfptr[122])); - ((meltroutine_ptr_t) /*_._VALROUT___V662*/ meltfptr[661])->tabval[0] = - (melt_ptr_t) ( /*_.CLASS_OBJPUTLIST__V123*/ meltfptr[122]); + melt_checkmsg ("putroutconst constnull.drout_474__OUTPUCOD_OBJPUTLIST#0", + NULL != ( /*_.CLASS_OBJPUTLIST__V124*/ meltfptr[123])); + ((meltroutine_ptr_t) /*_._VALROUT___V665*/ meltfptr[664])->tabval[0] = + (melt_ptr_t) ( /*_.CLASS_OBJPUTLIST__V124*/ meltfptr[123]); MELT_LOCATION ("warmelt-outobj.melt:4677:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V662*/ meltfptr[661])) == + ( /*_._VALROUT___V665*/ meltfptr[664])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V264*/ meltfptr[263]); - ((meltroutine_ptr_t) /*_._VALROUT___V662*/ meltfptr[661])->tabval[1] = - (melt_ptr_t) ( /*_._VALCLO___V264*/ meltfptr[263]); + NULL != /*_._VALCLO___V265*/ meltfptr[264]); + ((meltroutine_ptr_t) /*_._VALROUT___V665*/ meltfptr[664])->tabval[1] = + (melt_ptr_t) ( /*_._VALCLO___V265*/ meltfptr[264]); MELT_LOCATION ("warmelt-outobj.melt:4677:/ initchunk"); /*^putroutconst */ @@ -38190,12 +38208,12 @@ meltmod__WARMELTmiOUTOBJ__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___V665*/ meltfptr[664])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_472__OUTPUCOD_OBJPUTLIST#2", + melt_checkmsg ("putroutconst constnull.drout_474__OUTPUCOD_OBJPUTLIST#2", NULL != ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19])); - ((meltroutine_ptr_t) /*_._VALROUT___V662*/ meltfptr[661])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V665*/ meltfptr[664])->tabval[2] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]); MELT_LOCATION ("warmelt-outobj.melt:4677:/ initchunk"); @@ -38203,12 +38221,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_10 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V662*/ meltfptr[661])) == + ( /*_._VALROUT___V665*/ meltfptr[664])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALDATA___V197*/ meltfptr[196]); - ((meltroutine_ptr_t) /*_._VALROUT___V662*/ meltfptr[661])->tabval[3] = - (melt_ptr_t) ( /*_._VALDATA___V197*/ meltfptr[196]); + NULL != /*_._VALDATA___V198*/ meltfptr[197]); + ((meltroutine_ptr_t) /*_._VALROUT___V665*/ meltfptr[664])->tabval[3] = + (melt_ptr_t) ( /*_._VALDATA___V198*/ meltfptr[197]); MELT_LOCATION ("warmelt-outobj.melt:4677:/ initchunk"); /*^putroutconst */ @@ -38216,55 +38234,55 @@ meltmod__WARMELTmiOUTOBJ__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___V665*/ meltfptr[664])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_472__OUTPUCOD_OBJPUTLIST#4", + melt_checkmsg ("putroutconst constnull.drout_474__OUTPUCOD_OBJPUTLIST#4", NULL != ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5])); - ((meltroutine_ptr_t) /*_._VALROUT___V662*/ meltfptr[661])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V665*/ meltfptr[664])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5]); MELT_LOCATION ("warmelt-outobj.melt:4677:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V662*/ meltfptr[661]); + meltgc_touch ( /*_._VALROUT___V665*/ meltfptr[664]); /*putclosurout#94 */ melt_assertmsg ("putclosrout#94 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V663*/ meltfptr[662])) == + ( /*_._VALCLO___V666*/ meltfptr[665])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#94 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V662*/ meltfptr[661])) == + ( /*_._VALROUT___V665*/ meltfptr[664])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V663*/ meltfptr[662])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V662*/ meltfptr[661]); + ((meltclosure_ptr_t) /*_._VALCLO___V666*/ meltfptr[665])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V665*/ meltfptr[664]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V663*/ meltfptr[662]); + meltgc_touch ( /*_._VALCLO___V666*/ meltfptr[665]); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_474__CLASS_OBJPUTLIST @#1", + melt_assertmsg ("checkobj putslot ~dsym_476__CLASS_OBJPUTLIST @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V664*/ meltfptr[663])) == + ( /*_._VALDATA___V667*/ meltfptr[666])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_474__CLASS_OBJPUTLIST @#1", + melt_assertmsg ("checkoff putslot ~dsym_476__CLASS_OBJPUTLIST @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V664*/ - meltfptr[663])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V664*/ meltfptr[663]))->obj_vartab[1] = + ( /*_._VALDATA___V667*/ + meltfptr[666])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V667*/ meltfptr[666]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V665*/ meltfptr[664]); + /*_._VALSTR___V668*/ meltfptr[667]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V664*/ meltfptr[663]); + meltgc_touch ( /*_._VALDATA___V667*/ meltfptr[666]); - melt_dbgtrace_written_object ( /*_._VALDATA___V664*/ meltfptr[663], + melt_dbgtrace_written_object ( /*_._VALDATA___V667*/ meltfptr[666], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:4708:/ initchunk"); @@ -38273,13 +38291,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_10 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V666*/ meltfptr[665])) + ( /*_._VALROUT___V669*/ meltfptr[668])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_476__OUTPUCOD_OBJGETSLOT#0", - NULL != ( /*_.CLASS_OBJGETSLOT__V124*/ meltfptr[123])); - ((meltroutine_ptr_t) /*_._VALROUT___V666*/ meltfptr[665])->tabval[0] = - (melt_ptr_t) ( /*_.CLASS_OBJGETSLOT__V124*/ meltfptr[123]); + melt_checkmsg ("putroutconst constnull.drout_478__OUTPUCOD_OBJGETSLOT#0", + NULL != ( /*_.CLASS_OBJGETSLOT__V125*/ meltfptr[124])); + ((meltroutine_ptr_t) /*_._VALROUT___V669*/ meltfptr[668])->tabval[0] = + (melt_ptr_t) ( /*_.CLASS_OBJGETSLOT__V125*/ meltfptr[124]); MELT_LOCATION ("warmelt-outobj.melt:4708:/ initchunk"); /*^putroutconst */ @@ -38287,12 +38305,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_10 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V666*/ meltfptr[665])) + ( /*_._VALROUT___V669*/ meltfptr[668])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_476__OUTPUCOD_OBJGETSLOT#1", + melt_checkmsg ("putroutconst constnull.drout_478__OUTPUCOD_OBJGETSLOT#1", NULL != ( /*_.DISCR_INTEGER__V52*/ meltfptr[51])); - ((meltroutine_ptr_t) /*_._VALROUT___V666*/ meltfptr[665])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V669*/ meltfptr[668])->tabval[1] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V52*/ meltfptr[51]); MELT_LOCATION ("warmelt-outobj.melt:4708:/ initchunk"); @@ -38301,25 +38319,25 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_10 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V666*/ meltfptr[665])) + ( /*_._VALROUT___V669*/ meltfptr[668])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_476__OUTPUCOD_OBJGETSLOT#2", - NULL != ( /*_.CLASS_FIELD__V125*/ meltfptr[124])); - ((meltroutine_ptr_t) /*_._VALROUT___V666*/ meltfptr[665])->tabval[2] = - (melt_ptr_t) ( /*_.CLASS_FIELD__V125*/ meltfptr[124]); + melt_checkmsg ("putroutconst constnull.drout_478__OUTPUCOD_OBJGETSLOT#2", + NULL != ( /*_.CLASS_FIELD__V126*/ meltfptr[125])); + ((meltroutine_ptr_t) /*_._VALROUT___V669*/ meltfptr[668])->tabval[2] = + (melt_ptr_t) ( /*_.CLASS_FIELD__V126*/ meltfptr[125]); MELT_LOCATION ("warmelt-outobj.melt:4708:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V666*/ meltfptr[665])) == + ( /*_._VALROUT___V669*/ meltfptr[668])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V264*/ meltfptr[263]); - ((meltroutine_ptr_t) /*_._VALROUT___V666*/ meltfptr[665])->tabval[3] = - (melt_ptr_t) ( /*_._VALCLO___V264*/ meltfptr[263]); + NULL != /*_._VALCLO___V265*/ meltfptr[264]); + ((meltroutine_ptr_t) /*_._VALROUT___V669*/ meltfptr[668])->tabval[3] = + (melt_ptr_t) ( /*_._VALCLO___V265*/ meltfptr[264]); MELT_LOCATION ("warmelt-outobj.melt:4708:/ initchunk"); /*^putroutconst */ @@ -38327,12 +38345,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_10 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V666*/ meltfptr[665])) + ( /*_._VALROUT___V669*/ meltfptr[668])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_476__OUTPUCOD_OBJGETSLOT#4", + melt_checkmsg ("putroutconst constnull.drout_478__OUTPUCOD_OBJGETSLOT#4", NULL != ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19])); - ((meltroutine_ptr_t) /*_._VALROUT___V666*/ meltfptr[665])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V669*/ meltfptr[668])->tabval[4] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]); MELT_LOCATION ("warmelt-outobj.melt:4708:/ initchunk"); @@ -38341,12 +38359,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_10 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V666*/ meltfptr[665])) + ( /*_._VALROUT___V669*/ meltfptr[668])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_476__OUTPUCOD_OBJGETSLOT#5", + melt_checkmsg ("putroutconst constnull.drout_478__OUTPUCOD_OBJGETSLOT#5", NULL != ( /*_.LIST_EVERY__V56*/ meltfptr[55])); - ((meltroutine_ptr_t) /*_._VALROUT___V666*/ meltfptr[665])->tabval[5] = + ((meltroutine_ptr_t) /*_._VALROUT___V669*/ meltfptr[668])->tabval[5] = (melt_ptr_t) ( /*_.LIST_EVERY__V56*/ meltfptr[55]); MELT_LOCATION ("warmelt-outobj.melt:4708:/ initchunk"); @@ -38355,12 +38373,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_10 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V666*/ meltfptr[665])) + ( /*_._VALROUT___V669*/ meltfptr[668])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_476__OUTPUCOD_OBJGETSLOT#6", + melt_checkmsg ("putroutconst constnull.drout_478__OUTPUCOD_OBJGETSLOT#6", NULL != ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19])); - ((meltroutine_ptr_t) /*_._VALROUT___V666*/ meltfptr[665])->tabval[6] = + ((meltroutine_ptr_t) /*_._VALROUT___V669*/ meltfptr[668])->tabval[6] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]); MELT_LOCATION ("warmelt-outobj.melt:4708:/ initchunk"); @@ -38368,12 +38386,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_10 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V666*/ meltfptr[665])) == + ( /*_._VALROUT___V669*/ meltfptr[668])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALDATA___V197*/ meltfptr[196]); - ((meltroutine_ptr_t) /*_._VALROUT___V666*/ meltfptr[665])->tabval[7] = - (melt_ptr_t) ( /*_._VALDATA___V197*/ meltfptr[196]); + NULL != /*_._VALDATA___V198*/ meltfptr[197]); + ((meltroutine_ptr_t) /*_._VALROUT___V669*/ meltfptr[668])->tabval[7] = + (melt_ptr_t) ( /*_._VALDATA___V198*/ meltfptr[197]); MELT_LOCATION ("warmelt-outobj.melt:4708:/ initchunk"); /*^putroutconst */ @@ -38381,12 +38399,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_10 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V666*/ meltfptr[665])) + ( /*_._VALROUT___V669*/ meltfptr[668])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_476__OUTPUCOD_OBJGETSLOT#8", + melt_checkmsg ("putroutconst constnull.drout_478__OUTPUCOD_OBJGETSLOT#8", NULL != ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5])); - ((meltroutine_ptr_t) /*_._VALROUT___V666*/ meltfptr[665])->tabval[8] = + ((meltroutine_ptr_t) /*_._VALROUT___V669*/ meltfptr[668])->tabval[8] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5]); MELT_LOCATION ("warmelt-outobj.melt:4732:/ initchunk"); @@ -38395,12 +38413,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_10 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V667*/ meltfptr[666])) + ( /*_._VALROUT___V670*/ meltfptr[669])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_482__LAMBDA_#0", + melt_checkmsg ("putroutconst constnull.drout_484__LAMBDA_#0", NULL != ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19])); - ((meltroutine_ptr_t) /*_._VALROUT___V667*/ meltfptr[666])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V670*/ meltfptr[669])->tabval[0] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]); MELT_LOCATION ("warmelt-outobj.melt:4732:/ initchunk"); @@ -38408,12 +38426,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_10 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V667*/ meltfptr[666])) == + ( /*_._VALROUT___V670*/ meltfptr[669])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALDATA___V197*/ meltfptr[196]); - ((meltroutine_ptr_t) /*_._VALROUT___V667*/ meltfptr[666])->tabval[1] = - (melt_ptr_t) ( /*_._VALDATA___V197*/ meltfptr[196]); + NULL != /*_._VALDATA___V198*/ meltfptr[197]); + ((meltroutine_ptr_t) /*_._VALROUT___V670*/ meltfptr[669])->tabval[1] = + (melt_ptr_t) ( /*_._VALDATA___V198*/ meltfptr[197]); MELT_LOCATION ("warmelt-outobj.melt:4732:/ initchunk"); /*^putroutconst */ @@ -38421,18 +38439,18 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_10 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V667*/ meltfptr[666])) + ( /*_._VALROUT___V670*/ meltfptr[669])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_482__LAMBDA_#2", + melt_checkmsg ("putroutconst constnull.drout_484__LAMBDA_#2", NULL != ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5])); - ((meltroutine_ptr_t) /*_._VALROUT___V667*/ meltfptr[666])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V670*/ meltfptr[669])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5]); MELT_LOCATION ("warmelt-outobj.melt:4732:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V667*/ meltfptr[666]); + meltgc_touch ( /*_._VALROUT___V670*/ meltfptr[669]); MELT_LOCATION ("warmelt-outobj.melt:4708:/ initchunk"); /*^putroutconst */ @@ -38440,25 +38458,25 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_10 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V666*/ meltfptr[665])) + ( /*_._VALROUT___V669*/ meltfptr[668])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_476__OUTPUCOD_OBJGETSLOT#9", - NULL != ( /*_._VALROUT___V667*/ meltfptr[666])); - ((meltroutine_ptr_t) /*_._VALROUT___V666*/ meltfptr[665])->tabval[9] = - (melt_ptr_t) ( /*_._VALROUT___V667*/ meltfptr[666]); + melt_checkmsg ("putroutconst constnull.drout_478__OUTPUCOD_OBJGETSLOT#9", + NULL != ( /*_._VALROUT___V670*/ meltfptr[669])); + ((meltroutine_ptr_t) /*_._VALROUT___V669*/ meltfptr[668])->tabval[9] = + (melt_ptr_t) ( /*_._VALROUT___V670*/ meltfptr[669]); MELT_LOCATION ("warmelt-outobj.melt:4708:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V666*/ meltfptr[665])) == + ( /*_._VALROUT___V669*/ meltfptr[668])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALDATA___V197*/ meltfptr[196]); - ((meltroutine_ptr_t) /*_._VALROUT___V666*/ meltfptr[665])->tabval[10] = - (melt_ptr_t) ( /*_._VALDATA___V197*/ meltfptr[196]); + NULL != /*_._VALDATA___V198*/ meltfptr[197]); + ((meltroutine_ptr_t) /*_._VALROUT___V669*/ meltfptr[668])->tabval[10] = + (melt_ptr_t) ( /*_._VALDATA___V198*/ meltfptr[197]); MELT_LOCATION ("warmelt-outobj.melt:4708:/ initchunk"); /*^putroutconst */ @@ -38466,78 +38484,78 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_10 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V666*/ meltfptr[665])) + ( /*_._VALROUT___V669*/ meltfptr[668])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_476__OUTPUCOD_OBJGETSLOT#11", + melt_checkmsg ("putroutconst constnull.drout_478__OUTPUCOD_OBJGETSLOT#11", NULL != ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5])); - ((meltroutine_ptr_t) /*_._VALROUT___V666*/ meltfptr[665])->tabval[11] = + ((meltroutine_ptr_t) /*_._VALROUT___V669*/ meltfptr[668])->tabval[11] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5]); MELT_LOCATION ("warmelt-outobj.melt:4708:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V666*/ meltfptr[665]); + meltgc_touch ( /*_._VALROUT___V669*/ meltfptr[668]); /*putclosurout#95 */ melt_assertmsg ("putclosrout#95 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V668*/ meltfptr[667])) == + ( /*_._VALCLO___V671*/ meltfptr[670])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#95 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V666*/ meltfptr[665])) == + ( /*_._VALROUT___V669*/ meltfptr[668])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V668*/ meltfptr[667])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V666*/ meltfptr[665]); + ((meltclosure_ptr_t) /*_._VALCLO___V671*/ meltfptr[670])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V669*/ meltfptr[668]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V668*/ meltfptr[667]); + meltgc_touch ( /*_._VALCLO___V671*/ meltfptr[670]); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_478__CLASS_OBJGETSLOT @#1", + melt_assertmsg ("checkobj putslot ~dsym_480__CLASS_OBJGETSLOT @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V669*/ meltfptr[668])) == + ( /*_._VALDATA___V672*/ meltfptr[671])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_478__CLASS_OBJGETSLOT @#1", + melt_assertmsg ("checkoff putslot ~dsym_480__CLASS_OBJGETSLOT @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V669*/ - meltfptr[668])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V669*/ meltfptr[668]))->obj_vartab[1] = + ( /*_._VALDATA___V672*/ + meltfptr[671])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V672*/ meltfptr[671]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V670*/ meltfptr[669]); + /*_._VALSTR___V673*/ meltfptr[672]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V669*/ meltfptr[668]); + meltgc_touch ( /*_._VALDATA___V672*/ meltfptr[671]); - melt_dbgtrace_written_object ( /*_._VALDATA___V669*/ meltfptr[668], + melt_dbgtrace_written_object ( /*_._VALDATA___V672*/ meltfptr[671], "new static instance"); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_480__CLASS_FIELD @#1", + melt_assertmsg ("checkobj putslot ~dsym_482__CLASS_FIELD @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V671*/ meltfptr[670])) == + ( /*_._VALDATA___V674*/ meltfptr[673])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_480__CLASS_FIELD @#1", + melt_assertmsg ("checkoff putslot ~dsym_482__CLASS_FIELD @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V671*/ - meltfptr[670])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V671*/ meltfptr[670]))->obj_vartab[1] = + ( /*_._VALDATA___V674*/ + meltfptr[673])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V674*/ meltfptr[673]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V672*/ meltfptr[671]); + /*_._VALSTR___V675*/ meltfptr[674]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V671*/ meltfptr[670]); + meltgc_touch ( /*_._VALDATA___V674*/ meltfptr[673]); - melt_dbgtrace_written_object ( /*_._VALDATA___V671*/ meltfptr[670], + melt_dbgtrace_written_object ( /*_._VALDATA___V674*/ meltfptr[673], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:4747:/ initchunk"); @@ -38546,12 +38564,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_10 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V673*/ meltfptr[672])) + ( /*_._VALROUT___V676*/ meltfptr[675])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_483__OUTPUCOD_OBJPUTSLOT#0", + melt_checkmsg ("putroutconst constnull.drout_485__OUTPUCOD_OBJPUTSLOT#0", NULL != ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_._VALROUT___V673*/ meltfptr[672])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V676*/ meltfptr[675])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:4747:/ initchunk"); @@ -38560,13 +38578,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_10 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V673*/ meltfptr[672])) + ( /*_._VALROUT___V676*/ meltfptr[675])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_483__OUTPUCOD_OBJPUTSLOT#1", - NULL != ( /*_.CLASS_OBJPUTSLOT__V126*/ meltfptr[125])); - ((meltroutine_ptr_t) /*_._VALROUT___V673*/ meltfptr[672])->tabval[1] = - (melt_ptr_t) ( /*_.CLASS_OBJPUTSLOT__V126*/ meltfptr[125]); + melt_checkmsg ("putroutconst constnull.drout_485__OUTPUCOD_OBJPUTSLOT#1", + NULL != ( /*_.CLASS_OBJPUTSLOT__V127*/ meltfptr[126])); + ((meltroutine_ptr_t) /*_._VALROUT___V676*/ meltfptr[675])->tabval[1] = + (melt_ptr_t) ( /*_.CLASS_OBJPUTSLOT__V127*/ meltfptr[126]); MELT_LOCATION ("warmelt-outobj.melt:4747:/ initchunk"); /*^putroutconst */ @@ -38574,12 +38592,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_10 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V673*/ meltfptr[672])) + ( /*_._VALROUT___V676*/ meltfptr[675])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_483__OUTPUCOD_OBJPUTSLOT#2", + melt_checkmsg ("putroutconst constnull.drout_485__OUTPUCOD_OBJPUTSLOT#2", NULL != ( /*_.DISCR_STRBUF__V68*/ meltfptr[67])); - ((meltroutine_ptr_t) /*_._VALROUT___V673*/ meltfptr[672])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V676*/ meltfptr[675])->tabval[2] = (melt_ptr_t) ( /*_.DISCR_STRBUF__V68*/ meltfptr[67]); MELT_LOCATION ("warmelt-outobj.melt:4747:/ initchunk"); @@ -38588,12 +38606,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_10 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V673*/ meltfptr[672])) + ( /*_._VALROUT___V676*/ meltfptr[675])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_483__OUTPUCOD_OBJPUTSLOT#3", + melt_checkmsg ("putroutconst constnull.drout_485__OUTPUCOD_OBJPUTSLOT#3", NULL != ( /*_.ADD2OUT__V14*/ meltfptr[13])); - ((meltroutine_ptr_t) /*_._VALROUT___V673*/ meltfptr[672])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V676*/ meltfptr[675])->tabval[3] = (melt_ptr_t) ( /*_.ADD2OUT__V14*/ meltfptr[13]); MELT_LOCATION ("warmelt-outobj.melt:4747:/ initchunk"); @@ -38602,12 +38620,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_10 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V673*/ meltfptr[672])) + ( /*_._VALROUT___V676*/ meltfptr[675])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_483__OUTPUCOD_OBJPUTSLOT#4", + melt_checkmsg ("putroutconst constnull.drout_485__OUTPUCOD_OBJPUTSLOT#4", NULL != ( /*_.CLASS_NAMED__V13*/ meltfptr[12])); - ((meltroutine_ptr_t) /*_._VALROUT___V673*/ meltfptr[672])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V676*/ meltfptr[675])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_NAMED__V13*/ meltfptr[12]); MELT_LOCATION ("warmelt-outobj.melt:4747:/ initchunk"); @@ -38616,12 +38634,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_10 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V673*/ meltfptr[672])) + ( /*_._VALROUT___V676*/ meltfptr[675])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_483__OUTPUCOD_OBJPUTSLOT#5", + melt_checkmsg ("putroutconst constnull.drout_485__OUTPUCOD_OBJPUTSLOT#5", NULL != ( /*_.CLASS_OBJINITELEM__V19*/ meltfptr[18])); - ((meltroutine_ptr_t) /*_._VALROUT___V673*/ meltfptr[672])->tabval[5] = + ((meltroutine_ptr_t) /*_._VALROUT___V676*/ meltfptr[675])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_OBJINITELEM__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-outobj.melt:4747:/ initchunk"); @@ -38630,13 +38648,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_10 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V673*/ meltfptr[672])) + ( /*_._VALROUT___V676*/ meltfptr[675])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_483__OUTPUCOD_OBJPUTSLOT#6", - NULL != ( /*_.DISCR_VERBATIM_STRING__V87*/ meltfptr[86])); - ((meltroutine_ptr_t) /*_._VALROUT___V673*/ meltfptr[672])->tabval[6] = - (melt_ptr_t) ( /*_.DISCR_VERBATIM_STRING__V87*/ meltfptr[86]); + melt_checkmsg ("putroutconst constnull.drout_485__OUTPUCOD_OBJPUTSLOT#6", + NULL != ( /*_.DISCR_VERBATIM_STRING__V88*/ meltfptr[87])); + ((meltroutine_ptr_t) /*_._VALROUT___V676*/ meltfptr[675])->tabval[6] = + (melt_ptr_t) ( /*_.DISCR_VERBATIM_STRING__V88*/ meltfptr[87]); MELT_LOCATION ("warmelt-outobj.melt:4747:/ initchunk"); /*^putroutconst */ @@ -38644,12 +38662,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_10 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V673*/ meltfptr[672])) + ( /*_._VALROUT___V676*/ meltfptr[675])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_483__OUTPUCOD_OBJPUTSLOT#7", + melt_checkmsg ("putroutconst constnull.drout_485__OUTPUCOD_OBJPUTSLOT#7", NULL != ( /*_.CLASS_NREP__V38*/ meltfptr[37])); - ((meltroutine_ptr_t) /*_._VALROUT___V673*/ meltfptr[672])->tabval[7] = + ((meltroutine_ptr_t) /*_._VALROUT___V676*/ meltfptr[675])->tabval[7] = (melt_ptr_t) ( /*_.CLASS_NREP__V38*/ meltfptr[37]); MELT_LOCATION ("warmelt-outobj.melt:4747:/ initchunk"); @@ -38657,12 +38675,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_10 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V673*/ meltfptr[672])) == + ( /*_._VALROUT___V676*/ meltfptr[675])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V264*/ meltfptr[263]); - ((meltroutine_ptr_t) /*_._VALROUT___V673*/ meltfptr[672])->tabval[8] = - (melt_ptr_t) ( /*_._VALCLO___V264*/ meltfptr[263]); + NULL != /*_._VALCLO___V265*/ meltfptr[264]); + ((meltroutine_ptr_t) /*_._VALROUT___V676*/ meltfptr[675])->tabval[8] = + (melt_ptr_t) ( /*_._VALCLO___V265*/ meltfptr[264]); MELT_LOCATION ("warmelt-outobj.melt:4747:/ initchunk"); /*^putroutconst */ @@ -38670,12 +38688,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_10 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V673*/ meltfptr[672])) + ( /*_._VALROUT___V676*/ meltfptr[675])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_483__OUTPUCOD_OBJPUTSLOT#9", + melt_checkmsg ("putroutconst constnull.drout_485__OUTPUCOD_OBJPUTSLOT#9", NULL != ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19])); - ((meltroutine_ptr_t) /*_._VALROUT___V673*/ meltfptr[672])->tabval[9] = + ((meltroutine_ptr_t) /*_._VALROUT___V676*/ meltfptr[675])->tabval[9] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]); MELT_LOCATION ("warmelt-outobj.melt:4747:/ initchunk"); @@ -38684,25 +38702,25 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_10 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V673*/ meltfptr[672])) + ( /*_._VALROUT___V676*/ meltfptr[675])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_483__OUTPUCOD_OBJPUTSLOT#10", - NULL != ( /*_.CLASS_FIELD__V125*/ meltfptr[124])); - ((meltroutine_ptr_t) /*_._VALROUT___V673*/ meltfptr[672])->tabval[10] = - (melt_ptr_t) ( /*_.CLASS_FIELD__V125*/ meltfptr[124]); + melt_checkmsg ("putroutconst constnull.drout_485__OUTPUCOD_OBJPUTSLOT#10", + NULL != ( /*_.CLASS_FIELD__V126*/ meltfptr[125])); + ((meltroutine_ptr_t) /*_._VALROUT___V676*/ meltfptr[675])->tabval[10] = + (melt_ptr_t) ( /*_.CLASS_FIELD__V126*/ meltfptr[125]); MELT_LOCATION ("warmelt-outobj.melt:4747:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V673*/ meltfptr[672])) == + ( /*_._VALROUT___V676*/ meltfptr[675])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALDATA___V197*/ meltfptr[196]); - ((meltroutine_ptr_t) /*_._VALROUT___V673*/ meltfptr[672])->tabval[11] = - (melt_ptr_t) ( /*_._VALDATA___V197*/ meltfptr[196]); + NULL != /*_._VALDATA___V198*/ meltfptr[197]); + ((meltroutine_ptr_t) /*_._VALROUT___V676*/ meltfptr[675])->tabval[11] = + (melt_ptr_t) ( /*_._VALDATA___V198*/ meltfptr[197]); MELT_LOCATION ("warmelt-outobj.melt:4747:/ initchunk"); /*^putroutconst */ @@ -38710,55 +38728,55 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_10 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V673*/ meltfptr[672])) + ( /*_._VALROUT___V676*/ meltfptr[675])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_483__OUTPUCOD_OBJPUTSLOT#12", + melt_checkmsg ("putroutconst constnull.drout_485__OUTPUCOD_OBJPUTSLOT#12", NULL != ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5])); - ((meltroutine_ptr_t) /*_._VALROUT___V673*/ meltfptr[672])->tabval[12] = + ((meltroutine_ptr_t) /*_._VALROUT___V676*/ meltfptr[675])->tabval[12] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5]); MELT_LOCATION ("warmelt-outobj.melt:4747:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V673*/ meltfptr[672]); + meltgc_touch ( /*_._VALROUT___V676*/ meltfptr[675]); /*putclosurout#96 */ melt_assertmsg ("putclosrout#96 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V674*/ meltfptr[673])) == + ( /*_._VALCLO___V677*/ meltfptr[676])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#96 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V673*/ meltfptr[672])) == + ( /*_._VALROUT___V676*/ meltfptr[675])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V674*/ meltfptr[673])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V673*/ meltfptr[672]); + ((meltclosure_ptr_t) /*_._VALCLO___V677*/ meltfptr[676])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V676*/ meltfptr[675]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V674*/ meltfptr[673]); + meltgc_touch ( /*_._VALCLO___V677*/ meltfptr[676]); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_485__CLASS_OBJPUTSLOT @#1", + melt_assertmsg ("checkobj putslot ~dsym_487__CLASS_OBJPUTSLOT @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V675*/ meltfptr[674])) == + ( /*_._VALDATA___V678*/ meltfptr[677])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_485__CLASS_OBJPUTSLOT @#1", + melt_assertmsg ("checkoff putslot ~dsym_487__CLASS_OBJPUTSLOT @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V675*/ - meltfptr[674])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V675*/ meltfptr[674]))->obj_vartab[1] = + ( /*_._VALDATA___V678*/ + meltfptr[677])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V678*/ meltfptr[677]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V676*/ meltfptr[675]); + /*_._VALSTR___V679*/ meltfptr[678]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V675*/ meltfptr[674]); + meltgc_touch ( /*_._VALDATA___V678*/ meltfptr[677]); - melt_dbgtrace_written_object ( /*_._VALDATA___V675*/ meltfptr[674], + melt_dbgtrace_written_object ( /*_._VALDATA___V678*/ meltfptr[677], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:4823:/ initchunk"); @@ -38767,26 +38785,26 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_10 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V677*/ meltfptr[676])) + ( /*_._VALROUT___V680*/ meltfptr[679])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_487__OUTPUCOD_OBJPUTCLOSUROUT#0", - NULL != ( /*_.CLASS_OBJPUTCLOSUROUT__V127*/ meltfptr[126])); - ((meltroutine_ptr_t) /*_._VALROUT___V677*/ meltfptr[676])->tabval[0] = - (melt_ptr_t) ( /*_.CLASS_OBJPUTCLOSUROUT__V127*/ meltfptr[126]); + ("putroutconst constnull.drout_489__OUTPUCOD_OBJPUTCLOSUROUT#0", + NULL != ( /*_.CLASS_OBJPUTCLOSUROUT__V128*/ meltfptr[127])); + ((meltroutine_ptr_t) /*_._VALROUT___V680*/ meltfptr[679])->tabval[0] = + (melt_ptr_t) ( /*_.CLASS_OBJPUTCLOSUROUT__V128*/ meltfptr[127]); MELT_LOCATION ("warmelt-outobj.melt:4823:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V677*/ meltfptr[676])) == + ( /*_._VALROUT___V680*/ meltfptr[679])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V264*/ meltfptr[263]); - ((meltroutine_ptr_t) /*_._VALROUT___V677*/ meltfptr[676])->tabval[1] = - (melt_ptr_t) ( /*_._VALCLO___V264*/ meltfptr[263]); + NULL != /*_._VALCLO___V265*/ meltfptr[264]); + ((meltroutine_ptr_t) /*_._VALROUT___V680*/ meltfptr[679])->tabval[1] = + (melt_ptr_t) ( /*_._VALCLO___V265*/ meltfptr[264]); MELT_LOCATION ("warmelt-outobj.melt:4823:/ initchunk"); /*^putroutconst */ @@ -38794,13 +38812,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_10 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V677*/ meltfptr[676])) + ( /*_._VALROUT___V680*/ meltfptr[679])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_487__OUTPUCOD_OBJPUTCLOSUROUT#2", + ("putroutconst constnull.drout_489__OUTPUCOD_OBJPUTCLOSUROUT#2", NULL != ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19])); - ((meltroutine_ptr_t) /*_._VALROUT___V677*/ meltfptr[676])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V680*/ meltfptr[679])->tabval[2] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]); MELT_LOCATION ("warmelt-outobj.melt:4823:/ initchunk"); @@ -38808,12 +38826,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_10 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V677*/ meltfptr[676])) == + ( /*_._VALROUT___V680*/ meltfptr[679])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALDATA___V197*/ meltfptr[196]); - ((meltroutine_ptr_t) /*_._VALROUT___V677*/ meltfptr[676])->tabval[3] = - (melt_ptr_t) ( /*_._VALDATA___V197*/ meltfptr[196]); + NULL != /*_._VALDATA___V198*/ meltfptr[197]); + ((meltroutine_ptr_t) /*_._VALROUT___V680*/ meltfptr[679])->tabval[3] = + (melt_ptr_t) ( /*_._VALDATA___V198*/ meltfptr[197]); MELT_LOCATION ("warmelt-outobj.melt:4823:/ initchunk"); /*^putroutconst */ @@ -38821,56 +38839,69 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_10 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V677*/ meltfptr[676])) + ( /*_._VALROUT___V680*/ meltfptr[679])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_487__OUTPUCOD_OBJPUTCLOSUROUT#4", + ("putroutconst constnull.drout_489__OUTPUCOD_OBJPUTCLOSUROUT#4", NULL != ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5])); - ((meltroutine_ptr_t) /*_._VALROUT___V677*/ meltfptr[676])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V680*/ meltfptr[679])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5]); MELT_LOCATION ("warmelt-outobj.melt:4823:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V677*/ meltfptr[676]); + meltgc_touch ( /*_._VALROUT___V680*/ meltfptr[679]); /*putclosurout#97 */ melt_assertmsg ("putclosrout#97 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V678*/ meltfptr[677])) == + ( /*_._VALCLO___V681*/ meltfptr[680])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#97 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V677*/ meltfptr[676])) == + ( /*_._VALROUT___V680*/ meltfptr[679])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V678*/ meltfptr[677])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V677*/ meltfptr[676]); + ((meltclosure_ptr_t) /*_._VALCLO___V681*/ meltfptr[680])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V680*/ meltfptr[679]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V678*/ meltfptr[677]); + meltgc_touch ( /*_._VALCLO___V681*/ meltfptr[680]); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_489__CLASS_OBJPUTCLOSUROUT @#1", + melt_assertmsg ("checkobj putslot ~dsym_491__CLASS_OBJPUTCLOSUROUT @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V679*/ meltfptr[678])) == + ( /*_._VALDATA___V682*/ meltfptr[681])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_489__CLASS_OBJPUTCLOSUROUT @#1", + melt_assertmsg ("checkoff putslot ~dsym_491__CLASS_OBJPUTCLOSUROUT @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V679*/ - meltfptr[678])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V679*/ meltfptr[678]))->obj_vartab[1] = + ( /*_._VALDATA___V682*/ + meltfptr[681])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V682*/ meltfptr[681]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V680*/ meltfptr[679]); + /*_._VALSTR___V683*/ meltfptr[682]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V679*/ meltfptr[678]); + meltgc_touch ( /*_._VALDATA___V682*/ meltfptr[681]); + + +#undef meltfram__ +} /*end of meltmod__WARMELTmiOUTOBJ__initialmeltchunk_10 */ +void +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___V679*/ meltfptr[678], + melt_dbgtrace_written_object ( /*_._VALDATA___V682*/ meltfptr[681], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:4867:/ initchunk"); @@ -38879,53 +38910,40 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_10 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V681*/ meltfptr[680])) + ( /*_._VALROUT___V684*/ meltfptr[683])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_491__OUTPUCOD_OBJPUTCLOSEDV#0", - NULL != ( /*_.CLASS_OBJPUTCLOSEDV__V128*/ meltfptr[127])); - ((meltroutine_ptr_t) /*_._VALROUT___V681*/ meltfptr[680])->tabval[0] = - (melt_ptr_t) ( /*_.CLASS_OBJPUTCLOSEDV__V128*/ meltfptr[127]); + ("putroutconst constnull.drout_493__OUTPUCOD_OBJPUTCLOSEDV#0", + NULL != ( /*_.CLASS_OBJPUTCLOSEDV__V129*/ meltfptr[128])); + ((meltroutine_ptr_t) /*_._VALROUT___V684*/ meltfptr[683])->tabval[0] = + (melt_ptr_t) ( /*_.CLASS_OBJPUTCLOSEDV__V129*/ meltfptr[128]); MELT_LOCATION ("warmelt-outobj.melt:4867:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V681*/ meltfptr[680])) == + ( /*_._VALROUT___V684*/ meltfptr[683])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V264*/ meltfptr[263]); - ((meltroutine_ptr_t) /*_._VALROUT___V681*/ meltfptr[680])->tabval[1] = - (melt_ptr_t) ( /*_._VALCLO___V264*/ meltfptr[263]); + NULL != /*_._VALCLO___V265*/ meltfptr[264]); + ((meltroutine_ptr_t) /*_._VALROUT___V684*/ meltfptr[683])->tabval[1] = + (melt_ptr_t) ( /*_._VALCLO___V265*/ meltfptr[264]); - -#undef meltfram__ -} /*end of meltmod__WARMELTmiOUTOBJ__initialmeltchunk_10 */ - -void -meltmod__WARMELTmiOUTOBJ__initialmeltchunk_11 (meltinitial_frame_t * - meltmeltframptr__, - char meltpredefinited[]) -{ -#define meltfram__ (*meltmeltframptr__) -#undef meltcallcount -#define meltcallcount 0L - (void) meltpredefinited; MELT_LOCATION ("warmelt-outobj.melt:4867:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V681*/ meltfptr[680])) + ( /*_._VALROUT___V684*/ meltfptr[683])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_491__OUTPUCOD_OBJPUTCLOSEDV#2", + ("putroutconst constnull.drout_493__OUTPUCOD_OBJPUTCLOSEDV#2", NULL != ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19])); - ((meltroutine_ptr_t) /*_._VALROUT___V681*/ meltfptr[680])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V684*/ meltfptr[683])->tabval[2] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]); MELT_LOCATION ("warmelt-outobj.melt:4867:/ initchunk"); @@ -38933,12 +38951,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_11 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V681*/ meltfptr[680])) == + ( /*_._VALROUT___V684*/ meltfptr[683])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALDATA___V197*/ meltfptr[196]); - ((meltroutine_ptr_t) /*_._VALROUT___V681*/ meltfptr[680])->tabval[3] = - (melt_ptr_t) ( /*_._VALDATA___V197*/ meltfptr[196]); + NULL != /*_._VALDATA___V198*/ meltfptr[197]); + ((meltroutine_ptr_t) /*_._VALROUT___V684*/ meltfptr[683])->tabval[3] = + (melt_ptr_t) ( /*_._VALDATA___V198*/ meltfptr[197]); MELT_LOCATION ("warmelt-outobj.melt:4867:/ initchunk"); /*^putroutconst */ @@ -38946,56 +38964,56 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_11 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V681*/ meltfptr[680])) + ( /*_._VALROUT___V684*/ meltfptr[683])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_491__OUTPUCOD_OBJPUTCLOSEDV#4", + ("putroutconst constnull.drout_493__OUTPUCOD_OBJPUTCLOSEDV#4", NULL != ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5])); - ((meltroutine_ptr_t) /*_._VALROUT___V681*/ meltfptr[680])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V684*/ meltfptr[683])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5]); MELT_LOCATION ("warmelt-outobj.melt:4867:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V681*/ meltfptr[680]); + meltgc_touch ( /*_._VALROUT___V684*/ meltfptr[683]); /*putclosurout#98 */ melt_assertmsg ("putclosrout#98 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V682*/ meltfptr[681])) == + ( /*_._VALCLO___V685*/ meltfptr[684])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#98 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V681*/ meltfptr[680])) == + ( /*_._VALROUT___V684*/ meltfptr[683])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V682*/ meltfptr[681])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V681*/ meltfptr[680]); + ((meltclosure_ptr_t) /*_._VALCLO___V685*/ meltfptr[684])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V684*/ meltfptr[683]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V682*/ meltfptr[681]); + meltgc_touch ( /*_._VALCLO___V685*/ meltfptr[684]); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_493__CLASS_OBJPUTCLOSEDV @#1", + melt_assertmsg ("checkobj putslot ~dsym_495__CLASS_OBJPUTCLOSEDV @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V683*/ meltfptr[682])) == + ( /*_._VALDATA___V686*/ meltfptr[685])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_493__CLASS_OBJPUTCLOSEDV @#1", + melt_assertmsg ("checkoff putslot ~dsym_495__CLASS_OBJPUTCLOSEDV @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V683*/ - meltfptr[682])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V683*/ meltfptr[682]))->obj_vartab[1] = + ( /*_._VALDATA___V686*/ + meltfptr[685])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V686*/ meltfptr[685]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V684*/ meltfptr[683]); + /*_._VALSTR___V687*/ meltfptr[686]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V683*/ meltfptr[682]); + meltgc_touch ( /*_._VALDATA___V686*/ meltfptr[685]); - melt_dbgtrace_written_object ( /*_._VALDATA___V683*/ meltfptr[682], + melt_dbgtrace_written_object ( /*_._VALDATA___V686*/ meltfptr[685], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:4903:/ initchunk"); @@ -39004,26 +39022,26 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_11 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V685*/ meltfptr[684])) + ( /*_._VALROUT___V688*/ meltfptr[687])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_495__OUTPUCOD_OBJPUTCLOSEDNOTNULLV#0", - NULL != ( /*_.CLASS_OBJPUTCLOSEDNOTNULLV__V129*/ meltfptr[128])); - ((meltroutine_ptr_t) /*_._VALROUT___V685*/ meltfptr[684])->tabval[0] = - (melt_ptr_t) ( /*_.CLASS_OBJPUTCLOSEDNOTNULLV__V129*/ meltfptr[128]); + ("putroutconst constnull.drout_497__OUTPUCOD_OBJPUTCLOSEDNOTNULLV#0", + NULL != ( /*_.CLASS_OBJPUTCLOSEDNOTNULLV__V130*/ meltfptr[129])); + ((meltroutine_ptr_t) /*_._VALROUT___V688*/ meltfptr[687])->tabval[0] = + (melt_ptr_t) ( /*_.CLASS_OBJPUTCLOSEDNOTNULLV__V130*/ meltfptr[129]); MELT_LOCATION ("warmelt-outobj.melt:4903:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V685*/ meltfptr[684])) == + ( /*_._VALROUT___V688*/ meltfptr[687])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V264*/ meltfptr[263]); - ((meltroutine_ptr_t) /*_._VALROUT___V685*/ meltfptr[684])->tabval[1] = - (melt_ptr_t) ( /*_._VALCLO___V264*/ meltfptr[263]); + NULL != /*_._VALCLO___V265*/ meltfptr[264]); + ((meltroutine_ptr_t) /*_._VALROUT___V688*/ meltfptr[687])->tabval[1] = + (melt_ptr_t) ( /*_._VALCLO___V265*/ meltfptr[264]); MELT_LOCATION ("warmelt-outobj.melt:4903:/ initchunk"); /*^putroutconst */ @@ -39031,13 +39049,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_11 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V685*/ meltfptr[684])) + ( /*_._VALROUT___V688*/ meltfptr[687])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_495__OUTPUCOD_OBJPUTCLOSEDNOTNULLV#2", + ("putroutconst constnull.drout_497__OUTPUCOD_OBJPUTCLOSEDNOTNULLV#2", NULL != ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19])); - ((meltroutine_ptr_t) /*_._VALROUT___V685*/ meltfptr[684])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V688*/ meltfptr[687])->tabval[2] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]); MELT_LOCATION ("warmelt-outobj.melt:4903:/ initchunk"); @@ -39045,12 +39063,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_11 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V685*/ meltfptr[684])) == + ( /*_._VALROUT___V688*/ meltfptr[687])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALDATA___V197*/ meltfptr[196]); - ((meltroutine_ptr_t) /*_._VALROUT___V685*/ meltfptr[684])->tabval[3] = - (melt_ptr_t) ( /*_._VALDATA___V197*/ meltfptr[196]); + NULL != /*_._VALDATA___V198*/ meltfptr[197]); + ((meltroutine_ptr_t) /*_._VALROUT___V688*/ meltfptr[687])->tabval[3] = + (melt_ptr_t) ( /*_._VALDATA___V198*/ meltfptr[197]); MELT_LOCATION ("warmelt-outobj.melt:4903:/ initchunk"); /*^putroutconst */ @@ -39058,56 +39076,56 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_11 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V685*/ meltfptr[684])) + ( /*_._VALROUT___V688*/ meltfptr[687])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_495__OUTPUCOD_OBJPUTCLOSEDNOTNULLV#4", + ("putroutconst constnull.drout_497__OUTPUCOD_OBJPUTCLOSEDNOTNULLV#4", NULL != ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5])); - ((meltroutine_ptr_t) /*_._VALROUT___V685*/ meltfptr[684])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V688*/ meltfptr[687])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5]); MELT_LOCATION ("warmelt-outobj.melt:4903:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V685*/ meltfptr[684]); + meltgc_touch ( /*_._VALROUT___V688*/ meltfptr[687]); /*putclosurout#99 */ melt_assertmsg ("putclosrout#99 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V686*/ meltfptr[685])) == + ( /*_._VALCLO___V689*/ meltfptr[688])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#99 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V685*/ meltfptr[684])) == + ( /*_._VALROUT___V688*/ meltfptr[687])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V686*/ meltfptr[685])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V685*/ meltfptr[684]); + ((meltclosure_ptr_t) /*_._VALCLO___V689*/ meltfptr[688])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V688*/ meltfptr[687]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V686*/ meltfptr[685]); + meltgc_touch ( /*_._VALCLO___V689*/ meltfptr[688]); /*putslot */ melt_assertmsg - ("checkobj putslot ~dsym_497__CLASS_OBJPUTCLOSEDNOTNULLV @#1", - melt_magic_discr ((melt_ptr_t) ( /*_._VALDATA___V687*/ meltfptr[686])) == + ("checkobj putslot ~dsym_499__CLASS_OBJPUTCLOSEDNOTNULLV @#1", + melt_magic_discr ((melt_ptr_t) ( /*_._VALDATA___V690*/ meltfptr[689])) == MELTOBMAG_OBJECT); melt_assertmsg - ("checkoff putslot ~dsym_497__CLASS_OBJPUTCLOSEDNOTNULLV @#1", + ("checkoff putslot ~dsym_499__CLASS_OBJPUTCLOSEDNOTNULLV @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V687*/ meltfptr[686])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V687*/ meltfptr[686]))->obj_vartab[1] = + ( /*_._VALDATA___V690*/ meltfptr[689])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V690*/ meltfptr[689]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V688*/ meltfptr[687]); + /*_._VALSTR___V691*/ meltfptr[690]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V687*/ meltfptr[686]); + meltgc_touch ( /*_._VALDATA___V690*/ meltfptr[689]); - melt_dbgtrace_written_object ( /*_._VALDATA___V687*/ meltfptr[686], + melt_dbgtrace_written_object ( /*_._VALDATA___V690*/ meltfptr[689], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:4943:/ initchunk"); @@ -39116,14 +39134,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_11 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V689*/ meltfptr[688])) + ( /*_._VALROUT___V692*/ meltfptr[691])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_499__OUTPUCOD_OBJPUTROUTCONST#0", - NULL != ( /*_.CLASS_OBJPUTROUTCONST__V130*/ meltfptr[129])); - ((meltroutine_ptr_t) /*_._VALROUT___V689*/ meltfptr[688])->tabval[0] = - (melt_ptr_t) ( /*_.CLASS_OBJPUTROUTCONST__V130*/ meltfptr[129]); + ("putroutconst constnull.drout_501__OUTPUCOD_OBJPUTROUTCONST#0", + NULL != ( /*_.CLASS_OBJPUTROUTCONST__V131*/ meltfptr[130])); + ((meltroutine_ptr_t) /*_._VALROUT___V692*/ meltfptr[691])->tabval[0] = + (melt_ptr_t) ( /*_.CLASS_OBJPUTROUTCONST__V131*/ meltfptr[130]); MELT_LOCATION ("warmelt-outobj.melt:4943:/ initchunk"); /*^putroutconst */ @@ -39131,13 +39149,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_11 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V689*/ meltfptr[688])) + ( /*_._VALROUT___V692*/ meltfptr[691])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_499__OUTPUCOD_OBJPUTROUTCONST#1", + ("putroutconst constnull.drout_501__OUTPUCOD_OBJPUTROUTCONST#1", NULL != ( /*_.CLASS_OBJINITROUTINE__V41*/ meltfptr[40])); - ((meltroutine_ptr_t) /*_._VALROUT___V689*/ meltfptr[688])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V692*/ meltfptr[691])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_OBJINITROUTINE__V41*/ meltfptr[40]); MELT_LOCATION ("warmelt-outobj.melt:4943:/ initchunk"); @@ -39145,12 +39163,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_11 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V689*/ meltfptr[688])) == + ( /*_._VALROUT___V692*/ meltfptr[691])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V264*/ meltfptr[263]); - ((meltroutine_ptr_t) /*_._VALROUT___V689*/ meltfptr[688])->tabval[2] = - (melt_ptr_t) ( /*_._VALCLO___V264*/ meltfptr[263]); + NULL != /*_._VALCLO___V265*/ meltfptr[264]); + ((meltroutine_ptr_t) /*_._VALROUT___V692*/ meltfptr[691])->tabval[2] = + (melt_ptr_t) ( /*_._VALCLO___V265*/ meltfptr[264]); MELT_LOCATION ("warmelt-outobj.melt:4943:/ initchunk"); /*^putroutconst */ @@ -39158,13 +39176,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_11 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V689*/ meltfptr[688])) + ( /*_._VALROUT___V692*/ meltfptr[691])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_499__OUTPUCOD_OBJPUTROUTCONST#3", + ("putroutconst constnull.drout_501__OUTPUCOD_OBJPUTROUTCONST#3", NULL != ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19])); - ((meltroutine_ptr_t) /*_._VALROUT___V689*/ meltfptr[688])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V692*/ meltfptr[691])->tabval[3] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]); MELT_LOCATION ("warmelt-outobj.melt:4943:/ initchunk"); @@ -39172,12 +39190,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_11 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V689*/ meltfptr[688])) == + ( /*_._VALROUT___V692*/ meltfptr[691])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALDATA___V197*/ meltfptr[196]); - ((meltroutine_ptr_t) /*_._VALROUT___V689*/ meltfptr[688])->tabval[4] = - (melt_ptr_t) ( /*_._VALDATA___V197*/ meltfptr[196]); + NULL != /*_._VALDATA___V198*/ meltfptr[197]); + ((meltroutine_ptr_t) /*_._VALROUT___V692*/ meltfptr[691])->tabval[4] = + (melt_ptr_t) ( /*_._VALDATA___V198*/ meltfptr[197]); MELT_LOCATION ("warmelt-outobj.melt:4943:/ initchunk"); /*^putroutconst */ @@ -39185,56 +39203,56 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_11 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V689*/ meltfptr[688])) + ( /*_._VALROUT___V692*/ meltfptr[691])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_499__OUTPUCOD_OBJPUTROUTCONST#5", + ("putroutconst constnull.drout_501__OUTPUCOD_OBJPUTROUTCONST#5", NULL != ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5])); - ((meltroutine_ptr_t) /*_._VALROUT___V689*/ meltfptr[688])->tabval[5] = + ((meltroutine_ptr_t) /*_._VALROUT___V692*/ meltfptr[691])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5]); MELT_LOCATION ("warmelt-outobj.melt:4943:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V689*/ meltfptr[688]); + meltgc_touch ( /*_._VALROUT___V692*/ meltfptr[691]); /*putclosurout#100 */ melt_assertmsg ("putclosrout#100 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V690*/ meltfptr[689])) == + ( /*_._VALCLO___V693*/ meltfptr[692])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#100 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V689*/ meltfptr[688])) == + ( /*_._VALROUT___V692*/ meltfptr[691])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V690*/ meltfptr[689])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V689*/ meltfptr[688]); + ((meltclosure_ptr_t) /*_._VALCLO___V693*/ meltfptr[692])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V692*/ meltfptr[691]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V690*/ meltfptr[689]); + meltgc_touch ( /*_._VALCLO___V693*/ meltfptr[692]); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_501__CLASS_OBJPUTROUTCONST @#1", + melt_assertmsg ("checkobj putslot ~dsym_503__CLASS_OBJPUTROUTCONST @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V691*/ meltfptr[690])) == + ( /*_._VALDATA___V694*/ meltfptr[693])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_501__CLASS_OBJPUTROUTCONST @#1", + melt_assertmsg ("checkoff putslot ~dsym_503__CLASS_OBJPUTROUTCONST @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V691*/ - meltfptr[690])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V691*/ meltfptr[690]))->obj_vartab[1] = + ( /*_._VALDATA___V694*/ + meltfptr[693])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V694*/ meltfptr[693]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V692*/ meltfptr[691]); + /*_._VALSTR___V695*/ meltfptr[694]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V691*/ meltfptr[690]); + meltgc_touch ( /*_._VALDATA___V694*/ meltfptr[693]); - melt_dbgtrace_written_object ( /*_._VALDATA___V691*/ meltfptr[690], + melt_dbgtrace_written_object ( /*_._VALDATA___V694*/ meltfptr[693], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:4982:/ initchunk"); @@ -39243,26 +39261,26 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_11 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V693*/ meltfptr[692])) + ( /*_._VALROUT___V696*/ meltfptr[695])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_503__OUTPUCOD_OBJPUTROUTCONSTNOTNULL#0", - NULL != ( /*_.CLASS_OBJPUTROUTCONSTNOTNULL__V131*/ meltfptr[130])); - ((meltroutine_ptr_t) /*_._VALROUT___V693*/ meltfptr[692])->tabval[0] = - (melt_ptr_t) ( /*_.CLASS_OBJPUTROUTCONSTNOTNULL__V131*/ meltfptr[130]); + ("putroutconst constnull.drout_505__OUTPUCOD_OBJPUTROUTCONSTNOTNULL#0", + NULL != ( /*_.CLASS_OBJPUTROUTCONSTNOTNULL__V132*/ meltfptr[131])); + ((meltroutine_ptr_t) /*_._VALROUT___V696*/ meltfptr[695])->tabval[0] = + (melt_ptr_t) ( /*_.CLASS_OBJPUTROUTCONSTNOTNULL__V132*/ meltfptr[131]); MELT_LOCATION ("warmelt-outobj.melt:4982:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V693*/ meltfptr[692])) == + ( /*_._VALROUT___V696*/ meltfptr[695])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V264*/ meltfptr[263]); - ((meltroutine_ptr_t) /*_._VALROUT___V693*/ meltfptr[692])->tabval[1] = - (melt_ptr_t) ( /*_._VALCLO___V264*/ meltfptr[263]); + NULL != /*_._VALCLO___V265*/ meltfptr[264]); + ((meltroutine_ptr_t) /*_._VALROUT___V696*/ meltfptr[695])->tabval[1] = + (melt_ptr_t) ( /*_._VALCLO___V265*/ meltfptr[264]); MELT_LOCATION ("warmelt-outobj.melt:4982:/ initchunk"); /*^putroutconst */ @@ -39270,13 +39288,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_11 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V693*/ meltfptr[692])) + ( /*_._VALROUT___V696*/ meltfptr[695])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_503__OUTPUCOD_OBJPUTROUTCONSTNOTNULL#2", + ("putroutconst constnull.drout_505__OUTPUCOD_OBJPUTROUTCONSTNOTNULL#2", NULL != ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19])); - ((meltroutine_ptr_t) /*_._VALROUT___V693*/ meltfptr[692])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V696*/ meltfptr[695])->tabval[2] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]); MELT_LOCATION ("warmelt-outobj.melt:4982:/ initchunk"); @@ -39284,12 +39302,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_11 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V693*/ meltfptr[692])) == + ( /*_._VALROUT___V696*/ meltfptr[695])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALDATA___V197*/ meltfptr[196]); - ((meltroutine_ptr_t) /*_._VALROUT___V693*/ meltfptr[692])->tabval[3] = - (melt_ptr_t) ( /*_._VALDATA___V197*/ meltfptr[196]); + NULL != /*_._VALDATA___V198*/ meltfptr[197]); + ((meltroutine_ptr_t) /*_._VALROUT___V696*/ meltfptr[695])->tabval[3] = + (melt_ptr_t) ( /*_._VALDATA___V198*/ meltfptr[197]); MELT_LOCATION ("warmelt-outobj.melt:4982:/ initchunk"); /*^putroutconst */ @@ -39297,56 +39315,56 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_11 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V693*/ meltfptr[692])) + ( /*_._VALROUT___V696*/ meltfptr[695])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_503__OUTPUCOD_OBJPUTROUTCONSTNOTNULL#4", + ("putroutconst constnull.drout_505__OUTPUCOD_OBJPUTROUTCONSTNOTNULL#4", NULL != ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5])); - ((meltroutine_ptr_t) /*_._VALROUT___V693*/ meltfptr[692])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V696*/ meltfptr[695])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5]); MELT_LOCATION ("warmelt-outobj.melt:4982:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V693*/ meltfptr[692]); + meltgc_touch ( /*_._VALROUT___V696*/ meltfptr[695]); /*putclosurout#101 */ melt_assertmsg ("putclosrout#101 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V694*/ meltfptr[693])) == + ( /*_._VALCLO___V697*/ meltfptr[696])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#101 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V693*/ meltfptr[692])) == + ( /*_._VALROUT___V696*/ meltfptr[695])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V694*/ meltfptr[693])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V693*/ meltfptr[692]); + ((meltclosure_ptr_t) /*_._VALCLO___V697*/ meltfptr[696])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V696*/ meltfptr[695]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V694*/ meltfptr[693]); + meltgc_touch ( /*_._VALCLO___V697*/ meltfptr[696]); /*putslot */ melt_assertmsg - ("checkobj putslot ~dsym_505__CLASS_OBJPUTROUTCONSTNOTNULL @#1", - melt_magic_discr ((melt_ptr_t) ( /*_._VALDATA___V695*/ meltfptr[694])) == + ("checkobj putslot ~dsym_507__CLASS_OBJPUTROUTCONSTNOTNULL @#1", + melt_magic_discr ((melt_ptr_t) ( /*_._VALDATA___V698*/ meltfptr[697])) == MELTOBMAG_OBJECT); melt_assertmsg - ("checkoff putslot ~dsym_505__CLASS_OBJPUTROUTCONSTNOTNULL @#1", + ("checkoff putslot ~dsym_507__CLASS_OBJPUTROUTCONSTNOTNULL @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V695*/ meltfptr[694])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V695*/ meltfptr[694]))->obj_vartab[1] = + ( /*_._VALDATA___V698*/ meltfptr[697])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V698*/ meltfptr[697]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V696*/ meltfptr[695]); + /*_._VALSTR___V699*/ meltfptr[698]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V695*/ meltfptr[694]); + meltgc_touch ( /*_._VALDATA___V698*/ meltfptr[697]); - melt_dbgtrace_written_object ( /*_._VALDATA___V695*/ meltfptr[694], + melt_dbgtrace_written_object ( /*_._VALDATA___V698*/ meltfptr[697], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:5015:/ initchunk"); @@ -39355,13 +39373,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_11 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V697*/ meltfptr[696])) + ( /*_._VALROUT___V700*/ meltfptr[699])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_507__OUTPUCOD_OBJPUTHOOKCONST#0", + ("putroutconst constnull.drout_509__OUTPUCOD_OBJPUTHOOKCONST#0", NULL != ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_._VALROUT___V697*/ meltfptr[696])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V700*/ meltfptr[699])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:5015:/ initchunk"); @@ -39370,14 +39388,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_11 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V697*/ meltfptr[696])) + ( /*_._VALROUT___V700*/ meltfptr[699])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_507__OUTPUCOD_OBJPUTHOOKCONST#1", - NULL != ( /*_.CLASS_OBJPUTHOOKCONST__V132*/ meltfptr[131])); - ((meltroutine_ptr_t) /*_._VALROUT___V697*/ meltfptr[696])->tabval[1] = - (melt_ptr_t) ( /*_.CLASS_OBJPUTHOOKCONST__V132*/ meltfptr[131]); + ("putroutconst constnull.drout_509__OUTPUCOD_OBJPUTHOOKCONST#1", + NULL != ( /*_.CLASS_OBJPUTHOOKCONST__V133*/ meltfptr[132])); + ((meltroutine_ptr_t) /*_._VALROUT___V700*/ meltfptr[699])->tabval[1] = + (melt_ptr_t) ( /*_.CLASS_OBJPUTHOOKCONST__V133*/ meltfptr[132]); MELT_LOCATION ("warmelt-outobj.melt:5015:/ initchunk"); /*^putroutconst */ @@ -39385,13 +39403,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_11 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V697*/ meltfptr[696])) + ( /*_._VALROUT___V700*/ meltfptr[699])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_507__OUTPUCOD_OBJPUTHOOKCONST#2", + ("putroutconst constnull.drout_509__OUTPUCOD_OBJPUTHOOKCONST#2", NULL != ( /*_.CLASS_OBJINSTR__V69*/ meltfptr[68])); - ((meltroutine_ptr_t) /*_._VALROUT___V697*/ meltfptr[696])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V700*/ meltfptr[699])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_OBJINSTR__V69*/ meltfptr[68]); MELT_LOCATION ("warmelt-outobj.melt:5015:/ initchunk"); @@ -39400,13 +39418,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_11 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V697*/ meltfptr[696])) + ( /*_._VALROUT___V700*/ meltfptr[699])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_507__OUTPUCOD_OBJPUTHOOKCONST#3", + ("putroutconst constnull.drout_509__OUTPUCOD_OBJPUTHOOKCONST#3", NULL != ( /*_.CLASS_OBJINITELEM__V19*/ meltfptr[18])); - ((meltroutine_ptr_t) /*_._VALROUT___V697*/ meltfptr[696])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V700*/ meltfptr[699])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_OBJINITELEM__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-outobj.melt:5015:/ initchunk"); @@ -39415,26 +39433,26 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_11 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V697*/ meltfptr[696])) + ( /*_._VALROUT___V700*/ meltfptr[699])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_507__OUTPUCOD_OBJPUTHOOKCONST#4", - NULL != ( /*_.CLASS_NREP_BOUND_DATA__V133*/ meltfptr[132])); - ((meltroutine_ptr_t) /*_._VALROUT___V697*/ meltfptr[696])->tabval[4] = - (melt_ptr_t) ( /*_.CLASS_NREP_BOUND_DATA__V133*/ meltfptr[132]); + ("putroutconst constnull.drout_509__OUTPUCOD_OBJPUTHOOKCONST#4", + NULL != ( /*_.CLASS_NREP_BOUND_DATA__V134*/ meltfptr[133])); + ((meltroutine_ptr_t) /*_._VALROUT___V700*/ meltfptr[699])->tabval[4] = + (melt_ptr_t) ( /*_.CLASS_NREP_BOUND_DATA__V134*/ meltfptr[133]); MELT_LOCATION ("warmelt-outobj.melt:5015:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V697*/ meltfptr[696])) == + ( /*_._VALROUT___V700*/ meltfptr[699])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V264*/ meltfptr[263]); - ((meltroutine_ptr_t) /*_._VALROUT___V697*/ meltfptr[696])->tabval[5] = - (melt_ptr_t) ( /*_._VALCLO___V264*/ meltfptr[263]); + NULL != /*_._VALCLO___V265*/ meltfptr[264]); + ((meltroutine_ptr_t) /*_._VALROUT___V700*/ meltfptr[699])->tabval[5] = + (melt_ptr_t) ( /*_._VALCLO___V265*/ meltfptr[264]); MELT_LOCATION ("warmelt-outobj.melt:5015:/ initchunk"); /*^putroutconst */ @@ -39442,13 +39460,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_11 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V697*/ meltfptr[696])) + ( /*_._VALROUT___V700*/ meltfptr[699])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_507__OUTPUCOD_OBJPUTHOOKCONST#6", + ("putroutconst constnull.drout_509__OUTPUCOD_OBJPUTHOOKCONST#6", NULL != ( /*_.ADD2OUT__V14*/ meltfptr[13])); - ((meltroutine_ptr_t) /*_._VALROUT___V697*/ meltfptr[696])->tabval[6] = + ((meltroutine_ptr_t) /*_._VALROUT___V700*/ meltfptr[699])->tabval[6] = (melt_ptr_t) ( /*_.ADD2OUT__V14*/ meltfptr[13]); MELT_LOCATION ("warmelt-outobj.melt:5015:/ initchunk"); @@ -39457,79 +39475,79 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_11 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V697*/ meltfptr[696])) + ( /*_._VALROUT___V700*/ meltfptr[699])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_507__OUTPUCOD_OBJPUTHOOKCONST#7", + ("putroutconst constnull.drout_509__OUTPUCOD_OBJPUTHOOKCONST#7", NULL != ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19])); - ((meltroutine_ptr_t) /*_._VALROUT___V697*/ meltfptr[696])->tabval[7] = + ((meltroutine_ptr_t) /*_._VALROUT___V700*/ meltfptr[699])->tabval[7] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]); MELT_LOCATION ("warmelt-outobj.melt:5015:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V697*/ meltfptr[696]); + meltgc_touch ( /*_._VALROUT___V700*/ meltfptr[699]); /*putclosurout#102 */ melt_assertmsg ("putclosrout#102 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V698*/ meltfptr[697])) == + ( /*_._VALCLO___V701*/ meltfptr[700])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#102 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V697*/ meltfptr[696])) == + ( /*_._VALROUT___V700*/ meltfptr[699])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V698*/ meltfptr[697])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V697*/ meltfptr[696]); + ((meltclosure_ptr_t) /*_._VALCLO___V701*/ meltfptr[700])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V700*/ meltfptr[699]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V698*/ meltfptr[697]); + meltgc_touch ( /*_._VALCLO___V701*/ meltfptr[700]); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_509__CLASS_OBJPUTHOOKCONST @#1", + melt_assertmsg ("checkobj putslot ~dsym_511__CLASS_OBJPUTHOOKCONST @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V699*/ meltfptr[698])) == + ( /*_._VALDATA___V702*/ meltfptr[701])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_509__CLASS_OBJPUTHOOKCONST @#1", + melt_assertmsg ("checkoff putslot ~dsym_511__CLASS_OBJPUTHOOKCONST @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V699*/ - meltfptr[698])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V699*/ meltfptr[698]))->obj_vartab[1] = + ( /*_._VALDATA___V702*/ + meltfptr[701])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V702*/ meltfptr[701]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V700*/ meltfptr[699]); + /*_._VALSTR___V703*/ meltfptr[702]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V699*/ meltfptr[698]); + meltgc_touch ( /*_._VALDATA___V702*/ meltfptr[701]); - melt_dbgtrace_written_object ( /*_._VALDATA___V699*/ meltfptr[698], + melt_dbgtrace_written_object ( /*_._VALDATA___V702*/ meltfptr[701], "new static instance"); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_511__CLASS_NREP_BOUND_DATA @#1", + melt_assertmsg ("checkobj putslot ~dsym_513__CLASS_NREP_BOUND_DATA @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V701*/ meltfptr[700])) == + ( /*_._VALDATA___V704*/ meltfptr[703])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_511__CLASS_NREP_BOUND_DATA @#1", + melt_assertmsg ("checkoff putslot ~dsym_513__CLASS_NREP_BOUND_DATA @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V701*/ - meltfptr[700])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V701*/ meltfptr[700]))->obj_vartab[1] = + ( /*_._VALDATA___V704*/ + meltfptr[703])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V704*/ meltfptr[703]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V702*/ meltfptr[701]); + /*_._VALSTR___V705*/ meltfptr[704]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V701*/ meltfptr[700]); + meltgc_touch ( /*_._VALDATA___V704*/ meltfptr[703]); - melt_dbgtrace_written_object ( /*_._VALDATA___V701*/ meltfptr[700], + melt_dbgtrace_written_object ( /*_._VALDATA___V704*/ meltfptr[703], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:5055:/ initchunk"); @@ -39538,13 +39556,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_11 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V703*/ meltfptr[702])) + ( /*_._VALROUT___V706*/ meltfptr[705])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_513__OUTPUCOD_OBJPUTHOOKDATA#0", + ("putroutconst constnull.drout_515__OUTPUCOD_OBJPUTHOOKDATA#0", NULL != ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_._VALROUT___V703*/ meltfptr[702])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V706*/ meltfptr[705])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:5055:/ initchunk"); @@ -39553,14 +39571,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_11 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V703*/ meltfptr[702])) + ( /*_._VALROUT___V706*/ meltfptr[705])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_513__OUTPUCOD_OBJPUTHOOKDATA#1", - NULL != ( /*_.CLASS_OBJPUTHOOKDATA__V134*/ meltfptr[133])); - ((meltroutine_ptr_t) /*_._VALROUT___V703*/ meltfptr[702])->tabval[1] = - (melt_ptr_t) ( /*_.CLASS_OBJPUTHOOKDATA__V134*/ meltfptr[133]); + ("putroutconst constnull.drout_515__OUTPUCOD_OBJPUTHOOKDATA#1", + NULL != ( /*_.CLASS_OBJPUTHOOKDATA__V135*/ meltfptr[134])); + ((meltroutine_ptr_t) /*_._VALROUT___V706*/ meltfptr[705])->tabval[1] = + (melt_ptr_t) ( /*_.CLASS_OBJPUTHOOKDATA__V135*/ meltfptr[134]); MELT_LOCATION ("warmelt-outobj.melt:5055:/ initchunk"); /*^putroutconst */ @@ -39568,13 +39586,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_11 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V703*/ meltfptr[702])) + ( /*_._VALROUT___V706*/ meltfptr[705])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_513__OUTPUCOD_OBJPUTHOOKDATA#2", + ("putroutconst constnull.drout_515__OUTPUCOD_OBJPUTHOOKDATA#2", NULL != ( /*_.CLASS_OBJINSTR__V69*/ meltfptr[68])); - ((meltroutine_ptr_t) /*_._VALROUT___V703*/ meltfptr[702])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V706*/ meltfptr[705])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_OBJINSTR__V69*/ meltfptr[68]); MELT_LOCATION ("warmelt-outobj.melt:5055:/ initchunk"); @@ -39583,13 +39601,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_11 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V703*/ meltfptr[702])) + ( /*_._VALROUT___V706*/ meltfptr[705])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_513__OUTPUCOD_OBJPUTHOOKDATA#3", + ("putroutconst constnull.drout_515__OUTPUCOD_OBJPUTHOOKDATA#3", NULL != ( /*_.CLASS_OBJINITELEM__V19*/ meltfptr[18])); - ((meltroutine_ptr_t) /*_._VALROUT___V703*/ meltfptr[702])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V706*/ meltfptr[705])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_OBJINITELEM__V19*/ meltfptr[18]); MELT_LOCATION ("warmelt-outobj.melt:5055:/ initchunk"); @@ -39598,14 +39616,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_11 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V703*/ meltfptr[702])) + ( /*_._VALROUT___V706*/ meltfptr[705])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_513__OUTPUCOD_OBJPUTHOOKDATA#4", - NULL != ( /*_.CLASS_NREP_BOUND_DATA__V133*/ meltfptr[132])); - ((meltroutine_ptr_t) /*_._VALROUT___V703*/ meltfptr[702])->tabval[4] = - (melt_ptr_t) ( /*_.CLASS_NREP_BOUND_DATA__V133*/ meltfptr[132]); + ("putroutconst constnull.drout_515__OUTPUCOD_OBJPUTHOOKDATA#4", + NULL != ( /*_.CLASS_NREP_BOUND_DATA__V134*/ meltfptr[133])); + ((meltroutine_ptr_t) /*_._VALROUT___V706*/ meltfptr[705])->tabval[4] = + (melt_ptr_t) ( /*_.CLASS_NREP_BOUND_DATA__V134*/ meltfptr[133]); MELT_LOCATION ("warmelt-outobj.melt:5055:/ initchunk"); /*^putroutconst */ @@ -39613,13 +39631,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_11 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V703*/ meltfptr[702])) + ( /*_._VALROUT___V706*/ meltfptr[705])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_513__OUTPUCOD_OBJPUTHOOKDATA#5", + ("putroutconst constnull.drout_515__OUTPUCOD_OBJPUTHOOKDATA#5", NULL != ( /*_.CLASS_OBJINITHOOK__V37*/ meltfptr[36])); - ((meltroutine_ptr_t) /*_._VALROUT___V703*/ meltfptr[702])->tabval[5] = + ((meltroutine_ptr_t) /*_._VALROUT___V706*/ meltfptr[705])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_OBJINITHOOK__V37*/ meltfptr[36]); MELT_LOCATION ("warmelt-outobj.melt:5055:/ initchunk"); @@ -39627,12 +39645,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_11 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V703*/ meltfptr[702])) == + ( /*_._VALROUT___V706*/ meltfptr[705])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V264*/ meltfptr[263]); - ((meltroutine_ptr_t) /*_._VALROUT___V703*/ meltfptr[702])->tabval[6] = - (melt_ptr_t) ( /*_._VALCLO___V264*/ meltfptr[263]); + NULL != /*_._VALCLO___V265*/ meltfptr[264]); + ((meltroutine_ptr_t) /*_._VALROUT___V706*/ meltfptr[705])->tabval[6] = + (melt_ptr_t) ( /*_._VALCLO___V265*/ meltfptr[264]); MELT_LOCATION ("warmelt-outobj.melt:5055:/ initchunk"); /*^putroutconst */ @@ -39640,13 +39658,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_11 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V703*/ meltfptr[702])) + ( /*_._VALROUT___V706*/ meltfptr[705])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_513__OUTPUCOD_OBJPUTHOOKDATA#7", + ("putroutconst constnull.drout_515__OUTPUCOD_OBJPUTHOOKDATA#7", NULL != ( /*_.ADD2OUT__V14*/ meltfptr[13])); - ((meltroutine_ptr_t) /*_._VALROUT___V703*/ meltfptr[702])->tabval[7] = + ((meltroutine_ptr_t) /*_._VALROUT___V706*/ meltfptr[705])->tabval[7] = (melt_ptr_t) ( /*_.ADD2OUT__V14*/ meltfptr[13]); MELT_LOCATION ("warmelt-outobj.melt:5055:/ initchunk"); @@ -39655,56 +39673,56 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_11 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V703*/ meltfptr[702])) + ( /*_._VALROUT___V706*/ meltfptr[705])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_513__OUTPUCOD_OBJPUTHOOKDATA#8", + ("putroutconst constnull.drout_515__OUTPUCOD_OBJPUTHOOKDATA#8", NULL != ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19])); - ((meltroutine_ptr_t) /*_._VALROUT___V703*/ meltfptr[702])->tabval[8] = + ((meltroutine_ptr_t) /*_._VALROUT___V706*/ meltfptr[705])->tabval[8] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]); MELT_LOCATION ("warmelt-outobj.melt:5055:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V703*/ meltfptr[702]); + meltgc_touch ( /*_._VALROUT___V706*/ meltfptr[705]); /*putclosurout#103 */ melt_assertmsg ("putclosrout#103 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V704*/ meltfptr[703])) == + ( /*_._VALCLO___V707*/ meltfptr[706])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#103 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V703*/ meltfptr[702])) == + ( /*_._VALROUT___V706*/ meltfptr[705])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V704*/ meltfptr[703])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V703*/ meltfptr[702]); + ((meltclosure_ptr_t) /*_._VALCLO___V707*/ meltfptr[706])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V706*/ meltfptr[705]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V704*/ meltfptr[703]); + meltgc_touch ( /*_._VALCLO___V707*/ meltfptr[706]); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_515__CLASS_OBJPUTHOOKDATA @#1", + melt_assertmsg ("checkobj putslot ~dsym_517__CLASS_OBJPUTHOOKDATA @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V705*/ meltfptr[704])) == + ( /*_._VALDATA___V708*/ meltfptr[707])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_515__CLASS_OBJPUTHOOKDATA @#1", + melt_assertmsg ("checkoff putslot ~dsym_517__CLASS_OBJPUTHOOKDATA @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V705*/ - meltfptr[704])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V705*/ meltfptr[704]))->obj_vartab[1] = + ( /*_._VALDATA___V708*/ + meltfptr[707])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V708*/ meltfptr[707]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V706*/ meltfptr[705]); + /*_._VALSTR___V709*/ meltfptr[708]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V705*/ meltfptr[704]); + meltgc_touch ( /*_._VALDATA___V708*/ meltfptr[707]); - melt_dbgtrace_written_object ( /*_._VALDATA___V705*/ meltfptr[704], + melt_dbgtrace_written_object ( /*_._VALDATA___V708*/ meltfptr[707], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:5084:/ initchunk"); @@ -39713,14 +39731,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_11 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V707*/ meltfptr[706])) + ( /*_._VALROUT___V710*/ meltfptr[709])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_517__OUTPUCOD_OBJPUTXTRARESULT#0", - NULL != ( /*_.CLASS_OBJPUTXTRARESULT__V135*/ meltfptr[134])); - ((meltroutine_ptr_t) /*_._VALROUT___V707*/ meltfptr[706])->tabval[0] = - (melt_ptr_t) ( /*_.CLASS_OBJPUTXTRARESULT__V135*/ meltfptr[134]); + ("putroutconst constnull.drout_519__OUTPUCOD_OBJPUTXTRARESULT#0", + NULL != ( /*_.CLASS_OBJPUTXTRARESULT__V136*/ meltfptr[135])); + ((meltroutine_ptr_t) /*_._VALROUT___V710*/ meltfptr[709])->tabval[0] = + (melt_ptr_t) ( /*_.CLASS_OBJPUTXTRARESULT__V136*/ meltfptr[135]); MELT_LOCATION ("warmelt-outobj.melt:5084:/ initchunk"); /*^putroutconst */ @@ -39728,26 +39746,26 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_11 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V707*/ meltfptr[706])) + ( /*_._VALROUT___V710*/ meltfptr[709])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_517__OUTPUCOD_OBJPUTXTRARESULT#1", - NULL != ( /*_.GET_CTYPE__V110*/ meltfptr[109])); - ((meltroutine_ptr_t) /*_._VALROUT___V707*/ meltfptr[706])->tabval[1] = - (melt_ptr_t) ( /*_.GET_CTYPE__V110*/ meltfptr[109]); + ("putroutconst constnull.drout_519__OUTPUCOD_OBJPUTXTRARESULT#1", + NULL != ( /*_.GET_CTYPE__V111*/ meltfptr[110])); + ((meltroutine_ptr_t) /*_._VALROUT___V710*/ meltfptr[709])->tabval[1] = + (melt_ptr_t) ( /*_.GET_CTYPE__V111*/ meltfptr[110]); MELT_LOCATION ("warmelt-outobj.melt:5084:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V707*/ meltfptr[706])) == + ( /*_._VALROUT___V710*/ meltfptr[709])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V264*/ meltfptr[263]); - ((meltroutine_ptr_t) /*_._VALROUT___V707*/ meltfptr[706])->tabval[2] = - (melt_ptr_t) ( /*_._VALCLO___V264*/ meltfptr[263]); + NULL != /*_._VALCLO___V265*/ meltfptr[264]); + ((meltroutine_ptr_t) /*_._VALROUT___V710*/ meltfptr[709])->tabval[2] = + (melt_ptr_t) ( /*_._VALCLO___V265*/ meltfptr[264]); MELT_LOCATION ("warmelt-outobj.melt:5084:/ initchunk"); /*^putroutconst */ @@ -39755,13 +39773,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_11 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V707*/ meltfptr[706])) + ( /*_._VALROUT___V710*/ meltfptr[709])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_517__OUTPUCOD_OBJPUTXTRARESULT#3", + ("putroutconst constnull.drout_519__OUTPUCOD_OBJPUTXTRARESULT#3", NULL != ( /*_.CLASS_CTYPE__V28*/ meltfptr[27])); - ((meltroutine_ptr_t) /*_._VALROUT___V707*/ meltfptr[706])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V710*/ meltfptr[709])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_CTYPE__V28*/ meltfptr[27]); MELT_LOCATION ("warmelt-outobj.melt:5084:/ initchunk"); @@ -39770,13 +39788,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_11 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V707*/ meltfptr[706])) + ( /*_._VALROUT___V710*/ meltfptr[709])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_517__OUTPUCOD_OBJPUTXTRARESULT#4", + ("putroutconst constnull.drout_519__OUTPUCOD_OBJPUTXTRARESULT#4", NULL != ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_._VALROUT___V707*/ meltfptr[706])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V710*/ meltfptr[709])->tabval[4] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:5084:/ initchunk"); @@ -39785,13 +39803,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_11 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V707*/ meltfptr[706])) + ( /*_._VALROUT___V710*/ meltfptr[709])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_517__OUTPUCOD_OBJPUTXTRARESULT#5", + ("putroutconst constnull.drout_519__OUTPUCOD_OBJPUTXTRARESULT#5", NULL != ( /*_.CLASS_NAMED__V13*/ meltfptr[12])); - ((meltroutine_ptr_t) /*_._VALROUT___V707*/ meltfptr[706])->tabval[5] = + ((meltroutine_ptr_t) /*_._VALROUT___V710*/ meltfptr[709])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_NAMED__V13*/ meltfptr[12]); MELT_LOCATION ("warmelt-outobj.melt:5084:/ initchunk"); @@ -39800,13 +39818,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_11 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V707*/ meltfptr[706])) + ( /*_._VALROUT___V710*/ meltfptr[709])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_517__OUTPUCOD_OBJPUTXTRARESULT#6", + ("putroutconst constnull.drout_519__OUTPUCOD_OBJPUTXTRARESULT#6", NULL != ( /*_.CTYPE_VALUE__V31*/ meltfptr[30])); - ((meltroutine_ptr_t) /*_._VALROUT___V707*/ meltfptr[706])->tabval[6] = + ((meltroutine_ptr_t) /*_._VALROUT___V710*/ meltfptr[709])->tabval[6] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V31*/ meltfptr[30]); MELT_LOCATION ("warmelt-outobj.melt:5084:/ initchunk"); @@ -39815,13 +39833,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_11 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V707*/ meltfptr[706])) + ( /*_._VALROUT___V710*/ meltfptr[709])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_517__OUTPUCOD_OBJPUTXTRARESULT#7", + ("putroutconst constnull.drout_519__OUTPUCOD_OBJPUTXTRARESULT#7", NULL != ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19])); - ((meltroutine_ptr_t) /*_._VALROUT___V707*/ meltfptr[706])->tabval[7] = + ((meltroutine_ptr_t) /*_._VALROUT___V710*/ meltfptr[709])->tabval[7] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]); MELT_LOCATION ("warmelt-outobj.melt:5084:/ initchunk"); @@ -39829,12 +39847,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_11 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V707*/ meltfptr[706])) == + ( /*_._VALROUT___V710*/ meltfptr[709])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALDATA___V197*/ meltfptr[196]); - ((meltroutine_ptr_t) /*_._VALROUT___V707*/ meltfptr[706])->tabval[8] = - (melt_ptr_t) ( /*_._VALDATA___V197*/ meltfptr[196]); + NULL != /*_._VALDATA___V198*/ meltfptr[197]); + ((meltroutine_ptr_t) /*_._VALROUT___V710*/ meltfptr[709])->tabval[8] = + (melt_ptr_t) ( /*_._VALDATA___V198*/ meltfptr[197]); MELT_LOCATION ("warmelt-outobj.melt:5084:/ initchunk"); /*^putroutconst */ @@ -39842,56 +39860,56 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_11 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V707*/ meltfptr[706])) + ( /*_._VALROUT___V710*/ meltfptr[709])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_517__OUTPUCOD_OBJPUTXTRARESULT#9", + ("putroutconst constnull.drout_519__OUTPUCOD_OBJPUTXTRARESULT#9", NULL != ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5])); - ((meltroutine_ptr_t) /*_._VALROUT___V707*/ meltfptr[706])->tabval[9] = + ((meltroutine_ptr_t) /*_._VALROUT___V710*/ meltfptr[709])->tabval[9] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5]); MELT_LOCATION ("warmelt-outobj.melt:5084:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V707*/ meltfptr[706]); + meltgc_touch ( /*_._VALROUT___V710*/ meltfptr[709]); /*putclosurout#104 */ melt_assertmsg ("putclosrout#104 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V708*/ meltfptr[707])) == + ( /*_._VALCLO___V711*/ meltfptr[710])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#104 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V707*/ meltfptr[706])) == + ( /*_._VALROUT___V710*/ meltfptr[709])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V708*/ meltfptr[707])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V707*/ meltfptr[706]); + ((meltclosure_ptr_t) /*_._VALCLO___V711*/ meltfptr[710])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V710*/ meltfptr[709]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V708*/ meltfptr[707]); + meltgc_touch ( /*_._VALCLO___V711*/ meltfptr[710]); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_519__CLASS_OBJPUTXTRARESULT @#1", + melt_assertmsg ("checkobj putslot ~dsym_521__CLASS_OBJPUTXTRARESULT @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V709*/ meltfptr[708])) == + ( /*_._VALDATA___V712*/ meltfptr[711])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_519__CLASS_OBJPUTXTRARESULT @#1", + melt_assertmsg ("checkoff putslot ~dsym_521__CLASS_OBJPUTXTRARESULT @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V709*/ - meltfptr[708])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V709*/ meltfptr[708]))->obj_vartab[1] = + ( /*_._VALDATA___V712*/ + meltfptr[711])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V712*/ meltfptr[711]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V710*/ meltfptr[709]); + /*_._VALSTR___V713*/ meltfptr[712]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V709*/ meltfptr[708]); + meltgc_touch ( /*_._VALDATA___V712*/ meltfptr[711]); - melt_dbgtrace_written_object ( /*_._VALDATA___V709*/ meltfptr[708], + melt_dbgtrace_written_object ( /*_._VALDATA___V712*/ meltfptr[711], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:5125:/ initchunk"); @@ -39900,13 +39918,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_11 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V711*/ meltfptr[710])) + ( /*_._VALROUT___V714*/ meltfptr[713])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_521__OUTPUCOD_OBJEXPV#0", - NULL != ( /*_.CLASS_OBJEXPV__V136*/ meltfptr[135])); - ((meltroutine_ptr_t) /*_._VALROUT___V711*/ meltfptr[710])->tabval[0] = - (melt_ptr_t) ( /*_.CLASS_OBJEXPV__V136*/ meltfptr[135]); + melt_checkmsg ("putroutconst constnull.drout_523__OUTPUCOD_OBJEXPV#0", + NULL != ( /*_.CLASS_OBJEXPV__V137*/ meltfptr[136])); + ((meltroutine_ptr_t) /*_._VALROUT___V714*/ meltfptr[713])->tabval[0] = + (melt_ptr_t) ( /*_.CLASS_OBJEXPV__V137*/ meltfptr[136]); MELT_LOCATION ("warmelt-outobj.melt:5125:/ initchunk"); /*^putroutconst */ @@ -39914,12 +39932,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_11 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V711*/ meltfptr[710])) + ( /*_._VALROUT___V714*/ meltfptr[713])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_521__OUTPUCOD_OBJEXPV#1", + melt_checkmsg ("putroutconst constnull.drout_523__OUTPUCOD_OBJEXPV#1", NULL != ( /*_.DISCR_INTEGER__V52*/ meltfptr[51])); - ((meltroutine_ptr_t) /*_._VALROUT___V711*/ meltfptr[710])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V714*/ meltfptr[713])->tabval[1] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V52*/ meltfptr[51]); MELT_LOCATION ("warmelt-outobj.melt:5125:/ initchunk"); @@ -39928,12 +39946,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_11 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V711*/ meltfptr[710])) + ( /*_._VALROUT___V714*/ meltfptr[713])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_521__OUTPUCOD_OBJEXPV#2", + melt_checkmsg ("putroutconst constnull.drout_523__OUTPUCOD_OBJEXPV#2", NULL != ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19])); - ((meltroutine_ptr_t) /*_._VALROUT___V711*/ meltfptr[710])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V714*/ meltfptr[713])->tabval[2] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]); MELT_LOCATION ("warmelt-outobj.melt:5125:/ initchunk"); @@ -39941,12 +39959,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_11 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V711*/ meltfptr[710])) == + ( /*_._VALROUT___V714*/ meltfptr[713])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALDATA___V197*/ meltfptr[196]); - ((meltroutine_ptr_t) /*_._VALROUT___V711*/ meltfptr[710])->tabval[3] = - (melt_ptr_t) ( /*_._VALDATA___V197*/ meltfptr[196]); + NULL != /*_._VALDATA___V198*/ meltfptr[197]); + ((meltroutine_ptr_t) /*_._VALROUT___V714*/ meltfptr[713])->tabval[3] = + (melt_ptr_t) ( /*_._VALDATA___V198*/ meltfptr[197]); MELT_LOCATION ("warmelt-outobj.melt:5125:/ initchunk"); /*^putroutconst */ @@ -39954,55 +39972,55 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_11 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V711*/ meltfptr[710])) + ( /*_._VALROUT___V714*/ meltfptr[713])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_521__OUTPUCOD_OBJEXPV#4", + melt_checkmsg ("putroutconst constnull.drout_523__OUTPUCOD_OBJEXPV#4", NULL != ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5])); - ((meltroutine_ptr_t) /*_._VALROUT___V711*/ meltfptr[710])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V714*/ meltfptr[713])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5]); MELT_LOCATION ("warmelt-outobj.melt:5125:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V711*/ meltfptr[710]); + meltgc_touch ( /*_._VALROUT___V714*/ meltfptr[713]); /*putclosurout#105 */ melt_assertmsg ("putclosrout#105 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V712*/ meltfptr[711])) == + ( /*_._VALCLO___V715*/ meltfptr[714])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#105 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V711*/ meltfptr[710])) == + ( /*_._VALROUT___V714*/ meltfptr[713])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V712*/ meltfptr[711])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V711*/ meltfptr[710]); + ((meltclosure_ptr_t) /*_._VALCLO___V715*/ meltfptr[714])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V714*/ meltfptr[713]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V712*/ meltfptr[711]); + meltgc_touch ( /*_._VALCLO___V715*/ meltfptr[714]); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_523__CLASS_OBJEXPV @#1", + melt_assertmsg ("checkobj putslot ~dsym_525__CLASS_OBJEXPV @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V713*/ meltfptr[712])) == + ( /*_._VALDATA___V716*/ meltfptr[715])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_523__CLASS_OBJEXPV @#1", + melt_assertmsg ("checkoff putslot ~dsym_525__CLASS_OBJEXPV @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V713*/ - meltfptr[712])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V713*/ meltfptr[712]))->obj_vartab[1] = + ( /*_._VALDATA___V716*/ + meltfptr[715])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V716*/ meltfptr[715]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V714*/ meltfptr[713]); + /*_._VALSTR___V717*/ meltfptr[716]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V713*/ meltfptr[712]); + meltgc_touch ( /*_._VALDATA___V716*/ meltfptr[715]); - melt_dbgtrace_written_object ( /*_._VALDATA___V713*/ meltfptr[712], + melt_dbgtrace_written_object ( /*_._VALDATA___V716*/ meltfptr[715], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:5141:/ initchunk"); @@ -40011,13 +40029,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_11 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V715*/ meltfptr[714])) + ( /*_._VALROUT___V718*/ meltfptr[717])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_525__OUTPUCOD_OBJLOCATEDEXPV#0", + ("putroutconst constnull.drout_527__OUTPUCOD_OBJLOCATEDEXPV#0", NULL != ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_._VALROUT___V715*/ meltfptr[714])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V718*/ meltfptr[717])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:5141:/ initchunk"); @@ -40026,14 +40044,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_11 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V715*/ meltfptr[714])) + ( /*_._VALROUT___V718*/ meltfptr[717])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_525__OUTPUCOD_OBJLOCATEDEXPV#1", - NULL != ( /*_.CLASS_OBJLOCATEDEXPV__V137*/ meltfptr[136])); - ((meltroutine_ptr_t) /*_._VALROUT___V715*/ meltfptr[714])->tabval[1] = - (melt_ptr_t) ( /*_.CLASS_OBJLOCATEDEXPV__V137*/ meltfptr[136]); + ("putroutconst constnull.drout_527__OUTPUCOD_OBJLOCATEDEXPV#1", + NULL != ( /*_.CLASS_OBJLOCATEDEXPV__V138*/ meltfptr[137])); + ((meltroutine_ptr_t) /*_._VALROUT___V718*/ meltfptr[717])->tabval[1] = + (melt_ptr_t) ( /*_.CLASS_OBJLOCATEDEXPV__V138*/ meltfptr[137]); MELT_LOCATION ("warmelt-outobj.melt:5141:/ initchunk"); /*^putroutconst */ @@ -40041,13 +40059,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_11 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V715*/ meltfptr[714])) + ( /*_._VALROUT___V718*/ meltfptr[717])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_525__OUTPUCOD_OBJLOCATEDEXPV#2", + ("putroutconst constnull.drout_527__OUTPUCOD_OBJLOCATEDEXPV#2", NULL != ( /*_.CTYPE_VOID__V29*/ meltfptr[28])); - ((meltroutine_ptr_t) /*_._VALROUT___V715*/ meltfptr[714])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V718*/ meltfptr[717])->tabval[2] = (melt_ptr_t) ( /*_.CTYPE_VOID__V29*/ meltfptr[28]); MELT_LOCATION ("warmelt-outobj.melt:5141:/ initchunk"); @@ -40055,24 +40073,24 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_11 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V715*/ meltfptr[714])) == + ( /*_._VALROUT___V718*/ meltfptr[717])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V264*/ meltfptr[263]); - ((meltroutine_ptr_t) /*_._VALROUT___V715*/ meltfptr[714])->tabval[3] = - (melt_ptr_t) ( /*_._VALCLO___V264*/ meltfptr[263]); + NULL != /*_._VALCLO___V265*/ meltfptr[264]); + ((meltroutine_ptr_t) /*_._VALROUT___V718*/ meltfptr[717])->tabval[3] = + (melt_ptr_t) ( /*_._VALCLO___V265*/ meltfptr[264]); MELT_LOCATION ("warmelt-outobj.melt:5141:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V715*/ meltfptr[714])) == + ( /*_._VALROUT___V718*/ meltfptr[717])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V268*/ meltfptr[267]); - ((meltroutine_ptr_t) /*_._VALROUT___V715*/ meltfptr[714])->tabval[4] = - (melt_ptr_t) ( /*_._VALCLO___V268*/ meltfptr[267]); + NULL != /*_._VALCLO___V269*/ meltfptr[268]); + ((meltroutine_ptr_t) /*_._VALROUT___V718*/ meltfptr[717])->tabval[4] = + (melt_ptr_t) ( /*_._VALCLO___V269*/ meltfptr[268]); MELT_LOCATION ("warmelt-outobj.melt:5141:/ initchunk"); /*^putroutconst */ @@ -40080,13 +40098,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_11 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V715*/ meltfptr[714])) + ( /*_._VALROUT___V718*/ meltfptr[717])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_525__OUTPUCOD_OBJLOCATEDEXPV#5", + ("putroutconst constnull.drout_527__OUTPUCOD_OBJLOCATEDEXPV#5", NULL != ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19])); - ((meltroutine_ptr_t) /*_._VALROUT___V715*/ meltfptr[714])->tabval[5] = + ((meltroutine_ptr_t) /*_._VALROUT___V718*/ meltfptr[717])->tabval[5] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]); MELT_LOCATION ("warmelt-outobj.melt:5141:/ initchunk"); @@ -40094,12 +40112,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_11 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V715*/ meltfptr[714])) == + ( /*_._VALROUT___V718*/ meltfptr[717])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALDATA___V197*/ meltfptr[196]); - ((meltroutine_ptr_t) /*_._VALROUT___V715*/ meltfptr[714])->tabval[6] = - (melt_ptr_t) ( /*_._VALDATA___V197*/ meltfptr[196]); + NULL != /*_._VALDATA___V198*/ meltfptr[197]); + ((meltroutine_ptr_t) /*_._VALROUT___V718*/ meltfptr[717])->tabval[6] = + (melt_ptr_t) ( /*_._VALDATA___V198*/ meltfptr[197]); MELT_LOCATION ("warmelt-outobj.melt:5141:/ initchunk"); /*^putroutconst */ @@ -40107,56 +40125,56 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_11 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V715*/ meltfptr[714])) + ( /*_._VALROUT___V718*/ meltfptr[717])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_525__OUTPUCOD_OBJLOCATEDEXPV#7", + ("putroutconst constnull.drout_527__OUTPUCOD_OBJLOCATEDEXPV#7", NULL != ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5])); - ((meltroutine_ptr_t) /*_._VALROUT___V715*/ meltfptr[714])->tabval[7] = + ((meltroutine_ptr_t) /*_._VALROUT___V718*/ meltfptr[717])->tabval[7] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5]); MELT_LOCATION ("warmelt-outobj.melt:5141:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V715*/ meltfptr[714]); + meltgc_touch ( /*_._VALROUT___V718*/ meltfptr[717]); /*putclosurout#106 */ melt_assertmsg ("putclosrout#106 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V716*/ meltfptr[715])) == + ( /*_._VALCLO___V719*/ meltfptr[718])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#106 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V715*/ meltfptr[714])) == + ( /*_._VALROUT___V718*/ meltfptr[717])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V716*/ meltfptr[715])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V715*/ meltfptr[714]); + ((meltclosure_ptr_t) /*_._VALCLO___V719*/ meltfptr[718])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V718*/ meltfptr[717]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V716*/ meltfptr[715]); + meltgc_touch ( /*_._VALCLO___V719*/ meltfptr[718]); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_527__CLASS_OBJLOCATEDEXPV @#1", + melt_assertmsg ("checkobj putslot ~dsym_529__CLASS_OBJLOCATEDEXPV @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V717*/ meltfptr[716])) == + ( /*_._VALDATA___V720*/ meltfptr[719])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_527__CLASS_OBJLOCATEDEXPV @#1", + melt_assertmsg ("checkoff putslot ~dsym_529__CLASS_OBJLOCATEDEXPV @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V717*/ - meltfptr[716])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V717*/ meltfptr[716]))->obj_vartab[1] = + ( /*_._VALDATA___V720*/ + meltfptr[719])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V720*/ meltfptr[719]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V718*/ meltfptr[717]); + /*_._VALSTR___V721*/ meltfptr[720]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V717*/ meltfptr[716]); + meltgc_touch ( /*_._VALDATA___V720*/ meltfptr[719]); - melt_dbgtrace_written_object ( /*_._VALDATA___V717*/ meltfptr[716], + melt_dbgtrace_written_object ( /*_._VALDATA___V720*/ meltfptr[719], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:5182:/ initchunk"); @@ -40165,26 +40183,26 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_11 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V719*/ meltfptr[718])) + ( /*_._VALROUT___V722*/ meltfptr[721])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_529__OUTPUCOD_VERBATIMSTRING#0", - NULL != ( /*_.DISCR_VERBATIM_STRING__V87*/ meltfptr[86])); - ((meltroutine_ptr_t) /*_._VALROUT___V719*/ meltfptr[718])->tabval[0] = - (melt_ptr_t) ( /*_.DISCR_VERBATIM_STRING__V87*/ meltfptr[86]); + ("putroutconst constnull.drout_531__OUTPUCOD_VERBATIMSTRING#0", + NULL != ( /*_.DISCR_VERBATIM_STRING__V88*/ meltfptr[87])); + ((meltroutine_ptr_t) /*_._VALROUT___V722*/ meltfptr[721])->tabval[0] = + (melt_ptr_t) ( /*_.DISCR_VERBATIM_STRING__V88*/ meltfptr[87]); MELT_LOCATION ("warmelt-outobj.melt:5182:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V719*/ meltfptr[718])) == + ( /*_._VALROUT___V722*/ meltfptr[721])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALDATA___V197*/ meltfptr[196]); - ((meltroutine_ptr_t) /*_._VALROUT___V719*/ meltfptr[718])->tabval[1] = - (melt_ptr_t) ( /*_._VALDATA___V197*/ meltfptr[196]); + NULL != /*_._VALDATA___V198*/ meltfptr[197]); + ((meltroutine_ptr_t) /*_._VALROUT___V722*/ meltfptr[721])->tabval[1] = + (melt_ptr_t) ( /*_._VALDATA___V198*/ meltfptr[197]); MELT_LOCATION ("warmelt-outobj.melt:5182:/ initchunk"); /*^putroutconst */ @@ -40192,34 +40210,34 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_11 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V719*/ meltfptr[718])) + ( /*_._VALROUT___V722*/ meltfptr[721])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_529__OUTPUCOD_VERBATIMSTRING#2", + ("putroutconst constnull.drout_531__OUTPUCOD_VERBATIMSTRING#2", NULL != ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5])); - ((meltroutine_ptr_t) /*_._VALROUT___V719*/ meltfptr[718])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V722*/ meltfptr[721])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5]); MELT_LOCATION ("warmelt-outobj.melt:5182:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V719*/ meltfptr[718]); + meltgc_touch ( /*_._VALROUT___V722*/ meltfptr[721]); /*putclosurout#107 */ melt_assertmsg ("putclosrout#107 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V720*/ meltfptr[719])) == + ( /*_._VALCLO___V723*/ meltfptr[722])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#107 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V719*/ meltfptr[718])) == + ( /*_._VALROUT___V722*/ meltfptr[721])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V720*/ meltfptr[719])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V719*/ meltfptr[718]); + ((meltclosure_ptr_t) /*_._VALCLO___V723*/ meltfptr[722])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V722*/ meltfptr[721]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V720*/ meltfptr[719]); + meltgc_touch ( /*_._VALCLO___V723*/ meltfptr[722]); MELT_LOCATION ("warmelt-outobj.melt:5193:/ initchunk"); /*^putroutconst */ @@ -40227,12 +40245,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_11 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V721*/ meltfptr[720])) + ( /*_._VALROUT___V724*/ meltfptr[723])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_531__OUTPUCOD_STRING#0", + melt_checkmsg ("putroutconst constnull.drout_533__OUTPUCOD_STRING#0", NULL != ( /*_.DISCR_STRING__V53*/ meltfptr[52])); - ((meltroutine_ptr_t) /*_._VALROUT___V721*/ meltfptr[720])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V724*/ meltfptr[723])->tabval[0] = (melt_ptr_t) ( /*_.DISCR_STRING__V53*/ meltfptr[52]); MELT_LOCATION ("warmelt-outobj.melt:5193:/ initchunk"); @@ -40240,12 +40258,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_11 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V721*/ meltfptr[720])) == + ( /*_._VALROUT___V724*/ meltfptr[723])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALDATA___V197*/ meltfptr[196]); - ((meltroutine_ptr_t) /*_._VALROUT___V721*/ meltfptr[720])->tabval[1] = - (melt_ptr_t) ( /*_._VALDATA___V197*/ meltfptr[196]); + NULL != /*_._VALDATA___V198*/ meltfptr[197]); + ((meltroutine_ptr_t) /*_._VALROUT___V724*/ meltfptr[723])->tabval[1] = + (melt_ptr_t) ( /*_._VALDATA___V198*/ meltfptr[197]); MELT_LOCATION ("warmelt-outobj.melt:5193:/ initchunk"); /*^putroutconst */ @@ -40253,61 +40271,61 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_11 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V721*/ meltfptr[720])) + ( /*_._VALROUT___V724*/ meltfptr[723])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_531__OUTPUCOD_STRING#2", + melt_checkmsg ("putroutconst constnull.drout_533__OUTPUCOD_STRING#2", NULL != ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5])); - ((meltroutine_ptr_t) /*_._VALROUT___V721*/ meltfptr[720])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V724*/ meltfptr[723])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5]); + +#undef meltfram__ +} /*end of meltmod__WARMELTmiOUTOBJ__initialmeltchunk_11 */ + +void +meltmod__WARMELTmiOUTOBJ__initialmeltchunk_12 (meltinitial_frame_t * + meltmeltframptr__, + char meltpredefinited[]) +{ +#define meltfram__ (*meltmeltframptr__) +#undef meltcallcount +#define meltcallcount 0L + (void) meltpredefinited; MELT_LOCATION ("warmelt-outobj.melt:5193:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V721*/ meltfptr[720]); + meltgc_touch ( /*_._VALROUT___V724*/ meltfptr[723]); /*putclosurout#108 */ melt_assertmsg ("putclosrout#108 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V722*/ meltfptr[721])) == + ( /*_._VALCLO___V725*/ meltfptr[724])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#108 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V721*/ meltfptr[720])) == + ( /*_._VALROUT___V724*/ meltfptr[723])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V722*/ meltfptr[721])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V721*/ meltfptr[720]); + ((meltclosure_ptr_t) /*_._VALCLO___V725*/ meltfptr[724])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V724*/ meltfptr[723]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V722*/ meltfptr[721]); + meltgc_touch ( /*_._VALCLO___V725*/ meltfptr[724]); - -#undef meltfram__ -} /*end of meltmod__WARMELTmiOUTOBJ__initialmeltchunk_11 */ - -void -meltmod__WARMELTmiOUTOBJ__initialmeltchunk_12 (meltinitial_frame_t * - meltmeltframptr__, - char meltpredefinited[]) -{ -#define meltfram__ (*meltmeltframptr__) -#undef meltcallcount -#define meltcallcount 0L - (void) meltpredefinited; -/*putclosurout#109*/ + /*putclosurout#109 */ melt_assertmsg ("putclosrout#109 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V724*/ meltfptr[723])) == + ( /*_._VALCLO___V727*/ meltfptr[726])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#109 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V723*/ meltfptr[722])) == + ( /*_._VALROUT___V726*/ meltfptr[725])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V724*/ meltfptr[723])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V723*/ meltfptr[722]); + ((meltclosure_ptr_t) /*_._VALCLO___V727*/ meltfptr[726])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V726*/ meltfptr[725]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V724*/ meltfptr[723]); + meltgc_touch ( /*_._VALCLO___V727*/ meltfptr[726]); MELT_LOCATION ("warmelt-outobj.melt:5213:/ initchunk"); /*^putroutconst */ @@ -40315,37 +40333,37 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_12 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V725*/ meltfptr[724])) + ( /*_._VALROUT___V728*/ meltfptr[727])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_535__OUTPUCOD_FINALRETURN#0", - NULL != ( /*_.CLASS_OBJFINALRETURN__V138*/ meltfptr[137])); - ((meltroutine_ptr_t) /*_._VALROUT___V725*/ meltfptr[724])->tabval[0] = - (melt_ptr_t) ( /*_.CLASS_OBJFINALRETURN__V138*/ meltfptr[137]); + melt_checkmsg ("putroutconst constnull.drout_537__OUTPUCOD_FINALRETURN#0", + NULL != ( /*_.CLASS_OBJFINALRETURN__V139*/ meltfptr[138])); + ((meltroutine_ptr_t) /*_._VALROUT___V728*/ meltfptr[727])->tabval[0] = + (melt_ptr_t) ( /*_.CLASS_OBJFINALRETURN__V139*/ meltfptr[138]); MELT_LOCATION ("warmelt-outobj.melt:5213:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V725*/ meltfptr[724])) == + ( /*_._VALROUT___V728*/ meltfptr[727])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V264*/ meltfptr[263]); - ((meltroutine_ptr_t) /*_._VALROUT___V725*/ meltfptr[724])->tabval[1] = - (melt_ptr_t) ( /*_._VALCLO___V264*/ meltfptr[263]); + NULL != /*_._VALCLO___V265*/ meltfptr[264]); + ((meltroutine_ptr_t) /*_._VALROUT___V728*/ meltfptr[727])->tabval[1] = + (melt_ptr_t) ( /*_._VALCLO___V265*/ meltfptr[264]); MELT_LOCATION ("warmelt-outobj.melt:5213:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V725*/ meltfptr[724])) == + ( /*_._VALROUT___V728*/ meltfptr[727])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALDATA___V197*/ meltfptr[196]); - ((meltroutine_ptr_t) /*_._VALROUT___V725*/ meltfptr[724])->tabval[2] = - (melt_ptr_t) ( /*_._VALDATA___V197*/ meltfptr[196]); + NULL != /*_._VALDATA___V198*/ meltfptr[197]); + ((meltroutine_ptr_t) /*_._VALROUT___V728*/ meltfptr[727])->tabval[2] = + (melt_ptr_t) ( /*_._VALDATA___V198*/ meltfptr[197]); MELT_LOCATION ("warmelt-outobj.melt:5213:/ initchunk"); /*^putroutconst */ @@ -40353,55 +40371,55 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_12 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V725*/ meltfptr[724])) + ( /*_._VALROUT___V728*/ meltfptr[727])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_535__OUTPUCOD_FINALRETURN#3", + melt_checkmsg ("putroutconst constnull.drout_537__OUTPUCOD_FINALRETURN#3", NULL != ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5])); - ((meltroutine_ptr_t) /*_._VALROUT___V725*/ meltfptr[724])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V728*/ meltfptr[727])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5]); MELT_LOCATION ("warmelt-outobj.melt:5213:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V725*/ meltfptr[724]); + meltgc_touch ( /*_._VALROUT___V728*/ meltfptr[727]); /*putclosurout#110 */ melt_assertmsg ("putclosrout#110 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V726*/ meltfptr[725])) == + ( /*_._VALCLO___V729*/ meltfptr[728])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#110 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V725*/ meltfptr[724])) == + ( /*_._VALROUT___V728*/ meltfptr[727])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V726*/ meltfptr[725])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V725*/ meltfptr[724]); + ((meltclosure_ptr_t) /*_._VALCLO___V729*/ meltfptr[728])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V728*/ meltfptr[727]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V726*/ meltfptr[725]); + meltgc_touch ( /*_._VALCLO___V729*/ meltfptr[728]); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_537__CLASS_OBJFINALRETURN @#1", + melt_assertmsg ("checkobj putslot ~dsym_539__CLASS_OBJFINALRETURN @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V727*/ meltfptr[726])) == + ( /*_._VALDATA___V730*/ meltfptr[729])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_537__CLASS_OBJFINALRETURN @#1", + melt_assertmsg ("checkoff putslot ~dsym_539__CLASS_OBJFINALRETURN @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V727*/ - meltfptr[726])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V727*/ meltfptr[726]))->obj_vartab[1] = + ( /*_._VALDATA___V730*/ + meltfptr[729])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V730*/ meltfptr[729]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V728*/ meltfptr[727]); + /*_._VALSTR___V731*/ meltfptr[730]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V727*/ meltfptr[726]); + meltgc_touch ( /*_._VALDATA___V730*/ meltfptr[729]); - melt_dbgtrace_written_object ( /*_._VALDATA___V727*/ meltfptr[726], + melt_dbgtrace_written_object ( /*_._VALDATA___V730*/ meltfptr[729], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:5226:/ initchunk"); @@ -40410,13 +40428,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_12 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V729*/ meltfptr[728])) + ( /*_._VALROUT___V732*/ meltfptr[731])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_539__SORTED_NAMED_DICT_TUPLE#0", + ("putroutconst constnull.drout_541__SORTED_NAMED_DICT_TUPLE#0", NULL != ( /*_.DISCR_LIST__V65*/ meltfptr[64])); - ((meltroutine_ptr_t) /*_._VALROUT___V729*/ meltfptr[728])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V732*/ meltfptr[731])->tabval[0] = (melt_ptr_t) ( /*_.DISCR_LIST__V65*/ meltfptr[64]); MELT_LOCATION ("warmelt-outobj.melt:5226:/ initchunk"); @@ -40425,13 +40443,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_12 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V729*/ meltfptr[728])) + ( /*_._VALROUT___V732*/ meltfptr[731])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_539__SORTED_NAMED_DICT_TUPLE#1", + ("putroutconst constnull.drout_541__SORTED_NAMED_DICT_TUPLE#1", NULL != ( /*_.CLASS_NAMED__V13*/ meltfptr[12])); - ((meltroutine_ptr_t) /*_._VALROUT___V729*/ meltfptr[728])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V732*/ meltfptr[731])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_NAMED__V13*/ meltfptr[12]); MELT_LOCATION ("warmelt-outobj.melt:5226:/ initchunk"); @@ -40440,13 +40458,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_12 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V729*/ meltfptr[728])) + ( /*_._VALROUT___V732*/ meltfptr[731])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_539__SORTED_NAMED_DICT_TUPLE#2", + ("putroutconst constnull.drout_541__SORTED_NAMED_DICT_TUPLE#2", NULL != ( /*_.LIST_TO_MULTIPLE__V66*/ meltfptr[65])); - ((meltroutine_ptr_t) /*_._VALROUT___V729*/ meltfptr[728])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V732*/ meltfptr[731])->tabval[2] = (melt_ptr_t) ( /*_.LIST_TO_MULTIPLE__V66*/ meltfptr[65]); MELT_LOCATION ("warmelt-outobj.melt:5226:/ initchunk"); @@ -40455,14 +40473,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_12 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V729*/ meltfptr[728])) + ( /*_._VALROUT___V732*/ meltfptr[731])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_539__SORTED_NAMED_DICT_TUPLE#3", - NULL != ( /*_.COMPARE_NAMED_ALPHA__V139*/ meltfptr[138])); - ((meltroutine_ptr_t) /*_._VALROUT___V729*/ meltfptr[728])->tabval[3] = - (melt_ptr_t) ( /*_.COMPARE_NAMED_ALPHA__V139*/ meltfptr[138]); + ("putroutconst constnull.drout_541__SORTED_NAMED_DICT_TUPLE#3", + NULL != ( /*_.COMPARE_NAMED_ALPHA__V140*/ meltfptr[139])); + ((meltroutine_ptr_t) /*_._VALROUT___V732*/ meltfptr[731])->tabval[3] = + (melt_ptr_t) ( /*_.COMPARE_NAMED_ALPHA__V140*/ meltfptr[139]); MELT_LOCATION ("warmelt-outobj.melt:5226:/ initchunk"); /*^putroutconst */ @@ -40470,56 +40488,56 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_12 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V729*/ meltfptr[728])) + ( /*_._VALROUT___V732*/ meltfptr[731])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_539__SORTED_NAMED_DICT_TUPLE#4", + ("putroutconst constnull.drout_541__SORTED_NAMED_DICT_TUPLE#4", NULL != ( /*_.DISCR_MULTIPLE__V67*/ meltfptr[66])); - ((meltroutine_ptr_t) /*_._VALROUT___V729*/ meltfptr[728])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V732*/ meltfptr[731])->tabval[4] = (melt_ptr_t) ( /*_.DISCR_MULTIPLE__V67*/ meltfptr[66]); MELT_LOCATION ("warmelt-outobj.melt:5226:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V729*/ meltfptr[728]); + meltgc_touch ( /*_._VALROUT___V732*/ meltfptr[731]); /*putclosurout#111 */ melt_assertmsg ("putclosrout#111 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V730*/ meltfptr[729])) == + ( /*_._VALCLO___V733*/ meltfptr[732])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#111 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V729*/ meltfptr[728])) == + ( /*_._VALROUT___V732*/ meltfptr[731])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V730*/ meltfptr[729])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V729*/ meltfptr[728]); + ((meltclosure_ptr_t) /*_._VALCLO___V733*/ meltfptr[732])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V732*/ meltfptr[731]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V730*/ meltfptr[729]); + meltgc_touch ( /*_._VALCLO___V733*/ meltfptr[732]); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_541__COMPARE_NAMED_ALPHA @#1", + melt_assertmsg ("checkobj putslot ~dsym_543__COMPARE_NAMED_ALPHA @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V731*/ meltfptr[730])) == + ( /*_._VALDATA___V734*/ meltfptr[733])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_541__COMPARE_NAMED_ALPHA @#1", + melt_assertmsg ("checkoff putslot ~dsym_543__COMPARE_NAMED_ALPHA @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V731*/ - meltfptr[730])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V731*/ meltfptr[730]))->obj_vartab[1] = + ( /*_._VALDATA___V734*/ + meltfptr[733])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V734*/ meltfptr[733]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V732*/ meltfptr[731]); + /*_._VALSTR___V735*/ meltfptr[734]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V731*/ meltfptr[730]); + meltgc_touch ( /*_._VALDATA___V734*/ meltfptr[733]); - melt_dbgtrace_written_object ( /*_._VALDATA___V731*/ meltfptr[730], + melt_dbgtrace_written_object ( /*_._VALDATA___V734*/ meltfptr[733], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:5243:/ initchunk"); @@ -40528,26 +40546,26 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_12 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V733*/ meltfptr[732])) + ( /*_._VALROUT___V736*/ meltfptr[735])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_543__OUTPUT_EXPORTED_OFFSETS#0", - NULL != ( /*_.CLASS_ANY_MODULE_CONTEXT__V140*/ meltfptr[139])); - ((meltroutine_ptr_t) /*_._VALROUT___V733*/ meltfptr[732])->tabval[0] = - (melt_ptr_t) ( /*_.CLASS_ANY_MODULE_CONTEXT__V140*/ meltfptr[139]); + ("putroutconst constnull.drout_545__OUTPUT_EXPORTED_OFFSETS#0", + NULL != ( /*_.CLASS_ANY_MODULE_CONTEXT__V141*/ meltfptr[140])); + ((meltroutine_ptr_t) /*_._VALROUT___V736*/ meltfptr[735])->tabval[0] = + (melt_ptr_t) ( /*_.CLASS_ANY_MODULE_CONTEXT__V141*/ meltfptr[140]); MELT_LOCATION ("warmelt-outobj.melt:5243:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V733*/ meltfptr[732])) == + ( /*_._VALROUT___V736*/ meltfptr[735])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V730*/ meltfptr[729]); - ((meltroutine_ptr_t) /*_._VALROUT___V733*/ meltfptr[732])->tabval[1] = - (melt_ptr_t) ( /*_._VALCLO___V730*/ meltfptr[729]); + NULL != /*_._VALCLO___V733*/ meltfptr[732]); + ((meltroutine_ptr_t) /*_._VALROUT___V736*/ meltfptr[735])->tabval[1] = + (melt_ptr_t) ( /*_._VALCLO___V733*/ meltfptr[732]); MELT_LOCATION ("warmelt-outobj.melt:5243:/ initchunk"); /*^putroutconst */ @@ -40555,14 +40573,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_12 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V733*/ meltfptr[732])) + ( /*_._VALROUT___V736*/ meltfptr[735])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_543__OUTPUT_EXPORTED_OFFSETS#2", - NULL != ( /*_.CLASS_FIELD__V125*/ meltfptr[124])); - ((meltroutine_ptr_t) /*_._VALROUT___V733*/ meltfptr[732])->tabval[2] = - (melt_ptr_t) ( /*_.CLASS_FIELD__V125*/ meltfptr[124]); + ("putroutconst constnull.drout_545__OUTPUT_EXPORTED_OFFSETS#2", + NULL != ( /*_.CLASS_FIELD__V126*/ meltfptr[125])); + ((meltroutine_ptr_t) /*_._VALROUT___V736*/ meltfptr[735])->tabval[2] = + (melt_ptr_t) ( /*_.CLASS_FIELD__V126*/ meltfptr[125]); MELT_LOCATION ("warmelt-outobj.melt:5243:/ initchunk"); /*^putroutconst */ @@ -40570,13 +40588,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_12 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V733*/ meltfptr[732])) + ( /*_._VALROUT___V736*/ meltfptr[735])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_543__OUTPUT_EXPORTED_OFFSETS#3", + ("putroutconst constnull.drout_545__OUTPUT_EXPORTED_OFFSETS#3", NULL != ( /*_.CLASS_NAMED__V13*/ meltfptr[12])); - ((meltroutine_ptr_t) /*_._VALROUT___V733*/ meltfptr[732])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V736*/ meltfptr[735])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_NAMED__V13*/ meltfptr[12]); MELT_LOCATION ("warmelt-outobj.melt:5243:/ initchunk"); @@ -40584,12 +40602,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_12 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V733*/ meltfptr[732])) == + ( /*_._VALROUT___V736*/ meltfptr[735])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALDATA___V197*/ meltfptr[196]); - ((meltroutine_ptr_t) /*_._VALROUT___V733*/ meltfptr[732])->tabval[4] = - (melt_ptr_t) ( /*_._VALDATA___V197*/ meltfptr[196]); + NULL != /*_._VALDATA___V198*/ meltfptr[197]); + ((meltroutine_ptr_t) /*_._VALROUT___V736*/ meltfptr[735])->tabval[4] = + (melt_ptr_t) ( /*_._VALDATA___V198*/ meltfptr[197]); MELT_LOCATION ("warmelt-outobj.melt:5243:/ initchunk"); /*^putroutconst */ @@ -40597,13 +40615,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_12 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V733*/ meltfptr[732])) + ( /*_._VALROUT___V736*/ meltfptr[735])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_543__OUTPUT_EXPORTED_OFFSETS#5", + ("putroutconst constnull.drout_545__OUTPUT_EXPORTED_OFFSETS#5", NULL != ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5])); - ((meltroutine_ptr_t) /*_._VALROUT___V733*/ meltfptr[732])->tabval[5] = + ((meltroutine_ptr_t) /*_._VALROUT___V736*/ meltfptr[735])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5]); MELT_LOCATION ("warmelt-outobj.melt:5243:/ initchunk"); @@ -40612,568 +40630,552 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_12 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V733*/ meltfptr[732])) + ( /*_._VALROUT___V736*/ meltfptr[735])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_543__OUTPUT_EXPORTED_OFFSETS#6", + ("putroutconst constnull.drout_545__OUTPUT_EXPORTED_OFFSETS#6", NULL != ( /*_.CLASS_CLASS__V34*/ meltfptr[33])); - ((meltroutine_ptr_t) /*_._VALROUT___V733*/ meltfptr[732])->tabval[6] = + ((meltroutine_ptr_t) /*_._VALROUT___V736*/ meltfptr[735])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_CLASS__V34*/ meltfptr[33]); MELT_LOCATION ("warmelt-outobj.melt:5243:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V733*/ meltfptr[732]); + meltgc_touch ( /*_._VALROUT___V736*/ meltfptr[735]); /*putclosurout#112 */ melt_assertmsg ("putclosrout#112 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V734*/ meltfptr[733])) == + ( /*_._VALCLO___V737*/ meltfptr[736])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#112 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V733*/ meltfptr[732])) == + ( /*_._VALROUT___V736*/ meltfptr[735])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V734*/ meltfptr[733])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V733*/ meltfptr[732]); + ((meltclosure_ptr_t) /*_._VALCLO___V737*/ meltfptr[736])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V736*/ meltfptr[735]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V734*/ meltfptr[733]); + meltgc_touch ( /*_._VALCLO___V737*/ meltfptr[736]); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_545__CLASS_ANY_MODULE_CONTEXT @#1", + melt_assertmsg ("checkobj putslot ~dsym_547__CLASS_ANY_MODULE_CONTEXT @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V735*/ meltfptr[734])) == + ( /*_._VALDATA___V738*/ meltfptr[737])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_545__CLASS_ANY_MODULE_CONTEXT @#1", + melt_assertmsg ("checkoff putslot ~dsym_547__CLASS_ANY_MODULE_CONTEXT @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V735*/ - meltfptr[734])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V735*/ meltfptr[734]))->obj_vartab[1] = + ( /*_._VALDATA___V738*/ + meltfptr[737])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V738*/ meltfptr[737]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V736*/ meltfptr[735]); + /*_._VALSTR___V739*/ meltfptr[738]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V735*/ meltfptr[734]); + meltgc_touch ( /*_._VALDATA___V738*/ meltfptr[737]); - melt_dbgtrace_written_object ( /*_._VALDATA___V735*/ meltfptr[734], + melt_dbgtrace_written_object ( /*_._VALDATA___V738*/ meltfptr[737], "new static instance"); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_547__CLASS_SECONDARY_C_FILE @#1", + melt_assertmsg ("checkobj putslot ~dsym_549__CLASS_SECONDARY_C_FILE @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V737*/ meltfptr[736])) == + ( /*_._VALDATA___V740*/ meltfptr[739])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_547__CLASS_SECONDARY_C_FILE @#1", + melt_assertmsg ("checkoff putslot ~dsym_549__CLASS_SECONDARY_C_FILE @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V737*/ - meltfptr[736])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V737*/ meltfptr[736]))->obj_vartab[1] = + ( /*_._VALDATA___V740*/ + meltfptr[739])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V740*/ meltfptr[739]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V738*/ meltfptr[737]); + /*_._VALSTR___V741*/ meltfptr[740]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V737*/ meltfptr[736]); + meltgc_touch ( /*_._VALDATA___V740*/ meltfptr[739]); - melt_dbgtrace_written_object ( /*_._VALDATA___V737*/ meltfptr[736], + melt_dbgtrace_written_object ( /*_._VALDATA___V740*/ meltfptr[739], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:5305:/ initchunk"); /*^putslot */ /*putslot */ - melt_assertmsg ("checkobj putslot ~dobj_549__CLASS_SECONDARY_C_FILE @#1", + melt_assertmsg ("checkobj putslot ~dobj_551__CLASS_SECONDARY_C_FILE @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V739*/ meltfptr[738])) == + ( /*_._VALDATA___V742*/ meltfptr[741])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dobj_549__CLASS_SECONDARY_C_FILE @#1", + melt_assertmsg ("checkoff putslot ~dobj_551__CLASS_SECONDARY_C_FILE @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V739*/ - meltfptr[738])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V739*/ meltfptr[738]))->obj_vartab[1] = + ( /*_._VALDATA___V742*/ + meltfptr[741])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V742*/ meltfptr[741]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V740*/ meltfptr[739]); + /*_._VALSTR___V743*/ meltfptr[742]); MELT_LOCATION ("warmelt-outobj.melt:5305:/ initchunk"); /*^putslot */ /*putslot */ - melt_assertmsg ("checkobj putslot ~dobj_549__CLASS_SECONDARY_C_FILE @#4", + melt_assertmsg ("checkobj putslot ~dobj_551__CLASS_SECONDARY_C_FILE @#4", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V739*/ meltfptr[738])) == + ( /*_._VALDATA___V742*/ meltfptr[741])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dobj_549__CLASS_SECONDARY_C_FILE @#4", + melt_assertmsg ("checkoff putslot ~dobj_551__CLASS_SECONDARY_C_FILE @#4", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V739*/ - meltfptr[738])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V739*/ meltfptr[738]))->obj_vartab[4] = + ( /*_._VALDATA___V742*/ + meltfptr[741])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V742*/ meltfptr[741]))->obj_vartab[4] = (melt_ptr_t) ( /*_.CLASS_ROOT__V17*/ meltfptr[16]); /*putupl#26 */ melt_assertmsg ("putupl #26 checktup", melt_magic_discr ((melt_ptr_t) - ( /*_._VALTUP___V741*/ meltfptr[740])) == + ( /*_._VALTUP___V744*/ meltfptr[743])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #26 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) - ( /*_._VALTUP___V741*/ - meltfptr[740])))); - ((meltmultiple_ptr_t) ( /*_._VALTUP___V741*/ meltfptr[740]))->tabval[0] = + ( /*_._VALTUP___V744*/ + meltfptr[743])))); + ((meltmultiple_ptr_t) ( /*_._VALTUP___V744*/ meltfptr[743]))->tabval[0] = (melt_ptr_t) ( /*_.CLASS_ROOT__V17*/ meltfptr[16]); /*touch:_INITUP_ */ - meltgc_touch ( /*_._VALTUP___V741*/ meltfptr[740]); + meltgc_touch ( /*_._VALTUP___V744*/ meltfptr[743]); MELT_LOCATION ("warmelt-outobj.melt:5305:/ initchunk"); /*^putslot */ /*putslot */ - melt_assertmsg ("checkobj putslot ~dobj_549__CLASS_SECONDARY_C_FILE @#5", + melt_assertmsg ("checkobj putslot ~dobj_551__CLASS_SECONDARY_C_FILE @#5", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V739*/ meltfptr[738])) == + ( /*_._VALDATA___V742*/ meltfptr[741])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dobj_549__CLASS_SECONDARY_C_FILE @#5", + melt_assertmsg ("checkoff putslot ~dobj_551__CLASS_SECONDARY_C_FILE @#5", (5 >= 0 && 5 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V739*/ - meltfptr[738])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V739*/ meltfptr[738]))->obj_vartab[5] = + ( /*_._VALDATA___V742*/ + meltfptr[741])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V742*/ meltfptr[741]))->obj_vartab[5] = (melt_ptr_t) ( - /*_._VALTUP___V741*/ meltfptr[740]); + /*_._VALTUP___V744*/ meltfptr[743]); MELT_LOCATION ("warmelt-outobj.melt:5305:/ initchunk"); /*^putslot */ /*putslot */ - melt_assertmsg ("checkobj putslot ~dobj_555__SECFIL_MODNAM @#1", + melt_assertmsg ("checkobj putslot ~dobj_557__SECFIL_MODNAM @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V742*/ meltfptr[741])) == + ( /*_._VALDATA___V745*/ meltfptr[744])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dobj_555__SECFIL_MODNAM @#1", + melt_assertmsg ("checkoff putslot ~dobj_557__SECFIL_MODNAM @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V742*/ - meltfptr[741])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V742*/ meltfptr[741]))->obj_vartab[1] = + ( /*_._VALDATA___V745*/ + meltfptr[744])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V745*/ meltfptr[744]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V743*/ meltfptr[742]); + /*_._VALSTR___V746*/ meltfptr[745]); MELT_LOCATION ("warmelt-outobj.melt:5305:/ initchunk"); /*^putslot */ /*putslot */ - melt_assertmsg ("checkobj putslot ~dobj_555__SECFIL_MODNAM @#2", + melt_assertmsg ("checkobj putslot ~dobj_557__SECFIL_MODNAM @#2", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V742*/ meltfptr[741])) == + ( /*_._VALDATA___V745*/ meltfptr[744])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dobj_555__SECFIL_MODNAM @#2", + melt_assertmsg ("checkoff putslot ~dobj_557__SECFIL_MODNAM @#2", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V742*/ - meltfptr[741])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V742*/ meltfptr[741]))->obj_vartab[2] = + ( /*_._VALDATA___V745*/ + meltfptr[744])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V745*/ meltfptr[744]))->obj_vartab[2] = (melt_ptr_t) ( - /*_._VALDATA___V739*/ meltfptr[738]); + /*_._VALDATA___V742*/ meltfptr[741]); MELT_LOCATION ("warmelt-outobj.melt:5305:/ initchunk"); /*^touch */ /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V742*/ meltfptr[741]); + meltgc_touch ( /*_._VALDATA___V745*/ meltfptr[744]); MELT_LOCATION ("warmelt-outobj.melt:5305:/ initchunk"); /*^touchobj */ - melt_dbgtrace_written_object ( /*_._VALDATA___V742*/ meltfptr[741], + melt_dbgtrace_written_object ( /*_._VALDATA___V745*/ meltfptr[744], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:5305:/ initchunk"); /*^putslot */ /*putslot */ - melt_assertmsg ("checkobj putslot ~dobj_559__SECFIL_PATH @#1", + melt_assertmsg ("checkobj putslot ~dobj_561__SECFIL_PATH @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V744*/ meltfptr[743])) == + ( /*_._VALDATA___V747*/ meltfptr[746])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dobj_559__SECFIL_PATH @#1", + melt_assertmsg ("checkoff putslot ~dobj_561__SECFIL_PATH @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V744*/ - meltfptr[743])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V744*/ meltfptr[743]))->obj_vartab[1] = + ( /*_._VALDATA___V747*/ + meltfptr[746])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V747*/ meltfptr[746]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V745*/ meltfptr[744]); + /*_._VALSTR___V748*/ meltfptr[747]); MELT_LOCATION ("warmelt-outobj.melt:5305:/ initchunk"); /*^putslot */ /*putslot */ - melt_assertmsg ("checkobj putslot ~dobj_559__SECFIL_PATH @#2", + melt_assertmsg ("checkobj putslot ~dobj_561__SECFIL_PATH @#2", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V744*/ meltfptr[743])) == + ( /*_._VALDATA___V747*/ meltfptr[746])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dobj_559__SECFIL_PATH @#2", + melt_assertmsg ("checkoff putslot ~dobj_561__SECFIL_PATH @#2", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V744*/ - meltfptr[743])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V744*/ meltfptr[743]))->obj_vartab[2] = + ( /*_._VALDATA___V747*/ + meltfptr[746])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V747*/ meltfptr[746]))->obj_vartab[2] = (melt_ptr_t) ( - /*_._VALDATA___V739*/ meltfptr[738]); + /*_._VALDATA___V742*/ meltfptr[741]); MELT_LOCATION ("warmelt-outobj.melt:5305:/ initchunk"); /*^touch */ /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V744*/ meltfptr[743]); + meltgc_touch ( /*_._VALDATA___V747*/ meltfptr[746]); MELT_LOCATION ("warmelt-outobj.melt:5305:/ initchunk"); /*^touchobj */ - melt_dbgtrace_written_object ( /*_._VALDATA___V744*/ meltfptr[743], + melt_dbgtrace_written_object ( /*_._VALDATA___V747*/ meltfptr[746], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:5305:/ initchunk"); /*^putslot */ /*putslot */ - melt_assertmsg ("checkobj putslot ~dobj_563__SECFIL_DECLBUF @#1", + melt_assertmsg ("checkobj putslot ~dobj_565__SECFIL_DECLBUF @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V746*/ meltfptr[745])) == + ( /*_._VALDATA___V749*/ meltfptr[748])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dobj_563__SECFIL_DECLBUF @#1", + melt_assertmsg ("checkoff putslot ~dobj_565__SECFIL_DECLBUF @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V746*/ - meltfptr[745])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V746*/ meltfptr[745]))->obj_vartab[1] = + ( /*_._VALDATA___V749*/ + meltfptr[748])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V749*/ meltfptr[748]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V747*/ meltfptr[746]); + /*_._VALSTR___V750*/ meltfptr[749]); MELT_LOCATION ("warmelt-outobj.melt:5305:/ initchunk"); /*^putslot */ /*putslot */ - melt_assertmsg ("checkobj putslot ~dobj_563__SECFIL_DECLBUF @#2", + melt_assertmsg ("checkobj putslot ~dobj_565__SECFIL_DECLBUF @#2", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V746*/ meltfptr[745])) == + ( /*_._VALDATA___V749*/ meltfptr[748])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dobj_563__SECFIL_DECLBUF @#2", + melt_assertmsg ("checkoff putslot ~dobj_565__SECFIL_DECLBUF @#2", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V746*/ - meltfptr[745])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V746*/ meltfptr[745]))->obj_vartab[2] = + ( /*_._VALDATA___V749*/ + meltfptr[748])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V749*/ meltfptr[748]))->obj_vartab[2] = (melt_ptr_t) ( - /*_._VALDATA___V739*/ meltfptr[738]); + /*_._VALDATA___V742*/ meltfptr[741]); MELT_LOCATION ("warmelt-outobj.melt:5305:/ initchunk"); /*^touch */ /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V746*/ meltfptr[745]); + meltgc_touch ( /*_._VALDATA___V749*/ meltfptr[748]); MELT_LOCATION ("warmelt-outobj.melt:5305:/ initchunk"); /*^touchobj */ - melt_dbgtrace_written_object ( /*_._VALDATA___V746*/ meltfptr[745], + melt_dbgtrace_written_object ( /*_._VALDATA___V749*/ meltfptr[748], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:5305:/ initchunk"); /*^putslot */ /*putslot */ - melt_assertmsg ("checkobj putslot ~dobj_567__SECFIL_IMPLBUF @#1", + melt_assertmsg ("checkobj putslot ~dobj_569__SECFIL_IMPLBUF @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V748*/ meltfptr[747])) == + ( /*_._VALDATA___V751*/ meltfptr[750])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dobj_567__SECFIL_IMPLBUF @#1", + melt_assertmsg ("checkoff putslot ~dobj_569__SECFIL_IMPLBUF @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V748*/ - meltfptr[747])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V748*/ meltfptr[747]))->obj_vartab[1] = + ( /*_._VALDATA___V751*/ + meltfptr[750])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V751*/ meltfptr[750]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V749*/ meltfptr[748]); + /*_._VALSTR___V752*/ meltfptr[751]); MELT_LOCATION ("warmelt-outobj.melt:5305:/ initchunk"); /*^putslot */ /*putslot */ - melt_assertmsg ("checkobj putslot ~dobj_567__SECFIL_IMPLBUF @#2", + melt_assertmsg ("checkobj putslot ~dobj_569__SECFIL_IMPLBUF @#2", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V748*/ meltfptr[747])) == + ( /*_._VALDATA___V751*/ meltfptr[750])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dobj_567__SECFIL_IMPLBUF @#2", + melt_assertmsg ("checkoff putslot ~dobj_569__SECFIL_IMPLBUF @#2", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V748*/ - meltfptr[747])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V748*/ meltfptr[747]))->obj_vartab[2] = + ( /*_._VALDATA___V751*/ + meltfptr[750])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V751*/ meltfptr[750]))->obj_vartab[2] = (melt_ptr_t) ( - /*_._VALDATA___V739*/ meltfptr[738]); + /*_._VALDATA___V742*/ meltfptr[741]); MELT_LOCATION ("warmelt-outobj.melt:5305:/ initchunk"); /*^touch */ /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V748*/ meltfptr[747]); + meltgc_touch ( /*_._VALDATA___V751*/ meltfptr[750]); MELT_LOCATION ("warmelt-outobj.melt:5305:/ initchunk"); /*^touchobj */ - melt_dbgtrace_written_object ( /*_._VALDATA___V748*/ meltfptr[747], + melt_dbgtrace_written_object ( /*_._VALDATA___V751*/ meltfptr[750], "new static instance"); /*putupl#27 */ melt_assertmsg ("putupl #27 checktup", melt_magic_discr ((melt_ptr_t) - ( /*_._VALTUP___V750*/ meltfptr[749])) == + ( /*_._VALTUP___V753*/ meltfptr[752])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #27 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) - ( /*_._VALTUP___V750*/ - meltfptr[749])))); - ((meltmultiple_ptr_t) ( /*_._VALTUP___V750*/ meltfptr[749]))->tabval[0] = - (melt_ptr_t) ( /*_._VALDATA___V742*/ meltfptr[741]); + ( /*_._VALTUP___V753*/ + meltfptr[752])))); + ((meltmultiple_ptr_t) ( /*_._VALTUP___V753*/ meltfptr[752]))->tabval[0] = + (melt_ptr_t) ( /*_._VALDATA___V745*/ meltfptr[744]); /*putupl#28 */ melt_assertmsg ("putupl #28 checktup", melt_magic_discr ((melt_ptr_t) - ( /*_._VALTUP___V750*/ meltfptr[749])) == + ( /*_._VALTUP___V753*/ meltfptr[752])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #28 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) - ( /*_._VALTUP___V750*/ - meltfptr[749])))); - ((meltmultiple_ptr_t) ( /*_._VALTUP___V750*/ meltfptr[749]))->tabval[1] = - (melt_ptr_t) ( /*_._VALDATA___V744*/ meltfptr[743]); + ( /*_._VALTUP___V753*/ + meltfptr[752])))); + ((meltmultiple_ptr_t) ( /*_._VALTUP___V753*/ meltfptr[752]))->tabval[1] = + (melt_ptr_t) ( /*_._VALDATA___V747*/ meltfptr[746]); /*putupl#29 */ melt_assertmsg ("putupl #29 checktup", melt_magic_discr ((melt_ptr_t) - ( /*_._VALTUP___V750*/ meltfptr[749])) == + ( /*_._VALTUP___V753*/ meltfptr[752])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #29 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) - ( /*_._VALTUP___V750*/ - meltfptr[749])))); - ((meltmultiple_ptr_t) ( /*_._VALTUP___V750*/ meltfptr[749]))->tabval[2] = - (melt_ptr_t) ( /*_._VALDATA___V746*/ meltfptr[745]); + ( /*_._VALTUP___V753*/ + meltfptr[752])))); + ((meltmultiple_ptr_t) ( /*_._VALTUP___V753*/ meltfptr[752]))->tabval[2] = + (melt_ptr_t) ( /*_._VALDATA___V749*/ meltfptr[748]); /*putupl#30 */ melt_assertmsg ("putupl #30 checktup", melt_magic_discr ((melt_ptr_t) - ( /*_._VALTUP___V750*/ meltfptr[749])) == + ( /*_._VALTUP___V753*/ meltfptr[752])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #30 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) - ( /*_._VALTUP___V750*/ - meltfptr[749])))); - ((meltmultiple_ptr_t) ( /*_._VALTUP___V750*/ meltfptr[749]))->tabval[3] = - (melt_ptr_t) ( /*_._VALDATA___V748*/ meltfptr[747]); + ( /*_._VALTUP___V753*/ + meltfptr[752])))); + ((meltmultiple_ptr_t) ( /*_._VALTUP___V753*/ meltfptr[752]))->tabval[3] = + (melt_ptr_t) ( /*_._VALDATA___V751*/ meltfptr[750]); /*touch:_INITUP_ */ - meltgc_touch ( /*_._VALTUP___V750*/ meltfptr[749]); + meltgc_touch ( /*_._VALTUP___V753*/ meltfptr[752]); MELT_LOCATION ("warmelt-outobj.melt:5305:/ initchunk"); /*^putslot */ /*putslot */ - melt_assertmsg ("checkobj putslot ~dobj_549__CLASS_SECONDARY_C_FILE @#6", + melt_assertmsg ("checkobj putslot ~dobj_551__CLASS_SECONDARY_C_FILE @#6", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V739*/ meltfptr[738])) == + ( /*_._VALDATA___V742*/ meltfptr[741])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dobj_549__CLASS_SECONDARY_C_FILE @#6", + melt_assertmsg ("checkoff putslot ~dobj_551__CLASS_SECONDARY_C_FILE @#6", (6 >= 0 && 6 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V739*/ - meltfptr[738])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V739*/ meltfptr[738]))->obj_vartab[6] = + ( /*_._VALDATA___V742*/ + meltfptr[741])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V742*/ meltfptr[741]))->obj_vartab[6] = (melt_ptr_t) ( - /*_._VALTUP___V750*/ meltfptr[749]); + /*_._VALTUP___V753*/ meltfptr[752]); MELT_LOCATION ("warmelt-outobj.melt:5305:/ initchunk"); /*^touch */ /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V739*/ meltfptr[738]); + meltgc_touch ( /*_._VALDATA___V742*/ meltfptr[741]); MELT_LOCATION ("warmelt-outobj.melt:5305:/ initchunk"); /*^touchobj */ - melt_dbgtrace_written_object ( /*_._VALDATA___V739*/ meltfptr[738], + melt_dbgtrace_written_object ( /*_._VALDATA___V742*/ meltfptr[741], "new static instance"); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_553__SECFIL_MODNAM @#1", + melt_assertmsg ("checkobj putslot ~dsym_555__SECFIL_MODNAM @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V751*/ meltfptr[750])) == + ( /*_._VALDATA___V754*/ meltfptr[753])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_553__SECFIL_MODNAM @#1", + melt_assertmsg ("checkoff putslot ~dsym_555__SECFIL_MODNAM @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V751*/ - meltfptr[750])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V751*/ meltfptr[750]))->obj_vartab[1] = + ( /*_._VALDATA___V754*/ + meltfptr[753])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V754*/ meltfptr[753]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V752*/ meltfptr[751]); + /*_._VALSTR___V755*/ meltfptr[754]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V751*/ meltfptr[750]); + meltgc_touch ( /*_._VALDATA___V754*/ meltfptr[753]); - melt_dbgtrace_written_object ( /*_._VALDATA___V751*/ meltfptr[750], + melt_dbgtrace_written_object ( /*_._VALDATA___V754*/ meltfptr[753], "new static instance"); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_557__SECFIL_PATH @#1", + melt_assertmsg ("checkobj putslot ~dsym_559__SECFIL_PATH @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V753*/ meltfptr[752])) == + ( /*_._VALDATA___V756*/ meltfptr[755])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_557__SECFIL_PATH @#1", + melt_assertmsg ("checkoff putslot ~dsym_559__SECFIL_PATH @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V753*/ - meltfptr[752])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V753*/ meltfptr[752]))->obj_vartab[1] = + ( /*_._VALDATA___V756*/ + meltfptr[755])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V756*/ meltfptr[755]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V754*/ meltfptr[753]); + /*_._VALSTR___V757*/ meltfptr[756]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V753*/ meltfptr[752]); + meltgc_touch ( /*_._VALDATA___V756*/ meltfptr[755]); - melt_dbgtrace_written_object ( /*_._VALDATA___V753*/ meltfptr[752], + melt_dbgtrace_written_object ( /*_._VALDATA___V756*/ meltfptr[755], "new static instance"); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_561__SECFIL_DECLBUF @#1", + melt_assertmsg ("checkobj putslot ~dsym_563__SECFIL_DECLBUF @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V755*/ meltfptr[754])) == + ( /*_._VALDATA___V758*/ meltfptr[757])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_561__SECFIL_DECLBUF @#1", + melt_assertmsg ("checkoff putslot ~dsym_563__SECFIL_DECLBUF @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V755*/ - meltfptr[754])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V755*/ meltfptr[754]))->obj_vartab[1] = + ( /*_._VALDATA___V758*/ + meltfptr[757])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V758*/ meltfptr[757]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V756*/ meltfptr[755]); + /*_._VALSTR___V759*/ meltfptr[758]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V755*/ meltfptr[754]); + meltgc_touch ( /*_._VALDATA___V758*/ meltfptr[757]); - melt_dbgtrace_written_object ( /*_._VALDATA___V755*/ meltfptr[754], + melt_dbgtrace_written_object ( /*_._VALDATA___V758*/ meltfptr[757], "new static instance"); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_565__SECFIL_IMPLBUF @#1", + melt_assertmsg ("checkobj putslot ~dsym_567__SECFIL_IMPLBUF @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V757*/ meltfptr[756])) == + ( /*_._VALDATA___V760*/ meltfptr[759])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_565__SECFIL_IMPLBUF @#1", + melt_assertmsg ("checkoff putslot ~dsym_567__SECFIL_IMPLBUF @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V757*/ - meltfptr[756])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V757*/ meltfptr[756]))->obj_vartab[1] = + ( /*_._VALDATA___V760*/ + meltfptr[759])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V760*/ meltfptr[759]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V758*/ meltfptr[757]); + /*_._VALSTR___V761*/ meltfptr[760]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V757*/ meltfptr[756]); + meltgc_touch ( /*_._VALDATA___V760*/ meltfptr[759]); - melt_dbgtrace_written_object ( /*_._VALDATA___V757*/ meltfptr[756], + melt_dbgtrace_written_object ( /*_._VALDATA___V760*/ meltfptr[759], "new static instance"); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_569__GENERATED_C_FILENAME @#1", + melt_assertmsg ("checkobj putslot ~dsym_571__GENERATED_C_FILENAME @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V759*/ meltfptr[758])) == + ( /*_._VALDATA___V762*/ meltfptr[761])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_569__GENERATED_C_FILENAME @#1", + melt_assertmsg ("checkoff putslot ~dsym_571__GENERATED_C_FILENAME @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V759*/ - meltfptr[758])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V759*/ meltfptr[758]))->obj_vartab[1] = + ( /*_._VALDATA___V762*/ + meltfptr[761])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V762*/ meltfptr[761]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V760*/ meltfptr[759]); + /*_._VALSTR___V763*/ meltfptr[762]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V759*/ meltfptr[758]); + meltgc_touch ( /*_._VALDATA___V762*/ meltfptr[761]); - melt_dbgtrace_written_object ( /*_._VALDATA___V759*/ meltfptr[758], + melt_dbgtrace_written_object ( /*_._VALDATA___V762*/ meltfptr[761], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:5314:/ initchunk"); /*^putslot */ /*putslot */ - melt_assertmsg ("checkobj putslot ~dobj_571__GENERATED_C_FILENAME @#1", - melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V761*/ meltfptr[760])) == - MELTOBMAG_OBJECT); - - melt_assertmsg ("checkoff putslot ~dobj_571__GENERATED_C_FILENAME @#1", - (1 >= 0 - && 1 < - melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V761*/ - meltfptr[760])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V761*/ meltfptr[760]))->obj_vartab[1] = - (melt_ptr_t) ( - /*_._VALSTR___V762*/ meltfptr[761]); - - /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_574__DISCR @#1", + melt_assertmsg ("checkobj putslot ~dobj_573__GENERATED_C_FILENAME @#1", melt_magic_discr ((melt_ptr_t) ( /*_._VALDATA___V764*/ meltfptr[763])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_574__DISCR @#1", + melt_assertmsg ("checkoff putslot ~dobj_573__GENERATED_C_FILENAME @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) @@ -41183,67 +41185,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_12 (meltinitial_frame_t * (melt_ptr_t) ( /*_._VALSTR___V765*/ meltfptr[764]); - /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V764*/ meltfptr[763]); - - - melt_dbgtrace_written_object ( /*_._VALDATA___V764*/ meltfptr[763], - "new static instance"); - - MELT_LOCATION ("warmelt-outobj.melt:5314:/ initchunk"); - /*^putslot */ - /*putslot */ - melt_assertmsg ("checkobj putslot ~dobj_576 @#0", - melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V763*/ meltfptr[762])) == - MELTOBMAG_OBJECT); - - melt_assertmsg ("checkoff putslot ~dobj_576 @#0", - (0 >= 0 - && 0 < - melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V763*/ - meltfptr[762])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V763*/ meltfptr[762]))->obj_vartab[0] = - (melt_ptr_t) ( - /*_._VALDATA___V764*/ meltfptr[763]); - - MELT_LOCATION ("warmelt-outobj.melt:5314:/ initchunk"); - /*^putslot */ - /*putslot */ - melt_assertmsg ("checkobj putslot ~dobj_576 @#1", - melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V763*/ meltfptr[762])) == - MELTOBMAG_OBJECT); - - melt_assertmsg ("checkoff putslot ~dobj_576 @#1", - (1 >= 0 - && 1 < - melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V763*/ - meltfptr[762])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V763*/ meltfptr[762]))->obj_vartab[1] = - (melt_ptr_t) ( - ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); - - MELT_LOCATION ("warmelt-outobj.melt:5314:/ initchunk"); - /*^touch */ - /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V763*/ meltfptr[762]); - - MELT_LOCATION ("warmelt-outobj.melt:5314:/ initchunk"); - /*^touchobj */ - - melt_dbgtrace_written_object ( /*_._VALDATA___V763*/ meltfptr[762], - "new static instance"); - /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_577__BASE @#1", + melt_assertmsg ("checkobj putslot ~dsym_576__DISCR @#1", melt_magic_discr ((melt_ptr_t) ( /*_._VALDATA___V767*/ meltfptr[766])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_577__BASE @#1", + melt_assertmsg ("checkoff putslot ~dsym_576__DISCR @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) @@ -41263,12 +41211,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_12 (meltinitial_frame_t * MELT_LOCATION ("warmelt-outobj.melt:5314:/ initchunk"); /*^putslot */ /*putslot */ - melt_assertmsg ("checkobj putslot ~dobj_579 @#0", + melt_assertmsg ("checkobj putslot ~dobj_578 @#0", melt_magic_discr ((melt_ptr_t) ( /*_._VALDATA___V766*/ meltfptr[765])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dobj_579 @#0", + melt_assertmsg ("checkoff putslot ~dobj_578 @#0", (0 >= 0 && 0 < melt_object_length ((melt_ptr_t) @@ -41281,12 +41229,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_12 (meltinitial_frame_t * MELT_LOCATION ("warmelt-outobj.melt:5314:/ initchunk"); /*^putslot */ /*putslot */ - melt_assertmsg ("checkobj putslot ~dobj_579 @#1", + melt_assertmsg ("checkobj putslot ~dobj_578 @#1", melt_magic_discr ((melt_ptr_t) ( /*_._VALDATA___V766*/ meltfptr[765])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dobj_579 @#1", + melt_assertmsg ("checkoff putslot ~dobj_578 @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) @@ -41308,12 +41256,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_12 (meltinitial_frame_t * "new static instance"); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_580__DIR @#1", + melt_assertmsg ("checkobj putslot ~dsym_579__BASE @#1", melt_magic_discr ((melt_ptr_t) ( /*_._VALDATA___V770*/ meltfptr[769])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_580__DIR @#1", + melt_assertmsg ("checkoff putslot ~dsym_579__BASE @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) @@ -41333,12 +41281,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_12 (meltinitial_frame_t * MELT_LOCATION ("warmelt-outobj.melt:5314:/ initchunk"); /*^putslot */ /*putslot */ - melt_assertmsg ("checkobj putslot ~dobj_582 @#0", + melt_assertmsg ("checkobj putslot ~dobj_581 @#0", melt_magic_discr ((melt_ptr_t) ( /*_._VALDATA___V769*/ meltfptr[768])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dobj_582 @#0", + melt_assertmsg ("checkoff putslot ~dobj_581 @#0", (0 >= 0 && 0 < melt_object_length ((melt_ptr_t) @@ -41351,12 +41299,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_12 (meltinitial_frame_t * MELT_LOCATION ("warmelt-outobj.melt:5314:/ initchunk"); /*^putslot */ /*putslot */ - melt_assertmsg ("checkobj putslot ~dobj_582 @#1", + melt_assertmsg ("checkobj putslot ~dobj_581 @#1", melt_magic_discr ((melt_ptr_t) ( /*_._VALDATA___V769*/ meltfptr[768])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dobj_582 @#1", + melt_assertmsg ("checkoff putslot ~dobj_581 @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) @@ -41378,12 +41326,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_12 (meltinitial_frame_t * "new static instance"); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_583__NUM @#1", + melt_assertmsg ("checkobj putslot ~dsym_582__DIR @#1", melt_magic_discr ((melt_ptr_t) ( /*_._VALDATA___V773*/ meltfptr[772])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_583__NUM @#1", + melt_assertmsg ("checkoff putslot ~dsym_582__DIR @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) @@ -41403,12 +41351,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_12 (meltinitial_frame_t * MELT_LOCATION ("warmelt-outobj.melt:5314:/ initchunk"); /*^putslot */ /*putslot */ - melt_assertmsg ("checkobj putslot ~dobj_585 @#0", + melt_assertmsg ("checkobj putslot ~dobj_584 @#0", melt_magic_discr ((melt_ptr_t) ( /*_._VALDATA___V772*/ meltfptr[771])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dobj_585 @#0", + melt_assertmsg ("checkoff putslot ~dobj_584 @#0", (0 >= 0 && 0 < melt_object_length ((melt_ptr_t) @@ -41421,12 +41369,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_12 (meltinitial_frame_t * MELT_LOCATION ("warmelt-outobj.melt:5314:/ initchunk"); /*^putslot */ /*putslot */ - melt_assertmsg ("checkobj putslot ~dobj_585 @#1", + melt_assertmsg ("checkobj putslot ~dobj_584 @#1", melt_magic_discr ((melt_ptr_t) ( /*_._VALDATA___V772*/ meltfptr[771])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dobj_585 @#1", + melt_assertmsg ("checkoff putslot ~dobj_584 @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) @@ -41434,7 +41382,7 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_12 (meltinitial_frame_t * meltfptr[771])))); ((meltobject_ptr_t) ( /*_._VALDATA___V772*/ meltfptr[771]))->obj_vartab[1] = (melt_ptr_t) ( - ((melt_ptr_t) (MELT_PREDEF (CTYPE_LONG)))); + ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); MELT_LOCATION ("warmelt-outobj.melt:5314:/ initchunk"); /*^touch */ @@ -41447,270 +41395,340 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_12 (meltinitial_frame_t * melt_dbgtrace_written_object ( /*_._VALDATA___V772*/ meltfptr[771], "new static instance"); + /*putslot */ + melt_assertmsg ("checkobj putslot ~dsym_585__NUM @#1", + melt_magic_discr ((melt_ptr_t) + ( /*_._VALDATA___V776*/ meltfptr[775])) == + MELTOBMAG_OBJECT); + + melt_assertmsg ("checkoff putslot ~dsym_585__NUM @#1", + (1 >= 0 + && 1 < + melt_object_length ((melt_ptr_t) + ( /*_._VALDATA___V776*/ + meltfptr[775])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V776*/ meltfptr[775]))->obj_vartab[1] = + (melt_ptr_t) ( + /*_._VALSTR___V777*/ meltfptr[776]); + + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V776*/ meltfptr[775]); + + + melt_dbgtrace_written_object ( /*_._VALDATA___V776*/ meltfptr[775], + "new static instance"); + + MELT_LOCATION ("warmelt-outobj.melt:5314:/ initchunk"); + /*^putslot */ + /*putslot */ + melt_assertmsg ("checkobj putslot ~dobj_587 @#0", + melt_magic_discr ((melt_ptr_t) + ( /*_._VALDATA___V775*/ meltfptr[774])) == + MELTOBMAG_OBJECT); + + melt_assertmsg ("checkoff putslot ~dobj_587 @#0", + (0 >= 0 + && 0 < + melt_object_length ((melt_ptr_t) + ( /*_._VALDATA___V775*/ + meltfptr[774])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V775*/ meltfptr[774]))->obj_vartab[0] = + (melt_ptr_t) ( + /*_._VALDATA___V776*/ meltfptr[775]); + + MELT_LOCATION ("warmelt-outobj.melt:5314:/ initchunk"); + /*^putslot */ + /*putslot */ + melt_assertmsg ("checkobj putslot ~dobj_587 @#1", + melt_magic_discr ((melt_ptr_t) + ( /*_._VALDATA___V775*/ meltfptr[774])) == + MELTOBMAG_OBJECT); + + melt_assertmsg ("checkoff putslot ~dobj_587 @#1", + (1 >= 0 + && 1 < + melt_object_length ((melt_ptr_t) + ( /*_._VALDATA___V775*/ + meltfptr[774])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V775*/ meltfptr[774]))->obj_vartab[1] = + (melt_ptr_t) ( + ((melt_ptr_t) (MELT_PREDEF (CTYPE_LONG)))); + + MELT_LOCATION ("warmelt-outobj.melt:5314:/ initchunk"); + /*^touch */ + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V775*/ meltfptr[774]); + + MELT_LOCATION ("warmelt-outobj.melt:5314:/ initchunk"); + /*^touchobj */ + + melt_dbgtrace_written_object ( /*_._VALDATA___V775*/ meltfptr[774], + "new static instance"); + /*putupl#31 */ melt_assertmsg ("putupl #31 checktup", melt_magic_discr ((melt_ptr_t) - ( /*_._VALTUP___V775*/ meltfptr[774])) == + ( /*_._VALTUP___V778*/ meltfptr[777])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #31 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) - ( /*_._VALTUP___V775*/ - meltfptr[774])))); - ((meltmultiple_ptr_t) ( /*_._VALTUP___V775*/ meltfptr[774]))->tabval[0] = - (melt_ptr_t) ( /*_._VALDATA___V763*/ meltfptr[762]); + ( /*_._VALTUP___V778*/ + meltfptr[777])))); + ((meltmultiple_ptr_t) ( /*_._VALTUP___V778*/ meltfptr[777]))->tabval[0] = + (melt_ptr_t) ( /*_._VALDATA___V766*/ meltfptr[765]); /*putupl#32 */ melt_assertmsg ("putupl #32 checktup", melt_magic_discr ((melt_ptr_t) - ( /*_._VALTUP___V775*/ meltfptr[774])) == + ( /*_._VALTUP___V778*/ meltfptr[777])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #32 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) - ( /*_._VALTUP___V775*/ - meltfptr[774])))); - ((meltmultiple_ptr_t) ( /*_._VALTUP___V775*/ meltfptr[774]))->tabval[1] = - (melt_ptr_t) ( /*_._VALDATA___V766*/ meltfptr[765]); + ( /*_._VALTUP___V778*/ + meltfptr[777])))); + ((meltmultiple_ptr_t) ( /*_._VALTUP___V778*/ meltfptr[777]))->tabval[1] = + (melt_ptr_t) ( /*_._VALDATA___V769*/ meltfptr[768]); /*putupl#33 */ melt_assertmsg ("putupl #33 checktup", melt_magic_discr ((melt_ptr_t) - ( /*_._VALTUP___V775*/ meltfptr[774])) == + ( /*_._VALTUP___V778*/ meltfptr[777])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #33 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) - ( /*_._VALTUP___V775*/ - meltfptr[774])))); - ((meltmultiple_ptr_t) ( /*_._VALTUP___V775*/ meltfptr[774]))->tabval[2] = - (melt_ptr_t) ( /*_._VALDATA___V769*/ meltfptr[768]); + ( /*_._VALTUP___V778*/ + meltfptr[777])))); + ((meltmultiple_ptr_t) ( /*_._VALTUP___V778*/ meltfptr[777]))->tabval[2] = + (melt_ptr_t) ( /*_._VALDATA___V772*/ meltfptr[771]); /*putupl#34 */ melt_assertmsg ("putupl #34 checktup", melt_magic_discr ((melt_ptr_t) - ( /*_._VALTUP___V775*/ meltfptr[774])) == + ( /*_._VALTUP___V778*/ meltfptr[777])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #34 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) - ( /*_._VALTUP___V775*/ - meltfptr[774])))); - ((meltmultiple_ptr_t) ( /*_._VALTUP___V775*/ meltfptr[774]))->tabval[3] = - (melt_ptr_t) ( /*_._VALDATA___V772*/ meltfptr[771]); + ( /*_._VALTUP___V778*/ + meltfptr[777])))); + ((meltmultiple_ptr_t) ( /*_._VALTUP___V778*/ meltfptr[777]))->tabval[3] = + (melt_ptr_t) ( /*_._VALDATA___V775*/ meltfptr[774]); /*touch:_INITUP_ */ - meltgc_touch ( /*_._VALTUP___V775*/ meltfptr[774]); + meltgc_touch ( /*_._VALTUP___V778*/ meltfptr[777]); MELT_LOCATION ("warmelt-outobj.melt:5314:/ initchunk"); /*^putslot */ /*putslot */ - melt_assertmsg ("checkobj putslot ~dobj_571__GENERATED_C_FILENAME @#2", + melt_assertmsg ("checkobj putslot ~dobj_573__GENERATED_C_FILENAME @#2", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V761*/ meltfptr[760])) == + ( /*_._VALDATA___V764*/ meltfptr[763])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dobj_571__GENERATED_C_FILENAME @#2", + melt_assertmsg ("checkoff putslot ~dobj_573__GENERATED_C_FILENAME @#2", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V761*/ - meltfptr[760])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V761*/ meltfptr[760]))->obj_vartab[2] = + ( /*_._VALDATA___V764*/ + meltfptr[763])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V764*/ meltfptr[763]))->obj_vartab[2] = (melt_ptr_t) ( - /*_._VALTUP___V775*/ meltfptr[774]); + /*_._VALTUP___V778*/ meltfptr[777]); MELT_LOCATION ("warmelt-outobj.melt:5314:/ initchunk"); /*^putslot */ /*putslot */ - melt_assertmsg ("checkobj putslot ~dobj_571__GENERATED_C_FILENAME @#3", + melt_assertmsg ("checkobj putslot ~dobj_573__GENERATED_C_FILENAME @#3", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V761*/ meltfptr[760])) == + ( /*_._VALDATA___V764*/ meltfptr[763])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dobj_571__GENERATED_C_FILENAME @#3", + melt_assertmsg ("checkoff putslot ~dobj_573__GENERATED_C_FILENAME @#3", (3 >= 0 && 3 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V761*/ - meltfptr[760])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V761*/ meltfptr[760]))->obj_vartab[3] = + ( /*_._VALDATA___V764*/ + meltfptr[763])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V764*/ meltfptr[763]))->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___V781*/ meltfptr[780])) == + ( /*_._VALTUP___V784*/ meltfptr[783])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #35 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) - ( /*_._VALTUP___V781*/ - meltfptr[780])))); - ((meltmultiple_ptr_t) ( /*_._VALTUP___V781*/ meltfptr[780]))->tabval[0] = - (melt_ptr_t) ( /*_._VALSTR___V776*/ meltfptr[775]); + ( /*_._VALTUP___V784*/ + meltfptr[783])))); + ((meltmultiple_ptr_t) ( /*_._VALTUP___V784*/ meltfptr[783]))->tabval[0] = + (melt_ptr_t) ( /*_._VALSTR___V779*/ meltfptr[778]); /*putupl#36 */ melt_assertmsg ("putupl #36 checktup", melt_magic_discr ((melt_ptr_t) - ( /*_._VALTUP___V781*/ meltfptr[780])) == + ( /*_._VALTUP___V784*/ meltfptr[783])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #36 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) - ( /*_._VALTUP___V781*/ - meltfptr[780])))); - ((meltmultiple_ptr_t) ( /*_._VALTUP___V781*/ meltfptr[780]))->tabval[1] = - (melt_ptr_t) ( /*_._VALDATA___V764*/ meltfptr[763]); + ( /*_._VALTUP___V784*/ + meltfptr[783])))); + ((meltmultiple_ptr_t) ( /*_._VALTUP___V784*/ meltfptr[783]))->tabval[1] = + (melt_ptr_t) ( /*_._VALDATA___V767*/ meltfptr[766]); /*putupl#37 */ melt_assertmsg ("putupl #37 checktup", melt_magic_discr ((melt_ptr_t) - ( /*_._VALTUP___V781*/ meltfptr[780])) == + ( /*_._VALTUP___V784*/ meltfptr[783])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #37 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) - ( /*_._VALTUP___V781*/ - meltfptr[780])))); - ((meltmultiple_ptr_t) ( /*_._VALTUP___V781*/ meltfptr[780]))->tabval[2] = - (melt_ptr_t) ( /*_._VALSTR___V777*/ meltfptr[776]); + ( /*_._VALTUP___V784*/ + meltfptr[783])))); + ((meltmultiple_ptr_t) ( /*_._VALTUP___V784*/ meltfptr[783]))->tabval[2] = + (melt_ptr_t) ( /*_._VALSTR___V780*/ meltfptr[779]); /*putupl#38 */ melt_assertmsg ("putupl #38 checktup", melt_magic_discr ((melt_ptr_t) - ( /*_._VALTUP___V781*/ meltfptr[780])) == + ( /*_._VALTUP___V784*/ meltfptr[783])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #38 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) - ( /*_._VALTUP___V781*/ - meltfptr[780])))); - ((meltmultiple_ptr_t) ( /*_._VALTUP___V781*/ meltfptr[780]))->tabval[3] = - (melt_ptr_t) ( /*_._VALDATA___V767*/ meltfptr[766]); + ( /*_._VALTUP___V784*/ + meltfptr[783])))); + ((meltmultiple_ptr_t) ( /*_._VALTUP___V784*/ meltfptr[783]))->tabval[3] = + (melt_ptr_t) ( /*_._VALDATA___V770*/ meltfptr[769]); /*putupl#39 */ melt_assertmsg ("putupl #39 checktup", melt_magic_discr ((melt_ptr_t) - ( /*_._VALTUP___V781*/ meltfptr[780])) == + ( /*_._VALTUP___V784*/ meltfptr[783])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #39 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) - ( /*_._VALTUP___V781*/ - meltfptr[780])))); - ((meltmultiple_ptr_t) ( /*_._VALTUP___V781*/ meltfptr[780]))->tabval[4] = - (melt_ptr_t) ( /*_._VALSTR___V778*/ meltfptr[777]); + ( /*_._VALTUP___V784*/ + meltfptr[783])))); + ((meltmultiple_ptr_t) ( /*_._VALTUP___V784*/ meltfptr[783]))->tabval[4] = + (melt_ptr_t) ( /*_._VALSTR___V781*/ meltfptr[780]); /*putupl#40 */ melt_assertmsg ("putupl #40 checktup", melt_magic_discr ((melt_ptr_t) - ( /*_._VALTUP___V781*/ meltfptr[780])) == + ( /*_._VALTUP___V784*/ meltfptr[783])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #40 checkoff", (5 >= 0 && 5 < melt_multiple_length ((melt_ptr_t) - ( /*_._VALTUP___V781*/ - meltfptr[780])))); - ((meltmultiple_ptr_t) ( /*_._VALTUP___V781*/ meltfptr[780]))->tabval[5] = - (melt_ptr_t) ( /*_._VALDATA___V770*/ meltfptr[769]); + ( /*_._VALTUP___V784*/ + meltfptr[783])))); + ((meltmultiple_ptr_t) ( /*_._VALTUP___V784*/ meltfptr[783]))->tabval[5] = + (melt_ptr_t) ( /*_._VALDATA___V773*/ meltfptr[772]); + + +#undef meltfram__ +} /*end of meltmod__WARMELTmiOUTOBJ__initialmeltchunk_12 */ - /*putupl#41 */ +void +meltmod__WARMELTmiOUTOBJ__initialmeltchunk_13 (meltinitial_frame_t * + meltmeltframptr__, + char meltpredefinited[]) +{ +#define meltfram__ (*meltmeltframptr__) +#undef meltcallcount +#define meltcallcount 0L + (void) meltpredefinited; +/*putupl#41*/ melt_assertmsg ("putupl #41 checktup", melt_magic_discr ((melt_ptr_t) - ( /*_._VALTUP___V781*/ meltfptr[780])) == + ( /*_._VALTUP___V784*/ meltfptr[783])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #41 checkoff", (6 >= 0 && 6 < melt_multiple_length ((melt_ptr_t) - ( /*_._VALTUP___V781*/ - meltfptr[780])))); - ((meltmultiple_ptr_t) ( /*_._VALTUP___V781*/ meltfptr[780]))->tabval[6] = - (melt_ptr_t) ( /*_._VALSTR___V779*/ meltfptr[778]); + ( /*_._VALTUP___V784*/ + meltfptr[783])))); + ((meltmultiple_ptr_t) ( /*_._VALTUP___V784*/ meltfptr[783]))->tabval[6] = + (melt_ptr_t) ( /*_._VALSTR___V782*/ meltfptr[781]); /*putupl#42 */ melt_assertmsg ("putupl #42 checktup", melt_magic_discr ((melt_ptr_t) - ( /*_._VALTUP___V781*/ meltfptr[780])) == + ( /*_._VALTUP___V784*/ meltfptr[783])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #42 checkoff", (7 >= 0 && 7 < melt_multiple_length ((melt_ptr_t) - ( /*_._VALTUP___V781*/ - meltfptr[780])))); - ((meltmultiple_ptr_t) ( /*_._VALTUP___V781*/ meltfptr[780]))->tabval[7] = - (melt_ptr_t) ( /*_._VALDATA___V773*/ meltfptr[772]); + ( /*_._VALTUP___V784*/ + meltfptr[783])))); + ((meltmultiple_ptr_t) ( /*_._VALTUP___V784*/ meltfptr[783]))->tabval[7] = + (melt_ptr_t) ( /*_._VALDATA___V776*/ meltfptr[775]); /*putupl#43 */ melt_assertmsg ("putupl #43 checktup", melt_magic_discr ((melt_ptr_t) - ( /*_._VALTUP___V781*/ meltfptr[780])) == + ( /*_._VALTUP___V784*/ meltfptr[783])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #43 checkoff", (8 >= 0 && 8 < melt_multiple_length ((melt_ptr_t) - ( /*_._VALTUP___V781*/ - meltfptr[780])))); - ((meltmultiple_ptr_t) ( /*_._VALTUP___V781*/ meltfptr[780]))->tabval[8] = - (melt_ptr_t) ( /*_._VALSTR___V780*/ meltfptr[779]); - + ( /*_._VALTUP___V784*/ + meltfptr[783])))); + ((meltmultiple_ptr_t) ( /*_._VALTUP___V784*/ meltfptr[783]))->tabval[8] = + (melt_ptr_t) ( /*_._VALSTR___V783*/ meltfptr[782]); -#undef meltfram__ -} /*end of meltmod__WARMELTmiOUTOBJ__initialmeltchunk_12 */ - -void -meltmod__WARMELTmiOUTOBJ__initialmeltchunk_13 (meltinitial_frame_t * - meltmeltframptr__, - char meltpredefinited[]) -{ -#define meltfram__ (*meltmeltframptr__) -#undef meltcallcount -#define meltcallcount 0L - (void) meltpredefinited; -/*touch:_INITUP_*/ - meltgc_touch ( /*_._VALTUP___V781*/ meltfptr[780]); + /*touch:_INITUP_ */ + meltgc_touch ( /*_._VALTUP___V784*/ meltfptr[783]); MELT_LOCATION ("warmelt-outobj.melt:5314:/ initchunk"); /*^putslot */ /*putslot */ - melt_assertmsg ("checkobj putslot ~dobj_571__GENERATED_C_FILENAME @#4", + melt_assertmsg ("checkobj putslot ~dobj_573__GENERATED_C_FILENAME @#4", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V761*/ meltfptr[760])) == + ( /*_._VALDATA___V764*/ meltfptr[763])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dobj_571__GENERATED_C_FILENAME @#4", + melt_assertmsg ("checkoff putslot ~dobj_573__GENERATED_C_FILENAME @#4", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V761*/ - meltfptr[760])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V761*/ meltfptr[760]))->obj_vartab[4] = + ( /*_._VALDATA___V764*/ + meltfptr[763])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V764*/ meltfptr[763]))->obj_vartab[4] = (melt_ptr_t) ( - /*_._VALTUP___V781*/ meltfptr[780]); + /*_._VALTUP___V784*/ meltfptr[783]); MELT_LOCATION ("warmelt-outobj.melt:5314:/ initchunk"); /*^touch */ /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V761*/ meltfptr[760]); + meltgc_touch ( /*_._VALDATA___V764*/ meltfptr[763]); MELT_LOCATION ("warmelt-outobj.melt:5314:/ initchunk"); /*^touchobj */ - melt_dbgtrace_written_object ( /*_._VALDATA___V761*/ meltfptr[760], + melt_dbgtrace_written_object ( /*_._VALDATA___V764*/ meltfptr[763], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:5322:/ initchunk"); @@ -41719,14 +41737,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_13 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V782*/ meltfptr[781])) + ( /*_._VALROUT___V785*/ meltfptr[784])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_592__NTH_SECUNDARY_FILE#0", + melt_checkmsg ("putroutconst constnull.drout_594__NTH_SECUNDARY_FILE#0", NULL != - ( /*_.CLASS_ANY_MODULE_CONTEXT__V140*/ meltfptr[139])); - ((meltroutine_ptr_t) /*_._VALROUT___V782*/ meltfptr[781])->tabval[0] = - (melt_ptr_t) ( /*_.CLASS_ANY_MODULE_CONTEXT__V140*/ meltfptr[139]); + ( /*_.CLASS_ANY_MODULE_CONTEXT__V141*/ meltfptr[140])); + ((meltroutine_ptr_t) /*_._VALROUT___V785*/ meltfptr[784])->tabval[0] = + (melt_ptr_t) ( /*_.CLASS_ANY_MODULE_CONTEXT__V141*/ meltfptr[140]); MELT_LOCATION ("warmelt-outobj.melt:5322:/ initchunk"); /*^putroutconst */ @@ -41734,12 +41752,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_13 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V782*/ meltfptr[781])) + ( /*_._VALROUT___V785*/ meltfptr[784])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_592__NTH_SECUNDARY_FILE#1", + melt_checkmsg ("putroutconst constnull.drout_594__NTH_SECUNDARY_FILE#1", NULL != ( /*_.DISCR_STRING__V53*/ meltfptr[52])); - ((meltroutine_ptr_t) /*_._VALROUT___V782*/ meltfptr[781])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V785*/ meltfptr[784])->tabval[1] = (melt_ptr_t) ( /*_.DISCR_STRING__V53*/ meltfptr[52]); MELT_LOCATION ("warmelt-outobj.melt:5322:/ initchunk"); @@ -41748,12 +41766,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_13 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V782*/ meltfptr[781])) + ( /*_._VALROUT___V785*/ meltfptr[784])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_592__NTH_SECUNDARY_FILE#2", + melt_checkmsg ("putroutconst constnull.drout_594__NTH_SECUNDARY_FILE#2", NULL != ( /*_.DISCR_STRBUF__V68*/ meltfptr[67])); - ((meltroutine_ptr_t) /*_._VALROUT___V782*/ meltfptr[781])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V785*/ meltfptr[784])->tabval[2] = (melt_ptr_t) ( /*_.DISCR_STRBUF__V68*/ meltfptr[67]); MELT_LOCATION ("warmelt-outobj.melt:5322:/ initchunk"); @@ -41761,32 +41779,32 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_13 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V782*/ meltfptr[781])) == + ( /*_._VALROUT___V785*/ meltfptr[784])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALDATA___V739*/ meltfptr[738]); - ((meltroutine_ptr_t) /*_._VALROUT___V782*/ meltfptr[781])->tabval[3] = - (melt_ptr_t) ( /*_._VALDATA___V739*/ meltfptr[738]); + NULL != /*_._VALDATA___V742*/ meltfptr[741]); + ((meltroutine_ptr_t) /*_._VALROUT___V785*/ meltfptr[784])->tabval[3] = + (melt_ptr_t) ( /*_._VALDATA___V742*/ meltfptr[741]); MELT_LOCATION ("warmelt-outobj.melt:5322:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V782*/ meltfptr[781]); + meltgc_touch ( /*_._VALROUT___V785*/ meltfptr[784]); /*putclosurout#113 */ melt_assertmsg ("putclosrout#113 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V783*/ meltfptr[782])) == + ( /*_._VALCLO___V786*/ meltfptr[785])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#113 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V782*/ meltfptr[781])) == + ( /*_._VALROUT___V785*/ meltfptr[784])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V783*/ meltfptr[782])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V782*/ meltfptr[781]); + ((meltclosure_ptr_t) /*_._VALCLO___V786*/ meltfptr[785])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V785*/ meltfptr[784]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V783*/ meltfptr[782]); + meltgc_touch ( /*_._VALCLO___V786*/ meltfptr[785]); MELT_LOCATION ("warmelt-outobj.melt:5356:/ initchunk"); /*^putroutconst */ @@ -41794,13 +41812,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_13 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V784*/ meltfptr[783])) + ( /*_._VALROUT___V787*/ meltfptr[786])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_594__OUTPUT_MELT_DESCRIPTOR#0", + ("putroutconst constnull.drout_596__OUTPUT_MELT_DESCRIPTOR#0", NULL != ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_._VALROUT___V784*/ meltfptr[783])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V787*/ meltfptr[786])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:5356:/ initchunk"); @@ -41809,14 +41827,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_13 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V784*/ meltfptr[783])) + ( /*_._VALROUT___V787*/ meltfptr[786])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_594__OUTPUT_MELT_DESCRIPTOR#1", - NULL != ( /*_.CLASS_ANY_MODULE_CONTEXT__V140*/ meltfptr[139])); - ((meltroutine_ptr_t) /*_._VALROUT___V784*/ meltfptr[783])->tabval[1] = - (melt_ptr_t) ( /*_.CLASS_ANY_MODULE_CONTEXT__V140*/ meltfptr[139]); + ("putroutconst constnull.drout_596__OUTPUT_MELT_DESCRIPTOR#1", + NULL != ( /*_.CLASS_ANY_MODULE_CONTEXT__V141*/ meltfptr[140])); + ((meltroutine_ptr_t) /*_._VALROUT___V787*/ meltfptr[786])->tabval[1] = + (melt_ptr_t) ( /*_.CLASS_ANY_MODULE_CONTEXT__V141*/ meltfptr[140]); MELT_LOCATION ("warmelt-outobj.melt:5356:/ initchunk"); /*^putroutconst */ @@ -41824,13 +41842,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_13 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V784*/ meltfptr[783])) + ( /*_._VALROUT___V787*/ meltfptr[786])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_594__OUTPUT_MELT_DESCRIPTOR#2", + ("putroutconst constnull.drout_596__OUTPUT_MELT_DESCRIPTOR#2", NULL != ( /*_.DISCR_STRBUF__V68*/ meltfptr[67])); - ((meltroutine_ptr_t) /*_._VALROUT___V784*/ meltfptr[783])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V787*/ meltfptr[786])->tabval[2] = (melt_ptr_t) ( /*_.DISCR_STRBUF__V68*/ meltfptr[67]); MELT_LOCATION ("warmelt-outobj.melt:5356:/ initchunk"); @@ -41839,13 +41857,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_13 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V784*/ meltfptr[783])) + ( /*_._VALROUT___V787*/ meltfptr[786])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_594__OUTPUT_MELT_DESCRIPTOR#3", + ("putroutconst constnull.drout_596__OUTPUT_MELT_DESCRIPTOR#3", NULL != ( /*_.DISCR_LIST__V65*/ meltfptr[64])); - ((meltroutine_ptr_t) /*_._VALROUT___V784*/ meltfptr[783])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V787*/ meltfptr[786])->tabval[3] = (melt_ptr_t) ( /*_.DISCR_LIST__V65*/ meltfptr[64]); MELT_LOCATION ("warmelt-outobj.melt:5356:/ initchunk"); @@ -41854,13 +41872,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_13 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V784*/ meltfptr[783])) + ( /*_._VALROUT___V787*/ meltfptr[786])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_594__OUTPUT_MELT_DESCRIPTOR#4", + ("putroutconst constnull.drout_596__OUTPUT_MELT_DESCRIPTOR#4", NULL != ( /*_.LIST_TO_MULTIPLE__V66*/ meltfptr[65])); - ((meltroutine_ptr_t) /*_._VALROUT___V784*/ meltfptr[783])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V787*/ meltfptr[786])->tabval[4] = (melt_ptr_t) ( /*_.LIST_TO_MULTIPLE__V66*/ meltfptr[65]); MELT_LOCATION ("warmelt-outobj.melt:5356:/ initchunk"); @@ -41869,13 +41887,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_13 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V784*/ meltfptr[783])) + ( /*_._VALROUT___V787*/ meltfptr[786])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_594__OUTPUT_MELT_DESCRIPTOR#5", + ("putroutconst constnull.drout_596__OUTPUT_MELT_DESCRIPTOR#5", NULL != ( /*_.DISCR_MULTIPLE__V67*/ meltfptr[66])); - ((meltroutine_ptr_t) /*_._VALROUT___V784*/ meltfptr[783])->tabval[5] = + ((meltroutine_ptr_t) /*_._VALROUT___V787*/ meltfptr[786])->tabval[5] = (melt_ptr_t) ( /*_.DISCR_MULTIPLE__V67*/ meltfptr[66]); MELT_LOCATION ("warmelt-outobj.melt:5356:/ initchunk"); @@ -41884,13 +41902,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_13 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V784*/ meltfptr[783])) + ( /*_._VALROUT___V787*/ meltfptr[786])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_594__OUTPUT_MELT_DESCRIPTOR#6", + ("putroutconst constnull.drout_596__OUTPUT_MELT_DESCRIPTOR#6", NULL != ( /*_.DISCR_STRING__V53*/ meltfptr[52])); - ((meltroutine_ptr_t) /*_._VALROUT___V784*/ meltfptr[783])->tabval[6] = + ((meltroutine_ptr_t) /*_._VALROUT___V787*/ meltfptr[786])->tabval[6] = (melt_ptr_t) ( /*_.DISCR_STRING__V53*/ meltfptr[52]); MELT_LOCATION ("warmelt-outobj.melt:5356:/ initchunk"); @@ -41899,14 +41917,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_13 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V784*/ meltfptr[783])) + ( /*_._VALROUT___V787*/ meltfptr[786])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_594__OUTPUT_MELT_DESCRIPTOR#7", - NULL != ( /*_.STRING4OUT__V94*/ meltfptr[93])); - ((meltroutine_ptr_t) /*_._VALROUT___V784*/ meltfptr[783])->tabval[7] = - (melt_ptr_t) ( /*_.STRING4OUT__V94*/ meltfptr[93]); + ("putroutconst constnull.drout_596__OUTPUT_MELT_DESCRIPTOR#7", + NULL != ( /*_.STRING4OUT__V95*/ meltfptr[94])); + ((meltroutine_ptr_t) /*_._VALROUT___V787*/ meltfptr[786])->tabval[7] = + (melt_ptr_t) ( /*_.STRING4OUT__V95*/ meltfptr[94]); MELT_LOCATION ("warmelt-outobj.melt:5356:/ initchunk"); /*^putroutconst */ @@ -41914,16 +41932,16 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_13 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V784*/ meltfptr[783])) + ( /*_._VALROUT___V787*/ meltfptr[786])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_594__OUTPUT_MELT_DESCRIPTOR#8", + ("putroutconst constnull.drout_596__OUTPUT_MELT_DESCRIPTOR#8", NULL != - ( /*_.CLASS_RUNNING_EXTENSION_MODULE_CONTEXT__V141*/ meltfptr[140])); - ((meltroutine_ptr_t) /*_._VALROUT___V784*/ meltfptr[783])->tabval[8] = - (melt_ptr_t) ( /*_.CLASS_RUNNING_EXTENSION_MODULE_CONTEXT__V141*/ - meltfptr[140]); + ( /*_.CLASS_RUNNING_EXTENSION_MODULE_CONTEXT__V142*/ meltfptr[141])); + ((meltroutine_ptr_t) /*_._VALROUT___V787*/ meltfptr[786])->tabval[8] = + (melt_ptr_t) ( /*_.CLASS_RUNNING_EXTENSION_MODULE_CONTEXT__V142*/ + meltfptr[141]); MELT_LOCATION ("warmelt-outobj.melt:5356:/ initchunk"); /*^putroutconst */ @@ -41931,14 +41949,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_13 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V784*/ meltfptr[783])) + ( /*_._VALROUT___V787*/ meltfptr[786])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_594__OUTPUT_MELT_DESCRIPTOR#9", - NULL != ( /*_._VALSTR___V785*/ meltfptr[784])); - ((meltroutine_ptr_t) /*_._VALROUT___V784*/ meltfptr[783])->tabval[9] = - (melt_ptr_t) ( /*_._VALSTR___V785*/ meltfptr[784]); + ("putroutconst constnull.drout_596__OUTPUT_MELT_DESCRIPTOR#9", + NULL != ( /*_._VALSTR___V788*/ meltfptr[787])); + ((meltroutine_ptr_t) /*_._VALROUT___V787*/ meltfptr[786])->tabval[9] = + (melt_ptr_t) ( /*_._VALSTR___V788*/ meltfptr[787]); MELT_LOCATION ("warmelt-outobj.melt:5356:/ initchunk"); /*^putroutconst */ @@ -41946,14 +41964,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_13 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V784*/ meltfptr[783])) + ( /*_._VALROUT___V787*/ meltfptr[786])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_594__OUTPUT_MELT_DESCRIPTOR#10", - NULL != ( /*_._VALSTR___V786*/ meltfptr[785])); - ((meltroutine_ptr_t) /*_._VALROUT___V784*/ meltfptr[783])->tabval[10] = - (melt_ptr_t) ( /*_._VALSTR___V786*/ meltfptr[785]); + ("putroutconst constnull.drout_596__OUTPUT_MELT_DESCRIPTOR#10", + NULL != ( /*_._VALSTR___V789*/ meltfptr[788])); + ((meltroutine_ptr_t) /*_._VALROUT___V787*/ meltfptr[786])->tabval[10] = + (melt_ptr_t) ( /*_._VALSTR___V789*/ meltfptr[788]); MELT_LOCATION ("warmelt-outobj.melt:5356:/ initchunk"); /*^putroutconst */ @@ -41961,14 +41979,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_13 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V784*/ meltfptr[783])) + ( /*_._VALROUT___V787*/ meltfptr[786])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_594__OUTPUT_MELT_DESCRIPTOR#11", - NULL != ( /*_._VALSTR___V787*/ meltfptr[786])); - ((meltroutine_ptr_t) /*_._VALROUT___V784*/ meltfptr[783])->tabval[11] = - (melt_ptr_t) ( /*_._VALSTR___V787*/ meltfptr[786]); + ("putroutconst constnull.drout_596__OUTPUT_MELT_DESCRIPTOR#11", + NULL != ( /*_._VALSTR___V790*/ meltfptr[789])); + ((meltroutine_ptr_t) /*_._VALROUT___V787*/ meltfptr[786])->tabval[11] = + (melt_ptr_t) ( /*_._VALSTR___V790*/ meltfptr[789]); MELT_LOCATION ("warmelt-outobj.melt:5356:/ initchunk"); /*^putroutconst */ @@ -41976,14 +41994,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_13 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V784*/ meltfptr[783])) + ( /*_._VALROUT___V787*/ meltfptr[786])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_594__OUTPUT_MELT_DESCRIPTOR#12", - NULL != ( /*_._VALSTR___V788*/ meltfptr[787])); - ((meltroutine_ptr_t) /*_._VALROUT___V784*/ meltfptr[783])->tabval[12] = - (melt_ptr_t) ( /*_._VALSTR___V788*/ meltfptr[787]); + ("putroutconst constnull.drout_596__OUTPUT_MELT_DESCRIPTOR#12", + NULL != ( /*_._VALSTR___V791*/ meltfptr[790])); + ((meltroutine_ptr_t) /*_._VALROUT___V787*/ meltfptr[786])->tabval[12] = + (melt_ptr_t) ( /*_._VALSTR___V791*/ meltfptr[790]); MELT_LOCATION ("warmelt-outobj.melt:5356:/ initchunk"); /*^putroutconst */ @@ -41991,14 +42009,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_13 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V784*/ meltfptr[783])) + ( /*_._VALROUT___V787*/ meltfptr[786])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_594__OUTPUT_MELT_DESCRIPTOR#13", - NULL != ( /*_._VALSTR___V789*/ meltfptr[788])); - ((meltroutine_ptr_t) /*_._VALROUT___V784*/ meltfptr[783])->tabval[13] = - (melt_ptr_t) ( /*_._VALSTR___V789*/ meltfptr[788]); + ("putroutconst constnull.drout_596__OUTPUT_MELT_DESCRIPTOR#13", + NULL != ( /*_._VALSTR___V792*/ meltfptr[791])); + ((meltroutine_ptr_t) /*_._VALROUT___V787*/ meltfptr[786])->tabval[13] = + (melt_ptr_t) ( /*_._VALSTR___V792*/ meltfptr[791]); MELT_LOCATION ("warmelt-outobj.melt:5356:/ initchunk"); /*^putroutconst */ @@ -42006,14 +42024,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_13 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V784*/ meltfptr[783])) + ( /*_._VALROUT___V787*/ meltfptr[786])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_594__OUTPUT_MELT_DESCRIPTOR#14", - NULL != ( /*_._VALSTR___V790*/ meltfptr[789])); - ((meltroutine_ptr_t) /*_._VALROUT___V784*/ meltfptr[783])->tabval[14] = - (melt_ptr_t) ( /*_._VALSTR___V790*/ meltfptr[789]); + ("putroutconst constnull.drout_596__OUTPUT_MELT_DESCRIPTOR#14", + NULL != ( /*_._VALSTR___V793*/ meltfptr[792])); + ((meltroutine_ptr_t) /*_._VALROUT___V787*/ meltfptr[786])->tabval[14] = + (melt_ptr_t) ( /*_._VALSTR___V793*/ meltfptr[792]); MELT_LOCATION ("warmelt-outobj.melt:5356:/ initchunk"); /*^putroutconst */ @@ -42021,13 +42039,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_13 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V784*/ meltfptr[783])) + ( /*_._VALROUT___V787*/ meltfptr[786])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_594__OUTPUT_MELT_DESCRIPTOR#15", + ("putroutconst constnull.drout_596__OUTPUT_MELT_DESCRIPTOR#15", NULL != ( /*_.ADD2OUT__V14*/ meltfptr[13])); - ((meltroutine_ptr_t) /*_._VALROUT___V784*/ meltfptr[783])->tabval[15] = + ((meltroutine_ptr_t) /*_._VALROUT___V787*/ meltfptr[786])->tabval[15] = (melt_ptr_t) ( /*_.ADD2OUT__V14*/ meltfptr[13]); MELT_LOCATION ("warmelt-outobj.melt:5356:/ initchunk"); @@ -42035,179 +42053,109 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_13 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V784*/ meltfptr[783])) == + ( /*_._VALROUT___V787*/ meltfptr[786])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALDATA___V739*/ meltfptr[738]); - ((meltroutine_ptr_t) /*_._VALROUT___V784*/ meltfptr[783])->tabval[16] = - (melt_ptr_t) ( /*_._VALDATA___V739*/ meltfptr[738]); + NULL != /*_._VALDATA___V742*/ meltfptr[741]); + ((meltroutine_ptr_t) /*_._VALROUT___V787*/ meltfptr[786])->tabval[16] = + (melt_ptr_t) ( /*_._VALDATA___V742*/ meltfptr[741]); MELT_LOCATION ("warmelt-outobj.melt:5356:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V784*/ meltfptr[783]); + meltgc_touch ( /*_._VALROUT___V787*/ meltfptr[786]); /*putclosurout#114 */ melt_assertmsg ("putclosrout#114 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V791*/ meltfptr[790])) == + ( /*_._VALCLO___V794*/ meltfptr[793])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#114 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V784*/ meltfptr[783])) == + ( /*_._VALROUT___V787*/ meltfptr[786])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V791*/ meltfptr[790])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V784*/ meltfptr[783]); + ((meltclosure_ptr_t) /*_._VALCLO___V794*/ meltfptr[793])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V787*/ meltfptr[786]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V791*/ meltfptr[790]); + meltgc_touch ( /*_._VALCLO___V794*/ meltfptr[793]); /*putslot */ melt_assertmsg - ("checkobj putslot ~dsym_596__CLASS_RUNNING_EXTENSION_MODULE_CONTEXT @#1", - melt_magic_discr ((melt_ptr_t) ( /*_._VALDATA___V792*/ meltfptr[791])) == + ("checkobj putslot ~dsym_598__CLASS_RUNNING_EXTENSION_MODULE_CONTEXT @#1", + melt_magic_discr ((melt_ptr_t) ( /*_._VALDATA___V795*/ meltfptr[794])) == MELTOBMAG_OBJECT); melt_assertmsg - ("checkoff putslot ~dsym_596__CLASS_RUNNING_EXTENSION_MODULE_CONTEXT @#1", + ("checkoff putslot ~dsym_598__CLASS_RUNNING_EXTENSION_MODULE_CONTEXT @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V792*/ meltfptr[791])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V792*/ meltfptr[791]))->obj_vartab[1] = + ( /*_._VALDATA___V795*/ meltfptr[794])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V795*/ meltfptr[794]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V793*/ meltfptr[792]); + /*_._VALSTR___V796*/ meltfptr[795]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V792*/ meltfptr[791]); + meltgc_touch ( /*_._VALDATA___V795*/ meltfptr[794]); - melt_dbgtrace_written_object ( /*_._VALDATA___V792*/ meltfptr[791], + melt_dbgtrace_written_object ( /*_._VALDATA___V795*/ meltfptr[794], "new static instance"); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_604__SYNTAX_TEST_GENERATOR @#1", + melt_assertmsg ("checkobj putslot ~dsym_606__SYNTAX_TEST_GENERATOR @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V794*/ meltfptr[793])) == + ( /*_._VALDATA___V797*/ meltfptr[796])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_604__SYNTAX_TEST_GENERATOR @#1", + melt_assertmsg ("checkoff putslot ~dsym_606__SYNTAX_TEST_GENERATOR @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V794*/ - meltfptr[793])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V794*/ meltfptr[793]))->obj_vartab[1] = + ( /*_._VALDATA___V797*/ + meltfptr[796])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V797*/ meltfptr[796]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V795*/ meltfptr[794]); + /*_._VALSTR___V798*/ meltfptr[797]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V794*/ meltfptr[793]); + meltgc_touch ( /*_._VALDATA___V797*/ meltfptr[796]); - melt_dbgtrace_written_object ( /*_._VALDATA___V794*/ meltfptr[793], + melt_dbgtrace_written_object ( /*_._VALDATA___V797*/ meltfptr[796], "new static instance"); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_606__CLASS_SELECTOR @#1", + melt_assertmsg ("checkobj putslot ~dsym_608__CLASS_SELECTOR @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V796*/ meltfptr[795])) == + ( /*_._VALDATA___V799*/ meltfptr[798])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_606__CLASS_SELECTOR @#1", + melt_assertmsg ("checkoff putslot ~dsym_608__CLASS_SELECTOR @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V796*/ - meltfptr[795])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V796*/ meltfptr[795]))->obj_vartab[1] = + ( /*_._VALDATA___V799*/ + meltfptr[798])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V799*/ meltfptr[798]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V797*/ meltfptr[796]); + /*_._VALSTR___V800*/ meltfptr[799]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V796*/ meltfptr[795]); + meltgc_touch ( /*_._VALDATA___V799*/ meltfptr[798]); - melt_dbgtrace_written_object ( /*_._VALDATA___V796*/ meltfptr[795], + melt_dbgtrace_written_object ( /*_._VALDATA___V799*/ meltfptr[798], "new static instance"); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_608__RECV @#1", - melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V798*/ meltfptr[797])) == - MELTOBMAG_OBJECT); - - melt_assertmsg ("checkoff putslot ~dsym_608__RECV @#1", - (1 >= 0 - && 1 < - melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V798*/ - meltfptr[797])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V798*/ meltfptr[797]))->obj_vartab[1] = - (melt_ptr_t) ( - /*_._VALSTR___V799*/ meltfptr[798]); - - /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V798*/ meltfptr[797]); - - - melt_dbgtrace_written_object ( /*_._VALDATA___V798*/ meltfptr[797], - "new static instance"); - - MELT_LOCATION ("warmelt-outobj.melt:5772:/ initchunk"); - /*^putslot */ - /*putslot */ - melt_assertmsg ("checkobj putslot ~dobj_610 @#0", - melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V800*/ meltfptr[799])) == - MELTOBMAG_OBJECT); - - melt_assertmsg ("checkoff putslot ~dobj_610 @#0", - (0 >= 0 - && 0 < - melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V800*/ - meltfptr[799])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V800*/ meltfptr[799]))->obj_vartab[0] = - (melt_ptr_t) ( - /*_._VALDATA___V798*/ meltfptr[797]); - - MELT_LOCATION ("warmelt-outobj.melt:5772:/ initchunk"); - /*^putslot */ - /*putslot */ - melt_assertmsg ("checkobj putslot ~dobj_610 @#1", - melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V800*/ meltfptr[799])) == - MELTOBMAG_OBJECT); - - melt_assertmsg ("checkoff putslot ~dobj_610 @#1", - (1 >= 0 - && 1 < - melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V800*/ - meltfptr[799])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V800*/ meltfptr[799]))->obj_vartab[1] = - (melt_ptr_t) ( - ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); - - MELT_LOCATION ("warmelt-outobj.melt:5772:/ initchunk"); - /*^touch */ - /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V800*/ meltfptr[799]); - - MELT_LOCATION ("warmelt-outobj.melt:5772:/ initchunk"); - /*^touchobj */ - - melt_dbgtrace_written_object ( /*_._VALDATA___V800*/ meltfptr[799], - "new static instance"); - - /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_611__GENDEV @#1", + melt_assertmsg ("checkobj putslot ~dsym_610__RECV @#1", melt_magic_discr ((melt_ptr_t) ( /*_._VALDATA___V801*/ meltfptr[800])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_611__GENDEV @#1", + melt_assertmsg ("checkoff putslot ~dsym_610__RECV @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) @@ -42227,12 +42175,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_13 (meltinitial_frame_t * MELT_LOCATION ("warmelt-outobj.melt:5772:/ initchunk"); /*^putslot */ /*putslot */ - melt_assertmsg ("checkobj putslot ~dobj_613 @#0", + melt_assertmsg ("checkobj putslot ~dobj_612 @#0", melt_magic_discr ((melt_ptr_t) ( /*_._VALDATA___V803*/ meltfptr[802])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dobj_613 @#0", + melt_assertmsg ("checkoff putslot ~dobj_612 @#0", (0 >= 0 && 0 < melt_object_length ((melt_ptr_t) @@ -42245,12 +42193,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_13 (meltinitial_frame_t * MELT_LOCATION ("warmelt-outobj.melt:5772:/ initchunk"); /*^putslot */ /*putslot */ - melt_assertmsg ("checkobj putslot ~dobj_613 @#1", + melt_assertmsg ("checkobj putslot ~dobj_612 @#1", melt_magic_discr ((melt_ptr_t) ( /*_._VALDATA___V803*/ meltfptr[802])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dobj_613 @#1", + melt_assertmsg ("checkoff putslot ~dobj_612 @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) @@ -42272,12 +42220,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_13 (meltinitial_frame_t * "new static instance"); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_614__SBUF @#1", + melt_assertmsg ("checkobj putslot ~dsym_613__GENDEV @#1", melt_magic_discr ((melt_ptr_t) ( /*_._VALDATA___V804*/ meltfptr[803])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_614__SBUF @#1", + melt_assertmsg ("checkoff putslot ~dsym_613__GENDEV @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) @@ -42297,12 +42245,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_13 (meltinitial_frame_t * MELT_LOCATION ("warmelt-outobj.melt:5772:/ initchunk"); /*^putslot */ /*putslot */ - melt_assertmsg ("checkobj putslot ~dobj_616 @#0", + melt_assertmsg ("checkobj putslot ~dobj_615 @#0", melt_magic_discr ((melt_ptr_t) ( /*_._VALDATA___V806*/ meltfptr[805])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dobj_616 @#0", + melt_assertmsg ("checkoff putslot ~dobj_615 @#0", (0 >= 0 && 0 < melt_object_length ((melt_ptr_t) @@ -42315,12 +42263,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_13 (meltinitial_frame_t * MELT_LOCATION ("warmelt-outobj.melt:5772:/ initchunk"); /*^putslot */ /*putslot */ - melt_assertmsg ("checkobj putslot ~dobj_616 @#1", + melt_assertmsg ("checkobj putslot ~dobj_615 @#1", melt_magic_discr ((melt_ptr_t) ( /*_._VALDATA___V806*/ meltfptr[805])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dobj_616 @#1", + melt_assertmsg ("checkoff putslot ~dobj_615 @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) @@ -42342,12 +42290,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_13 (meltinitial_frame_t * "new static instance"); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_617__MODCTX @#1", + melt_assertmsg ("checkobj putslot ~dsym_616__SBUF @#1", melt_magic_discr ((melt_ptr_t) ( /*_._VALDATA___V807*/ meltfptr[806])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_617__MODCTX @#1", + melt_assertmsg ("checkoff putslot ~dsym_616__SBUF @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) @@ -42367,12 +42315,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_13 (meltinitial_frame_t * MELT_LOCATION ("warmelt-outobj.melt:5772:/ initchunk"); /*^putslot */ /*putslot */ - melt_assertmsg ("checkobj putslot ~dobj_619 @#0", + melt_assertmsg ("checkobj putslot ~dobj_618 @#0", melt_magic_discr ((melt_ptr_t) ( /*_._VALDATA___V809*/ meltfptr[808])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dobj_619 @#0", + melt_assertmsg ("checkoff putslot ~dobj_618 @#0", (0 >= 0 && 0 < melt_object_length ((melt_ptr_t) @@ -42385,12 +42333,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_13 (meltinitial_frame_t * MELT_LOCATION ("warmelt-outobj.melt:5772:/ initchunk"); /*^putslot */ /*putslot */ - melt_assertmsg ("checkobj putslot ~dobj_619 @#1", + melt_assertmsg ("checkobj putslot ~dobj_618 @#1", melt_magic_discr ((melt_ptr_t) ( /*_._VALDATA___V809*/ meltfptr[808])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dobj_619 @#1", + melt_assertmsg ("checkoff putslot ~dobj_618 @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) @@ -42412,12 +42360,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_13 (meltinitial_frame_t * "new static instance"); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_620__IX @#1", + melt_assertmsg ("checkobj putslot ~dsym_619__MODCTX @#1", melt_magic_discr ((melt_ptr_t) ( /*_._VALDATA___V810*/ meltfptr[809])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_620__IX @#1", + melt_assertmsg ("checkoff putslot ~dsym_619__MODCTX @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) @@ -42437,12 +42385,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_13 (meltinitial_frame_t * MELT_LOCATION ("warmelt-outobj.melt:5772:/ initchunk"); /*^putslot */ /*putslot */ - melt_assertmsg ("checkobj putslot ~dobj_622 @#0", + melt_assertmsg ("checkobj putslot ~dobj_621 @#0", melt_magic_discr ((melt_ptr_t) ( /*_._VALDATA___V812*/ meltfptr[811])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dobj_622 @#0", + melt_assertmsg ("checkoff putslot ~dobj_621 @#0", (0 >= 0 && 0 < melt_object_length ((melt_ptr_t) @@ -42455,12 +42403,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_13 (meltinitial_frame_t * MELT_LOCATION ("warmelt-outobj.melt:5772:/ initchunk"); /*^putslot */ /*putslot */ - melt_assertmsg ("checkobj putslot ~dobj_622 @#1", + melt_assertmsg ("checkobj putslot ~dobj_621 @#1", melt_magic_discr ((melt_ptr_t) ( /*_._VALDATA___V812*/ meltfptr[811])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dobj_622 @#1", + melt_assertmsg ("checkoff putslot ~dobj_621 @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) @@ -42468,7 +42416,7 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_13 (meltinitial_frame_t * meltfptr[811])))); ((meltobject_ptr_t) ( /*_._VALDATA___V812*/ meltfptr[811]))->obj_vartab[1] = (melt_ptr_t) ( - ((melt_ptr_t) (MELT_PREDEF (CTYPE_LONG)))); + ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); MELT_LOCATION ("warmelt-outobj.melt:5772:/ initchunk"); /*^touch */ @@ -42481,106 +42429,176 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_13 (meltinitial_frame_t * melt_dbgtrace_written_object ( /*_._VALDATA___V812*/ meltfptr[811], "new static instance"); + /*putslot */ + melt_assertmsg ("checkobj putslot ~dsym_622__IX @#1", + melt_magic_discr ((melt_ptr_t) + ( /*_._VALDATA___V813*/ meltfptr[812])) == + MELTOBMAG_OBJECT); + + melt_assertmsg ("checkoff putslot ~dsym_622__IX @#1", + (1 >= 0 + && 1 < + melt_object_length ((melt_ptr_t) + ( /*_._VALDATA___V813*/ + meltfptr[812])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V813*/ meltfptr[812]))->obj_vartab[1] = + (melt_ptr_t) ( + /*_._VALSTR___V814*/ meltfptr[813]); + + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V813*/ meltfptr[812]); + + + melt_dbgtrace_written_object ( /*_._VALDATA___V813*/ meltfptr[812], + "new static instance"); + + MELT_LOCATION ("warmelt-outobj.melt:5772:/ initchunk"); + /*^putslot */ + /*putslot */ + melt_assertmsg ("checkobj putslot ~dobj_624 @#0", + melt_magic_discr ((melt_ptr_t) + ( /*_._VALDATA___V815*/ meltfptr[814])) == + MELTOBMAG_OBJECT); + + melt_assertmsg ("checkoff putslot ~dobj_624 @#0", + (0 >= 0 + && 0 < + melt_object_length ((melt_ptr_t) + ( /*_._VALDATA___V815*/ + meltfptr[814])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V815*/ meltfptr[814]))->obj_vartab[0] = + (melt_ptr_t) ( + /*_._VALDATA___V813*/ meltfptr[812]); + + MELT_LOCATION ("warmelt-outobj.melt:5772:/ initchunk"); + /*^putslot */ + /*putslot */ + melt_assertmsg ("checkobj putslot ~dobj_624 @#1", + melt_magic_discr ((melt_ptr_t) + ( /*_._VALDATA___V815*/ meltfptr[814])) == + MELTOBMAG_OBJECT); + + melt_assertmsg ("checkoff putslot ~dobj_624 @#1", + (1 >= 0 + && 1 < + melt_object_length ((melt_ptr_t) + ( /*_._VALDATA___V815*/ + meltfptr[814])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V815*/ meltfptr[814]))->obj_vartab[1] = + (melt_ptr_t) ( + ((melt_ptr_t) (MELT_PREDEF (CTYPE_LONG)))); + + MELT_LOCATION ("warmelt-outobj.melt:5772:/ initchunk"); + /*^touch */ + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V815*/ meltfptr[814]); + + MELT_LOCATION ("warmelt-outobj.melt:5772:/ initchunk"); + /*^touchobj */ + + melt_dbgtrace_written_object ( /*_._VALDATA___V815*/ meltfptr[814], + "new static instance"); + /*putupl#44 */ melt_assertmsg ("putupl #44 checktup", melt_magic_discr ((melt_ptr_t) - ( /*_._VALTUP___V813*/ meltfptr[812])) == + ( /*_._VALTUP___V816*/ meltfptr[815])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #44 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) - ( /*_._VALTUP___V813*/ - meltfptr[812])))); - ((meltmultiple_ptr_t) ( /*_._VALTUP___V813*/ meltfptr[812]))->tabval[0] = - (melt_ptr_t) ( /*_._VALDATA___V800*/ meltfptr[799]); + ( /*_._VALTUP___V816*/ + meltfptr[815])))); + ((meltmultiple_ptr_t) ( /*_._VALTUP___V816*/ meltfptr[815]))->tabval[0] = + (melt_ptr_t) ( /*_._VALDATA___V803*/ meltfptr[802]); /*putupl#45 */ melt_assertmsg ("putupl #45 checktup", melt_magic_discr ((melt_ptr_t) - ( /*_._VALTUP___V813*/ meltfptr[812])) == + ( /*_._VALTUP___V816*/ meltfptr[815])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #45 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) - ( /*_._VALTUP___V813*/ - meltfptr[812])))); - ((meltmultiple_ptr_t) ( /*_._VALTUP___V813*/ meltfptr[812]))->tabval[1] = - (melt_ptr_t) ( /*_._VALDATA___V803*/ meltfptr[802]); + ( /*_._VALTUP___V816*/ + meltfptr[815])))); + ((meltmultiple_ptr_t) ( /*_._VALTUP___V816*/ meltfptr[815]))->tabval[1] = + (melt_ptr_t) ( /*_._VALDATA___V806*/ meltfptr[805]); /*putupl#46 */ melt_assertmsg ("putupl #46 checktup", melt_magic_discr ((melt_ptr_t) - ( /*_._VALTUP___V813*/ meltfptr[812])) == + ( /*_._VALTUP___V816*/ meltfptr[815])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #46 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) - ( /*_._VALTUP___V813*/ - meltfptr[812])))); - ((meltmultiple_ptr_t) ( /*_._VALTUP___V813*/ meltfptr[812]))->tabval[2] = - (melt_ptr_t) ( /*_._VALDATA___V806*/ meltfptr[805]); + ( /*_._VALTUP___V816*/ + meltfptr[815])))); + ((meltmultiple_ptr_t) ( /*_._VALTUP___V816*/ meltfptr[815]))->tabval[2] = + (melt_ptr_t) ( /*_._VALDATA___V809*/ meltfptr[808]); /*putupl#47 */ melt_assertmsg ("putupl #47 checktup", melt_magic_discr ((melt_ptr_t) - ( /*_._VALTUP___V813*/ meltfptr[812])) == + ( /*_._VALTUP___V816*/ meltfptr[815])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #47 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) - ( /*_._VALTUP___V813*/ - meltfptr[812])))); - ((meltmultiple_ptr_t) ( /*_._VALTUP___V813*/ meltfptr[812]))->tabval[3] = - (melt_ptr_t) ( /*_._VALDATA___V809*/ meltfptr[808]); + ( /*_._VALTUP___V816*/ + meltfptr[815])))); + ((meltmultiple_ptr_t) ( /*_._VALTUP___V816*/ meltfptr[815]))->tabval[3] = + (melt_ptr_t) ( /*_._VALDATA___V812*/ meltfptr[811]); /*putupl#48 */ melt_assertmsg ("putupl #48 checktup", melt_magic_discr ((melt_ptr_t) - ( /*_._VALTUP___V813*/ meltfptr[812])) == + ( /*_._VALTUP___V816*/ meltfptr[815])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #48 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) - ( /*_._VALTUP___V813*/ - meltfptr[812])))); - ((meltmultiple_ptr_t) ( /*_._VALTUP___V813*/ meltfptr[812]))->tabval[4] = - (melt_ptr_t) ( /*_._VALDATA___V812*/ meltfptr[811]); + ( /*_._VALTUP___V816*/ + meltfptr[815])))); + ((meltmultiple_ptr_t) ( /*_._VALTUP___V816*/ meltfptr[815]))->tabval[4] = + (melt_ptr_t) ( /*_._VALDATA___V815*/ meltfptr[814]); /*touch:_INITUP_ */ - meltgc_touch ( /*_._VALTUP___V813*/ meltfptr[812]); + meltgc_touch ( /*_._VALTUP___V816*/ meltfptr[815]); MELT_LOCATION ("warmelt-outobj.melt:5772:/ initchunk"); /*^putslot */ /*putslot */ - melt_assertmsg ("checkobj putslot ~dobj_624__SYNTAX_TEST_GENERATOR @#1", + melt_assertmsg ("checkobj putslot ~dobj_626__SYNTAX_TEST_GENERATOR @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V814*/ meltfptr[813])) == + ( /*_._VALDATA___V817*/ meltfptr[816])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dobj_624__SYNTAX_TEST_GENERATOR @#1", + melt_assertmsg ("checkoff putslot ~dobj_626__SYNTAX_TEST_GENERATOR @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V814*/ - meltfptr[813])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V814*/ meltfptr[813]))->obj_vartab[1] = + ( /*_._VALDATA___V817*/ + meltfptr[816])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V817*/ meltfptr[816]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V815*/ meltfptr[814]); + /*_._VALSTR___V818*/ meltfptr[817]); MELT_LOCATION ("warmelt-outobj.melt:5772:/ initchunk"); /*^touch */ /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V814*/ meltfptr[813]); + meltgc_touch ( /*_._VALDATA___V817*/ meltfptr[816]); MELT_LOCATION ("warmelt-outobj.melt:5772:/ initchunk"); /*^touchobj */ - melt_dbgtrace_written_object ( /*_._VALDATA___V814*/ meltfptr[813], + melt_dbgtrace_written_object ( /*_._VALDATA___V817*/ meltfptr[816], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:5781:/ initchunk"); @@ -42589,12 +42607,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_13 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V816*/ meltfptr[815])) + ( /*_._VALROUT___V819*/ meltfptr[818])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_626__SYNTESTGEN_ANY#0", + melt_checkmsg ("putroutconst constnull.drout_628__SYNTESTGEN_ANY#0", NULL != ( /*_.CLASS_NAMED__V13*/ meltfptr[12])); - ((meltroutine_ptr_t) /*_._VALROUT___V816*/ meltfptr[815])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V819*/ meltfptr[818])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_NAMED__V13*/ meltfptr[12]); MELT_LOCATION ("warmelt-outobj.melt:5781:/ initchunk"); @@ -42603,13 +42621,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_13 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V816*/ meltfptr[815])) + ( /*_._VALROUT___V819*/ meltfptr[818])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_626__SYNTESTGEN_ANY#1", - NULL != ( /*_.CLASS_LOCATED__V143*/ meltfptr[142])); - ((meltroutine_ptr_t) /*_._VALROUT___V816*/ meltfptr[815])->tabval[1] = - (melt_ptr_t) ( /*_.CLASS_LOCATED__V143*/ meltfptr[142]); + melt_checkmsg ("putroutconst constnull.drout_628__SYNTESTGEN_ANY#1", + NULL != ( /*_.CLASS_LOCATED__V144*/ meltfptr[143])); + ((meltroutine_ptr_t) /*_._VALROUT___V819*/ meltfptr[818])->tabval[1] = + (melt_ptr_t) ( /*_.CLASS_LOCATED__V144*/ meltfptr[143]); MELT_LOCATION ("warmelt-outobj.melt:5781:/ initchunk"); /*^putroutconst */ @@ -42617,12 +42635,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_13 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V816*/ meltfptr[815])) + ( /*_._VALROUT___V819*/ meltfptr[818])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_626__SYNTESTGEN_ANY#2", + melt_checkmsg ("putroutconst constnull.drout_628__SYNTESTGEN_ANY#2", NULL != ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_._VALROUT___V816*/ meltfptr[815])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V819*/ meltfptr[818])->tabval[2] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:5781:/ initchunk"); @@ -42631,15 +42649,15 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_13 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V816*/ meltfptr[815])) + ( /*_._VALROUT___V819*/ meltfptr[818])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_626__SYNTESTGEN_ANY#3", + melt_checkmsg ("putroutconst constnull.drout_628__SYNTESTGEN_ANY#3", NULL != - ( /*_.CLASS_SOURCE_GENERATOR_DEVICE__V144*/ - meltfptr[143])); - ((meltroutine_ptr_t) /*_._VALROUT___V816*/ meltfptr[815])->tabval[3] = - (melt_ptr_t) ( /*_.CLASS_SOURCE_GENERATOR_DEVICE__V144*/ meltfptr[143]); + ( /*_.CLASS_SOURCE_GENERATOR_DEVICE__V145*/ + meltfptr[144])); + ((meltroutine_ptr_t) /*_._VALROUT___V819*/ meltfptr[818])->tabval[3] = + (melt_ptr_t) ( /*_.CLASS_SOURCE_GENERATOR_DEVICE__V145*/ meltfptr[144]); MELT_LOCATION ("warmelt-outobj.melt:5781:/ initchunk"); /*^putroutconst */ @@ -42647,79 +42665,79 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_13 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V816*/ meltfptr[815])) + ( /*_._VALROUT___V819*/ meltfptr[818])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_626__SYNTESTGEN_ANY#4", + melt_checkmsg ("putroutconst constnull.drout_628__SYNTESTGEN_ANY#4", NULL != - ( /*_.CLASS_ANY_MODULE_CONTEXT__V140*/ meltfptr[139])); - ((meltroutine_ptr_t) /*_._VALROUT___V816*/ meltfptr[815])->tabval[4] = - (melt_ptr_t) ( /*_.CLASS_ANY_MODULE_CONTEXT__V140*/ meltfptr[139]); + ( /*_.CLASS_ANY_MODULE_CONTEXT__V141*/ meltfptr[140])); + ((meltroutine_ptr_t) /*_._VALROUT___V819*/ meltfptr[818])->tabval[4] = + (melt_ptr_t) ( /*_.CLASS_ANY_MODULE_CONTEXT__V141*/ meltfptr[140]); MELT_LOCATION ("warmelt-outobj.melt:5781:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V816*/ meltfptr[815]); + meltgc_touch ( /*_._VALROUT___V819*/ meltfptr[818]); /*putclosurout#115 */ melt_assertmsg ("putclosrout#115 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V817*/ meltfptr[816])) == + ( /*_._VALCLO___V820*/ meltfptr[819])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#115 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V816*/ meltfptr[815])) == + ( /*_._VALROUT___V819*/ meltfptr[818])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V817*/ meltfptr[816])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V816*/ meltfptr[815]); + ((meltclosure_ptr_t) /*_._VALCLO___V820*/ meltfptr[819])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V819*/ meltfptr[818]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V817*/ meltfptr[816]); + meltgc_touch ( /*_._VALCLO___V820*/ meltfptr[819]); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_628__CLASS_LOCATED @#1", + melt_assertmsg ("checkobj putslot ~dsym_630__CLASS_LOCATED @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V818*/ meltfptr[817])) == + ( /*_._VALDATA___V821*/ meltfptr[820])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_628__CLASS_LOCATED @#1", + melt_assertmsg ("checkoff putslot ~dsym_630__CLASS_LOCATED @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V818*/ - meltfptr[817])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V818*/ meltfptr[817]))->obj_vartab[1] = + ( /*_._VALDATA___V821*/ + meltfptr[820])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V821*/ meltfptr[820]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V819*/ meltfptr[818]); + /*_._VALSTR___V822*/ meltfptr[821]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V818*/ meltfptr[817]); + meltgc_touch ( /*_._VALDATA___V821*/ meltfptr[820]); - melt_dbgtrace_written_object ( /*_._VALDATA___V818*/ meltfptr[817], + melt_dbgtrace_written_object ( /*_._VALDATA___V821*/ meltfptr[820], "new static instance"); /*putslot */ melt_assertmsg - ("checkobj putslot ~dsym_630__CLASS_SOURCE_GENERATOR_DEVICE @#1", - melt_magic_discr ((melt_ptr_t) ( /*_._VALDATA___V820*/ meltfptr[819])) == + ("checkobj putslot ~dsym_632__CLASS_SOURCE_GENERATOR_DEVICE @#1", + melt_magic_discr ((melt_ptr_t) ( /*_._VALDATA___V823*/ meltfptr[822])) == MELTOBMAG_OBJECT); melt_assertmsg - ("checkoff putslot ~dsym_630__CLASS_SOURCE_GENERATOR_DEVICE @#1", + ("checkoff putslot ~dsym_632__CLASS_SOURCE_GENERATOR_DEVICE @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V820*/ meltfptr[819])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V820*/ meltfptr[819]))->obj_vartab[1] = + ( /*_._VALDATA___V823*/ meltfptr[822])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V823*/ meltfptr[822]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V821*/ meltfptr[820]); + /*_._VALSTR___V824*/ meltfptr[823]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V820*/ meltfptr[819]); + meltgc_touch ( /*_._VALDATA___V823*/ meltfptr[822]); - melt_dbgtrace_written_object ( /*_._VALDATA___V820*/ meltfptr[819], + melt_dbgtrace_written_object ( /*_._VALDATA___V823*/ meltfptr[822], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:5801:/ initchunk"); @@ -42728,13 +42746,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_13 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V822*/ meltfptr[821])) + ( /*_._VALROUT___V825*/ meltfptr[824])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_632__SUBSTITUTE_FORMALS_FOR_SYNTEST#0", + ("putroutconst constnull.drout_634__SUBSTITUTE_FORMALS_FOR_SYNTEST#0", NULL != ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_._VALROUT___V822*/ meltfptr[821])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V825*/ meltfptr[824])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:5801:/ initchunk"); @@ -42743,14 +42761,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_13 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V822*/ meltfptr[821])) + ( /*_._VALROUT___V825*/ meltfptr[824])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_632__SUBSTITUTE_FORMALS_FOR_SYNTEST#1", - NULL != ( /*_.CLASS_FORMAL_BINDING__V72*/ meltfptr[71])); - ((meltroutine_ptr_t) /*_._VALROUT___V822*/ meltfptr[821])->tabval[1] = - (melt_ptr_t) ( /*_.CLASS_FORMAL_BINDING__V72*/ meltfptr[71]); + ("putroutconst constnull.drout_634__SUBSTITUTE_FORMALS_FOR_SYNTEST#1", + NULL != ( /*_.CLASS_FORMAL_BINDING__V73*/ meltfptr[72])); + ((meltroutine_ptr_t) /*_._VALROUT___V825*/ meltfptr[824])->tabval[1] = + (melt_ptr_t) ( /*_.CLASS_FORMAL_BINDING__V73*/ meltfptr[72]); MELT_LOCATION ("warmelt-outobj.melt:5801:/ initchunk"); /*^putroutconst */ @@ -42758,13 +42776,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_13 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V822*/ meltfptr[821])) + ( /*_._VALROUT___V825*/ meltfptr[824])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_632__SUBSTITUTE_FORMALS_FOR_SYNTEST#2", + ("putroutconst constnull.drout_634__SUBSTITUTE_FORMALS_FOR_SYNTEST#2", NULL != ( /*_.CLASS_ANY_BINDING__V11*/ meltfptr[10])); - ((meltroutine_ptr_t) /*_._VALROUT___V822*/ meltfptr[821])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V825*/ meltfptr[824])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_ANY_BINDING__V11*/ meltfptr[10]); MELT_LOCATION ("warmelt-outobj.melt:5801:/ initchunk"); @@ -42773,13 +42791,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_13 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V822*/ meltfptr[821])) + ( /*_._VALROUT___V825*/ meltfptr[824])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_632__SUBSTITUTE_FORMALS_FOR_SYNTEST#3", + ("putroutconst constnull.drout_634__SUBSTITUTE_FORMALS_FOR_SYNTEST#3", NULL != ( /*_.DISCR_STRBUF__V68*/ meltfptr[67])); - ((meltroutine_ptr_t) /*_._VALROUT___V822*/ meltfptr[821])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V825*/ meltfptr[824])->tabval[3] = (melt_ptr_t) ( /*_.DISCR_STRBUF__V68*/ meltfptr[67]); MELT_LOCATION ("warmelt-outobj.melt:5801:/ initchunk"); @@ -42788,13 +42806,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_13 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V822*/ meltfptr[821])) + ( /*_._VALROUT___V825*/ meltfptr[824])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_632__SUBSTITUTE_FORMALS_FOR_SYNTEST#4", + ("putroutconst constnull.drout_634__SUBSTITUTE_FORMALS_FOR_SYNTEST#4", NULL != ( /*_.ADD2OUT__V14*/ meltfptr[13])); - ((meltroutine_ptr_t) /*_._VALROUT___V822*/ meltfptr[821])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V825*/ meltfptr[824])->tabval[4] = (melt_ptr_t) ( /*_.ADD2OUT__V14*/ meltfptr[13]); MELT_LOCATION ("warmelt-outobj.melt:5801:/ initchunk"); @@ -42803,13 +42821,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_13 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V822*/ meltfptr[821])) + ( /*_._VALROUT___V825*/ meltfptr[824])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_632__SUBSTITUTE_FORMALS_FOR_SYNTEST#5", + ("putroutconst constnull.drout_634__SUBSTITUTE_FORMALS_FOR_SYNTEST#5", NULL != ( /*_.CLASS_NAMED__V13*/ meltfptr[12])); - ((meltroutine_ptr_t) /*_._VALROUT___V822*/ meltfptr[821])->tabval[5] = + ((meltroutine_ptr_t) /*_._VALROUT___V825*/ meltfptr[824])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_NAMED__V13*/ meltfptr[12]); MELT_LOCATION ("warmelt-outobj.melt:5801:/ initchunk"); @@ -42818,14 +42836,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_13 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V822*/ meltfptr[821])) + ( /*_._VALROUT___V825*/ meltfptr[824])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_632__SUBSTITUTE_FORMALS_FOR_SYNTEST#6", - NULL != ( /*_.DISCR_VERBATIM_STRING__V87*/ meltfptr[86])); - ((meltroutine_ptr_t) /*_._VALROUT___V822*/ meltfptr[821])->tabval[6] = - (melt_ptr_t) ( /*_.DISCR_VERBATIM_STRING__V87*/ meltfptr[86]); + ("putroutconst constnull.drout_634__SUBSTITUTE_FORMALS_FOR_SYNTEST#6", + NULL != ( /*_.DISCR_VERBATIM_STRING__V88*/ meltfptr[87])); + ((meltroutine_ptr_t) /*_._VALROUT___V825*/ meltfptr[824])->tabval[6] = + (melt_ptr_t) ( /*_.DISCR_VERBATIM_STRING__V88*/ meltfptr[87]); MELT_LOCATION ("warmelt-outobj.melt:5801:/ initchunk"); /*^putroutconst */ @@ -42833,34 +42851,34 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_13 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V822*/ meltfptr[821])) + ( /*_._VALROUT___V825*/ meltfptr[824])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_632__SUBSTITUTE_FORMALS_FOR_SYNTEST#7", + ("putroutconst constnull.drout_634__SUBSTITUTE_FORMALS_FOR_SYNTEST#7", NULL != ( /*_.CLASS_CTYPE__V28*/ meltfptr[27])); - ((meltroutine_ptr_t) /*_._VALROUT___V822*/ meltfptr[821])->tabval[7] = + ((meltroutine_ptr_t) /*_._VALROUT___V825*/ meltfptr[824])->tabval[7] = (melt_ptr_t) ( /*_.CLASS_CTYPE__V28*/ meltfptr[27]); MELT_LOCATION ("warmelt-outobj.melt:5801:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V822*/ meltfptr[821]); + meltgc_touch ( /*_._VALROUT___V825*/ meltfptr[824]); /*putclosurout#116 */ melt_assertmsg ("putclosrout#116 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V823*/ meltfptr[822])) == + ( /*_._VALCLO___V826*/ meltfptr[825])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#116 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V822*/ meltfptr[821])) == + ( /*_._VALROUT___V825*/ meltfptr[824])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V823*/ meltfptr[822])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V822*/ meltfptr[821]); + ((meltclosure_ptr_t) /*_._VALCLO___V826*/ meltfptr[825])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V825*/ meltfptr[824]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V823*/ meltfptr[822]); + meltgc_touch ( /*_._VALCLO___V826*/ meltfptr[825]); MELT_LOCATION ("warmelt-outobj.melt:5827:/ initchunk"); /*^putroutconst */ @@ -42868,13 +42886,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_13 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V824*/ meltfptr[823])) + ( /*_._VALROUT___V827*/ meltfptr[826])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_634__EXPAND_TUPLE_FOR_SYNTEST#0", + ("putroutconst constnull.drout_636__EXPAND_TUPLE_FOR_SYNTEST#0", NULL != ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_._VALROUT___V824*/ meltfptr[823])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V827*/ meltfptr[826])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:5827:/ initchunk"); @@ -42883,13 +42901,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_13 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V824*/ meltfptr[823])) + ( /*_._VALROUT___V827*/ meltfptr[826])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_634__EXPAND_TUPLE_FOR_SYNTEST#1", + ("putroutconst constnull.drout_636__EXPAND_TUPLE_FOR_SYNTEST#1", NULL != ( /*_.ADD2OUT__V14*/ meltfptr[13])); - ((meltroutine_ptr_t) /*_._VALROUT___V824*/ meltfptr[823])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V827*/ meltfptr[826])->tabval[1] = (melt_ptr_t) ( /*_.ADD2OUT__V14*/ meltfptr[13]); MELT_LOCATION ("warmelt-outobj.melt:5827:/ initchunk"); @@ -42898,34 +42916,34 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_13 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V824*/ meltfptr[823])) + ( /*_._VALROUT___V827*/ meltfptr[826])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_634__EXPAND_TUPLE_FOR_SYNTEST#2", + ("putroutconst constnull.drout_636__EXPAND_TUPLE_FOR_SYNTEST#2", NULL != ( /*_.CLASS_NAMED__V13*/ meltfptr[12])); - ((meltroutine_ptr_t) /*_._VALROUT___V824*/ meltfptr[823])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V827*/ meltfptr[826])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NAMED__V13*/ meltfptr[12]); MELT_LOCATION ("warmelt-outobj.melt:5827:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V824*/ meltfptr[823]); + meltgc_touch ( /*_._VALROUT___V827*/ meltfptr[826]); /*putclosurout#117 */ melt_assertmsg ("putclosrout#117 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V825*/ meltfptr[824])) == + ( /*_._VALCLO___V828*/ meltfptr[827])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#117 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V824*/ meltfptr[823])) == + ( /*_._VALROUT___V827*/ meltfptr[826])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V825*/ meltfptr[824])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V824*/ meltfptr[823]); + ((meltclosure_ptr_t) /*_._VALCLO___V828*/ meltfptr[827])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V827*/ meltfptr[826]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V825*/ meltfptr[824]); + meltgc_touch ( /*_._VALCLO___V828*/ meltfptr[827]); MELT_LOCATION ("warmelt-outobj.melt:5851:/ initchunk"); /*^putroutconst */ @@ -42933,12 +42951,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_13 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V826*/ meltfptr[825])) + ( /*_._VALROUT___V829*/ meltfptr[828])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_636__SYNTESTGEN_PRIMITIVE#0", + melt_checkmsg ("putroutconst constnull.drout_638__SYNTESTGEN_PRIMITIVE#0", NULL != ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_._VALROUT___V826*/ meltfptr[825])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V829*/ meltfptr[828])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:5851:/ initchunk"); @@ -42947,13 +42965,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_13 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V826*/ meltfptr[825])) + ( /*_._VALROUT___V829*/ meltfptr[828])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_636__SYNTESTGEN_PRIMITIVE#1", - NULL != ( /*_.CLASS_PRIMITIVE__V145*/ meltfptr[144])); - ((meltroutine_ptr_t) /*_._VALROUT___V826*/ meltfptr[825])->tabval[1] = - (melt_ptr_t) ( /*_.CLASS_PRIMITIVE__V145*/ meltfptr[144]); + melt_checkmsg ("putroutconst constnull.drout_638__SYNTESTGEN_PRIMITIVE#1", + NULL != ( /*_.CLASS_PRIMITIVE__V146*/ meltfptr[145])); + ((meltroutine_ptr_t) /*_._VALROUT___V829*/ meltfptr[828])->tabval[1] = + (melt_ptr_t) ( /*_.CLASS_PRIMITIVE__V146*/ meltfptr[145]); MELT_LOCATION ("warmelt-outobj.melt:5851:/ initchunk"); /*^putroutconst */ @@ -42961,15 +42979,15 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_13 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V826*/ meltfptr[825])) + ( /*_._VALROUT___V829*/ meltfptr[828])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_636__SYNTESTGEN_PRIMITIVE#2", + melt_checkmsg ("putroutconst constnull.drout_638__SYNTESTGEN_PRIMITIVE#2", NULL != - ( /*_.CLASS_SOURCE_GENERATOR_DEVICE__V144*/ - meltfptr[143])); - ((meltroutine_ptr_t) /*_._VALROUT___V826*/ meltfptr[825])->tabval[2] = - (melt_ptr_t) ( /*_.CLASS_SOURCE_GENERATOR_DEVICE__V144*/ meltfptr[143]); + ( /*_.CLASS_SOURCE_GENERATOR_DEVICE__V145*/ + meltfptr[144])); + ((meltroutine_ptr_t) /*_._VALROUT___V829*/ meltfptr[828])->tabval[2] = + (melt_ptr_t) ( /*_.CLASS_SOURCE_GENERATOR_DEVICE__V145*/ meltfptr[144]); MELT_LOCATION ("warmelt-outobj.melt:5851:/ initchunk"); /*^putroutconst */ @@ -42977,14 +42995,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_13 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V826*/ meltfptr[825])) + ( /*_._VALROUT___V829*/ meltfptr[828])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_636__SYNTESTGEN_PRIMITIVE#3", + melt_checkmsg ("putroutconst constnull.drout_638__SYNTESTGEN_PRIMITIVE#3", NULL != - ( /*_.CLASS_ANY_MODULE_CONTEXT__V140*/ meltfptr[139])); - ((meltroutine_ptr_t) /*_._VALROUT___V826*/ meltfptr[825])->tabval[3] = - (melt_ptr_t) ( /*_.CLASS_ANY_MODULE_CONTEXT__V140*/ meltfptr[139]); + ( /*_.CLASS_ANY_MODULE_CONTEXT__V141*/ meltfptr[140])); + ((meltroutine_ptr_t) /*_._VALROUT___V829*/ meltfptr[828])->tabval[3] = + (melt_ptr_t) ( /*_.CLASS_ANY_MODULE_CONTEXT__V141*/ meltfptr[140]); MELT_LOCATION ("warmelt-outobj.melt:5851:/ initchunk"); /*^putroutconst */ @@ -42992,13 +43010,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_13 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V826*/ meltfptr[825])) + ( /*_._VALROUT___V829*/ meltfptr[828])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_636__SYNTESTGEN_PRIMITIVE#4", - NULL != ( /*_.CLASS_LOCATED__V143*/ meltfptr[142])); - ((meltroutine_ptr_t) /*_._VALROUT___V826*/ meltfptr[825])->tabval[4] = - (melt_ptr_t) ( /*_.CLASS_LOCATED__V143*/ meltfptr[142]); + melt_checkmsg ("putroutconst constnull.drout_638__SYNTESTGEN_PRIMITIVE#4", + NULL != ( /*_.CLASS_LOCATED__V144*/ meltfptr[143])); + ((meltroutine_ptr_t) /*_._VALROUT___V829*/ meltfptr[828])->tabval[4] = + (melt_ptr_t) ( /*_.CLASS_LOCATED__V144*/ meltfptr[143]); MELT_LOCATION ("warmelt-outobj.melt:5851:/ initchunk"); /*^putroutconst */ @@ -43006,12 +43024,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_13 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V826*/ meltfptr[825])) + ( /*_._VALROUT___V829*/ meltfptr[828])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_636__SYNTESTGEN_PRIMITIVE#5", + melt_checkmsg ("putroutconst constnull.drout_638__SYNTESTGEN_PRIMITIVE#5", NULL != ( /*_.CLASS_NAMED__V13*/ meltfptr[12])); - ((meltroutine_ptr_t) /*_._VALROUT___V826*/ meltfptr[825])->tabval[5] = + ((meltroutine_ptr_t) /*_._VALROUT___V829*/ meltfptr[828])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_NAMED__V13*/ meltfptr[12]); MELT_LOCATION ("warmelt-outobj.melt:5851:/ initchunk"); @@ -43020,14 +43038,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_13 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V826*/ meltfptr[825])) + ( /*_._VALROUT___V829*/ meltfptr[828])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_636__SYNTESTGEN_PRIMITIVE#6", + melt_checkmsg ("putroutconst constnull.drout_638__SYNTESTGEN_PRIMITIVE#6", NULL != - ( /*_.CLASS_SOURCE_DEFPRIMITIVE__V146*/ meltfptr[145])); - ((meltroutine_ptr_t) /*_._VALROUT___V826*/ meltfptr[825])->tabval[6] = - (melt_ptr_t) ( /*_.CLASS_SOURCE_DEFPRIMITIVE__V146*/ meltfptr[145]); + ( /*_.CLASS_SOURCE_DEFPRIMITIVE__V147*/ meltfptr[146])); + ((meltroutine_ptr_t) /*_._VALROUT___V829*/ meltfptr[828])->tabval[6] = + (melt_ptr_t) ( /*_.CLASS_SOURCE_DEFPRIMITIVE__V147*/ meltfptr[146]); MELT_LOCATION ("warmelt-outobj.melt:5851:/ initchunk"); /*^putroutconst */ @@ -43035,13 +43053,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_13 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V826*/ meltfptr[825])) + ( /*_._VALROUT___V829*/ meltfptr[828])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_636__SYNTESTGEN_PRIMITIVE#7", - NULL != ( /*_.DISCR_MAP_OBJECTS__V147*/ meltfptr[146])); - ((meltroutine_ptr_t) /*_._VALROUT___V826*/ meltfptr[825])->tabval[7] = - (melt_ptr_t) ( /*_.DISCR_MAP_OBJECTS__V147*/ meltfptr[146]); + melt_checkmsg ("putroutconst constnull.drout_638__SYNTESTGEN_PRIMITIVE#7", + NULL != ( /*_.DISCR_MAP_OBJECTS__V148*/ meltfptr[147])); + ((meltroutine_ptr_t) /*_._VALROUT___V829*/ meltfptr[828])->tabval[7] = + (melt_ptr_t) ( /*_.DISCR_MAP_OBJECTS__V148*/ meltfptr[147]); MELT_LOCATION ("warmelt-outobj.melt:5851:/ initchunk"); /*^putroutconst */ @@ -43049,12 +43067,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_13 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V826*/ meltfptr[825])) + ( /*_._VALROUT___V829*/ meltfptr[828])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_636__SYNTESTGEN_PRIMITIVE#8", + melt_checkmsg ("putroutconst constnull.drout_638__SYNTESTGEN_PRIMITIVE#8", NULL != ( /*_.ADD2OUT__V14*/ meltfptr[13])); - ((meltroutine_ptr_t) /*_._VALROUT___V826*/ meltfptr[825])->tabval[8] = + ((meltroutine_ptr_t) /*_._VALROUT___V829*/ meltfptr[828])->tabval[8] = (melt_ptr_t) ( /*_.ADD2OUT__V14*/ meltfptr[13]); MELT_LOCATION ("warmelt-outobj.melt:5851:/ initchunk"); @@ -43062,26 +43080,39 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_13 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V826*/ meltfptr[825])) == + ( /*_._VALROUT___V829*/ meltfptr[828])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V823*/ meltfptr[822]); - ((meltroutine_ptr_t) /*_._VALROUT___V826*/ meltfptr[825])->tabval[9] = - (melt_ptr_t) ( /*_._VALCLO___V823*/ meltfptr[822]); + NULL != /*_._VALCLO___V826*/ meltfptr[825]); + ((meltroutine_ptr_t) /*_._VALROUT___V829*/ meltfptr[828])->tabval[9] = + (melt_ptr_t) ( /*_._VALCLO___V826*/ meltfptr[825]); + +#undef meltfram__ +} /*end of meltmod__WARMELTmiOUTOBJ__initialmeltchunk_13 */ + +void +meltmod__WARMELTmiOUTOBJ__initialmeltchunk_14 (meltinitial_frame_t * + meltmeltframptr__, + char meltpredefinited[]) +{ +#define meltfram__ (*meltmeltframptr__) +#undef meltcallcount +#define meltcallcount 0L + (void) meltpredefinited; MELT_LOCATION ("warmelt-outobj.melt:5851:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V826*/ meltfptr[825])) + ( /*_._VALROUT___V829*/ meltfptr[828])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_636__SYNTESTGEN_PRIMITIVE#10", + ("putroutconst constnull.drout_638__SYNTESTGEN_PRIMITIVE#10", NULL != ( /*_.CTYPE_VOID__V29*/ meltfptr[28])); - ((meltroutine_ptr_t) /*_._VALROUT___V826*/ meltfptr[825])->tabval[10] = + ((meltroutine_ptr_t) /*_._VALROUT___V829*/ meltfptr[828])->tabval[10] = (melt_ptr_t) ( /*_.CTYPE_VOID__V29*/ meltfptr[28]); MELT_LOCATION ("warmelt-outobj.melt:5851:/ initchunk"); @@ -43090,13 +43121,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_13 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V826*/ meltfptr[825])) + ( /*_._VALROUT___V829*/ meltfptr[828])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_636__SYNTESTGEN_PRIMITIVE#11", + ("putroutconst constnull.drout_638__SYNTESTGEN_PRIMITIVE#11", NULL != ( /*_.CLASS_CTYPE__V28*/ meltfptr[27])); - ((meltroutine_ptr_t) /*_._VALROUT___V826*/ meltfptr[825])->tabval[11] = + ((meltroutine_ptr_t) /*_._VALROUT___V829*/ meltfptr[828])->tabval[11] = (melt_ptr_t) ( /*_.CLASS_CTYPE__V28*/ meltfptr[27]); MELT_LOCATION ("warmelt-outobj.melt:5851:/ initchunk"); @@ -43104,125 +43135,112 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_13 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V826*/ meltfptr[825])) == + ( /*_._VALROUT___V829*/ meltfptr[828])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V268*/ meltfptr[267]); - ((meltroutine_ptr_t) /*_._VALROUT___V826*/ meltfptr[825])->tabval[12] = - (melt_ptr_t) ( /*_._VALCLO___V268*/ meltfptr[267]); - - -#undef meltfram__ -} /*end of meltmod__WARMELTmiOUTOBJ__initialmeltchunk_13 */ + NULL != /*_._VALCLO___V269*/ meltfptr[268]); + ((meltroutine_ptr_t) /*_._VALROUT___V829*/ meltfptr[828])->tabval[12] = + (melt_ptr_t) ( /*_._VALCLO___V269*/ meltfptr[268]); -void -meltmod__WARMELTmiOUTOBJ__initialmeltchunk_14 (meltinitial_frame_t * - meltmeltframptr__, - char meltpredefinited[]) -{ -#define meltfram__ (*meltmeltframptr__) -#undef meltcallcount -#define meltcallcount 0L - (void) meltpredefinited; MELT_LOCATION ("warmelt-outobj.melt:5851:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V826*/ meltfptr[825])) == + ( /*_._VALROUT___V829*/ meltfptr[828])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V825*/ meltfptr[824]); - ((meltroutine_ptr_t) /*_._VALROUT___V826*/ meltfptr[825])->tabval[13] = - (melt_ptr_t) ( /*_._VALCLO___V825*/ meltfptr[824]); + NULL != /*_._VALCLO___V828*/ meltfptr[827]); + ((meltroutine_ptr_t) /*_._VALROUT___V829*/ meltfptr[828])->tabval[13] = + (melt_ptr_t) ( /*_._VALCLO___V828*/ meltfptr[827]); MELT_LOCATION ("warmelt-outobj.melt:5851:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V826*/ meltfptr[825]); + meltgc_touch ( /*_._VALROUT___V829*/ meltfptr[828]); /*putclosurout#118 */ melt_assertmsg ("putclosrout#118 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V827*/ meltfptr[826])) == + ( /*_._VALCLO___V830*/ meltfptr[829])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#118 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V826*/ meltfptr[825])) == + ( /*_._VALROUT___V829*/ meltfptr[828])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V827*/ meltfptr[826])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V826*/ meltfptr[825]); + ((meltclosure_ptr_t) /*_._VALCLO___V830*/ meltfptr[829])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V829*/ meltfptr[828]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V827*/ meltfptr[826]); + meltgc_touch ( /*_._VALCLO___V830*/ meltfptr[829]); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_638__CLASS_PRIMITIVE @#1", + melt_assertmsg ("checkobj putslot ~dsym_640__CLASS_PRIMITIVE @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V828*/ meltfptr[827])) == + ( /*_._VALDATA___V831*/ meltfptr[830])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_638__CLASS_PRIMITIVE @#1", + melt_assertmsg ("checkoff putslot ~dsym_640__CLASS_PRIMITIVE @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V828*/ - meltfptr[827])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V828*/ meltfptr[827]))->obj_vartab[1] = + ( /*_._VALDATA___V831*/ + meltfptr[830])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V831*/ meltfptr[830]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V829*/ meltfptr[828]); + /*_._VALSTR___V832*/ meltfptr[831]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V828*/ meltfptr[827]); + meltgc_touch ( /*_._VALDATA___V831*/ meltfptr[830]); - melt_dbgtrace_written_object ( /*_._VALDATA___V828*/ meltfptr[827], + melt_dbgtrace_written_object ( /*_._VALDATA___V831*/ meltfptr[830], "new static instance"); /*putslot */ melt_assertmsg - ("checkobj putslot ~dsym_640__CLASS_SOURCE_DEFPRIMITIVE @#1", - melt_magic_discr ((melt_ptr_t) ( /*_._VALDATA___V830*/ meltfptr[829])) == + ("checkobj putslot ~dsym_642__CLASS_SOURCE_DEFPRIMITIVE @#1", + melt_magic_discr ((melt_ptr_t) ( /*_._VALDATA___V833*/ meltfptr[832])) == MELTOBMAG_OBJECT); melt_assertmsg - ("checkoff putslot ~dsym_640__CLASS_SOURCE_DEFPRIMITIVE @#1", + ("checkoff putslot ~dsym_642__CLASS_SOURCE_DEFPRIMITIVE @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V830*/ meltfptr[829])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V830*/ meltfptr[829]))->obj_vartab[1] = + ( /*_._VALDATA___V833*/ meltfptr[832])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V833*/ meltfptr[832]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V831*/ meltfptr[830]); + /*_._VALSTR___V834*/ meltfptr[833]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V830*/ meltfptr[829]); + meltgc_touch ( /*_._VALDATA___V833*/ meltfptr[832]); - melt_dbgtrace_written_object ( /*_._VALDATA___V830*/ meltfptr[829], + melt_dbgtrace_written_object ( /*_._VALDATA___V833*/ meltfptr[832], "new static instance"); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_642__DISCR_MAP_OBJECTS @#1", + melt_assertmsg ("checkobj putslot ~dsym_644__DISCR_MAP_OBJECTS @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V832*/ meltfptr[831])) == + ( /*_._VALDATA___V835*/ meltfptr[834])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_642__DISCR_MAP_OBJECTS @#1", + melt_assertmsg ("checkoff putslot ~dsym_644__DISCR_MAP_OBJECTS @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V832*/ - meltfptr[831])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V832*/ meltfptr[831]))->obj_vartab[1] = + ( /*_._VALDATA___V835*/ + meltfptr[834])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V835*/ meltfptr[834]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V833*/ meltfptr[832]); + /*_._VALSTR___V836*/ meltfptr[835]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V832*/ meltfptr[831]); + meltgc_touch ( /*_._VALDATA___V835*/ meltfptr[834]); - melt_dbgtrace_written_object ( /*_._VALDATA___V832*/ meltfptr[831], + melt_dbgtrace_written_object ( /*_._VALDATA___V835*/ meltfptr[834], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:5911:/ initchunk"); @@ -43231,12 +43249,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V834*/ meltfptr[833])) + ( /*_._VALROUT___V837*/ meltfptr[836])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_644__SYNTESTGEN_CITERATOR#0", + melt_checkmsg ("putroutconst constnull.drout_646__SYNTESTGEN_CITERATOR#0", NULL != ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_._VALROUT___V834*/ meltfptr[833])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V837*/ meltfptr[836])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:5911:/ initchunk"); @@ -43245,13 +43263,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V834*/ meltfptr[833])) + ( /*_._VALROUT___V837*/ meltfptr[836])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_644__SYNTESTGEN_CITERATOR#1", - NULL != ( /*_.CLASS_CITERATOR__V89*/ meltfptr[88])); - ((meltroutine_ptr_t) /*_._VALROUT___V834*/ meltfptr[833])->tabval[1] = - (melt_ptr_t) ( /*_.CLASS_CITERATOR__V89*/ meltfptr[88]); + melt_checkmsg ("putroutconst constnull.drout_646__SYNTESTGEN_CITERATOR#1", + NULL != ( /*_.CLASS_CITERATOR__V90*/ meltfptr[89])); + ((meltroutine_ptr_t) /*_._VALROUT___V837*/ meltfptr[836])->tabval[1] = + (melt_ptr_t) ( /*_.CLASS_CITERATOR__V90*/ meltfptr[89]); MELT_LOCATION ("warmelt-outobj.melt:5911:/ initchunk"); /*^putroutconst */ @@ -43259,15 +43277,15 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V834*/ meltfptr[833])) + ( /*_._VALROUT___V837*/ meltfptr[836])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_644__SYNTESTGEN_CITERATOR#2", + melt_checkmsg ("putroutconst constnull.drout_646__SYNTESTGEN_CITERATOR#2", NULL != - ( /*_.CLASS_SOURCE_GENERATOR_DEVICE__V144*/ - meltfptr[143])); - ((meltroutine_ptr_t) /*_._VALROUT___V834*/ meltfptr[833])->tabval[2] = - (melt_ptr_t) ( /*_.CLASS_SOURCE_GENERATOR_DEVICE__V144*/ meltfptr[143]); + ( /*_.CLASS_SOURCE_GENERATOR_DEVICE__V145*/ + meltfptr[144])); + ((meltroutine_ptr_t) /*_._VALROUT___V837*/ meltfptr[836])->tabval[2] = + (melt_ptr_t) ( /*_.CLASS_SOURCE_GENERATOR_DEVICE__V145*/ meltfptr[144]); MELT_LOCATION ("warmelt-outobj.melt:5911:/ initchunk"); /*^putroutconst */ @@ -43275,14 +43293,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V834*/ meltfptr[833])) + ( /*_._VALROUT___V837*/ meltfptr[836])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_644__SYNTESTGEN_CITERATOR#3", + melt_checkmsg ("putroutconst constnull.drout_646__SYNTESTGEN_CITERATOR#3", NULL != - ( /*_.CLASS_ANY_MODULE_CONTEXT__V140*/ meltfptr[139])); - ((meltroutine_ptr_t) /*_._VALROUT___V834*/ meltfptr[833])->tabval[3] = - (melt_ptr_t) ( /*_.CLASS_ANY_MODULE_CONTEXT__V140*/ meltfptr[139]); + ( /*_.CLASS_ANY_MODULE_CONTEXT__V141*/ meltfptr[140])); + ((meltroutine_ptr_t) /*_._VALROUT___V837*/ meltfptr[836])->tabval[3] = + (melt_ptr_t) ( /*_.CLASS_ANY_MODULE_CONTEXT__V141*/ meltfptr[140]); MELT_LOCATION ("warmelt-outobj.melt:5911:/ initchunk"); /*^putroutconst */ @@ -43290,13 +43308,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V834*/ meltfptr[833])) + ( /*_._VALROUT___V837*/ meltfptr[836])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_644__SYNTESTGEN_CITERATOR#4", - NULL != ( /*_.CLASS_LOCATED__V143*/ meltfptr[142])); - ((meltroutine_ptr_t) /*_._VALROUT___V834*/ meltfptr[833])->tabval[4] = - (melt_ptr_t) ( /*_.CLASS_LOCATED__V143*/ meltfptr[142]); + melt_checkmsg ("putroutconst constnull.drout_646__SYNTESTGEN_CITERATOR#4", + NULL != ( /*_.CLASS_LOCATED__V144*/ meltfptr[143])); + ((meltroutine_ptr_t) /*_._VALROUT___V837*/ meltfptr[836])->tabval[4] = + (melt_ptr_t) ( /*_.CLASS_LOCATED__V144*/ meltfptr[143]); MELT_LOCATION ("warmelt-outobj.melt:5911:/ initchunk"); /*^putroutconst */ @@ -43304,12 +43322,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V834*/ meltfptr[833])) + ( /*_._VALROUT___V837*/ meltfptr[836])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_644__SYNTESTGEN_CITERATOR#5", + melt_checkmsg ("putroutconst constnull.drout_646__SYNTESTGEN_CITERATOR#5", NULL != ( /*_.CLASS_NAMED__V13*/ meltfptr[12])); - ((meltroutine_ptr_t) /*_._VALROUT___V834*/ meltfptr[833])->tabval[5] = + ((meltroutine_ptr_t) /*_._VALROUT___V837*/ meltfptr[836])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_NAMED__V13*/ meltfptr[12]); MELT_LOCATION ("warmelt-outobj.melt:5911:/ initchunk"); @@ -43318,13 +43336,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V834*/ meltfptr[833])) + ( /*_._VALROUT___V837*/ meltfptr[836])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_644__SYNTESTGEN_CITERATOR#6", - NULL != ( /*_.DISCR_MAP_OBJECTS__V147*/ meltfptr[146])); - ((meltroutine_ptr_t) /*_._VALROUT___V834*/ meltfptr[833])->tabval[6] = - (melt_ptr_t) ( /*_.DISCR_MAP_OBJECTS__V147*/ meltfptr[146]); + melt_checkmsg ("putroutconst constnull.drout_646__SYNTESTGEN_CITERATOR#6", + NULL != ( /*_.DISCR_MAP_OBJECTS__V148*/ meltfptr[147])); + ((meltroutine_ptr_t) /*_._VALROUT___V837*/ meltfptr[836])->tabval[6] = + (melt_ptr_t) ( /*_.DISCR_MAP_OBJECTS__V148*/ meltfptr[147]); MELT_LOCATION ("warmelt-outobj.melt:5911:/ initchunk"); /*^putroutconst */ @@ -43332,12 +43350,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V834*/ meltfptr[833])) + ( /*_._VALROUT___V837*/ meltfptr[836])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_644__SYNTESTGEN_CITERATOR#7", + melt_checkmsg ("putroutconst constnull.drout_646__SYNTESTGEN_CITERATOR#7", NULL != ( /*_.DISCR_STRBUF__V68*/ meltfptr[67])); - ((meltroutine_ptr_t) /*_._VALROUT___V834*/ meltfptr[833])->tabval[7] = + ((meltroutine_ptr_t) /*_._VALROUT___V837*/ meltfptr[836])->tabval[7] = (melt_ptr_t) ( /*_.DISCR_STRBUF__V68*/ meltfptr[67]); MELT_LOCATION ("warmelt-outobj.melt:5911:/ initchunk"); @@ -43346,12 +43364,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V834*/ meltfptr[833])) + ( /*_._VALROUT___V837*/ meltfptr[836])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_644__SYNTESTGEN_CITERATOR#8", + melt_checkmsg ("putroutconst constnull.drout_646__SYNTESTGEN_CITERATOR#8", NULL != ( /*_.ADD2OUT__V14*/ meltfptr[13])); - ((meltroutine_ptr_t) /*_._VALROUT___V834*/ meltfptr[833])->tabval[8] = + ((meltroutine_ptr_t) /*_._VALROUT___V837*/ meltfptr[836])->tabval[8] = (melt_ptr_t) ( /*_.ADD2OUT__V14*/ meltfptr[13]); MELT_LOCATION ("warmelt-outobj.melt:5911:/ initchunk"); @@ -43360,13 +43378,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V834*/ meltfptr[833])) + ( /*_._VALROUT___V837*/ meltfptr[836])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_644__SYNTESTGEN_CITERATOR#9", - NULL != ( /*_.DISCR_VERBATIM_STRING__V87*/ meltfptr[86])); - ((meltroutine_ptr_t) /*_._VALROUT___V834*/ meltfptr[833])->tabval[9] = - (melt_ptr_t) ( /*_.DISCR_VERBATIM_STRING__V87*/ meltfptr[86]); + melt_checkmsg ("putroutconst constnull.drout_646__SYNTESTGEN_CITERATOR#9", + NULL != ( /*_.DISCR_VERBATIM_STRING__V88*/ meltfptr[87])); + ((meltroutine_ptr_t) /*_._VALROUT___V837*/ meltfptr[836])->tabval[9] = + (melt_ptr_t) ( /*_.DISCR_VERBATIM_STRING__V88*/ meltfptr[87]); MELT_LOCATION ("warmelt-outobj.melt:5911:/ initchunk"); /*^putroutconst */ @@ -43374,50 +43392,50 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V834*/ meltfptr[833])) + ( /*_._VALROUT___V837*/ meltfptr[836])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_644__SYNTESTGEN_CITERATOR#10", - NULL != ( /*_.CLASS_SOURCE_DEFCITERATOR__V148*/ meltfptr[147])); - ((meltroutine_ptr_t) /*_._VALROUT___V834*/ meltfptr[833])->tabval[10] = - (melt_ptr_t) ( /*_.CLASS_SOURCE_DEFCITERATOR__V148*/ meltfptr[147]); + ("putroutconst constnull.drout_646__SYNTESTGEN_CITERATOR#10", + NULL != ( /*_.CLASS_SOURCE_DEFCITERATOR__V149*/ meltfptr[148])); + ((meltroutine_ptr_t) /*_._VALROUT___V837*/ meltfptr[836])->tabval[10] = + (melt_ptr_t) ( /*_.CLASS_SOURCE_DEFCITERATOR__V149*/ meltfptr[148]); MELT_LOCATION ("warmelt-outobj.melt:5911:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V834*/ meltfptr[833])) == + ( /*_._VALROUT___V837*/ meltfptr[836])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V268*/ meltfptr[267]); - ((meltroutine_ptr_t) /*_._VALROUT___V834*/ meltfptr[833])->tabval[11] = - (melt_ptr_t) ( /*_._VALCLO___V268*/ meltfptr[267]); + NULL != /*_._VALCLO___V269*/ meltfptr[268]); + ((meltroutine_ptr_t) /*_._VALROUT___V837*/ meltfptr[836])->tabval[11] = + (melt_ptr_t) ( /*_._VALCLO___V269*/ meltfptr[268]); MELT_LOCATION ("warmelt-outobj.melt:5911:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V834*/ meltfptr[833])) == + ( /*_._VALROUT___V837*/ meltfptr[836])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V823*/ meltfptr[822]); - ((meltroutine_ptr_t) /*_._VALROUT___V834*/ meltfptr[833])->tabval[12] = - (melt_ptr_t) ( /*_._VALCLO___V823*/ meltfptr[822]); + NULL != /*_._VALCLO___V826*/ meltfptr[825]); + ((meltroutine_ptr_t) /*_._VALROUT___V837*/ meltfptr[836])->tabval[12] = + (melt_ptr_t) ( /*_._VALCLO___V826*/ meltfptr[825]); MELT_LOCATION ("warmelt-outobj.melt:5911:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V834*/ meltfptr[833])) == + ( /*_._VALROUT___V837*/ meltfptr[836])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V825*/ meltfptr[824]); - ((meltroutine_ptr_t) /*_._VALROUT___V834*/ meltfptr[833])->tabval[13] = - (melt_ptr_t) ( /*_._VALCLO___V825*/ meltfptr[824]); + NULL != /*_._VALCLO___V828*/ meltfptr[827]); + ((meltroutine_ptr_t) /*_._VALROUT___V837*/ meltfptr[836])->tabval[13] = + (melt_ptr_t) ( /*_._VALCLO___V828*/ meltfptr[827]); MELT_LOCATION ("warmelt-outobj.melt:5911:/ initchunk"); /*^putroutconst */ @@ -43425,56 +43443,56 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V834*/ meltfptr[833])) + ( /*_._VALROUT___V837*/ meltfptr[836])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_644__SYNTESTGEN_CITERATOR#14", + ("putroutconst constnull.drout_646__SYNTESTGEN_CITERATOR#14", NULL != ( /*_.CLASS_ANY_BINDING__V11*/ meltfptr[10])); - ((meltroutine_ptr_t) /*_._VALROUT___V834*/ meltfptr[833])->tabval[14] = + ((meltroutine_ptr_t) /*_._VALROUT___V837*/ meltfptr[836])->tabval[14] = (melt_ptr_t) ( /*_.CLASS_ANY_BINDING__V11*/ meltfptr[10]); MELT_LOCATION ("warmelt-outobj.melt:5911:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V834*/ meltfptr[833]); + meltgc_touch ( /*_._VALROUT___V837*/ meltfptr[836]); /*putclosurout#119 */ melt_assertmsg ("putclosrout#119 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V835*/ meltfptr[834])) == + ( /*_._VALCLO___V838*/ meltfptr[837])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#119 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V834*/ meltfptr[833])) == + ( /*_._VALROUT___V837*/ meltfptr[836])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V835*/ meltfptr[834])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V834*/ meltfptr[833]); + ((meltclosure_ptr_t) /*_._VALCLO___V838*/ meltfptr[837])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V837*/ meltfptr[836]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V835*/ meltfptr[834]); + meltgc_touch ( /*_._VALCLO___V838*/ meltfptr[837]); /*putslot */ melt_assertmsg - ("checkobj putslot ~dsym_646__CLASS_SOURCE_DEFCITERATOR @#1", - melt_magic_discr ((melt_ptr_t) ( /*_._VALDATA___V836*/ meltfptr[835])) == + ("checkobj putslot ~dsym_648__CLASS_SOURCE_DEFCITERATOR @#1", + melt_magic_discr ((melt_ptr_t) ( /*_._VALDATA___V839*/ meltfptr[838])) == MELTOBMAG_OBJECT); melt_assertmsg - ("checkoff putslot ~dsym_646__CLASS_SOURCE_DEFCITERATOR @#1", + ("checkoff putslot ~dsym_648__CLASS_SOURCE_DEFCITERATOR @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V836*/ meltfptr[835])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V836*/ meltfptr[835]))->obj_vartab[1] = + ( /*_._VALDATA___V839*/ meltfptr[838])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V839*/ meltfptr[838]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V837*/ meltfptr[836]); + /*_._VALSTR___V840*/ meltfptr[839]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V836*/ meltfptr[835]); + meltgc_touch ( /*_._VALDATA___V839*/ meltfptr[838]); - melt_dbgtrace_written_object ( /*_._VALDATA___V836*/ meltfptr[835], + melt_dbgtrace_written_object ( /*_._VALDATA___V839*/ meltfptr[838], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:5979:/ initchunk"); @@ -43483,12 +43501,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V838*/ meltfptr[837])) + ( /*_._VALROUT___V841*/ meltfptr[840])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_648__SYNTESTGEN_CMATCHER#0", + melt_checkmsg ("putroutconst constnull.drout_650__SYNTESTGEN_CMATCHER#0", NULL != ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_._VALROUT___V838*/ meltfptr[837])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V841*/ meltfptr[840])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:5979:/ initchunk"); @@ -43497,13 +43515,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V838*/ meltfptr[837])) + ( /*_._VALROUT___V841*/ meltfptr[840])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_648__SYNTESTGEN_CMATCHER#1", - NULL != ( /*_.CLASS_CMATCHER__V149*/ meltfptr[148])); - ((meltroutine_ptr_t) /*_._VALROUT___V838*/ meltfptr[837])->tabval[1] = - (melt_ptr_t) ( /*_.CLASS_CMATCHER__V149*/ meltfptr[148]); + melt_checkmsg ("putroutconst constnull.drout_650__SYNTESTGEN_CMATCHER#1", + NULL != ( /*_.CLASS_CMATCHER__V150*/ meltfptr[149])); + ((meltroutine_ptr_t) /*_._VALROUT___V841*/ meltfptr[840])->tabval[1] = + (melt_ptr_t) ( /*_.CLASS_CMATCHER__V150*/ meltfptr[149]); MELT_LOCATION ("warmelt-outobj.melt:5979:/ initchunk"); /*^putroutconst */ @@ -43511,15 +43529,15 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V838*/ meltfptr[837])) + ( /*_._VALROUT___V841*/ meltfptr[840])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_648__SYNTESTGEN_CMATCHER#2", + melt_checkmsg ("putroutconst constnull.drout_650__SYNTESTGEN_CMATCHER#2", NULL != - ( /*_.CLASS_SOURCE_GENERATOR_DEVICE__V144*/ - meltfptr[143])); - ((meltroutine_ptr_t) /*_._VALROUT___V838*/ meltfptr[837])->tabval[2] = - (melt_ptr_t) ( /*_.CLASS_SOURCE_GENERATOR_DEVICE__V144*/ meltfptr[143]); + ( /*_.CLASS_SOURCE_GENERATOR_DEVICE__V145*/ + meltfptr[144])); + ((meltroutine_ptr_t) /*_._VALROUT___V841*/ meltfptr[840])->tabval[2] = + (melt_ptr_t) ( /*_.CLASS_SOURCE_GENERATOR_DEVICE__V145*/ meltfptr[144]); MELT_LOCATION ("warmelt-outobj.melt:5979:/ initchunk"); /*^putroutconst */ @@ -43527,14 +43545,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V838*/ meltfptr[837])) + ( /*_._VALROUT___V841*/ meltfptr[840])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_648__SYNTESTGEN_CMATCHER#3", + melt_checkmsg ("putroutconst constnull.drout_650__SYNTESTGEN_CMATCHER#3", NULL != - ( /*_.CLASS_ANY_MODULE_CONTEXT__V140*/ meltfptr[139])); - ((meltroutine_ptr_t) /*_._VALROUT___V838*/ meltfptr[837])->tabval[3] = - (melt_ptr_t) ( /*_.CLASS_ANY_MODULE_CONTEXT__V140*/ meltfptr[139]); + ( /*_.CLASS_ANY_MODULE_CONTEXT__V141*/ meltfptr[140])); + ((meltroutine_ptr_t) /*_._VALROUT___V841*/ meltfptr[840])->tabval[3] = + (melt_ptr_t) ( /*_.CLASS_ANY_MODULE_CONTEXT__V141*/ meltfptr[140]); MELT_LOCATION ("warmelt-outobj.melt:5979:/ initchunk"); /*^putroutconst */ @@ -43542,13 +43560,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V838*/ meltfptr[837])) + ( /*_._VALROUT___V841*/ meltfptr[840])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_648__SYNTESTGEN_CMATCHER#4", - NULL != ( /*_.CLASS_LOCATED__V143*/ meltfptr[142])); - ((meltroutine_ptr_t) /*_._VALROUT___V838*/ meltfptr[837])->tabval[4] = - (melt_ptr_t) ( /*_.CLASS_LOCATED__V143*/ meltfptr[142]); + melt_checkmsg ("putroutconst constnull.drout_650__SYNTESTGEN_CMATCHER#4", + NULL != ( /*_.CLASS_LOCATED__V144*/ meltfptr[143])); + ((meltroutine_ptr_t) /*_._VALROUT___V841*/ meltfptr[840])->tabval[4] = + (melt_ptr_t) ( /*_.CLASS_LOCATED__V144*/ meltfptr[143]); MELT_LOCATION ("warmelt-outobj.melt:5979:/ initchunk"); /*^putroutconst */ @@ -43556,12 +43574,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V838*/ meltfptr[837])) + ( /*_._VALROUT___V841*/ meltfptr[840])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_648__SYNTESTGEN_CMATCHER#5", + melt_checkmsg ("putroutconst constnull.drout_650__SYNTESTGEN_CMATCHER#5", NULL != ( /*_.CLASS_NAMED__V13*/ meltfptr[12])); - ((meltroutine_ptr_t) /*_._VALROUT___V838*/ meltfptr[837])->tabval[5] = + ((meltroutine_ptr_t) /*_._VALROUT___V841*/ meltfptr[840])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_NAMED__V13*/ meltfptr[12]); MELT_LOCATION ("warmelt-outobj.melt:5979:/ initchunk"); @@ -43570,13 +43588,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V838*/ meltfptr[837])) + ( /*_._VALROUT___V841*/ meltfptr[840])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_648__SYNTESTGEN_CMATCHER#6", - NULL != ( /*_.CLASS_ANY_MATCHER__V150*/ meltfptr[149])); - ((meltroutine_ptr_t) /*_._VALROUT___V838*/ meltfptr[837])->tabval[6] = - (melt_ptr_t) ( /*_.CLASS_ANY_MATCHER__V150*/ meltfptr[149]); + melt_checkmsg ("putroutconst constnull.drout_650__SYNTESTGEN_CMATCHER#6", + NULL != ( /*_.CLASS_ANY_MATCHER__V151*/ meltfptr[150])); + ((meltroutine_ptr_t) /*_._VALROUT___V841*/ meltfptr[840])->tabval[6] = + (melt_ptr_t) ( /*_.CLASS_ANY_MATCHER__V151*/ meltfptr[150]); MELT_LOCATION ("warmelt-outobj.melt:5979:/ initchunk"); /*^putroutconst */ @@ -43584,14 +43602,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V838*/ meltfptr[837])) + ( /*_._VALROUT___V841*/ meltfptr[840])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_648__SYNTESTGEN_CMATCHER#7", + melt_checkmsg ("putroutconst constnull.drout_650__SYNTESTGEN_CMATCHER#7", NULL != - ( /*_.CLASS_SOURCE_DEFCMATCHER__V151*/ meltfptr[150])); - ((meltroutine_ptr_t) /*_._VALROUT___V838*/ meltfptr[837])->tabval[7] = - (melt_ptr_t) ( /*_.CLASS_SOURCE_DEFCMATCHER__V151*/ meltfptr[150]); + ( /*_.CLASS_SOURCE_DEFCMATCHER__V152*/ meltfptr[151])); + ((meltroutine_ptr_t) /*_._VALROUT___V841*/ meltfptr[840])->tabval[7] = + (melt_ptr_t) ( /*_.CLASS_SOURCE_DEFCMATCHER__V152*/ meltfptr[151]); MELT_LOCATION ("warmelt-outobj.melt:5979:/ initchunk"); /*^putroutconst */ @@ -43599,13 +43617,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V838*/ meltfptr[837])) + ( /*_._VALROUT___V841*/ meltfptr[840])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_648__SYNTESTGEN_CMATCHER#8", - NULL != ( /*_.DISCR_MAP_OBJECTS__V147*/ meltfptr[146])); - ((meltroutine_ptr_t) /*_._VALROUT___V838*/ meltfptr[837])->tabval[8] = - (melt_ptr_t) ( /*_.DISCR_MAP_OBJECTS__V147*/ meltfptr[146]); + melt_checkmsg ("putroutconst constnull.drout_650__SYNTESTGEN_CMATCHER#8", + NULL != ( /*_.DISCR_MAP_OBJECTS__V148*/ meltfptr[147])); + ((meltroutine_ptr_t) /*_._VALROUT___V841*/ meltfptr[840])->tabval[8] = + (melt_ptr_t) ( /*_.DISCR_MAP_OBJECTS__V148*/ meltfptr[147]); MELT_LOCATION ("warmelt-outobj.melt:5979:/ initchunk"); /*^putroutconst */ @@ -43613,12 +43631,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V838*/ meltfptr[837])) + ( /*_._VALROUT___V841*/ meltfptr[840])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_648__SYNTESTGEN_CMATCHER#9", + melt_checkmsg ("putroutconst constnull.drout_650__SYNTESTGEN_CMATCHER#9", NULL != ( /*_.DISCR_STRBUF__V68*/ meltfptr[67])); - ((meltroutine_ptr_t) /*_._VALROUT___V838*/ meltfptr[837])->tabval[9] = + ((meltroutine_ptr_t) /*_._VALROUT___V841*/ meltfptr[840])->tabval[9] = (melt_ptr_t) ( /*_.DISCR_STRBUF__V68*/ meltfptr[67]); MELT_LOCATION ("warmelt-outobj.melt:5979:/ initchunk"); @@ -43627,12 +43645,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V838*/ meltfptr[837])) + ( /*_._VALROUT___V841*/ meltfptr[840])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_648__SYNTESTGEN_CMATCHER#10", + melt_checkmsg ("putroutconst constnull.drout_650__SYNTESTGEN_CMATCHER#10", NULL != ( /*_.ADD2OUT__V14*/ meltfptr[13])); - ((meltroutine_ptr_t) /*_._VALROUT___V838*/ meltfptr[837])->tabval[10] = + ((meltroutine_ptr_t) /*_._VALROUT___V841*/ meltfptr[840])->tabval[10] = (melt_ptr_t) ( /*_.ADD2OUT__V14*/ meltfptr[13]); MELT_LOCATION ("warmelt-outobj.melt:5979:/ initchunk"); @@ -43641,49 +43659,49 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V838*/ meltfptr[837])) + ( /*_._VALROUT___V841*/ meltfptr[840])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_648__SYNTESTGEN_CMATCHER#11", - NULL != ( /*_.DISCR_VERBATIM_STRING__V87*/ meltfptr[86])); - ((meltroutine_ptr_t) /*_._VALROUT___V838*/ meltfptr[837])->tabval[11] = - (melt_ptr_t) ( /*_.DISCR_VERBATIM_STRING__V87*/ meltfptr[86]); + melt_checkmsg ("putroutconst constnull.drout_650__SYNTESTGEN_CMATCHER#11", + NULL != ( /*_.DISCR_VERBATIM_STRING__V88*/ meltfptr[87])); + ((meltroutine_ptr_t) /*_._VALROUT___V841*/ meltfptr[840])->tabval[11] = + (melt_ptr_t) ( /*_.DISCR_VERBATIM_STRING__V88*/ meltfptr[87]); MELT_LOCATION ("warmelt-outobj.melt:5979:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V838*/ meltfptr[837])) == + ( /*_._VALROUT___V841*/ meltfptr[840])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V823*/ meltfptr[822]); - ((meltroutine_ptr_t) /*_._VALROUT___V838*/ meltfptr[837])->tabval[12] = - (melt_ptr_t) ( /*_._VALCLO___V823*/ meltfptr[822]); + NULL != /*_._VALCLO___V826*/ meltfptr[825]); + ((meltroutine_ptr_t) /*_._VALROUT___V841*/ meltfptr[840])->tabval[12] = + (melt_ptr_t) ( /*_._VALCLO___V826*/ meltfptr[825]); MELT_LOCATION ("warmelt-outobj.melt:5979:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V838*/ meltfptr[837])) == + ( /*_._VALROUT___V841*/ meltfptr[840])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V268*/ meltfptr[267]); - ((meltroutine_ptr_t) /*_._VALROUT___V838*/ meltfptr[837])->tabval[13] = - (melt_ptr_t) ( /*_._VALCLO___V268*/ meltfptr[267]); + NULL != /*_._VALCLO___V269*/ meltfptr[268]); + ((meltroutine_ptr_t) /*_._VALROUT___V841*/ meltfptr[840])->tabval[13] = + (melt_ptr_t) ( /*_._VALCLO___V269*/ meltfptr[268]); MELT_LOCATION ("warmelt-outobj.melt:5979:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V838*/ meltfptr[837])) == + ( /*_._VALROUT___V841*/ meltfptr[840])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V825*/ meltfptr[824]); - ((meltroutine_ptr_t) /*_._VALROUT___V838*/ meltfptr[837])->tabval[14] = - (melt_ptr_t) ( /*_._VALCLO___V825*/ meltfptr[824]); + NULL != /*_._VALCLO___V828*/ meltfptr[827]); + ((meltroutine_ptr_t) /*_._VALROUT___V841*/ meltfptr[840])->tabval[14] = + (melt_ptr_t) ( /*_._VALCLO___V828*/ meltfptr[827]); MELT_LOCATION ("warmelt-outobj.melt:5979:/ initchunk"); /*^putroutconst */ @@ -43691,12 +43709,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V838*/ meltfptr[837])) + ( /*_._VALROUT___V841*/ meltfptr[840])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_648__SYNTESTGEN_CMATCHER#15", + melt_checkmsg ("putroutconst constnull.drout_650__SYNTESTGEN_CMATCHER#15", NULL != ( /*_.CLASS_ANY_BINDING__V11*/ meltfptr[10])); - ((meltroutine_ptr_t) /*_._VALROUT___V838*/ meltfptr[837])->tabval[15] = + ((meltroutine_ptr_t) /*_._VALROUT___V841*/ meltfptr[840])->tabval[15] = (melt_ptr_t) ( /*_.CLASS_ANY_BINDING__V11*/ meltfptr[10]); MELT_LOCATION ("warmelt-outobj.melt:5979:/ initchunk"); @@ -43705,13 +43723,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V838*/ meltfptr[837])) + ( /*_._VALROUT___V841*/ meltfptr[840])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_648__SYNTESTGEN_CMATCHER#16", - NULL != ( /*_._VALSTR___V839*/ meltfptr[838])); - ((meltroutine_ptr_t) /*_._VALROUT___V838*/ meltfptr[837])->tabval[16] = - (melt_ptr_t) ( /*_._VALSTR___V839*/ meltfptr[838]); + melt_checkmsg ("putroutconst constnull.drout_650__SYNTESTGEN_CMATCHER#16", + NULL != ( /*_._VALSTR___V842*/ meltfptr[841])); + ((meltroutine_ptr_t) /*_._VALROUT___V841*/ meltfptr[840])->tabval[16] = + (melt_ptr_t) ( /*_._VALSTR___V842*/ meltfptr[841]); MELT_LOCATION ("warmelt-outobj.melt:5979:/ initchunk"); /*^putroutconst */ @@ -43719,101 +43737,101 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V838*/ meltfptr[837])) + ( /*_._VALROUT___V841*/ meltfptr[840])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_648__SYNTESTGEN_CMATCHER#17", - NULL != ( /*_._VALSTR___V840*/ meltfptr[839])); - ((meltroutine_ptr_t) /*_._VALROUT___V838*/ meltfptr[837])->tabval[17] = - (melt_ptr_t) ( /*_._VALSTR___V840*/ meltfptr[839]); + melt_checkmsg ("putroutconst constnull.drout_650__SYNTESTGEN_CMATCHER#17", + NULL != ( /*_._VALSTR___V843*/ meltfptr[842])); + ((meltroutine_ptr_t) /*_._VALROUT___V841*/ meltfptr[840])->tabval[17] = + (melt_ptr_t) ( /*_._VALSTR___V843*/ meltfptr[842]); MELT_LOCATION ("warmelt-outobj.melt:5979:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V838*/ meltfptr[837]); + meltgc_touch ( /*_._VALROUT___V841*/ meltfptr[840]); /*putclosurout#120 */ melt_assertmsg ("putclosrout#120 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V841*/ meltfptr[840])) == + ( /*_._VALCLO___V844*/ meltfptr[843])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#120 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V838*/ meltfptr[837])) == + ( /*_._VALROUT___V841*/ meltfptr[840])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V841*/ meltfptr[840])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V838*/ meltfptr[837]); + ((meltclosure_ptr_t) /*_._VALCLO___V844*/ meltfptr[843])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V841*/ meltfptr[840]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V841*/ meltfptr[840]); + meltgc_touch ( /*_._VALCLO___V844*/ meltfptr[843]); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_650__CLASS_CMATCHER @#1", + melt_assertmsg ("checkobj putslot ~dsym_652__CLASS_CMATCHER @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V842*/ meltfptr[841])) == + ( /*_._VALDATA___V845*/ meltfptr[844])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_650__CLASS_CMATCHER @#1", + melt_assertmsg ("checkoff putslot ~dsym_652__CLASS_CMATCHER @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V842*/ - meltfptr[841])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V842*/ meltfptr[841]))->obj_vartab[1] = + ( /*_._VALDATA___V845*/ + meltfptr[844])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V845*/ meltfptr[844]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V843*/ meltfptr[842]); + /*_._VALSTR___V846*/ meltfptr[845]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V842*/ meltfptr[841]); + meltgc_touch ( /*_._VALDATA___V845*/ meltfptr[844]); - melt_dbgtrace_written_object ( /*_._VALDATA___V842*/ meltfptr[841], + melt_dbgtrace_written_object ( /*_._VALDATA___V845*/ meltfptr[844], "new static instance"); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_652__CLASS_ANY_MATCHER @#1", + melt_assertmsg ("checkobj putslot ~dsym_654__CLASS_ANY_MATCHER @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V844*/ meltfptr[843])) == + ( /*_._VALDATA___V847*/ meltfptr[846])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_652__CLASS_ANY_MATCHER @#1", + melt_assertmsg ("checkoff putslot ~dsym_654__CLASS_ANY_MATCHER @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V844*/ - meltfptr[843])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V844*/ meltfptr[843]))->obj_vartab[1] = + ( /*_._VALDATA___V847*/ + meltfptr[846])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V847*/ meltfptr[846]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V845*/ meltfptr[844]); + /*_._VALSTR___V848*/ meltfptr[847]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V844*/ meltfptr[843]); + meltgc_touch ( /*_._VALDATA___V847*/ meltfptr[846]); - melt_dbgtrace_written_object ( /*_._VALDATA___V844*/ meltfptr[843], + melt_dbgtrace_written_object ( /*_._VALDATA___V847*/ meltfptr[846], "new static instance"); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_654__CLASS_SOURCE_DEFCMATCHER @#1", + melt_assertmsg ("checkobj putslot ~dsym_656__CLASS_SOURCE_DEFCMATCHER @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V846*/ meltfptr[845])) == + ( /*_._VALDATA___V849*/ meltfptr[848])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_654__CLASS_SOURCE_DEFCMATCHER @#1", + melt_assertmsg ("checkoff putslot ~dsym_656__CLASS_SOURCE_DEFCMATCHER @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V846*/ - meltfptr[845])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V846*/ meltfptr[845]))->obj_vartab[1] = + ( /*_._VALDATA___V849*/ + meltfptr[848])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V849*/ meltfptr[848]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V847*/ meltfptr[846]); + /*_._VALSTR___V850*/ meltfptr[849]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V846*/ meltfptr[845]); + meltgc_touch ( /*_._VALDATA___V849*/ meltfptr[848]); - melt_dbgtrace_written_object ( /*_._VALDATA___V846*/ meltfptr[845], + melt_dbgtrace_written_object ( /*_._VALDATA___V849*/ meltfptr[848], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:6064:/ initchunk"); @@ -43822,13 +43840,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V848*/ meltfptr[847])) + ( /*_._VALROUT___V851*/ meltfptr[850])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_658__EMIT_SYNTAX_TESTING_ROUTINE#0", + ("putroutconst constnull.drout_660__EMIT_SYNTAX_TESTING_ROUTINE#0", NULL != ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_._VALROUT___V848*/ meltfptr[847])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V851*/ meltfptr[850])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:6064:/ initchunk"); @@ -43837,14 +43855,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V848*/ meltfptr[847])) + ( /*_._VALROUT___V851*/ meltfptr[850])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_658__EMIT_SYNTAX_TESTING_ROUTINE#1", - NULL != ( /*_.CLASS_ANY_MODULE_CONTEXT__V140*/ meltfptr[139])); - ((meltroutine_ptr_t) /*_._VALROUT___V848*/ meltfptr[847])->tabval[1] = - (melt_ptr_t) ( /*_.CLASS_ANY_MODULE_CONTEXT__V140*/ meltfptr[139]); + ("putroutconst constnull.drout_660__EMIT_SYNTAX_TESTING_ROUTINE#1", + NULL != ( /*_.CLASS_ANY_MODULE_CONTEXT__V141*/ meltfptr[140])); + ((meltroutine_ptr_t) /*_._VALROUT___V851*/ meltfptr[850])->tabval[1] = + (melt_ptr_t) ( /*_.CLASS_ANY_MODULE_CONTEXT__V141*/ meltfptr[140]); MELT_LOCATION ("warmelt-outobj.melt:6064:/ initchunk"); /*^putroutconst */ @@ -43852,13 +43870,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V848*/ meltfptr[847])) + ( /*_._VALROUT___V851*/ meltfptr[850])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_658__EMIT_SYNTAX_TESTING_ROUTINE#2", + ("putroutconst constnull.drout_660__EMIT_SYNTAX_TESTING_ROUTINE#2", NULL != ( /*_.DISCR_STRBUF__V68*/ meltfptr[67])); - ((meltroutine_ptr_t) /*_._VALROUT___V848*/ meltfptr[847])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V851*/ meltfptr[850])->tabval[2] = (melt_ptr_t) ( /*_.DISCR_STRBUF__V68*/ meltfptr[67]); MELT_LOCATION ("warmelt-outobj.melt:6064:/ initchunk"); @@ -43867,13 +43885,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V848*/ meltfptr[847])) + ( /*_._VALROUT___V851*/ meltfptr[850])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_658__EMIT_SYNTAX_TESTING_ROUTINE#3", + ("putroutconst constnull.drout_660__EMIT_SYNTAX_TESTING_ROUTINE#3", NULL != ( /*_.ADD2OUT__V14*/ meltfptr[13])); - ((meltroutine_ptr_t) /*_._VALROUT___V848*/ meltfptr[847])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V851*/ meltfptr[850])->tabval[3] = (melt_ptr_t) ( /*_.ADD2OUT__V14*/ meltfptr[13]); MELT_LOCATION ("warmelt-outobj.melt:6064:/ initchunk"); @@ -43882,14 +43900,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V848*/ meltfptr[847])) + ( /*_._VALROUT___V851*/ meltfptr[850])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_658__EMIT_SYNTAX_TESTING_ROUTINE#4", - NULL != ( /*_.DISCR_VERBATIM_STRING__V87*/ meltfptr[86])); - ((meltroutine_ptr_t) /*_._VALROUT___V848*/ meltfptr[847])->tabval[4] = - (melt_ptr_t) ( /*_.DISCR_VERBATIM_STRING__V87*/ meltfptr[86]); + ("putroutconst constnull.drout_660__EMIT_SYNTAX_TESTING_ROUTINE#4", + NULL != ( /*_.DISCR_VERBATIM_STRING__V88*/ meltfptr[87])); + ((meltroutine_ptr_t) /*_._VALROUT___V851*/ meltfptr[850])->tabval[4] = + (melt_ptr_t) ( /*_.DISCR_VERBATIM_STRING__V88*/ meltfptr[87]); MELT_LOCATION ("warmelt-outobj.melt:6064:/ initchunk"); /*^putroutconst */ @@ -43897,46 +43915,46 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V848*/ meltfptr[847])) + ( /*_._VALROUT___V851*/ meltfptr[850])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_658__EMIT_SYNTAX_TESTING_ROUTINE#5", - NULL != ( /*_.CLASS_SOURCE_GENERATOR_DEVICE__V144*/ meltfptr[143])); - ((meltroutine_ptr_t) /*_._VALROUT___V848*/ meltfptr[847])->tabval[5] = - (melt_ptr_t) ( /*_.CLASS_SOURCE_GENERATOR_DEVICE__V144*/ meltfptr[143]); + ("putroutconst constnull.drout_660__EMIT_SYNTAX_TESTING_ROUTINE#5", + NULL != ( /*_.CLASS_SOURCE_GENERATOR_DEVICE__V145*/ meltfptr[144])); + ((meltroutine_ptr_t) /*_._VALROUT___V851*/ meltfptr[850])->tabval[5] = + (melt_ptr_t) ( /*_.CLASS_SOURCE_GENERATOR_DEVICE__V145*/ meltfptr[144]); MELT_LOCATION ("warmelt-outobj.melt:6064:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V848*/ meltfptr[847])) == + ( /*_._VALROUT___V851*/ meltfptr[850])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALDATA___V814*/ meltfptr[813]); - ((meltroutine_ptr_t) /*_._VALROUT___V848*/ meltfptr[847])->tabval[6] = - (melt_ptr_t) ( /*_._VALDATA___V814*/ meltfptr[813]); + NULL != /*_._VALDATA___V817*/ meltfptr[816]); + ((meltroutine_ptr_t) /*_._VALROUT___V851*/ meltfptr[850])->tabval[6] = + (melt_ptr_t) ( /*_._VALDATA___V817*/ meltfptr[816]); MELT_LOCATION ("warmelt-outobj.melt:6064:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V848*/ meltfptr[847]); + meltgc_touch ( /*_._VALROUT___V851*/ meltfptr[850]); /*putclosurout#121 */ melt_assertmsg ("putclosrout#121 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V849*/ meltfptr[848])) == + ( /*_._VALCLO___V852*/ meltfptr[851])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#121 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V848*/ meltfptr[847])) == + ( /*_._VALROUT___V851*/ meltfptr[850])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V849*/ meltfptr[848])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V848*/ meltfptr[847]); + ((meltclosure_ptr_t) /*_._VALCLO___V852*/ meltfptr[851])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V851*/ meltfptr[850]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V849*/ meltfptr[848]); + meltgc_touch ( /*_._VALCLO___V852*/ meltfptr[851]); MELT_LOCATION ("warmelt-outobj.melt:6131:/ initchunk"); /*^putroutconst */ @@ -43944,13 +43962,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V850*/ meltfptr[849])) + ( /*_._VALROUT___V853*/ meltfptr[852])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_660__NORMALIZE_MACROEXPANDED_LIST#0", + ("putroutconst constnull.drout_662__NORMALIZE_MACROEXPANDED_LIST#0", NULL != ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_._VALROUT___V850*/ meltfptr[849])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V853*/ meltfptr[852])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:6131:/ initchunk"); @@ -43959,14 +43977,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V850*/ meltfptr[849])) + ( /*_._VALROUT___V853*/ meltfptr[852])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_660__NORMALIZE_MACROEXPANDED_LIST#1", - NULL != ( /*_.CLASS_ANY_MODULE_CONTEXT__V140*/ meltfptr[139])); - ((meltroutine_ptr_t) /*_._VALROUT___V850*/ meltfptr[849])->tabval[1] = - (melt_ptr_t) ( /*_.CLASS_ANY_MODULE_CONTEXT__V140*/ meltfptr[139]); + ("putroutconst constnull.drout_662__NORMALIZE_MACROEXPANDED_LIST#1", + NULL != ( /*_.CLASS_ANY_MODULE_CONTEXT__V141*/ meltfptr[140])); + ((meltroutine_ptr_t) /*_._VALROUT___V853*/ meltfptr[852])->tabval[1] = + (melt_ptr_t) ( /*_.CLASS_ANY_MODULE_CONTEXT__V141*/ meltfptr[140]); MELT_LOCATION ("warmelt-outobj.melt:6131:/ initchunk"); /*^putroutconst */ @@ -43974,14 +43992,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V850*/ meltfptr[849])) + ( /*_._VALROUT___V853*/ meltfptr[852])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_660__NORMALIZE_MACROEXPANDED_LIST#2", - NULL != ( /*_.CLASS_NORMALIZATION_CONTEXT__V152*/ meltfptr[151])); - ((meltroutine_ptr_t) /*_._VALROUT___V850*/ meltfptr[849])->tabval[2] = - (melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V152*/ meltfptr[151]); + ("putroutconst constnull.drout_662__NORMALIZE_MACROEXPANDED_LIST#2", + NULL != ( /*_.CLASS_NORMALIZATION_CONTEXT__V153*/ meltfptr[152])); + ((meltroutine_ptr_t) /*_._VALROUT___V853*/ meltfptr[852])->tabval[2] = + (melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V153*/ meltfptr[152]); MELT_LOCATION ("warmelt-outobj.melt:6131:/ initchunk"); /*^putroutconst */ @@ -43989,14 +44007,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V850*/ meltfptr[849])) + ( /*_._VALROUT___V853*/ meltfptr[852])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_660__NORMALIZE_MACROEXPANDED_LIST#3", - NULL != ( /*_.CLASS_ENVIRONMENT__V153*/ meltfptr[152])); - ((meltroutine_ptr_t) /*_._VALROUT___V850*/ meltfptr[849])->tabval[3] = - (melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V153*/ meltfptr[152]); + ("putroutconst constnull.drout_662__NORMALIZE_MACROEXPANDED_LIST#3", + NULL != ( /*_.CLASS_ENVIRONMENT__V154*/ meltfptr[153])); + ((meltroutine_ptr_t) /*_._VALROUT___V853*/ meltfptr[852])->tabval[3] = + (melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V154*/ meltfptr[153]); MELT_LOCATION ("warmelt-outobj.melt:6131:/ initchunk"); /*^putroutconst */ @@ -44004,14 +44022,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V850*/ meltfptr[849])) + ( /*_._VALROUT___V853*/ meltfptr[852])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_660__NORMALIZE_MACROEXPANDED_LIST#4", - NULL != ( /*_.CLASS_SOURCE__V154*/ meltfptr[153])); - ((meltroutine_ptr_t) /*_._VALROUT___V850*/ meltfptr[849])->tabval[4] = - (melt_ptr_t) ( /*_.CLASS_SOURCE__V154*/ meltfptr[153]); + ("putroutconst constnull.drout_662__NORMALIZE_MACROEXPANDED_LIST#4", + NULL != ( /*_.CLASS_SOURCE__V155*/ meltfptr[154])); + ((meltroutine_ptr_t) /*_._VALROUT___V853*/ meltfptr[852])->tabval[4] = + (melt_ptr_t) ( /*_.CLASS_SOURCE__V155*/ meltfptr[154]); MELT_LOCATION ("warmelt-outobj.melt:6131:/ initchunk"); /*^putroutconst */ @@ -44019,14 +44037,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V850*/ meltfptr[849])) + ( /*_._VALROUT___V853*/ meltfptr[852])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_660__NORMALIZE_MACROEXPANDED_LIST#5", - NULL != ( /*_.CLASS_LOCATED__V143*/ meltfptr[142])); - ((meltroutine_ptr_t) /*_._VALROUT___V850*/ meltfptr[849])->tabval[5] = - (melt_ptr_t) ( /*_.CLASS_LOCATED__V143*/ meltfptr[142]); + ("putroutconst constnull.drout_662__NORMALIZE_MACROEXPANDED_LIST#5", + NULL != ( /*_.CLASS_LOCATED__V144*/ meltfptr[143])); + ((meltroutine_ptr_t) /*_._VALROUT___V853*/ meltfptr[852])->tabval[5] = + (melt_ptr_t) ( /*_.CLASS_LOCATED__V144*/ meltfptr[143]); MELT_LOCATION ("warmelt-outobj.melt:6131:/ initchunk"); /*^putroutconst */ @@ -44034,16 +44052,16 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V850*/ meltfptr[849])) + ( /*_._VALROUT___V853*/ meltfptr[852])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_660__NORMALIZE_MACROEXPANDED_LIST#6", + ("putroutconst constnull.drout_662__NORMALIZE_MACROEXPANDED_LIST#6", NULL != - ( /*_.CLASS_SOURCE_UPDATE_CURRENT_MODULE_ENVIRONMENT_REFERENCE__V155*/ - meltfptr[154])); - ((meltroutine_ptr_t) /*_._VALROUT___V850*/ meltfptr[849])->tabval[6] = - (melt_ptr_t) ( /*_.CLASS_SOURCE_UPDATE_CURRENT_MODULE_ENVIRONMENT_REFERENCE__V155*/ meltfptr[154]); + ( /*_.CLASS_SOURCE_UPDATE_CURRENT_MODULE_ENVIRONMENT_REFERENCE__V156*/ + meltfptr[155])); + ((meltroutine_ptr_t) /*_._VALROUT___V853*/ meltfptr[852])->tabval[6] = + (melt_ptr_t) ( /*_.CLASS_SOURCE_UPDATE_CURRENT_MODULE_ENVIRONMENT_REFERENCE__V156*/ meltfptr[155]); MELT_LOCATION ("warmelt-outobj.melt:6131:/ initchunk"); /*^putroutconst */ @@ -44051,14 +44069,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V850*/ meltfptr[849])) + ( /*_._VALROUT___V853*/ meltfptr[852])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_660__NORMALIZE_MACROEXPANDED_LIST#7", - NULL != ( /*_._VALSTR___V851*/ meltfptr[850])); - ((meltroutine_ptr_t) /*_._VALROUT___V850*/ meltfptr[849])->tabval[7] = - (melt_ptr_t) ( /*_._VALSTR___V851*/ meltfptr[850]); + ("putroutconst constnull.drout_662__NORMALIZE_MACROEXPANDED_LIST#7", + NULL != ( /*_._VALSTR___V854*/ meltfptr[853])); + ((meltroutine_ptr_t) /*_._VALROUT___V853*/ meltfptr[852])->tabval[7] = + (melt_ptr_t) ( /*_._VALSTR___V854*/ meltfptr[853]); MELT_LOCATION ("warmelt-outobj.melt:6131:/ initchunk"); /*^putroutconst */ @@ -44066,14 +44084,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V850*/ meltfptr[849])) + ( /*_._VALROUT___V853*/ meltfptr[852])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_660__NORMALIZE_MACROEXPANDED_LIST#8", - NULL != ( /*_.CLASS_SOURCE_COMMENT__V156*/ meltfptr[155])); - ((meltroutine_ptr_t) /*_._VALROUT___V850*/ meltfptr[849])->tabval[8] = - (melt_ptr_t) ( /*_.CLASS_SOURCE_COMMENT__V156*/ meltfptr[155]); + ("putroutconst constnull.drout_662__NORMALIZE_MACROEXPANDED_LIST#8", + NULL != ( /*_.CLASS_SOURCE_COMMENT__V157*/ meltfptr[156])); + ((meltroutine_ptr_t) /*_._VALROUT___V853*/ meltfptr[852])->tabval[8] = + (melt_ptr_t) ( /*_.CLASS_SOURCE_COMMENT__V157*/ meltfptr[156]); MELT_LOCATION ("warmelt-outobj.melt:6131:/ initchunk"); /*^putroutconst */ @@ -44081,14 +44099,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V850*/ meltfptr[849])) + ( /*_._VALROUT___V853*/ meltfptr[852])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_660__NORMALIZE_MACROEXPANDED_LIST#9", - NULL != ( /*_.NORMAL_EXP__V157*/ meltfptr[156])); - ((meltroutine_ptr_t) /*_._VALROUT___V850*/ meltfptr[849])->tabval[9] = - (melt_ptr_t) ( /*_.NORMAL_EXP__V157*/ meltfptr[156]); + ("putroutconst constnull.drout_662__NORMALIZE_MACROEXPANDED_LIST#9", + NULL != ( /*_.NORMAL_EXP__V158*/ meltfptr[157])); + ((meltroutine_ptr_t) /*_._VALROUT___V853*/ meltfptr[852])->tabval[9] = + (melt_ptr_t) ( /*_.NORMAL_EXP__V158*/ meltfptr[157]); MELT_LOCATION ("warmelt-outobj.melt:6131:/ initchunk"); /*^putroutconst */ @@ -44096,13 +44114,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V850*/ meltfptr[849])) + ( /*_._VALROUT___V853*/ meltfptr[852])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_660__NORMALIZE_MACROEXPANDED_LIST#10", + ("putroutconst constnull.drout_662__NORMALIZE_MACROEXPANDED_LIST#10", NULL != ( /*_.CLASS_NREP__V38*/ meltfptr[37])); - ((meltroutine_ptr_t) /*_._VALROUT___V850*/ meltfptr[849])->tabval[10] = + ((meltroutine_ptr_t) /*_._VALROUT___V853*/ meltfptr[852])->tabval[10] = (melt_ptr_t) ( /*_.CLASS_NREP__V38*/ meltfptr[37]); MELT_LOCATION ("warmelt-outobj.melt:6131:/ initchunk"); @@ -44111,14 +44129,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V850*/ meltfptr[849])) + ( /*_._VALROUT___V853*/ meltfptr[852])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_660__NORMALIZE_MACROEXPANDED_LIST#11", - NULL != ( /*_.CLASS_NREP_ANYPROC__V158*/ meltfptr[157])); - ((meltroutine_ptr_t) /*_._VALROUT___V850*/ meltfptr[849])->tabval[11] = - (melt_ptr_t) ( /*_.CLASS_NREP_ANYPROC__V158*/ meltfptr[157]); + ("putroutconst constnull.drout_662__NORMALIZE_MACROEXPANDED_LIST#11", + NULL != ( /*_.CLASS_NREP_ANYPROC__V159*/ meltfptr[158])); + ((meltroutine_ptr_t) /*_._VALROUT___V853*/ meltfptr[852])->tabval[11] = + (melt_ptr_t) ( /*_.CLASS_NREP_ANYPROC__V159*/ meltfptr[158]); MELT_LOCATION ("warmelt-outobj.melt:6131:/ initchunk"); /*^putroutconst */ @@ -44126,14 +44144,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V850*/ meltfptr[849])) + ( /*_._VALROUT___V853*/ meltfptr[852])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_660__NORMALIZE_MACROEXPANDED_LIST#12", - NULL != ( /*_.WRAP_NORMAL_LET1__V159*/ meltfptr[158])); - ((meltroutine_ptr_t) /*_._VALROUT___V850*/ meltfptr[849])->tabval[12] = - (melt_ptr_t) ( /*_.WRAP_NORMAL_LET1__V159*/ meltfptr[158]); + ("putroutconst constnull.drout_662__NORMALIZE_MACROEXPANDED_LIST#12", + NULL != ( /*_.WRAP_NORMAL_LET1__V160*/ meltfptr[159])); + ((meltroutine_ptr_t) /*_._VALROUT___V853*/ meltfptr[852])->tabval[12] = + (melt_ptr_t) ( /*_.WRAP_NORMAL_LET1__V160*/ meltfptr[159]); MELT_LOCATION ("warmelt-outobj.melt:6131:/ initchunk"); /*^putroutconst */ @@ -44141,240 +44159,240 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V850*/ meltfptr[849])) + ( /*_._VALROUT___V853*/ meltfptr[852])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_660__NORMALIZE_MACROEXPANDED_LIST#13", - NULL != ( /*_.CLASS_NREP_INITPROC__V160*/ meltfptr[159])); - ((meltroutine_ptr_t) /*_._VALROUT___V850*/ meltfptr[849])->tabval[13] = - (melt_ptr_t) ( /*_.CLASS_NREP_INITPROC__V160*/ meltfptr[159]); + ("putroutconst constnull.drout_662__NORMALIZE_MACROEXPANDED_LIST#13", + NULL != ( /*_.CLASS_NREP_INITPROC__V161*/ meltfptr[160])); + ((meltroutine_ptr_t) /*_._VALROUT___V853*/ meltfptr[852])->tabval[13] = + (melt_ptr_t) ( /*_.CLASS_NREP_INITPROC__V161*/ meltfptr[160]); MELT_LOCATION ("warmelt-outobj.melt:6131:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V850*/ meltfptr[849]); + meltgc_touch ( /*_._VALROUT___V853*/ meltfptr[852]); /*putclosurout#122 */ melt_assertmsg ("putclosrout#122 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V852*/ meltfptr[851])) == + ( /*_._VALCLO___V855*/ meltfptr[854])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#122 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V850*/ meltfptr[849])) == + ( /*_._VALROUT___V853*/ meltfptr[852])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V852*/ meltfptr[851])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V850*/ meltfptr[849]); + ((meltclosure_ptr_t) /*_._VALCLO___V855*/ meltfptr[854])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V853*/ meltfptr[852]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V852*/ meltfptr[851]); + meltgc_touch ( /*_._VALCLO___V855*/ meltfptr[854]); /*putslot */ melt_assertmsg - ("checkobj putslot ~dsym_662__CLASS_NORMALIZATION_CONTEXT @#1", - melt_magic_discr ((melt_ptr_t) ( /*_._VALDATA___V853*/ meltfptr[852])) == + ("checkobj putslot ~dsym_664__CLASS_NORMALIZATION_CONTEXT @#1", + melt_magic_discr ((melt_ptr_t) ( /*_._VALDATA___V856*/ meltfptr[855])) == MELTOBMAG_OBJECT); melt_assertmsg - ("checkoff putslot ~dsym_662__CLASS_NORMALIZATION_CONTEXT @#1", + ("checkoff putslot ~dsym_664__CLASS_NORMALIZATION_CONTEXT @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V853*/ meltfptr[852])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V853*/ meltfptr[852]))->obj_vartab[1] = + ( /*_._VALDATA___V856*/ meltfptr[855])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V856*/ meltfptr[855]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V854*/ meltfptr[853]); + /*_._VALSTR___V857*/ meltfptr[856]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V853*/ meltfptr[852]); + meltgc_touch ( /*_._VALDATA___V856*/ meltfptr[855]); - melt_dbgtrace_written_object ( /*_._VALDATA___V853*/ meltfptr[852], + melt_dbgtrace_written_object ( /*_._VALDATA___V856*/ meltfptr[855], "new static instance"); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_664__CLASS_ENVIRONMENT @#1", + melt_assertmsg ("checkobj putslot ~dsym_666__CLASS_ENVIRONMENT @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V855*/ meltfptr[854])) == + ( /*_._VALDATA___V858*/ meltfptr[857])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_664__CLASS_ENVIRONMENT @#1", + melt_assertmsg ("checkoff putslot ~dsym_666__CLASS_ENVIRONMENT @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V855*/ - meltfptr[854])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V855*/ meltfptr[854]))->obj_vartab[1] = + ( /*_._VALDATA___V858*/ + meltfptr[857])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V858*/ meltfptr[857]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V856*/ meltfptr[855]); + /*_._VALSTR___V859*/ meltfptr[858]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V855*/ meltfptr[854]); + meltgc_touch ( /*_._VALDATA___V858*/ meltfptr[857]); - melt_dbgtrace_written_object ( /*_._VALDATA___V855*/ meltfptr[854], + melt_dbgtrace_written_object ( /*_._VALDATA___V858*/ meltfptr[857], "new static instance"); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_666__CLASS_SOURCE @#1", + melt_assertmsg ("checkobj putslot ~dsym_668__CLASS_SOURCE @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V857*/ meltfptr[856])) == + ( /*_._VALDATA___V860*/ meltfptr[859])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_666__CLASS_SOURCE @#1", + melt_assertmsg ("checkoff putslot ~dsym_668__CLASS_SOURCE @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V857*/ - meltfptr[856])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V857*/ meltfptr[856]))->obj_vartab[1] = + ( /*_._VALDATA___V860*/ + meltfptr[859])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V860*/ meltfptr[859]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V858*/ meltfptr[857]); + /*_._VALSTR___V861*/ meltfptr[860]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V857*/ meltfptr[856]); + meltgc_touch ( /*_._VALDATA___V860*/ meltfptr[859]); - melt_dbgtrace_written_object ( /*_._VALDATA___V857*/ meltfptr[856], + melt_dbgtrace_written_object ( /*_._VALDATA___V860*/ meltfptr[859], "new static instance"); /*putslot */ melt_assertmsg - ("checkobj putslot ~dsym_668__CLASS_SOURCE_UPDATE_CURRENT_MODULE_ENVIRONMENT_REFERENCE @#1", - melt_magic_discr ((melt_ptr_t) ( /*_._VALDATA___V859*/ meltfptr[858])) == + ("checkobj putslot ~dsym_670__CLASS_SOURCE_UPDATE_CURRENT_MODULE_ENVIRONMENT_REFERENCE @#1", + melt_magic_discr ((melt_ptr_t) ( /*_._VALDATA___V862*/ meltfptr[861])) == MELTOBMAG_OBJECT); melt_assertmsg - ("checkoff putslot ~dsym_668__CLASS_SOURCE_UPDATE_CURRENT_MODULE_ENVIRONMENT_REFERENCE @#1", + ("checkoff putslot ~dsym_670__CLASS_SOURCE_UPDATE_CURRENT_MODULE_ENVIRONMENT_REFERENCE @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V859*/ meltfptr[858])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V859*/ meltfptr[858]))->obj_vartab[1] = + ( /*_._VALDATA___V862*/ meltfptr[861])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V862*/ meltfptr[861]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V860*/ meltfptr[859]); + /*_._VALSTR___V863*/ meltfptr[862]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V859*/ meltfptr[858]); + meltgc_touch ( /*_._VALDATA___V862*/ meltfptr[861]); - melt_dbgtrace_written_object ( /*_._VALDATA___V859*/ meltfptr[858], + melt_dbgtrace_written_object ( /*_._VALDATA___V862*/ meltfptr[861], "new static instance"); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_671__CLASS_SOURCE_COMMENT @#1", + melt_assertmsg ("checkobj putslot ~dsym_673__CLASS_SOURCE_COMMENT @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V861*/ meltfptr[860])) == + ( /*_._VALDATA___V864*/ meltfptr[863])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_671__CLASS_SOURCE_COMMENT @#1", + melt_assertmsg ("checkoff putslot ~dsym_673__CLASS_SOURCE_COMMENT @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V861*/ - meltfptr[860])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V861*/ meltfptr[860]))->obj_vartab[1] = + ( /*_._VALDATA___V864*/ + meltfptr[863])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V864*/ meltfptr[863]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V862*/ meltfptr[861]); + /*_._VALSTR___V865*/ meltfptr[864]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V861*/ meltfptr[860]); + meltgc_touch ( /*_._VALDATA___V864*/ meltfptr[863]); - melt_dbgtrace_written_object ( /*_._VALDATA___V861*/ meltfptr[860], + melt_dbgtrace_written_object ( /*_._VALDATA___V864*/ meltfptr[863], "new static instance"); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_673__NORMAL_EXP @#1", + melt_assertmsg ("checkobj putslot ~dsym_675__NORMAL_EXP @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V863*/ meltfptr[862])) == + ( /*_._VALDATA___V866*/ meltfptr[865])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_673__NORMAL_EXP @#1", + melt_assertmsg ("checkoff putslot ~dsym_675__NORMAL_EXP @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V863*/ - meltfptr[862])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V863*/ meltfptr[862]))->obj_vartab[1] = + ( /*_._VALDATA___V866*/ + meltfptr[865])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V866*/ meltfptr[865]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V864*/ meltfptr[863]); + /*_._VALSTR___V867*/ meltfptr[866]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V863*/ meltfptr[862]); + meltgc_touch ( /*_._VALDATA___V866*/ meltfptr[865]); - melt_dbgtrace_written_object ( /*_._VALDATA___V863*/ meltfptr[862], + melt_dbgtrace_written_object ( /*_._VALDATA___V866*/ meltfptr[865], "new static instance"); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_675__CLASS_NREP_ANYPROC @#1", + melt_assertmsg ("checkobj putslot ~dsym_677__CLASS_NREP_ANYPROC @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V865*/ meltfptr[864])) == + ( /*_._VALDATA___V868*/ meltfptr[867])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_675__CLASS_NREP_ANYPROC @#1", + melt_assertmsg ("checkoff putslot ~dsym_677__CLASS_NREP_ANYPROC @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V865*/ - meltfptr[864])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V865*/ meltfptr[864]))->obj_vartab[1] = + ( /*_._VALDATA___V868*/ + meltfptr[867])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V868*/ meltfptr[867]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V866*/ meltfptr[865]); + /*_._VALSTR___V869*/ meltfptr[868]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V865*/ meltfptr[864]); + meltgc_touch ( /*_._VALDATA___V868*/ meltfptr[867]); - melt_dbgtrace_written_object ( /*_._VALDATA___V865*/ meltfptr[864], + melt_dbgtrace_written_object ( /*_._VALDATA___V868*/ meltfptr[867], "new static instance"); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_677__WRAP_NORMAL_LET1 @#1", + melt_assertmsg ("checkobj putslot ~dsym_679__WRAP_NORMAL_LET1 @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V867*/ meltfptr[866])) == + ( /*_._VALDATA___V870*/ meltfptr[869])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_677__WRAP_NORMAL_LET1 @#1", + melt_assertmsg ("checkoff putslot ~dsym_679__WRAP_NORMAL_LET1 @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V867*/ - meltfptr[866])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V867*/ meltfptr[866]))->obj_vartab[1] = + ( /*_._VALDATA___V870*/ + meltfptr[869])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V870*/ meltfptr[869]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V868*/ meltfptr[867]); + /*_._VALSTR___V871*/ meltfptr[870]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V867*/ meltfptr[866]); + meltgc_touch ( /*_._VALDATA___V870*/ meltfptr[869]); - melt_dbgtrace_written_object ( /*_._VALDATA___V867*/ meltfptr[866], + melt_dbgtrace_written_object ( /*_._VALDATA___V870*/ meltfptr[869], "new static instance"); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_679__CLASS_NREP_INITPROC @#1", + melt_assertmsg ("checkobj putslot ~dsym_681__CLASS_NREP_INITPROC @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V869*/ meltfptr[868])) == + ( /*_._VALDATA___V872*/ meltfptr[871])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_679__CLASS_NREP_INITPROC @#1", + melt_assertmsg ("checkoff putslot ~dsym_681__CLASS_NREP_INITPROC @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V869*/ - meltfptr[868])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V869*/ meltfptr[868]))->obj_vartab[1] = + ( /*_._VALDATA___V872*/ + meltfptr[871])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V872*/ meltfptr[871]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V870*/ meltfptr[869]); + /*_._VALSTR___V873*/ meltfptr[872]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V869*/ meltfptr[868]); + meltgc_touch ( /*_._VALDATA___V872*/ meltfptr[871]); - melt_dbgtrace_written_object ( /*_._VALDATA___V869*/ meltfptr[868], + melt_dbgtrace_written_object ( /*_._VALDATA___V872*/ meltfptr[871], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:6223:/ initchunk"); @@ -44383,13 +44401,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V871*/ meltfptr[870])) + ( /*_._VALROUT___V874*/ meltfptr[873])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_681__OUTPUT_HOOKS_WITH_MODVAR#0", + ("putroutconst constnull.drout_683__OUTPUT_HOOKS_WITH_MODVAR#0", NULL != ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_._VALROUT___V871*/ meltfptr[870])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V874*/ meltfptr[873])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:6223:/ initchunk"); @@ -44398,13 +44416,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V871*/ meltfptr[870])) + ( /*_._VALROUT___V874*/ meltfptr[873])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_681__OUTPUT_HOOKS_WITH_MODVAR#1", + ("putroutconst constnull.drout_683__OUTPUT_HOOKS_WITH_MODVAR#1", NULL != ( /*_.ADD2OUT__V14*/ meltfptr[13])); - ((meltroutine_ptr_t) /*_._VALROUT___V871*/ meltfptr[870])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V874*/ meltfptr[873])->tabval[1] = (melt_ptr_t) ( /*_.ADD2OUT__V14*/ meltfptr[13]); MELT_LOCATION ("warmelt-outobj.melt:6223:/ initchunk"); @@ -44413,13 +44431,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V871*/ meltfptr[870])) + ( /*_._VALROUT___V874*/ meltfptr[873])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_681__OUTPUT_HOOKS_WITH_MODVAR#2", + ("putroutconst constnull.drout_683__OUTPUT_HOOKS_WITH_MODVAR#2", NULL != ( /*_.CLASS_HOOKROUTINEOBJ__V60*/ meltfptr[59])); - ((meltroutine_ptr_t) /*_._VALROUT___V871*/ meltfptr[870])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V874*/ meltfptr[873])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_HOOKROUTINEOBJ__V60*/ meltfptr[59]); MELT_LOCATION ("warmelt-outobj.melt:6223:/ initchunk"); @@ -44428,13 +44446,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V871*/ meltfptr[870])) + ( /*_._VALROUT___V874*/ meltfptr[873])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_681__OUTPUT_HOOKS_WITH_MODVAR#3", + ("putroutconst constnull.drout_683__OUTPUT_HOOKS_WITH_MODVAR#3", NULL != ( /*_.CLASS_ROUTINEOBJ__V58*/ meltfptr[57])); - ((meltroutine_ptr_t) /*_._VALROUT___V871*/ meltfptr[870])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V874*/ meltfptr[873])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_ROUTINEOBJ__V58*/ meltfptr[57]); MELT_LOCATION ("warmelt-outobj.melt:6223:/ initchunk"); @@ -44443,14 +44461,29 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V871*/ meltfptr[870])) + ( /*_._VALROUT___V874*/ meltfptr[873])) + == MELTOBMAG_ROUTINE); + if (MELT_HAS_INITIAL_ENVIRONMENT) + melt_checkmsg + ("putroutconst constnull.drout_683__OUTPUT_HOOKS_WITH_MODVAR#4", + NULL != ( /*_.CLASS_NREP_HOOKPROC__V70*/ meltfptr[69])); + ((meltroutine_ptr_t) /*_._VALROUT___V874*/ meltfptr[873])->tabval[4] = + (melt_ptr_t) ( /*_.CLASS_NREP_HOOKPROC__V70*/ meltfptr[69]); + + MELT_LOCATION ("warmelt-outobj.melt:6223:/ initchunk"); + /*^putroutconst */ + /*putroutconst */ + if (MELT_HAS_INITIAL_ENVIRONMENT) + melt_assertmsg ("putroutconst checkrout", + melt_magic_discr ((melt_ptr_t) + ( /*_._VALROUT___V874*/ meltfptr[873])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_681__OUTPUT_HOOKS_WITH_MODVAR#4", - NULL != ( /*_.CLASS_NREP_HOOKPROC__V44*/ meltfptr[43])); - ((meltroutine_ptr_t) /*_._VALROUT___V871*/ meltfptr[870])->tabval[4] = - (melt_ptr_t) ( /*_.CLASS_NREP_HOOKPROC__V44*/ meltfptr[43]); + ("putroutconst constnull.drout_683__OUTPUT_HOOKS_WITH_MODVAR#5", + NULL != ( /*_.CLASS_NREP_DATAHOOK__V162*/ meltfptr[161])); + ((meltroutine_ptr_t) /*_._VALROUT___V874*/ meltfptr[873])->tabval[5] = + (melt_ptr_t) ( /*_.CLASS_NREP_DATAHOOK__V162*/ meltfptr[161]); MELT_LOCATION ("warmelt-outobj.melt:6223:/ initchunk"); /*^putroutconst */ @@ -44458,28 +44491,41 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V871*/ meltfptr[870])) + ( /*_._VALROUT___V874*/ meltfptr[873])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_681__OUTPUT_HOOKS_WITH_MODVAR#5", - NULL != ( /*_.CLASS_NREP_DATAHOOK__V161*/ meltfptr[160])); - ((meltroutine_ptr_t) /*_._VALROUT___V871*/ meltfptr[870])->tabval[5] = - (melt_ptr_t) ( /*_.CLASS_NREP_DATAHOOK__V161*/ meltfptr[160]); + ("putroutconst constnull.drout_683__OUTPUT_HOOKS_WITH_MODVAR#6", + NULL != ( /*_.CLASS_NREP_CLOSPROC__V44*/ meltfptr[43])); + ((meltroutine_ptr_t) /*_._VALROUT___V874*/ meltfptr[873])->tabval[6] = + (melt_ptr_t) ( /*_.CLASS_NREP_CLOSPROC__V44*/ meltfptr[43]); + +#undef meltfram__ +} /*end of meltmod__WARMELTmiOUTOBJ__initialmeltchunk_14 */ + +void +meltmod__WARMELTmiOUTOBJ__initialmeltchunk_15 (meltinitial_frame_t * + meltmeltframptr__, + char meltpredefinited[]) +{ +#define meltfram__ (*meltmeltframptr__) +#undef meltcallcount +#define meltcallcount 0L + (void) meltpredefinited; MELT_LOCATION ("warmelt-outobj.melt:6223:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V871*/ meltfptr[870])) + ( /*_._VALROUT___V874*/ meltfptr[873])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_681__OUTPUT_HOOKS_WITH_MODVAR#6", + ("putroutconst constnull.drout_683__OUTPUT_HOOKS_WITH_MODVAR#7", NULL != ( /*_.CLASS_CTYPE__V28*/ meltfptr[27])); - ((meltroutine_ptr_t) /*_._VALROUT___V871*/ meltfptr[870])->tabval[6] = + ((meltroutine_ptr_t) /*_._VALROUT___V874*/ meltfptr[873])->tabval[7] = (melt_ptr_t) ( /*_.CLASS_CTYPE__V28*/ meltfptr[27]); MELT_LOCATION ("warmelt-outobj.melt:6223:/ initchunk"); @@ -44488,14 +44534,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V871*/ meltfptr[870])) + ( /*_._VALROUT___V874*/ meltfptr[873])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_681__OUTPUT_HOOKS_WITH_MODVAR#7", - NULL != ( /*_.CLASS_FORMAL_BINDING__V72*/ meltfptr[71])); - ((meltroutine_ptr_t) /*_._VALROUT___V871*/ meltfptr[870])->tabval[7] = - (melt_ptr_t) ( /*_.CLASS_FORMAL_BINDING__V72*/ meltfptr[71]); + ("putroutconst constnull.drout_683__OUTPUT_HOOKS_WITH_MODVAR#8", + NULL != ( /*_.CLASS_FORMAL_BINDING__V73*/ meltfptr[72])); + ((meltroutine_ptr_t) /*_._VALROUT___V874*/ meltfptr[873])->tabval[8] = + (melt_ptr_t) ( /*_.CLASS_FORMAL_BINDING__V73*/ meltfptr[72]); MELT_LOCATION ("warmelt-outobj.melt:6223:/ initchunk"); /*^putroutconst */ @@ -44503,13 +44549,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V871*/ meltfptr[870])) + ( /*_._VALROUT___V874*/ meltfptr[873])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_681__OUTPUT_HOOKS_WITH_MODVAR#8", + ("putroutconst constnull.drout_683__OUTPUT_HOOKS_WITH_MODVAR#9", NULL != ( /*_.CLASS_ANY_BINDING__V11*/ meltfptr[10])); - ((meltroutine_ptr_t) /*_._VALROUT___V871*/ meltfptr[870])->tabval[8] = + ((meltroutine_ptr_t) /*_._VALROUT___V874*/ meltfptr[873])->tabval[9] = (melt_ptr_t) ( /*_.CLASS_ANY_BINDING__V11*/ meltfptr[10]); MELT_LOCATION ("warmelt-outobj.melt:6223:/ initchunk"); @@ -44518,81 +44564,68 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_14 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V871*/ meltfptr[870])) + ( /*_._VALROUT___V874*/ meltfptr[873])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_681__OUTPUT_HOOKS_WITH_MODVAR#9", + ("putroutconst constnull.drout_683__OUTPUT_HOOKS_WITH_MODVAR#10", NULL != ( /*_.CLASS_NAMED__V13*/ meltfptr[12])); - ((meltroutine_ptr_t) /*_._VALROUT___V871*/ meltfptr[870])->tabval[9] = + ((meltroutine_ptr_t) /*_._VALROUT___V874*/ meltfptr[873])->tabval[10] = (melt_ptr_t) ( /*_.CLASS_NAMED__V13*/ meltfptr[12]); - -#undef meltfram__ -} /*end of meltmod__WARMELTmiOUTOBJ__initialmeltchunk_14 */ - -void -meltmod__WARMELTmiOUTOBJ__initialmeltchunk_15 (meltinitial_frame_t * - meltmeltframptr__, - char meltpredefinited[]) -{ -#define meltfram__ (*meltmeltframptr__) -#undef meltcallcount -#define meltcallcount 0L - (void) meltpredefinited; MELT_LOCATION ("warmelt-outobj.melt:6223:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V871*/ meltfptr[870])) == + ( /*_._VALROUT___V874*/ meltfptr[873])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V216*/ meltfptr[215]); - ((meltroutine_ptr_t) /*_._VALROUT___V871*/ meltfptr[870])->tabval[10] = - (melt_ptr_t) ( /*_._VALCLO___V216*/ meltfptr[215]); + NULL != /*_._VALCLO___V217*/ meltfptr[216]); + ((meltroutine_ptr_t) /*_._VALROUT___V874*/ meltfptr[873])->tabval[11] = + (melt_ptr_t) ( /*_._VALCLO___V217*/ meltfptr[216]); MELT_LOCATION ("warmelt-outobj.melt:6223:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V871*/ meltfptr[870]); + meltgc_touch ( /*_._VALROUT___V874*/ meltfptr[873]); /*putclosurout#123 */ melt_assertmsg ("putclosrout#123 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V872*/ meltfptr[871])) == + ( /*_._VALCLO___V875*/ meltfptr[874])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#123 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V871*/ meltfptr[870])) == + ( /*_._VALROUT___V874*/ meltfptr[873])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V872*/ meltfptr[871])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V871*/ meltfptr[870]); + ((meltclosure_ptr_t) /*_._VALCLO___V875*/ meltfptr[874])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V874*/ meltfptr[873]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V872*/ meltfptr[871]); + meltgc_touch ( /*_._VALCLO___V875*/ meltfptr[874]); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_683__CLASS_NREP_DATAHOOK @#1", + melt_assertmsg ("checkobj putslot ~dsym_685__CLASS_NREP_DATAHOOK @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V873*/ meltfptr[872])) == + ( /*_._VALDATA___V876*/ meltfptr[875])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_683__CLASS_NREP_DATAHOOK @#1", + melt_assertmsg ("checkoff putslot ~dsym_685__CLASS_NREP_DATAHOOK @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V873*/ - meltfptr[872])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V873*/ meltfptr[872]))->obj_vartab[1] = + ( /*_._VALDATA___V876*/ + meltfptr[875])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V876*/ meltfptr[875]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V874*/ meltfptr[873]); + /*_._VALSTR___V877*/ meltfptr[876]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V873*/ meltfptr[872]); + meltgc_touch ( /*_._VALDATA___V876*/ meltfptr[875]); - melt_dbgtrace_written_object ( /*_._VALDATA___V873*/ meltfptr[872], + melt_dbgtrace_written_object ( /*_._VALDATA___V876*/ meltfptr[875], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:6360:/ initchunk"); @@ -44601,13 +44634,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_15 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V875*/ meltfptr[874])) + ( /*_._VALROUT___V878*/ meltfptr[877])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_685__TRANSLATE_MACROEXPANDED_LIST#0", + ("putroutconst constnull.drout_687__TRANSLATE_MACROEXPANDED_LIST#0", NULL != ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_._VALROUT___V875*/ meltfptr[874])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V878*/ meltfptr[877])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:6360:/ initchunk"); @@ -44616,14 +44649,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_15 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V875*/ meltfptr[874])) + ( /*_._VALROUT___V878*/ meltfptr[877])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_685__TRANSLATE_MACROEXPANDED_LIST#1", - NULL != ( /*_.CLASS_ANY_MODULE_CONTEXT__V140*/ meltfptr[139])); - ((meltroutine_ptr_t) /*_._VALROUT___V875*/ meltfptr[874])->tabval[1] = - (melt_ptr_t) ( /*_.CLASS_ANY_MODULE_CONTEXT__V140*/ meltfptr[139]); + ("putroutconst constnull.drout_687__TRANSLATE_MACROEXPANDED_LIST#1", + NULL != ( /*_.CLASS_ANY_MODULE_CONTEXT__V141*/ meltfptr[140])); + ((meltroutine_ptr_t) /*_._VALROUT___V878*/ meltfptr[877])->tabval[1] = + (melt_ptr_t) ( /*_.CLASS_ANY_MODULE_CONTEXT__V141*/ meltfptr[140]); MELT_LOCATION ("warmelt-outobj.melt:6360:/ initchunk"); /*^putroutconst */ @@ -44631,14 +44664,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_15 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V875*/ meltfptr[874])) + ( /*_._VALROUT___V878*/ meltfptr[877])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_685__TRANSLATE_MACROEXPANDED_LIST#2", - NULL != ( /*_.CLASS_NORMALIZATION_CONTEXT__V152*/ meltfptr[151])); - ((meltroutine_ptr_t) /*_._VALROUT___V875*/ meltfptr[874])->tabval[2] = - (melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V152*/ meltfptr[151]); + ("putroutconst constnull.drout_687__TRANSLATE_MACROEXPANDED_LIST#2", + NULL != ( /*_.CLASS_NORMALIZATION_CONTEXT__V153*/ meltfptr[152])); + ((meltroutine_ptr_t) /*_._VALROUT___V878*/ meltfptr[877])->tabval[2] = + (melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V153*/ meltfptr[152]); MELT_LOCATION ("warmelt-outobj.melt:6360:/ initchunk"); /*^putroutconst */ @@ -44646,14 +44679,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_15 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V875*/ meltfptr[874])) + ( /*_._VALROUT___V878*/ meltfptr[877])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_685__TRANSLATE_MACROEXPANDED_LIST#3", - NULL != ( /*_.CLASS_ENVIRONMENT__V153*/ meltfptr[152])); - ((meltroutine_ptr_t) /*_._VALROUT___V875*/ meltfptr[874])->tabval[3] = - (melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V153*/ meltfptr[152]); + ("putroutconst constnull.drout_687__TRANSLATE_MACROEXPANDED_LIST#3", + NULL != ( /*_.CLASS_ENVIRONMENT__V154*/ meltfptr[153])); + ((meltroutine_ptr_t) /*_._VALROUT___V878*/ meltfptr[877])->tabval[3] = + (melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V154*/ meltfptr[153]); MELT_LOCATION ("warmelt-outobj.melt:6360:/ initchunk"); /*^putroutconst */ @@ -44661,13 +44694,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_15 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V875*/ meltfptr[874])) + ( /*_._VALROUT___V878*/ meltfptr[877])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_685__TRANSLATE_MACROEXPANDED_LIST#4", + ("putroutconst constnull.drout_687__TRANSLATE_MACROEXPANDED_LIST#4", NULL != ( /*_.DISCR_STRBUF__V68*/ meltfptr[67])); - ((meltroutine_ptr_t) /*_._VALROUT___V875*/ meltfptr[874])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V878*/ meltfptr[877])->tabval[4] = (melt_ptr_t) ( /*_.DISCR_STRBUF__V68*/ meltfptr[67]); MELT_LOCATION ("warmelt-outobj.melt:6360:/ initchunk"); @@ -44675,12 +44708,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_15 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V875*/ meltfptr[874])) == + ( /*_._VALROUT___V878*/ meltfptr[877])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V852*/ meltfptr[851]); - ((meltroutine_ptr_t) /*_._VALROUT___V875*/ meltfptr[874])->tabval[5] = - (melt_ptr_t) ( /*_._VALCLO___V852*/ meltfptr[851]); + NULL != /*_._VALCLO___V855*/ meltfptr[854]); + ((meltroutine_ptr_t) /*_._VALROUT___V878*/ meltfptr[877])->tabval[5] = + (melt_ptr_t) ( /*_._VALCLO___V855*/ meltfptr[854]); MELT_LOCATION ("warmelt-outobj.melt:6360:/ initchunk"); /*^putroutconst */ @@ -44688,14 +44721,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_15 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V875*/ meltfptr[874])) + ( /*_._VALROUT___V878*/ meltfptr[877])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_685__TRANSLATE_MACROEXPANDED_LIST#6", - NULL != ( /*_._VALSTR___V876*/ meltfptr[875])); - ((meltroutine_ptr_t) /*_._VALROUT___V875*/ meltfptr[874])->tabval[6] = - (melt_ptr_t) ( /*_._VALSTR___V876*/ meltfptr[875]); + ("putroutconst constnull.drout_687__TRANSLATE_MACROEXPANDED_LIST#6", + NULL != ( /*_._VALSTR___V879*/ meltfptr[878])); + ((meltroutine_ptr_t) /*_._VALROUT___V878*/ meltfptr[877])->tabval[6] = + (melt_ptr_t) ( /*_._VALSTR___V879*/ meltfptr[878]); MELT_LOCATION ("warmelt-outobj.melt:6360:/ initchunk"); /*^putroutconst */ @@ -44703,13 +44736,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_15 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V875*/ meltfptr[874])) + ( /*_._VALROUT___V878*/ meltfptr[877])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_685__TRANSLATE_MACROEXPANDED_LIST#7", + ("putroutconst constnull.drout_687__TRANSLATE_MACROEXPANDED_LIST#7", NULL != ( /*_.DISCR_LIST__V65*/ meltfptr[64])); - ((meltroutine_ptr_t) /*_._VALROUT___V875*/ meltfptr[874])->tabval[7] = + ((meltroutine_ptr_t) /*_._VALROUT___V878*/ meltfptr[877])->tabval[7] = (melt_ptr_t) ( /*_.DISCR_LIST__V65*/ meltfptr[64]); MELT_LOCATION ("warmelt-outobj.melt:6360:/ initchunk"); @@ -44718,14 +44751,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_15 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V875*/ meltfptr[874])) + ( /*_._VALROUT___V878*/ meltfptr[877])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_685__TRANSLATE_MACROEXPANDED_LIST#8", - NULL != ( /*_.DISCR_MAP_OBJECTS__V147*/ meltfptr[146])); - ((meltroutine_ptr_t) /*_._VALROUT___V875*/ meltfptr[874])->tabval[8] = - (melt_ptr_t) ( /*_.DISCR_MAP_OBJECTS__V147*/ meltfptr[146]); + ("putroutconst constnull.drout_687__TRANSLATE_MACROEXPANDED_LIST#8", + NULL != ( /*_.DISCR_MAP_OBJECTS__V148*/ meltfptr[147])); + ((meltroutine_ptr_t) /*_._VALROUT___V878*/ meltfptr[877])->tabval[8] = + (melt_ptr_t) ( /*_.DISCR_MAP_OBJECTS__V148*/ meltfptr[147]); MELT_LOCATION ("warmelt-outobj.melt:6360:/ initchunk"); /*^putroutconst */ @@ -44733,14 +44766,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_15 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V875*/ meltfptr[874])) + ( /*_._VALROUT___V878*/ meltfptr[877])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_685__TRANSLATE_MACROEXPANDED_LIST#9", - NULL != ( /*_.CLASS_NREP_HOOKPROC__V44*/ meltfptr[43])); - ((meltroutine_ptr_t) /*_._VALROUT___V875*/ meltfptr[874])->tabval[9] = - (melt_ptr_t) ( /*_.CLASS_NREP_HOOKPROC__V44*/ meltfptr[43]); + ("putroutconst constnull.drout_687__TRANSLATE_MACROEXPANDED_LIST#9", + NULL != ( /*_.CLASS_NREP_HOOKPROC__V70*/ meltfptr[69])); + ((meltroutine_ptr_t) /*_._VALROUT___V878*/ meltfptr[877])->tabval[9] = + (melt_ptr_t) ( /*_.CLASS_NREP_HOOKPROC__V70*/ meltfptr[69]); MELT_LOCATION ("warmelt-outobj.melt:6360:/ initchunk"); /*^putroutconst */ @@ -44748,14 +44781,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_15 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V875*/ meltfptr[874])) + ( /*_._VALROUT___V878*/ meltfptr[877])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_685__TRANSLATE_MACROEXPANDED_LIST#10", - NULL != ( /*_.COMPILE2OBJ_HOOK__V162*/ meltfptr[161])); - ((meltroutine_ptr_t) /*_._VALROUT___V875*/ meltfptr[874])->tabval[10] = - (melt_ptr_t) ( /*_.COMPILE2OBJ_HOOK__V162*/ meltfptr[161]); + ("putroutconst constnull.drout_687__TRANSLATE_MACROEXPANDED_LIST#10", + NULL != ( /*_.COMPILE2OBJ_HOOK__V163*/ meltfptr[162])); + ((meltroutine_ptr_t) /*_._VALROUT___V878*/ meltfptr[877])->tabval[10] = + (melt_ptr_t) ( /*_.COMPILE2OBJ_HOOK__V163*/ meltfptr[162]); MELT_LOCATION ("warmelt-outobj.melt:6360:/ initchunk"); /*^putroutconst */ @@ -44763,14 +44796,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_15 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V875*/ meltfptr[874])) + ( /*_._VALROUT___V878*/ meltfptr[877])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_685__TRANSLATE_MACROEXPANDED_LIST#11", - NULL != ( /*_.CLASS_NREP_ANYPROC__V158*/ meltfptr[157])); - ((meltroutine_ptr_t) /*_._VALROUT___V875*/ meltfptr[874])->tabval[11] = - (melt_ptr_t) ( /*_.CLASS_NREP_ANYPROC__V158*/ meltfptr[157]); + ("putroutconst constnull.drout_687__TRANSLATE_MACROEXPANDED_LIST#11", + NULL != ( /*_.CLASS_NREP_ANYPROC__V159*/ meltfptr[158])); + ((meltroutine_ptr_t) /*_._VALROUT___V878*/ meltfptr[877])->tabval[11] = + (melt_ptr_t) ( /*_.CLASS_NREP_ANYPROC__V159*/ meltfptr[158]); MELT_LOCATION ("warmelt-outobj.melt:6360:/ initchunk"); /*^putroutconst */ @@ -44778,14 +44811,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_15 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V875*/ meltfptr[874])) + ( /*_._VALROUT___V878*/ meltfptr[877])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_685__TRANSLATE_MACROEXPANDED_LIST#12", - NULL != ( /*_.COMPILE2OBJ_PROCEDURE__V163*/ meltfptr[162])); - ((meltroutine_ptr_t) /*_._VALROUT___V875*/ meltfptr[874])->tabval[12] = - (melt_ptr_t) ( /*_.COMPILE2OBJ_PROCEDURE__V163*/ meltfptr[162]); + ("putroutconst constnull.drout_687__TRANSLATE_MACROEXPANDED_LIST#12", + NULL != ( /*_.COMPILE2OBJ_PROCEDURE__V164*/ meltfptr[163])); + ((meltroutine_ptr_t) /*_._VALROUT___V878*/ meltfptr[877])->tabval[12] = + (melt_ptr_t) ( /*_.COMPILE2OBJ_PROCEDURE__V164*/ meltfptr[163]); MELT_LOCATION ("warmelt-outobj.melt:6360:/ initchunk"); /*^putroutconst */ @@ -44793,14 +44826,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_15 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V875*/ meltfptr[874])) + ( /*_._VALROUT___V878*/ meltfptr[877])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_685__TRANSLATE_MACROEXPANDED_LIST#13", - NULL != ( /*_._VALSTR___V877*/ meltfptr[876])); - ((meltroutine_ptr_t) /*_._VALROUT___V875*/ meltfptr[874])->tabval[13] = - (melt_ptr_t) ( /*_._VALSTR___V877*/ meltfptr[876]); + ("putroutconst constnull.drout_687__TRANSLATE_MACROEXPANDED_LIST#13", + NULL != ( /*_._VALSTR___V880*/ meltfptr[879])); + ((meltroutine_ptr_t) /*_._VALROUT___V878*/ meltfptr[877])->tabval[13] = + (melt_ptr_t) ( /*_._VALSTR___V880*/ meltfptr[879]); MELT_LOCATION ("warmelt-outobj.melt:6360:/ initchunk"); /*^putroutconst */ @@ -44808,13 +44841,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_15 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V875*/ meltfptr[874])) + ( /*_._VALROUT___V878*/ meltfptr[877])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_685__TRANSLATE_MACROEXPANDED_LIST#14", + ("putroutconst constnull.drout_687__TRANSLATE_MACROEXPANDED_LIST#14", NULL != ( /*_.LIST_TO_MULTIPLE__V66*/ meltfptr[65])); - ((meltroutine_ptr_t) /*_._VALROUT___V875*/ meltfptr[874])->tabval[14] = + ((meltroutine_ptr_t) /*_._VALROUT___V878*/ meltfptr[877])->tabval[14] = (melt_ptr_t) ( /*_.LIST_TO_MULTIPLE__V66*/ meltfptr[65]); MELT_LOCATION ("warmelt-outobj.melt:6360:/ initchunk"); @@ -44823,13 +44856,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_15 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V875*/ meltfptr[874])) + ( /*_._VALROUT___V878*/ meltfptr[877])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_685__TRANSLATE_MACROEXPANDED_LIST#15", + ("putroutconst constnull.drout_687__TRANSLATE_MACROEXPANDED_LIST#15", NULL != ( /*_.DISCR_MULTIPLE__V67*/ meltfptr[66])); - ((meltroutine_ptr_t) /*_._VALROUT___V875*/ meltfptr[874])->tabval[15] = + ((meltroutine_ptr_t) /*_._VALROUT___V878*/ meltfptr[877])->tabval[15] = (melt_ptr_t) ( /*_.DISCR_MULTIPLE__V67*/ meltfptr[66]); MELT_LOCATION ("warmelt-outobj.melt:6360:/ initchunk"); @@ -44838,13 +44871,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_15 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V875*/ meltfptr[874])) + ( /*_._VALROUT___V878*/ meltfptr[877])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_685__TRANSLATE_MACROEXPANDED_LIST#16", + ("putroutconst constnull.drout_687__TRANSLATE_MACROEXPANDED_LIST#16", NULL != ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_._VALROUT___V875*/ meltfptr[874])->tabval[16] = + ((meltroutine_ptr_t) /*_._VALROUT___V878*/ meltfptr[877])->tabval[16] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:6360:/ initchunk"); @@ -44853,14 +44886,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_15 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V875*/ meltfptr[874])) + ( /*_._VALROUT___V878*/ meltfptr[877])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_685__TRANSLATE_MACROEXPANDED_LIST#17", - NULL != ( /*_.NORMAL_IMPORT__V164*/ meltfptr[163])); - ((meltroutine_ptr_t) /*_._VALROUT___V875*/ meltfptr[874])->tabval[17] = - (melt_ptr_t) ( /*_.NORMAL_IMPORT__V164*/ meltfptr[163]); + ("putroutconst constnull.drout_687__TRANSLATE_MACROEXPANDED_LIST#17", + NULL != ( /*_.NORMAL_IMPORT__V165*/ meltfptr[164])); + ((meltroutine_ptr_t) /*_._VALROUT___V878*/ meltfptr[877])->tabval[17] = + (melt_ptr_t) ( /*_.NORMAL_IMPORT__V165*/ meltfptr[164]); MELT_LOCATION ("warmelt-outobj.melt:6508:/ initchunk"); /*^putroutconst */ @@ -44868,12 +44901,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_15 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V878*/ meltfptr[877])) + ( /*_._VALROUT___V881*/ meltfptr[880])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_693__LAMBDA_#0", + melt_checkmsg ("putroutconst constnull.drout_695__LAMBDA_#0", NULL != ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_._VALROUT___V878*/ meltfptr[877])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V881*/ meltfptr[880])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:6508:/ initchunk"); @@ -44882,18 +44915,18 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_15 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V878*/ meltfptr[877])) + ( /*_._VALROUT___V881*/ meltfptr[880])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_693__LAMBDA_#1", - NULL != ( /*_.NORMAL_IMPORT__V164*/ meltfptr[163])); - ((meltroutine_ptr_t) /*_._VALROUT___V878*/ meltfptr[877])->tabval[1] = - (melt_ptr_t) ( /*_.NORMAL_IMPORT__V164*/ meltfptr[163]); + melt_checkmsg ("putroutconst constnull.drout_695__LAMBDA_#1", + NULL != ( /*_.NORMAL_IMPORT__V165*/ meltfptr[164])); + ((meltroutine_ptr_t) /*_._VALROUT___V881*/ meltfptr[880])->tabval[1] = + (melt_ptr_t) ( /*_.NORMAL_IMPORT__V165*/ meltfptr[164]); MELT_LOCATION ("warmelt-outobj.melt:6508:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V878*/ meltfptr[877]); + meltgc_touch ( /*_._VALROUT___V881*/ meltfptr[880]); MELT_LOCATION ("warmelt-outobj.melt:6360:/ initchunk"); /*^putroutconst */ @@ -44901,14 +44934,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_15 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V875*/ meltfptr[874])) + ( /*_._VALROUT___V878*/ meltfptr[877])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_685__TRANSLATE_MACROEXPANDED_LIST#18", - NULL != ( /*_._VALROUT___V878*/ meltfptr[877])); - ((meltroutine_ptr_t) /*_._VALROUT___V875*/ meltfptr[874])->tabval[18] = - (melt_ptr_t) ( /*_._VALROUT___V878*/ meltfptr[877]); + ("putroutconst constnull.drout_687__TRANSLATE_MACROEXPANDED_LIST#18", + NULL != ( /*_._VALROUT___V881*/ meltfptr[880])); + ((meltroutine_ptr_t) /*_._VALROUT___V878*/ meltfptr[877])->tabval[18] = + (melt_ptr_t) ( /*_._VALROUT___V881*/ meltfptr[880]); MELT_LOCATION ("warmelt-outobj.melt:6360:/ initchunk"); /*^putroutconst */ @@ -44916,14 +44949,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_15 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V875*/ meltfptr[874])) + ( /*_._VALROUT___V878*/ meltfptr[877])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_685__TRANSLATE_MACROEXPANDED_LIST#19", - NULL != ( /*_.CLASS_NREP_INITPROC__V160*/ meltfptr[159])); - ((meltroutine_ptr_t) /*_._VALROUT___V875*/ meltfptr[874])->tabval[19] = - (melt_ptr_t) ( /*_.CLASS_NREP_INITPROC__V160*/ meltfptr[159]); + ("putroutconst constnull.drout_687__TRANSLATE_MACROEXPANDED_LIST#19", + NULL != ( /*_.CLASS_NREP_INITPROC__V161*/ meltfptr[160])); + ((meltroutine_ptr_t) /*_._VALROUT___V878*/ meltfptr[877])->tabval[19] = + (melt_ptr_t) ( /*_.CLASS_NREP_INITPROC__V161*/ meltfptr[160]); MELT_LOCATION ("warmelt-outobj.melt:6360:/ initchunk"); /*^putroutconst */ @@ -44931,13 +44964,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_15 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V875*/ meltfptr[874])) + ( /*_._VALROUT___V878*/ meltfptr[877])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_685__TRANSLATE_MACROEXPANDED_LIST#20", + ("putroutconst constnull.drout_687__TRANSLATE_MACROEXPANDED_LIST#20", NULL != ( /*_.ADD2OUT__V14*/ meltfptr[13])); - ((meltroutine_ptr_t) /*_._VALROUT___V875*/ meltfptr[874])->tabval[20] = + ((meltroutine_ptr_t) /*_._VALROUT___V878*/ meltfptr[877])->tabval[20] = (melt_ptr_t) ( /*_.ADD2OUT__V14*/ meltfptr[13]); MELT_LOCATION ("warmelt-outobj.melt:6360:/ initchunk"); @@ -44946,13 +44979,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_15 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V875*/ meltfptr[874])) + ( /*_._VALROUT___V878*/ meltfptr[877])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_685__TRANSLATE_MACROEXPANDED_LIST#21", + ("putroutconst constnull.drout_687__TRANSLATE_MACROEXPANDED_LIST#21", NULL != ( /*_.DISCR_STRING__V53*/ meltfptr[52])); - ((meltroutine_ptr_t) /*_._VALROUT___V875*/ meltfptr[874])->tabval[21] = + ((meltroutine_ptr_t) /*_._VALROUT___V878*/ meltfptr[877])->tabval[21] = (melt_ptr_t) ( /*_.DISCR_STRING__V53*/ meltfptr[52]); MELT_LOCATION ("warmelt-outobj.melt:6360:/ initchunk"); @@ -44961,14 +44994,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_15 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V875*/ meltfptr[874])) + ( /*_._VALROUT___V878*/ meltfptr[877])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_685__TRANSLATE_MACROEXPANDED_LIST#22", - NULL != ( /*_.DISCR_VERBATIM_STRING__V87*/ meltfptr[86])); - ((meltroutine_ptr_t) /*_._VALROUT___V875*/ meltfptr[874])->tabval[22] = - (melt_ptr_t) ( /*_.DISCR_VERBATIM_STRING__V87*/ meltfptr[86]); + ("putroutconst constnull.drout_687__TRANSLATE_MACROEXPANDED_LIST#22", + NULL != ( /*_.DISCR_VERBATIM_STRING__V88*/ meltfptr[87])); + ((meltroutine_ptr_t) /*_._VALROUT___V878*/ meltfptr[877])->tabval[22] = + (melt_ptr_t) ( /*_.DISCR_VERBATIM_STRING__V88*/ meltfptr[87]); MELT_LOCATION ("warmelt-outobj.melt:6360:/ initchunk"); /*^putroutconst */ @@ -44976,13 +45009,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_15 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V875*/ meltfptr[874])) + ( /*_._VALROUT___V878*/ meltfptr[877])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_685__TRANSLATE_MACROEXPANDED_LIST#23", + ("putroutconst constnull.drout_687__TRANSLATE_MACROEXPANDED_LIST#23", NULL != ( /*_.CTYPE_VALUE__V31*/ meltfptr[30])); - ((meltroutine_ptr_t) /*_._VALROUT___V875*/ meltfptr[874])->tabval[23] = + ((meltroutine_ptr_t) /*_._VALROUT___V878*/ meltfptr[877])->tabval[23] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V31*/ meltfptr[30]); MELT_LOCATION ("warmelt-outobj.melt:6360:/ initchunk"); @@ -44991,13 +45024,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_15 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V875*/ meltfptr[874])) + ( /*_._VALROUT___V878*/ meltfptr[877])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_685__TRANSLATE_MACROEXPANDED_LIST#24", + ("putroutconst constnull.drout_687__TRANSLATE_MACROEXPANDED_LIST#24", NULL != ( /*_.CLASS_CTYPE__V28*/ meltfptr[27])); - ((meltroutine_ptr_t) /*_._VALROUT___V875*/ meltfptr[874])->tabval[24] = + ((meltroutine_ptr_t) /*_._VALROUT___V878*/ meltfptr[877])->tabval[24] = (melt_ptr_t) ( /*_.CLASS_CTYPE__V28*/ meltfptr[27]); MELT_LOCATION ("warmelt-outobj.melt:6360:/ initchunk"); @@ -45006,14 +45039,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_15 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V875*/ meltfptr[874])) + ( /*_._VALROUT___V878*/ meltfptr[877])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_685__TRANSLATE_MACROEXPANDED_LIST#25", + ("putroutconst constnull.drout_687__TRANSLATE_MACROEXPANDED_LIST#25", NULL != ( /*_.CLASS_NORMAL_MODULE_VARIABLE_BINDING__V10*/ meltfptr[9])); - ((meltroutine_ptr_t) /*_._VALROUT___V875*/ meltfptr[874])->tabval[25] = + ((meltroutine_ptr_t) /*_._VALROUT___V878*/ meltfptr[877])->tabval[25] = (melt_ptr_t) ( /*_.CLASS_NORMAL_MODULE_VARIABLE_BINDING__V10*/ meltfptr[9]); @@ -45022,24 +45055,24 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_15 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V875*/ meltfptr[874])) == + ( /*_._VALROUT___V878*/ meltfptr[877])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V216*/ meltfptr[215]); - ((meltroutine_ptr_t) /*_._VALROUT___V875*/ meltfptr[874])->tabval[26] = - (melt_ptr_t) ( /*_._VALCLO___V216*/ meltfptr[215]); + NULL != /*_._VALCLO___V217*/ meltfptr[216]); + ((meltroutine_ptr_t) /*_._VALROUT___V878*/ meltfptr[877])->tabval[26] = + (melt_ptr_t) ( /*_._VALCLO___V217*/ meltfptr[216]); MELT_LOCATION ("warmelt-outobj.melt:6360:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V875*/ meltfptr[874])) == + ( /*_._VALROUT___V878*/ meltfptr[877])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V730*/ meltfptr[729]); - ((meltroutine_ptr_t) /*_._VALROUT___V875*/ meltfptr[874])->tabval[27] = - (melt_ptr_t) ( /*_._VALCLO___V730*/ meltfptr[729]); + NULL != /*_._VALCLO___V733*/ meltfptr[732]); + ((meltroutine_ptr_t) /*_._VALROUT___V878*/ meltfptr[877])->tabval[27] = + (melt_ptr_t) ( /*_._VALCLO___V733*/ meltfptr[732]); MELT_LOCATION ("warmelt-outobj.melt:6360:/ initchunk"); /*^putroutconst */ @@ -45047,14 +45080,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_15 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V875*/ meltfptr[874])) + ( /*_._VALROUT___V878*/ meltfptr[877])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_685__TRANSLATE_MACROEXPANDED_LIST#28", - NULL != ( /*_.CLASS_HOOK_DESCRIPTOR__V165*/ meltfptr[164])); - ((meltroutine_ptr_t) /*_._VALROUT___V875*/ meltfptr[874])->tabval[28] = - (melt_ptr_t) ( /*_.CLASS_HOOK_DESCRIPTOR__V165*/ meltfptr[164]); + ("putroutconst constnull.drout_687__TRANSLATE_MACROEXPANDED_LIST#28", + NULL != ( /*_.CLASS_HOOK_DESCRIPTOR__V166*/ meltfptr[165])); + ((meltroutine_ptr_t) /*_._VALROUT___V878*/ meltfptr[877])->tabval[28] = + (melt_ptr_t) ( /*_.CLASS_HOOK_DESCRIPTOR__V166*/ meltfptr[165]); MELT_LOCATION ("warmelt-outobj.melt:6360:/ initchunk"); /*^putroutconst */ @@ -45062,13 +45095,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_15 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V875*/ meltfptr[874])) + ( /*_._VALROUT___V878*/ meltfptr[877])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_685__TRANSLATE_MACROEXPANDED_LIST#29", + ("putroutconst constnull.drout_687__TRANSLATE_MACROEXPANDED_LIST#29", NULL != ( /*_.CLASS_NAMED__V13*/ meltfptr[12])); - ((meltroutine_ptr_t) /*_._VALROUT___V875*/ meltfptr[874])->tabval[29] = + ((meltroutine_ptr_t) /*_._VALROUT___V878*/ meltfptr[877])->tabval[29] = (melt_ptr_t) ( /*_.CLASS_NAMED__V13*/ meltfptr[12]); MELT_LOCATION ("warmelt-outobj.melt:6360:/ initchunk"); @@ -45077,14 +45110,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_15 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V875*/ meltfptr[874])) + ( /*_._VALROUT___V878*/ meltfptr[877])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_685__TRANSLATE_MACROEXPANDED_LIST#30", - NULL != ( /*_.CLASS_FORMAL_BINDING__V72*/ meltfptr[71])); - ((meltroutine_ptr_t) /*_._VALROUT___V875*/ meltfptr[874])->tabval[30] = - (melt_ptr_t) ( /*_.CLASS_FORMAL_BINDING__V72*/ meltfptr[71]); + ("putroutconst constnull.drout_687__TRANSLATE_MACROEXPANDED_LIST#30", + NULL != ( /*_.CLASS_FORMAL_BINDING__V73*/ meltfptr[72])); + ((meltroutine_ptr_t) /*_._VALROUT___V878*/ meltfptr[877])->tabval[30] = + (melt_ptr_t) ( /*_.CLASS_FORMAL_BINDING__V73*/ meltfptr[72]); MELT_LOCATION ("warmelt-outobj.melt:6360:/ initchunk"); /*^putroutconst */ @@ -45092,14 +45125,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_15 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V875*/ meltfptr[874])) + ( /*_._VALROUT___V878*/ meltfptr[877])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_685__TRANSLATE_MACROEXPANDED_LIST#31", - NULL != ( /*_.SYMBOL_CNAME__V166*/ meltfptr[165])); - ((meltroutine_ptr_t) /*_._VALROUT___V875*/ meltfptr[874])->tabval[31] = - (melt_ptr_t) ( /*_.SYMBOL_CNAME__V166*/ meltfptr[165]); + ("putroutconst constnull.drout_687__TRANSLATE_MACROEXPANDED_LIST#31", + NULL != ( /*_.SYMBOL_CNAME__V167*/ meltfptr[166])); + ((meltroutine_ptr_t) /*_._VALROUT___V878*/ meltfptr[877])->tabval[31] = + (melt_ptr_t) ( /*_.SYMBOL_CNAME__V167*/ meltfptr[166]); MELT_LOCATION ("warmelt-outobj.melt:6360:/ initchunk"); /*^putroutconst */ @@ -45107,13 +45140,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_15 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V875*/ meltfptr[874])) + ( /*_._VALROUT___V878*/ meltfptr[877])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_685__TRANSLATE_MACROEXPANDED_LIST#32", + ("putroutconst constnull.drout_687__TRANSLATE_MACROEXPANDED_LIST#32", NULL != ( /*_.CLASS_ANY_BINDING__V11*/ meltfptr[10])); - ((meltroutine_ptr_t) /*_._VALROUT___V875*/ meltfptr[874])->tabval[32] = + ((meltroutine_ptr_t) /*_._VALROUT___V878*/ meltfptr[877])->tabval[32] = (melt_ptr_t) ( /*_.CLASS_ANY_BINDING__V11*/ meltfptr[10]); MELT_LOCATION ("warmelt-outobj.melt:6360:/ initchunk"); @@ -45122,14 +45155,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_15 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V875*/ meltfptr[874])) + ( /*_._VALROUT___V878*/ meltfptr[877])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_685__TRANSLATE_MACROEXPANDED_LIST#33", - NULL != ( /*_.CLASS_SOURCE_CHEADER__V167*/ meltfptr[166])); - ((meltroutine_ptr_t) /*_._VALROUT___V875*/ meltfptr[874])->tabval[33] = - (melt_ptr_t) ( /*_.CLASS_SOURCE_CHEADER__V167*/ meltfptr[166]); + ("putroutconst constnull.drout_687__TRANSLATE_MACROEXPANDED_LIST#33", + NULL != ( /*_.CLASS_SOURCE_CHEADER__V168*/ meltfptr[167])); + ((meltroutine_ptr_t) /*_._VALROUT___V878*/ meltfptr[877])->tabval[33] = + (melt_ptr_t) ( /*_.CLASS_SOURCE_CHEADER__V168*/ meltfptr[167]); MELT_LOCATION ("warmelt-outobj.melt:6360:/ initchunk"); /*^putroutconst */ @@ -45137,14 +45170,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_15 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V875*/ meltfptr[874])) + ( /*_._VALROUT___V878*/ meltfptr[877])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_685__TRANSLATE_MACROEXPANDED_LIST#34", - NULL != ( /*_.CLASS_LOCATED__V143*/ meltfptr[142])); - ((meltroutine_ptr_t) /*_._VALROUT___V875*/ meltfptr[874])->tabval[34] = - (melt_ptr_t) ( /*_.CLASS_LOCATED__V143*/ meltfptr[142]); + ("putroutconst constnull.drout_687__TRANSLATE_MACROEXPANDED_LIST#34", + NULL != ( /*_.CLASS_LOCATED__V144*/ meltfptr[143])); + ((meltroutine_ptr_t) /*_._VALROUT___V878*/ meltfptr[877])->tabval[34] = + (melt_ptr_t) ( /*_.CLASS_LOCATED__V144*/ meltfptr[143]); MELT_LOCATION ("warmelt-outobj.melt:6360:/ initchunk"); /*^putroutconst */ @@ -45152,26 +45185,26 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_15 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V875*/ meltfptr[874])) + ( /*_._VALROUT___V878*/ meltfptr[877])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_685__TRANSLATE_MACROEXPANDED_LIST#35", - NULL != ( /*_.CLASS_SOURCE_CODE_STRING__V168*/ meltfptr[167])); - ((meltroutine_ptr_t) /*_._VALROUT___V875*/ meltfptr[874])->tabval[35] = - (melt_ptr_t) ( /*_.CLASS_SOURCE_CODE_STRING__V168*/ meltfptr[167]); + ("putroutconst constnull.drout_687__TRANSLATE_MACROEXPANDED_LIST#35", + NULL != ( /*_.CLASS_SOURCE_CODE_STRING__V169*/ meltfptr[168])); + ((meltroutine_ptr_t) /*_._VALROUT___V878*/ meltfptr[877])->tabval[35] = + (melt_ptr_t) ( /*_.CLASS_SOURCE_CODE_STRING__V169*/ meltfptr[168]); MELT_LOCATION ("warmelt-outobj.melt:6360:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V875*/ meltfptr[874])) == + ( /*_._VALROUT___V878*/ meltfptr[877])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V268*/ meltfptr[267]); - ((meltroutine_ptr_t) /*_._VALROUT___V875*/ meltfptr[874])->tabval[36] = - (melt_ptr_t) ( /*_._VALCLO___V268*/ meltfptr[267]); + NULL != /*_._VALCLO___V269*/ meltfptr[268]); + ((meltroutine_ptr_t) /*_._VALROUT___V878*/ meltfptr[877])->tabval[36] = + (melt_ptr_t) ( /*_._VALCLO___V269*/ meltfptr[268]); MELT_LOCATION ("warmelt-outobj.melt:6360:/ initchunk"); /*^putroutconst */ @@ -45179,14 +45212,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_15 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V875*/ meltfptr[874])) + ( /*_._VALROUT___V878*/ meltfptr[877])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_685__TRANSLATE_MACROEXPANDED_LIST#37", - NULL != ( /*_.CLASS_SOURCE_CIMPLEMENT__V169*/ meltfptr[168])); - ((meltroutine_ptr_t) /*_._VALROUT___V875*/ meltfptr[874])->tabval[37] = - (melt_ptr_t) ( /*_.CLASS_SOURCE_CIMPLEMENT__V169*/ meltfptr[168]); + ("putroutconst constnull.drout_687__TRANSLATE_MACROEXPANDED_LIST#37", + NULL != ( /*_.CLASS_SOURCE_CIMPLEMENT__V170*/ meltfptr[169])); + ((meltroutine_ptr_t) /*_._VALROUT___V878*/ meltfptr[877])->tabval[37] = + (melt_ptr_t) ( /*_.CLASS_SOURCE_CIMPLEMENT__V170*/ meltfptr[169]); MELT_LOCATION ("warmelt-outobj.melt:6360:/ initchunk"); /*^putroutconst */ @@ -45194,13 +45227,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_15 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V875*/ meltfptr[874])) + ( /*_._VALROUT___V878*/ meltfptr[877])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_685__TRANSLATE_MACROEXPANDED_LIST#38", + ("putroutconst constnull.drout_687__TRANSLATE_MACROEXPANDED_LIST#38", NULL != ( /*_.CLASS_HOOKROUTINEOBJ__V60*/ meltfptr[59])); - ((meltroutine_ptr_t) /*_._VALROUT___V875*/ meltfptr[874])->tabval[38] = + ((meltroutine_ptr_t) /*_._VALROUT___V878*/ meltfptr[877])->tabval[38] = (melt_ptr_t) ( /*_.CLASS_HOOKROUTINEOBJ__V60*/ meltfptr[59]); MELT_LOCATION ("warmelt-outobj.melt:6360:/ initchunk"); @@ -45209,13 +45242,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_15 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V875*/ meltfptr[874])) + ( /*_._VALROUT___V878*/ meltfptr[877])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_685__TRANSLATE_MACROEXPANDED_LIST#39", + ("putroutconst constnull.drout_687__TRANSLATE_MACROEXPANDED_LIST#39", NULL != ( /*_.CLASS_ROUTINEOBJ__V58*/ meltfptr[57])); - ((meltroutine_ptr_t) /*_._VALROUT___V875*/ meltfptr[874])->tabval[39] = + ((meltroutine_ptr_t) /*_._VALROUT___V878*/ meltfptr[877])->tabval[39] = (melt_ptr_t) ( /*_.CLASS_ROUTINEOBJ__V58*/ meltfptr[57]); MELT_LOCATION ("warmelt-outobj.melt:6360:/ initchunk"); @@ -45224,14 +45257,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_15 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V875*/ meltfptr[874])) + ( /*_._VALROUT___V878*/ meltfptr[877])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_685__TRANSLATE_MACROEXPANDED_LIST#40", - NULL != ( /*_.CLASS_NREP_DATAHOOK__V161*/ meltfptr[160])); - ((meltroutine_ptr_t) /*_._VALROUT___V875*/ meltfptr[874])->tabval[40] = - (melt_ptr_t) ( /*_.CLASS_NREP_DATAHOOK__V161*/ meltfptr[160]); + ("putroutconst constnull.drout_687__TRANSLATE_MACROEXPANDED_LIST#40", + NULL != ( /*_.CLASS_NREP_DATAHOOK__V162*/ meltfptr[161])); + ((meltroutine_ptr_t) /*_._VALROUT___V878*/ meltfptr[877])->tabval[40] = + (melt_ptr_t) ( /*_.CLASS_NREP_DATAHOOK__V162*/ meltfptr[161]); MELT_LOCATION ("warmelt-outobj.melt:6360:/ initchunk"); /*^putroutconst */ @@ -45239,13 +45272,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_15 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V875*/ meltfptr[874])) + ( /*_._VALROUT___V878*/ meltfptr[877])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_685__TRANSLATE_MACROEXPANDED_LIST#41", + ("putroutconst constnull.drout_687__TRANSLATE_MACROEXPANDED_LIST#41", NULL != ( /*_.CLASS_PROCROUTINEOBJ__V59*/ meltfptr[58])); - ((meltroutine_ptr_t) /*_._VALROUT___V875*/ meltfptr[874])->tabval[41] = + ((meltroutine_ptr_t) /*_._VALROUT___V878*/ meltfptr[877])->tabval[41] = (melt_ptr_t) ( /*_.CLASS_PROCROUTINEOBJ__V59*/ meltfptr[58]); MELT_LOCATION ("warmelt-outobj.melt:6360:/ initchunk"); @@ -45253,24 +45286,24 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_15 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V875*/ meltfptr[874])) == + ( /*_._VALROUT___V878*/ meltfptr[877])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V783*/ meltfptr[782]); - ((meltroutine_ptr_t) /*_._VALROUT___V875*/ meltfptr[874])->tabval[42] = - (melt_ptr_t) ( /*_._VALCLO___V783*/ meltfptr[782]); + NULL != /*_._VALCLO___V786*/ meltfptr[785]); + ((meltroutine_ptr_t) /*_._VALROUT___V878*/ meltfptr[877])->tabval[42] = + (melt_ptr_t) ( /*_._VALCLO___V786*/ meltfptr[785]); MELT_LOCATION ("warmelt-outobj.melt:6360:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V875*/ meltfptr[874])) == + ( /*_._VALROUT___V878*/ meltfptr[877])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALDATA___V739*/ meltfptr[738]); - ((meltroutine_ptr_t) /*_._VALROUT___V875*/ meltfptr[874])->tabval[43] = - (melt_ptr_t) ( /*_._VALDATA___V739*/ meltfptr[738]); + NULL != /*_._VALDATA___V742*/ meltfptr[741]); + ((meltroutine_ptr_t) /*_._VALROUT___V878*/ meltfptr[877])->tabval[43] = + (melt_ptr_t) ( /*_._VALDATA___V742*/ meltfptr[741]); MELT_LOCATION ("warmelt-outobj.melt:6360:/ initchunk"); /*^putroutconst */ @@ -45278,13 +45311,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_15 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V875*/ meltfptr[874])) + ( /*_._VALROUT___V878*/ meltfptr[877])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_685__TRANSLATE_MACROEXPANDED_LIST#44", + ("putroutconst constnull.drout_687__TRANSLATE_MACROEXPANDED_LIST#44", NULL != ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19])); - ((meltroutine_ptr_t) /*_._VALROUT___V875*/ meltfptr[874])->tabval[44] = + ((meltroutine_ptr_t) /*_._VALROUT___V878*/ meltfptr[877])->tabval[44] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]); MELT_LOCATION ("warmelt-outobj.melt:6360:/ initchunk"); @@ -45292,48 +45325,48 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_15 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V875*/ meltfptr[874])) == + ( /*_._VALROUT___V878*/ meltfptr[877])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V849*/ meltfptr[848]); - ((meltroutine_ptr_t) /*_._VALROUT___V875*/ meltfptr[874])->tabval[45] = - (melt_ptr_t) ( /*_._VALCLO___V849*/ meltfptr[848]); + NULL != /*_._VALCLO___V852*/ meltfptr[851]); + ((meltroutine_ptr_t) /*_._VALROUT___V878*/ meltfptr[877])->tabval[45] = + (melt_ptr_t) ( /*_._VALCLO___V852*/ meltfptr[851]); MELT_LOCATION ("warmelt-outobj.melt:6360:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V875*/ meltfptr[874])) == + ( /*_._VALROUT___V878*/ meltfptr[877])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V734*/ meltfptr[733]); - ((meltroutine_ptr_t) /*_._VALROUT___V875*/ meltfptr[874])->tabval[46] = - (melt_ptr_t) ( /*_._VALCLO___V734*/ meltfptr[733]); + NULL != /*_._VALCLO___V737*/ meltfptr[736]); + ((meltroutine_ptr_t) /*_._VALROUT___V878*/ meltfptr[877])->tabval[46] = + (melt_ptr_t) ( /*_._VALCLO___V737*/ meltfptr[736]); MELT_LOCATION ("warmelt-outobj.melt:6360:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V875*/ meltfptr[874])) == + ( /*_._VALROUT___V878*/ meltfptr[877])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V872*/ meltfptr[871]); - ((meltroutine_ptr_t) /*_._VALROUT___V875*/ meltfptr[874])->tabval[47] = - (melt_ptr_t) ( /*_._VALCLO___V872*/ meltfptr[871]); + NULL != /*_._VALCLO___V875*/ meltfptr[874]); + ((meltroutine_ptr_t) /*_._VALROUT___V878*/ meltfptr[877])->tabval[47] = + (melt_ptr_t) ( /*_._VALCLO___V875*/ meltfptr[874]); MELT_LOCATION ("warmelt-outobj.melt:6360:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V875*/ meltfptr[874])) == + ( /*_._VALROUT___V878*/ meltfptr[877])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALDATA___V197*/ meltfptr[196]); - ((meltroutine_ptr_t) /*_._VALROUT___V875*/ meltfptr[874])->tabval[48] = - (melt_ptr_t) ( /*_._VALDATA___V197*/ meltfptr[196]); + NULL != /*_._VALDATA___V198*/ meltfptr[197]); + ((meltroutine_ptr_t) /*_._VALROUT___V878*/ meltfptr[877])->tabval[48] = + (melt_ptr_t) ( /*_._VALDATA___V198*/ meltfptr[197]); MELT_LOCATION ("warmelt-outobj.melt:6360:/ initchunk"); /*^putroutconst */ @@ -45341,13 +45374,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_15 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V875*/ meltfptr[874])) + ( /*_._VALROUT___V878*/ meltfptr[877])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_685__TRANSLATE_MACROEXPANDED_LIST#49", + ("putroutconst constnull.drout_687__TRANSLATE_MACROEXPANDED_LIST#49", NULL != ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5])); - ((meltroutine_ptr_t) /*_._VALROUT___V875*/ meltfptr[874])->tabval[49] = + ((meltroutine_ptr_t) /*_._VALROUT___V878*/ meltfptr[877])->tabval[49] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5]); MELT_LOCATION ("warmelt-outobj.melt:6360:/ initchunk"); @@ -45355,12 +45388,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_15 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V875*/ meltfptr[874])) == + ( /*_._VALROUT___V878*/ meltfptr[877])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V791*/ meltfptr[790]); - ((meltroutine_ptr_t) /*_._VALROUT___V875*/ meltfptr[874])->tabval[50] = - (melt_ptr_t) ( /*_._VALCLO___V791*/ meltfptr[790]); + NULL != /*_._VALCLO___V794*/ meltfptr[793]); + ((meltroutine_ptr_t) /*_._VALROUT___V878*/ meltfptr[877])->tabval[50] = + (melt_ptr_t) ( /*_._VALCLO___V794*/ meltfptr[793]); MELT_LOCATION ("warmelt-outobj.melt:6360:/ initchunk"); /*^putroutconst */ @@ -45368,233 +45401,233 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_15 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V875*/ meltfptr[874])) + ( /*_._VALROUT___V878*/ meltfptr[877])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_685__TRANSLATE_MACROEXPANDED_LIST#51", - NULL != ( /*_._VALSTR___V879*/ meltfptr[878])); - ((meltroutine_ptr_t) /*_._VALROUT___V875*/ meltfptr[874])->tabval[51] = - (melt_ptr_t) ( /*_._VALSTR___V879*/ meltfptr[878]); + ("putroutconst constnull.drout_687__TRANSLATE_MACROEXPANDED_LIST#51", + NULL != ( /*_._VALSTR___V882*/ meltfptr[881])); + ((meltroutine_ptr_t) /*_._VALROUT___V878*/ meltfptr[877])->tabval[51] = + (melt_ptr_t) ( /*_._VALSTR___V882*/ meltfptr[881]); MELT_LOCATION ("warmelt-outobj.melt:6360:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V875*/ meltfptr[874]); + meltgc_touch ( /*_._VALROUT___V878*/ meltfptr[877]); /*putclosurout#124 */ melt_assertmsg ("putclosrout#124 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V880*/ meltfptr[879])) == + ( /*_._VALCLO___V883*/ meltfptr[882])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#124 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V875*/ meltfptr[874])) == + ( /*_._VALROUT___V878*/ meltfptr[877])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V880*/ meltfptr[879])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V875*/ meltfptr[874]); + ((meltclosure_ptr_t) /*_._VALCLO___V883*/ meltfptr[882])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V878*/ meltfptr[877]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V880*/ meltfptr[879]); + meltgc_touch ( /*_._VALCLO___V883*/ meltfptr[882]); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_688__COMPILE2OBJ_HOOK @#1", + melt_assertmsg ("checkobj putslot ~dsym_690__COMPILE2OBJ_HOOK @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V881*/ meltfptr[880])) == + ( /*_._VALDATA___V884*/ meltfptr[883])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_688__COMPILE2OBJ_HOOK @#1", + melt_assertmsg ("checkoff putslot ~dsym_690__COMPILE2OBJ_HOOK @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V881*/ - meltfptr[880])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V881*/ meltfptr[880]))->obj_vartab[1] = + ( /*_._VALDATA___V884*/ + meltfptr[883])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V884*/ meltfptr[883]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V882*/ meltfptr[881]); + /*_._VALSTR___V885*/ meltfptr[884]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V881*/ meltfptr[880]); + meltgc_touch ( /*_._VALDATA___V884*/ meltfptr[883]); - melt_dbgtrace_written_object ( /*_._VALDATA___V881*/ meltfptr[880], + melt_dbgtrace_written_object ( /*_._VALDATA___V884*/ meltfptr[883], "new static instance"); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_690__COMPILE2OBJ_PROCEDURE @#1", + melt_assertmsg ("checkobj putslot ~dsym_692__COMPILE2OBJ_PROCEDURE @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V883*/ meltfptr[882])) == + ( /*_._VALDATA___V886*/ meltfptr[885])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_690__COMPILE2OBJ_PROCEDURE @#1", + melt_assertmsg ("checkoff putslot ~dsym_692__COMPILE2OBJ_PROCEDURE @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V883*/ - meltfptr[882])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V883*/ meltfptr[882]))->obj_vartab[1] = + ( /*_._VALDATA___V886*/ + meltfptr[885])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V886*/ meltfptr[885]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V884*/ meltfptr[883]); + /*_._VALSTR___V887*/ meltfptr[886]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V883*/ meltfptr[882]); + meltgc_touch ( /*_._VALDATA___V886*/ meltfptr[885]); - melt_dbgtrace_written_object ( /*_._VALDATA___V883*/ meltfptr[882], + melt_dbgtrace_written_object ( /*_._VALDATA___V886*/ meltfptr[885], "new static instance"); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_694__NORMAL_IMPORT @#1", + melt_assertmsg ("checkobj putslot ~dsym_696__NORMAL_IMPORT @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V885*/ meltfptr[884])) == + ( /*_._VALDATA___V888*/ meltfptr[887])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_694__NORMAL_IMPORT @#1", + melt_assertmsg ("checkoff putslot ~dsym_696__NORMAL_IMPORT @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V885*/ - meltfptr[884])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V885*/ meltfptr[884]))->obj_vartab[1] = + ( /*_._VALDATA___V888*/ + meltfptr[887])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V888*/ meltfptr[887]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V886*/ meltfptr[885]); + /*_._VALSTR___V889*/ meltfptr[888]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V885*/ meltfptr[884]); + meltgc_touch ( /*_._VALDATA___V888*/ meltfptr[887]); - melt_dbgtrace_written_object ( /*_._VALDATA___V885*/ meltfptr[884], + melt_dbgtrace_written_object ( /*_._VALDATA___V888*/ meltfptr[887], "new static instance"); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_696__CLASS_HOOK_DESCRIPTOR @#1", + melt_assertmsg ("checkobj putslot ~dsym_698__CLASS_HOOK_DESCRIPTOR @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V887*/ meltfptr[886])) == + ( /*_._VALDATA___V890*/ meltfptr[889])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_696__CLASS_HOOK_DESCRIPTOR @#1", + melt_assertmsg ("checkoff putslot ~dsym_698__CLASS_HOOK_DESCRIPTOR @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V887*/ - meltfptr[886])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V887*/ meltfptr[886]))->obj_vartab[1] = + ( /*_._VALDATA___V890*/ + meltfptr[889])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V890*/ meltfptr[889]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V888*/ meltfptr[887]); + /*_._VALSTR___V891*/ meltfptr[890]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V887*/ meltfptr[886]); + meltgc_touch ( /*_._VALDATA___V890*/ meltfptr[889]); - melt_dbgtrace_written_object ( /*_._VALDATA___V887*/ meltfptr[886], + melt_dbgtrace_written_object ( /*_._VALDATA___V890*/ meltfptr[889], "new static instance"); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_698__SYMBOL_CNAME @#1", + melt_assertmsg ("checkobj putslot ~dsym_700__SYMBOL_CNAME @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V889*/ meltfptr[888])) == + ( /*_._VALDATA___V892*/ meltfptr[891])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_698__SYMBOL_CNAME @#1", + melt_assertmsg ("checkoff putslot ~dsym_700__SYMBOL_CNAME @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V889*/ - meltfptr[888])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V889*/ meltfptr[888]))->obj_vartab[1] = + ( /*_._VALDATA___V892*/ + meltfptr[891])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V892*/ meltfptr[891]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V890*/ meltfptr[889]); + /*_._VALSTR___V893*/ meltfptr[892]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V889*/ meltfptr[888]); + meltgc_touch ( /*_._VALDATA___V892*/ meltfptr[891]); - melt_dbgtrace_written_object ( /*_._VALDATA___V889*/ meltfptr[888], + melt_dbgtrace_written_object ( /*_._VALDATA___V892*/ meltfptr[891], "new static instance"); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_700__CLASS_SOURCE_CHEADER @#1", + melt_assertmsg ("checkobj putslot ~dsym_702__CLASS_SOURCE_CHEADER @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V891*/ meltfptr[890])) == + ( /*_._VALDATA___V894*/ meltfptr[893])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_700__CLASS_SOURCE_CHEADER @#1", + melt_assertmsg ("checkoff putslot ~dsym_702__CLASS_SOURCE_CHEADER @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V891*/ - meltfptr[890])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V891*/ meltfptr[890]))->obj_vartab[1] = + ( /*_._VALDATA___V894*/ + meltfptr[893])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V894*/ meltfptr[893]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V892*/ meltfptr[891]); + /*_._VALSTR___V895*/ meltfptr[894]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V891*/ meltfptr[890]); + meltgc_touch ( /*_._VALDATA___V894*/ meltfptr[893]); - melt_dbgtrace_written_object ( /*_._VALDATA___V891*/ meltfptr[890], + melt_dbgtrace_written_object ( /*_._VALDATA___V894*/ meltfptr[893], "new static instance"); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_702__CLASS_SOURCE_CODE_STRING @#1", + melt_assertmsg ("checkobj putslot ~dsym_704__CLASS_SOURCE_CODE_STRING @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V893*/ meltfptr[892])) == + ( /*_._VALDATA___V896*/ meltfptr[895])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_702__CLASS_SOURCE_CODE_STRING @#1", + melt_assertmsg ("checkoff putslot ~dsym_704__CLASS_SOURCE_CODE_STRING @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V893*/ - meltfptr[892])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V893*/ meltfptr[892]))->obj_vartab[1] = + ( /*_._VALDATA___V896*/ + meltfptr[895])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V896*/ meltfptr[895]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V894*/ meltfptr[893]); + /*_._VALSTR___V897*/ meltfptr[896]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V893*/ meltfptr[892]); + meltgc_touch ( /*_._VALDATA___V896*/ meltfptr[895]); - melt_dbgtrace_written_object ( /*_._VALDATA___V893*/ meltfptr[892], + melt_dbgtrace_written_object ( /*_._VALDATA___V896*/ meltfptr[895], "new static instance"); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_704__CLASS_SOURCE_CIMPLEMENT @#1", + melt_assertmsg ("checkobj putslot ~dsym_706__CLASS_SOURCE_CIMPLEMENT @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V895*/ meltfptr[894])) == + ( /*_._VALDATA___V898*/ meltfptr[897])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_704__CLASS_SOURCE_CIMPLEMENT @#1", + melt_assertmsg ("checkoff putslot ~dsym_706__CLASS_SOURCE_CIMPLEMENT @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V895*/ - meltfptr[894])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V895*/ meltfptr[894]))->obj_vartab[1] = + ( /*_._VALDATA___V898*/ + meltfptr[897])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V898*/ meltfptr[897]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V896*/ meltfptr[895]); + /*_._VALSTR___V899*/ meltfptr[898]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V895*/ meltfptr[894]); + meltgc_touch ( /*_._VALDATA___V898*/ meltfptr[897]); - melt_dbgtrace_written_object ( /*_._VALDATA___V895*/ meltfptr[894], + melt_dbgtrace_written_object ( /*_._VALDATA___V898*/ meltfptr[897], "new static instance"); /*putclosurout#125 */ melt_assertmsg ("putclosrout#125 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V898*/ meltfptr[897])) == + ( /*_._VALCLO___V901*/ meltfptr[900])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#125 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V897*/ meltfptr[896])) == + ( /*_._VALROUT___V900*/ meltfptr[899])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V898*/ meltfptr[897])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V897*/ meltfptr[896]); + ((meltclosure_ptr_t) /*_._VALCLO___V901*/ meltfptr[900])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V900*/ meltfptr[899]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V898*/ meltfptr[897]); + meltgc_touch ( /*_._VALCLO___V901*/ meltfptr[900]); MELT_LOCATION ("warmelt-outobj.melt:6969:/ initchunk"); /*^putroutconst */ @@ -45602,12 +45635,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_15 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V899*/ meltfptr[898])) + ( /*_._VALROUT___V902*/ meltfptr[901])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_709__COMPILE_LIST_SEXPR#0", + melt_checkmsg ("putroutconst constnull.drout_711__COMPILE_LIST_SEXPR#0", NULL != ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_._VALROUT___V899*/ meltfptr[898])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V902*/ meltfptr[901])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:6969:/ initchunk"); @@ -45616,13 +45649,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_15 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V899*/ meltfptr[898])) + ( /*_._VALROUT___V902*/ meltfptr[901])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_709__COMPILE_LIST_SEXPR#1", - NULL != ( /*_.CLASS_ENVIRONMENT__V153*/ meltfptr[152])); - ((meltroutine_ptr_t) /*_._VALROUT___V899*/ meltfptr[898])->tabval[1] = - (melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V153*/ meltfptr[152]); + melt_checkmsg ("putroutconst constnull.drout_711__COMPILE_LIST_SEXPR#1", + NULL != ( /*_.CLASS_ENVIRONMENT__V154*/ meltfptr[153])); + ((meltroutine_ptr_t) /*_._VALROUT___V902*/ meltfptr[901])->tabval[1] = + (melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V154*/ meltfptr[153]); MELT_LOCATION ("warmelt-outobj.melt:6969:/ initchunk"); /*^putroutconst */ @@ -45630,12 +45663,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_15 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V899*/ meltfptr[898])) + ( /*_._VALROUT___V902*/ meltfptr[901])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_709__COMPILE_LIST_SEXPR#2", + melt_checkmsg ("putroutconst constnull.drout_711__COMPILE_LIST_SEXPR#2", NULL != ( /*_.DISCR_STRING__V53*/ meltfptr[52])); - ((meltroutine_ptr_t) /*_._VALROUT___V899*/ meltfptr[898])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V902*/ meltfptr[901])->tabval[2] = (melt_ptr_t) ( /*_.DISCR_STRING__V53*/ meltfptr[52]); MELT_LOCATION ("warmelt-outobj.melt:6969:/ initchunk"); @@ -45644,13 +45677,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_15 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V899*/ meltfptr[898])) + ( /*_._VALROUT___V902*/ meltfptr[901])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_709__COMPILE_LIST_SEXPR#3", - NULL != ( /*_.CLASS_MODULE_CONTEXT__V170*/ meltfptr[169])); - ((meltroutine_ptr_t) /*_._VALROUT___V899*/ meltfptr[898])->tabval[3] = - (melt_ptr_t) ( /*_.CLASS_MODULE_CONTEXT__V170*/ meltfptr[169]); + melt_checkmsg ("putroutconst constnull.drout_711__COMPILE_LIST_SEXPR#3", + NULL != ( /*_.CLASS_MODULE_CONTEXT__V171*/ meltfptr[170])); + ((meltroutine_ptr_t) /*_._VALROUT___V902*/ meltfptr[901])->tabval[3] = + (melt_ptr_t) ( /*_.CLASS_MODULE_CONTEXT__V171*/ meltfptr[170]); MELT_LOCATION ("warmelt-outobj.melt:6969:/ initchunk"); /*^putroutconst */ @@ -45658,13 +45691,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_15 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V899*/ meltfptr[898])) + ( /*_._VALROUT___V902*/ meltfptr[901])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_709__COMPILE_LIST_SEXPR#4", - NULL != ( /*_.DISCR_MAP_STRINGS__V171*/ meltfptr[170])); - ((meltroutine_ptr_t) /*_._VALROUT___V899*/ meltfptr[898])->tabval[4] = - (melt_ptr_t) ( /*_.DISCR_MAP_STRINGS__V171*/ meltfptr[170]); + melt_checkmsg ("putroutconst constnull.drout_711__COMPILE_LIST_SEXPR#4", + NULL != ( /*_.DISCR_MAP_STRINGS__V172*/ meltfptr[171])); + ((meltroutine_ptr_t) /*_._VALROUT___V902*/ meltfptr[901])->tabval[4] = + (melt_ptr_t) ( /*_.DISCR_MAP_STRINGS__V172*/ meltfptr[171]); MELT_LOCATION ("warmelt-outobj.melt:6969:/ initchunk"); /*^putroutconst */ @@ -45672,12 +45705,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_15 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V899*/ meltfptr[898])) + ( /*_._VALROUT___V902*/ meltfptr[901])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_709__COMPILE_LIST_SEXPR#5", + melt_checkmsg ("putroutconst constnull.drout_711__COMPILE_LIST_SEXPR#5", NULL != ( /*_.DISCR_INTEGER__V52*/ meltfptr[51])); - ((meltroutine_ptr_t) /*_._VALROUT___V899*/ meltfptr[898])->tabval[5] = + ((meltroutine_ptr_t) /*_._VALROUT___V902*/ meltfptr[901])->tabval[5] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V52*/ meltfptr[51]); MELT_LOCATION ("warmelt-outobj.melt:6969:/ initchunk"); @@ -45686,12 +45719,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_15 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V899*/ meltfptr[898])) + ( /*_._VALROUT___V902*/ meltfptr[901])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_709__COMPILE_LIST_SEXPR#6", + melt_checkmsg ("putroutconst constnull.drout_711__COMPILE_LIST_SEXPR#6", NULL != ( /*_.DISCR_LIST__V65*/ meltfptr[64])); - ((meltroutine_ptr_t) /*_._VALROUT___V899*/ meltfptr[898])->tabval[6] = + ((meltroutine_ptr_t) /*_._VALROUT___V902*/ meltfptr[901])->tabval[6] = (melt_ptr_t) ( /*_.DISCR_LIST__V65*/ meltfptr[64]); MELT_LOCATION ("warmelt-outobj.melt:6969:/ initchunk"); @@ -45699,29 +45732,29 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_15 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V899*/ meltfptr[898])) == + ( /*_._VALROUT___V902*/ meltfptr[901])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V898*/ meltfptr[897]); - ((meltroutine_ptr_t) /*_._VALROUT___V899*/ meltfptr[898])->tabval[7] = - (melt_ptr_t) ( /*_._VALCLO___V898*/ meltfptr[897]); + NULL != /*_._VALCLO___V901*/ meltfptr[900]); + ((meltroutine_ptr_t) /*_._VALROUT___V902*/ meltfptr[901])->tabval[7] = + (melt_ptr_t) ( /*_._VALCLO___V901*/ meltfptr[900]); MELT_LOCATION ("warmelt-outobj.melt:6997:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V900*/ meltfptr[899])) == + ( /*_._VALROUT___V903*/ meltfptr[902])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V898*/ meltfptr[897]); - ((meltroutine_ptr_t) /*_._VALROUT___V900*/ meltfptr[899])->tabval[0] = - (melt_ptr_t) ( /*_._VALCLO___V898*/ meltfptr[897]); + NULL != /*_._VALCLO___V901*/ meltfptr[900]); + ((meltroutine_ptr_t) /*_._VALROUT___V903*/ meltfptr[902])->tabval[0] = + (melt_ptr_t) ( /*_._VALCLO___V901*/ meltfptr[900]); MELT_LOCATION ("warmelt-outobj.melt:6997:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V900*/ meltfptr[899]); + meltgc_touch ( /*_._VALROUT___V903*/ meltfptr[902]); MELT_LOCATION ("warmelt-outobj.melt:6969:/ initchunk"); /*^putroutconst */ @@ -45729,13 +45762,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_15 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V899*/ meltfptr[898])) + ( /*_._VALROUT___V902*/ meltfptr[901])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_709__COMPILE_LIST_SEXPR#8", - NULL != ( /*_._VALROUT___V900*/ meltfptr[899])); - ((meltroutine_ptr_t) /*_._VALROUT___V899*/ meltfptr[898])->tabval[8] = - (melt_ptr_t) ( /*_._VALROUT___V900*/ meltfptr[899]); + melt_checkmsg ("putroutconst constnull.drout_711__COMPILE_LIST_SEXPR#8", + NULL != ( /*_._VALROUT___V903*/ meltfptr[902])); + ((meltroutine_ptr_t) /*_._VALROUT___V902*/ meltfptr[901])->tabval[8] = + (melt_ptr_t) ( /*_._VALROUT___V903*/ meltfptr[902]); MELT_LOCATION ("warmelt-outobj.melt:6969:/ initchunk"); /*^putroutconst */ @@ -45743,13 +45776,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_15 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V899*/ meltfptr[898])) + ( /*_._VALROUT___V902*/ meltfptr[901])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_709__COMPILE_LIST_SEXPR#9", - NULL != ( /*_.CREATE_NORMCONTEXT__V172*/ meltfptr[171])); - ((meltroutine_ptr_t) /*_._VALROUT___V899*/ meltfptr[898])->tabval[9] = - (melt_ptr_t) ( /*_.CREATE_NORMCONTEXT__V172*/ meltfptr[171]); + melt_checkmsg ("putroutconst constnull.drout_711__COMPILE_LIST_SEXPR#9", + NULL != ( /*_.CREATE_NORMCONTEXT__V173*/ meltfptr[172])); + ((meltroutine_ptr_t) /*_._VALROUT___V902*/ meltfptr[901])->tabval[9] = + (melt_ptr_t) ( /*_.CREATE_NORMCONTEXT__V173*/ meltfptr[172]); MELT_LOCATION ("warmelt-outobj.melt:6969:/ initchunk"); /*^putroutconst */ @@ -45757,13 +45790,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_15 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V899*/ meltfptr[898])) + ( /*_._VALROUT___V902*/ meltfptr[901])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_709__COMPILE_LIST_SEXPR#10", - NULL != ( /*_.INITIAL_ENVIRONMENT__V173*/ meltfptr[172])); - ((meltroutine_ptr_t) /*_._VALROUT___V899*/ meltfptr[898])->tabval[10] = - (melt_ptr_t) ( /*_.INITIAL_ENVIRONMENT__V173*/ meltfptr[172]); + melt_checkmsg ("putroutconst constnull.drout_711__COMPILE_LIST_SEXPR#10", + NULL != ( /*_.INITIAL_ENVIRONMENT__V174*/ meltfptr[173])); + ((meltroutine_ptr_t) /*_._VALROUT___V902*/ meltfptr[901])->tabval[10] = + (melt_ptr_t) ( /*_.INITIAL_ENVIRONMENT__V174*/ meltfptr[173]); MELT_LOCATION ("warmelt-outobj.melt:6969:/ initchunk"); /*^putroutconst */ @@ -45771,14 +45804,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_15 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V899*/ meltfptr[898])) + ( /*_._VALROUT___V902*/ meltfptr[901])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_709__COMPILE_LIST_SEXPR#11", + melt_checkmsg ("putroutconst constnull.drout_711__COMPILE_LIST_SEXPR#11", NULL != - ( /*_.CLASS_NORMALIZATION_CONTEXT__V152*/ meltfptr[151])); - ((meltroutine_ptr_t) /*_._VALROUT___V899*/ meltfptr[898])->tabval[11] = - (melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V152*/ meltfptr[151]); + ( /*_.CLASS_NORMALIZATION_CONTEXT__V153*/ meltfptr[152])); + ((meltroutine_ptr_t) /*_._VALROUT___V902*/ meltfptr[901])->tabval[11] = + (melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V153*/ meltfptr[152]); MELT_LOCATION ("warmelt-outobj.melt:6969:/ initchunk"); /*^putroutconst */ @@ -45786,14 +45819,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_15 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V899*/ meltfptr[898])) + ( /*_._VALROUT___V902*/ meltfptr[901])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_709__COMPILE_LIST_SEXPR#12", + melt_checkmsg ("putroutconst constnull.drout_711__COMPILE_LIST_SEXPR#12", NULL != - ( /*_.MACROEXPAND_TOPLEVEL_LIST__V174*/ meltfptr[173])); - ((meltroutine_ptr_t) /*_._VALROUT___V899*/ meltfptr[898])->tabval[12] = - (melt_ptr_t) ( /*_.MACROEXPAND_TOPLEVEL_LIST__V174*/ meltfptr[173]); + ( /*_.MACROEXPAND_TOPLEVEL_LIST__V175*/ meltfptr[174])); + ((meltroutine_ptr_t) /*_._VALROUT___V902*/ meltfptr[901])->tabval[12] = + (melt_ptr_t) ( /*_.MACROEXPAND_TOPLEVEL_LIST__V175*/ meltfptr[174]); MELT_LOCATION ("warmelt-outobj.melt:6969:/ initchunk"); /*^putroutconst */ @@ -45801,25 +45834,25 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_15 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V899*/ meltfptr[898])) + ( /*_._VALROUT___V902*/ meltfptr[901])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_709__COMPILE_LIST_SEXPR#13", - NULL != ( /*_.MACROEXPAND_1__V175*/ meltfptr[174])); - ((meltroutine_ptr_t) /*_._VALROUT___V899*/ meltfptr[898])->tabval[13] = - (melt_ptr_t) ( /*_.MACROEXPAND_1__V175*/ meltfptr[174]); + melt_checkmsg ("putroutconst constnull.drout_711__COMPILE_LIST_SEXPR#13", + NULL != ( /*_.MACROEXPAND_1__V176*/ meltfptr[175])); + ((meltroutine_ptr_t) /*_._VALROUT___V902*/ meltfptr[901])->tabval[13] = + (melt_ptr_t) ( /*_.MACROEXPAND_1__V176*/ meltfptr[175]); MELT_LOCATION ("warmelt-outobj.melt:6969:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V899*/ meltfptr[898])) == + ( /*_._VALROUT___V902*/ meltfptr[901])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V880*/ meltfptr[879]); - ((meltroutine_ptr_t) /*_._VALROUT___V899*/ meltfptr[898])->tabval[14] = - (melt_ptr_t) ( /*_._VALCLO___V880*/ meltfptr[879]); + NULL != /*_._VALCLO___V883*/ meltfptr[882]); + ((meltroutine_ptr_t) /*_._VALROUT___V902*/ meltfptr[901])->tabval[14] = + (melt_ptr_t) ( /*_._VALCLO___V883*/ meltfptr[882]); MELT_LOCATION ("warmelt-outobj.melt:6969:/ initchunk"); /*^putroutconst */ @@ -45827,668 +45860,668 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_15 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V899*/ meltfptr[898])) + ( /*_._VALROUT___V902*/ meltfptr[901])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_709__COMPILE_LIST_SEXPR#15", - NULL != ( /*_.COMPILE2OBJ_INITPROC__V176*/ meltfptr[175])); - ((meltroutine_ptr_t) /*_._VALROUT___V899*/ meltfptr[898])->tabval[15] = - (melt_ptr_t) ( /*_.COMPILE2OBJ_INITPROC__V176*/ meltfptr[175]); + melt_checkmsg ("putroutconst constnull.drout_711__COMPILE_LIST_SEXPR#15", + NULL != ( /*_.COMPILE2OBJ_INITPROC__V177*/ meltfptr[176])); + ((meltroutine_ptr_t) /*_._VALROUT___V902*/ meltfptr[901])->tabval[15] = + (melt_ptr_t) ( /*_.COMPILE2OBJ_INITPROC__V177*/ meltfptr[176]); MELT_LOCATION ("warmelt-outobj.melt:6969:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V899*/ meltfptr[898]); + meltgc_touch ( /*_._VALROUT___V902*/ meltfptr[901]); /*putclosurout#126 */ melt_assertmsg ("putclosrout#126 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V901*/ meltfptr[900])) == + ( /*_._VALCLO___V904*/ meltfptr[903])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#126 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V899*/ meltfptr[898])) == + ( /*_._VALROUT___V902*/ meltfptr[901])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V901*/ meltfptr[900])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V899*/ meltfptr[898]); + ((meltclosure_ptr_t) /*_._VALCLO___V904*/ meltfptr[903])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V902*/ meltfptr[901]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V901*/ meltfptr[900]); + meltgc_touch ( /*_._VALCLO___V904*/ meltfptr[903]); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_711__CLASS_MODULE_CONTEXT @#1", + melt_assertmsg ("checkobj putslot ~dsym_713__CLASS_MODULE_CONTEXT @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V902*/ meltfptr[901])) == + ( /*_._VALDATA___V905*/ meltfptr[904])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_711__CLASS_MODULE_CONTEXT @#1", + melt_assertmsg ("checkoff putslot ~dsym_713__CLASS_MODULE_CONTEXT @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V902*/ - meltfptr[901])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V902*/ meltfptr[901]))->obj_vartab[1] = + ( /*_._VALDATA___V905*/ + meltfptr[904])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V905*/ meltfptr[904]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V903*/ meltfptr[902]); + /*_._VALSTR___V906*/ meltfptr[905]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V902*/ meltfptr[901]); + meltgc_touch ( /*_._VALDATA___V905*/ meltfptr[904]); - melt_dbgtrace_written_object ( /*_._VALDATA___V902*/ meltfptr[901], + melt_dbgtrace_written_object ( /*_._VALDATA___V905*/ meltfptr[904], "new static instance"); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_713__DISCR_MAP_STRINGS @#1", + melt_assertmsg ("checkobj putslot ~dsym_715__DISCR_MAP_STRINGS @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V904*/ meltfptr[903])) == + ( /*_._VALDATA___V907*/ meltfptr[906])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_713__DISCR_MAP_STRINGS @#1", + melt_assertmsg ("checkoff putslot ~dsym_715__DISCR_MAP_STRINGS @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V904*/ - meltfptr[903])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V904*/ meltfptr[903]))->obj_vartab[1] = + ( /*_._VALDATA___V907*/ + meltfptr[906])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V907*/ meltfptr[906]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V905*/ meltfptr[904]); + /*_._VALSTR___V908*/ meltfptr[907]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V904*/ meltfptr[903]); + meltgc_touch ( /*_._VALDATA___V907*/ meltfptr[906]); - melt_dbgtrace_written_object ( /*_._VALDATA___V904*/ meltfptr[903], + melt_dbgtrace_written_object ( /*_._VALDATA___V907*/ meltfptr[906], "new static instance"); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_716__CREATE_NORMCONTEXT @#1", + melt_assertmsg ("checkobj putslot ~dsym_718__CREATE_NORMCONTEXT @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V906*/ meltfptr[905])) == + ( /*_._VALDATA___V909*/ meltfptr[908])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_716__CREATE_NORMCONTEXT @#1", + melt_assertmsg ("checkoff putslot ~dsym_718__CREATE_NORMCONTEXT @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V906*/ - meltfptr[905])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V906*/ meltfptr[905]))->obj_vartab[1] = + ( /*_._VALDATA___V909*/ + meltfptr[908])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V909*/ meltfptr[908]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V907*/ meltfptr[906]); + /*_._VALSTR___V910*/ meltfptr[909]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V906*/ meltfptr[905]); + meltgc_touch ( /*_._VALDATA___V909*/ meltfptr[908]); - melt_dbgtrace_written_object ( /*_._VALDATA___V906*/ meltfptr[905], + melt_dbgtrace_written_object ( /*_._VALDATA___V909*/ meltfptr[908], "new static instance"); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_718__INITIAL_ENVIRONMENT @#1", + melt_assertmsg ("checkobj putslot ~dsym_720__INITIAL_ENVIRONMENT @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V908*/ meltfptr[907])) == + ( /*_._VALDATA___V911*/ meltfptr[910])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_718__INITIAL_ENVIRONMENT @#1", + melt_assertmsg ("checkoff putslot ~dsym_720__INITIAL_ENVIRONMENT @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V908*/ - meltfptr[907])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V908*/ meltfptr[907]))->obj_vartab[1] = + ( /*_._VALDATA___V911*/ + meltfptr[910])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V911*/ meltfptr[910]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V909*/ meltfptr[908]); + /*_._VALSTR___V912*/ meltfptr[911]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V908*/ meltfptr[907]); + meltgc_touch ( /*_._VALDATA___V911*/ meltfptr[910]); - melt_dbgtrace_written_object ( /*_._VALDATA___V908*/ meltfptr[907], + melt_dbgtrace_written_object ( /*_._VALDATA___V911*/ meltfptr[910], "new static instance"); - /*putslot */ + +#undef meltfram__ +} /*end of meltmod__WARMELTmiOUTOBJ__initialmeltchunk_15 */ + +void +meltmod__WARMELTmiOUTOBJ__initialmeltchunk_16 (meltinitial_frame_t * + meltmeltframptr__, + char meltpredefinited[]) +{ +#define meltfram__ (*meltmeltframptr__) +#undef meltcallcount +#define meltcallcount 0L + (void) meltpredefinited; +/*putslot*/ melt_assertmsg - ("checkobj putslot ~dsym_720__MACROEXPAND_TOPLEVEL_LIST @#1", - melt_magic_discr ((melt_ptr_t) ( /*_._VALDATA___V910*/ meltfptr[909])) == + ("checkobj putslot ~dsym_722__MACROEXPAND_TOPLEVEL_LIST @#1", + melt_magic_discr ((melt_ptr_t) ( /*_._VALDATA___V913*/ meltfptr[912])) == MELTOBMAG_OBJECT); melt_assertmsg - ("checkoff putslot ~dsym_720__MACROEXPAND_TOPLEVEL_LIST @#1", + ("checkoff putslot ~dsym_722__MACROEXPAND_TOPLEVEL_LIST @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V910*/ meltfptr[909])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V910*/ meltfptr[909]))->obj_vartab[1] = + ( /*_._VALDATA___V913*/ meltfptr[912])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V913*/ meltfptr[912]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V911*/ meltfptr[910]); + /*_._VALSTR___V914*/ meltfptr[913]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V910*/ meltfptr[909]); + meltgc_touch ( /*_._VALDATA___V913*/ meltfptr[912]); - melt_dbgtrace_written_object ( /*_._VALDATA___V910*/ meltfptr[909], + melt_dbgtrace_written_object ( /*_._VALDATA___V913*/ meltfptr[912], "new static instance"); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_722__MACROEXPAND_1 @#1", + melt_assertmsg ("checkobj putslot ~dsym_724__MACROEXPAND_1 @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V912*/ meltfptr[911])) == + ( /*_._VALDATA___V915*/ meltfptr[914])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_722__MACROEXPAND_1 @#1", + melt_assertmsg ("checkoff putslot ~dsym_724__MACROEXPAND_1 @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V912*/ - meltfptr[911])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V912*/ meltfptr[911]))->obj_vartab[1] = + ( /*_._VALDATA___V915*/ + meltfptr[914])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V915*/ meltfptr[914]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V913*/ meltfptr[912]); + /*_._VALSTR___V916*/ meltfptr[915]); - -#undef meltfram__ -} /*end of meltmod__WARMELTmiOUTOBJ__initialmeltchunk_15 */ - -void -meltmod__WARMELTmiOUTOBJ__initialmeltchunk_16 (meltinitial_frame_t * - meltmeltframptr__, - char meltpredefinited[]) -{ -#define meltfram__ (*meltmeltframptr__) -#undef meltcallcount -#define meltcallcount 0L - (void) meltpredefinited; -/*touch:_VALUEDATA_*/ - meltgc_touch ( /*_._VALDATA___V912*/ meltfptr[911]); + /*touch:_VALUEDATA_ */ + meltgc_touch ( /*_._VALDATA___V915*/ meltfptr[914]); - melt_dbgtrace_written_object ( /*_._VALDATA___V912*/ meltfptr[911], + melt_dbgtrace_written_object ( /*_._VALDATA___V915*/ meltfptr[914], "new static instance"); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_724__COMPILE2OBJ_INITPROC @#1", + melt_assertmsg ("checkobj putslot ~dsym_726__COMPILE2OBJ_INITPROC @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V914*/ meltfptr[913])) == + ( /*_._VALDATA___V917*/ meltfptr[916])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_724__COMPILE2OBJ_INITPROC @#1", + melt_assertmsg ("checkoff putslot ~dsym_726__COMPILE2OBJ_INITPROC @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V914*/ - meltfptr[913])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V914*/ meltfptr[913]))->obj_vartab[1] = + ( /*_._VALDATA___V917*/ + meltfptr[916])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V917*/ meltfptr[916]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V915*/ meltfptr[914]); + /*_._VALSTR___V918*/ meltfptr[917]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V914*/ meltfptr[913]); + meltgc_touch ( /*_._VALDATA___V917*/ meltfptr[916]); - melt_dbgtrace_written_object ( /*_._VALDATA___V914*/ meltfptr[913], + melt_dbgtrace_written_object ( /*_._VALDATA___V917*/ meltfptr[916], "new static instance"); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_726__MELT_RUN_EXTENSION @#1", + melt_assertmsg ("checkobj putslot ~dsym_728__MELT_RUN_EXTENSION @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V916*/ meltfptr[915])) == + ( /*_._VALDATA___V919*/ meltfptr[918])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_726__MELT_RUN_EXTENSION @#1", + melt_assertmsg ("checkoff putslot ~dsym_728__MELT_RUN_EXTENSION @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V916*/ - meltfptr[915])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V916*/ meltfptr[915]))->obj_vartab[1] = + ( /*_._VALDATA___V919*/ + meltfptr[918])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V919*/ meltfptr[918]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V917*/ meltfptr[916]); + /*_._VALSTR___V920*/ meltfptr[919]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V916*/ meltfptr[915]); + meltgc_touch ( /*_._VALDATA___V919*/ meltfptr[918]); - melt_dbgtrace_written_object ( /*_._VALDATA___V916*/ meltfptr[915], + melt_dbgtrace_written_object ( /*_._VALDATA___V919*/ meltfptr[918], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:7044:/ initchunk"); /*^putslot */ /*putslot */ - melt_assertmsg ("checkobj putslot ~dobj_728__MELT_RUN_EXTENSION @#1", + melt_assertmsg ("checkobj putslot ~dobj_730__MELT_RUN_EXTENSION @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V918*/ meltfptr[917])) == + ( /*_._VALDATA___V921*/ meltfptr[920])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dobj_728__MELT_RUN_EXTENSION @#1", + melt_assertmsg ("checkoff putslot ~dobj_730__MELT_RUN_EXTENSION @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V918*/ - meltfptr[917])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V918*/ meltfptr[917]))->obj_vartab[1] = + ( /*_._VALDATA___V921*/ + meltfptr[920])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V921*/ meltfptr[920]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V919*/ meltfptr[918]); + /*_._VALSTR___V922*/ meltfptr[921]); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_731__BASENAME @#1", + melt_assertmsg ("checkobj putslot ~dsym_733__BASENAME @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V921*/ meltfptr[920])) == + ( /*_._VALDATA___V924*/ meltfptr[923])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_731__BASENAME @#1", + melt_assertmsg ("checkoff putslot ~dsym_733__BASENAME @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V921*/ - meltfptr[920])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V921*/ meltfptr[920]))->obj_vartab[1] = + ( /*_._VALDATA___V924*/ + meltfptr[923])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V924*/ meltfptr[923]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V922*/ meltfptr[921]); + /*_._VALSTR___V925*/ meltfptr[924]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V921*/ meltfptr[920]); + meltgc_touch ( /*_._VALDATA___V924*/ meltfptr[923]); - melt_dbgtrace_written_object ( /*_._VALDATA___V921*/ meltfptr[920], + melt_dbgtrace_written_object ( /*_._VALDATA___V924*/ meltfptr[923], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:7044:/ initchunk"); /*^putslot */ /*putslot */ - melt_assertmsg ("checkobj putslot ~dobj_733 @#0", + melt_assertmsg ("checkobj putslot ~dobj_735 @#0", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V920*/ meltfptr[919])) == + ( /*_._VALDATA___V923*/ meltfptr[922])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dobj_733 @#0", + melt_assertmsg ("checkoff putslot ~dobj_735 @#0", (0 >= 0 && 0 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V920*/ - meltfptr[919])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V920*/ meltfptr[919]))->obj_vartab[0] = + ( /*_._VALDATA___V923*/ + meltfptr[922])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V923*/ meltfptr[922]))->obj_vartab[0] = (melt_ptr_t) ( - /*_._VALDATA___V921*/ meltfptr[920]); + /*_._VALDATA___V924*/ meltfptr[923]); MELT_LOCATION ("warmelt-outobj.melt:7044:/ initchunk"); /*^putslot */ /*putslot */ - melt_assertmsg ("checkobj putslot ~dobj_733 @#1", + melt_assertmsg ("checkobj putslot ~dobj_735 @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V920*/ meltfptr[919])) == + ( /*_._VALDATA___V923*/ meltfptr[922])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dobj_733 @#1", + melt_assertmsg ("checkoff putslot ~dobj_735 @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V920*/ - meltfptr[919])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V920*/ meltfptr[919]))->obj_vartab[1] = + ( /*_._VALDATA___V923*/ + meltfptr[922])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V923*/ meltfptr[922]))->obj_vartab[1] = (melt_ptr_t) ( ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); MELT_LOCATION ("warmelt-outobj.melt:7044:/ initchunk"); /*^touch */ /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V920*/ meltfptr[919]); + meltgc_touch ( /*_._VALDATA___V923*/ meltfptr[922]); MELT_LOCATION ("warmelt-outobj.melt:7044:/ initchunk"); /*^touchobj */ - melt_dbgtrace_written_object ( /*_._VALDATA___V920*/ meltfptr[919], + melt_dbgtrace_written_object ( /*_._VALDATA___V923*/ meltfptr[922], "new static instance"); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_734__ENV @#1", + melt_assertmsg ("checkobj putslot ~dsym_736__ENV @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V924*/ meltfptr[923])) == + ( /*_._VALDATA___V927*/ meltfptr[926])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_734__ENV @#1", + melt_assertmsg ("checkoff putslot ~dsym_736__ENV @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V924*/ - meltfptr[923])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V924*/ meltfptr[923]))->obj_vartab[1] = + ( /*_._VALDATA___V927*/ + meltfptr[926])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V927*/ meltfptr[926]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V925*/ meltfptr[924]); + /*_._VALSTR___V928*/ meltfptr[927]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V924*/ meltfptr[923]); + meltgc_touch ( /*_._VALDATA___V927*/ meltfptr[926]); - melt_dbgtrace_written_object ( /*_._VALDATA___V924*/ meltfptr[923], + melt_dbgtrace_written_object ( /*_._VALDATA___V927*/ meltfptr[926], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:7044:/ initchunk"); /*^putslot */ /*putslot */ - melt_assertmsg ("checkobj putslot ~dobj_736 @#0", + melt_assertmsg ("checkobj putslot ~dobj_738 @#0", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V923*/ meltfptr[922])) == + ( /*_._VALDATA___V926*/ meltfptr[925])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dobj_736 @#0", + melt_assertmsg ("checkoff putslot ~dobj_738 @#0", (0 >= 0 && 0 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V923*/ - meltfptr[922])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V923*/ meltfptr[922]))->obj_vartab[0] = + ( /*_._VALDATA___V926*/ + meltfptr[925])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V926*/ meltfptr[925]))->obj_vartab[0] = (melt_ptr_t) ( - /*_._VALDATA___V924*/ meltfptr[923]); + /*_._VALDATA___V927*/ meltfptr[926]); MELT_LOCATION ("warmelt-outobj.melt:7044:/ initchunk"); /*^putslot */ /*putslot */ - melt_assertmsg ("checkobj putslot ~dobj_736 @#1", + melt_assertmsg ("checkobj putslot ~dobj_738 @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V923*/ meltfptr[922])) == + ( /*_._VALDATA___V926*/ meltfptr[925])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dobj_736 @#1", + melt_assertmsg ("checkoff putslot ~dobj_738 @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V923*/ - meltfptr[922])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V923*/ meltfptr[922]))->obj_vartab[1] = + ( /*_._VALDATA___V926*/ + meltfptr[925])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V926*/ meltfptr[925]))->obj_vartab[1] = (melt_ptr_t) ( ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); MELT_LOCATION ("warmelt-outobj.melt:7044:/ initchunk"); /*^touch */ /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V923*/ meltfptr[922]); + meltgc_touch ( /*_._VALDATA___V926*/ meltfptr[925]); MELT_LOCATION ("warmelt-outobj.melt:7044:/ initchunk"); /*^touchobj */ - melt_dbgtrace_written_object ( /*_._VALDATA___V923*/ meltfptr[922], + melt_dbgtrace_written_object ( /*_._VALDATA___V926*/ meltfptr[925], "new static instance"); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_737__LITVAL @#1", + melt_assertmsg ("checkobj putslot ~dsym_739__LITVAL @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V927*/ meltfptr[926])) == + ( /*_._VALDATA___V930*/ meltfptr[929])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_737__LITVAL @#1", + melt_assertmsg ("checkoff putslot ~dsym_739__LITVAL @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V927*/ - meltfptr[926])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V927*/ meltfptr[926]))->obj_vartab[1] = + ( /*_._VALDATA___V930*/ + meltfptr[929])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V930*/ meltfptr[929]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V928*/ meltfptr[927]); + /*_._VALSTR___V931*/ meltfptr[930]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V927*/ meltfptr[926]); + meltgc_touch ( /*_._VALDATA___V930*/ meltfptr[929]); - melt_dbgtrace_written_object ( /*_._VALDATA___V927*/ meltfptr[926], + melt_dbgtrace_written_object ( /*_._VALDATA___V930*/ meltfptr[929], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:7044:/ initchunk"); /*^putslot */ /*putslot */ - melt_assertmsg ("checkobj putslot ~dobj_739 @#0", + melt_assertmsg ("checkobj putslot ~dobj_741 @#0", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V926*/ meltfptr[925])) == + ( /*_._VALDATA___V929*/ meltfptr[928])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dobj_739 @#0", + melt_assertmsg ("checkoff putslot ~dobj_741 @#0", (0 >= 0 && 0 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V926*/ - meltfptr[925])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V926*/ meltfptr[925]))->obj_vartab[0] = + ( /*_._VALDATA___V929*/ + meltfptr[928])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V929*/ meltfptr[928]))->obj_vartab[0] = (melt_ptr_t) ( - /*_._VALDATA___V927*/ meltfptr[926]); + /*_._VALDATA___V930*/ meltfptr[929]); MELT_LOCATION ("warmelt-outobj.melt:7044:/ initchunk"); /*^putslot */ /*putslot */ - melt_assertmsg ("checkobj putslot ~dobj_739 @#1", + melt_assertmsg ("checkobj putslot ~dobj_741 @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V926*/ meltfptr[925])) == + ( /*_._VALDATA___V929*/ meltfptr[928])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dobj_739 @#1", + melt_assertmsg ("checkoff putslot ~dobj_741 @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V926*/ - meltfptr[925])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V926*/ meltfptr[925]))->obj_vartab[1] = + ( /*_._VALDATA___V929*/ + meltfptr[928])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V929*/ meltfptr[928]))->obj_vartab[1] = (melt_ptr_t) ( ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); MELT_LOCATION ("warmelt-outobj.melt:7044:/ initchunk"); /*^touch */ /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V926*/ meltfptr[925]); + meltgc_touch ( /*_._VALDATA___V929*/ meltfptr[928]); MELT_LOCATION ("warmelt-outobj.melt:7044:/ initchunk"); /*^touchobj */ - melt_dbgtrace_written_object ( /*_._VALDATA___V926*/ meltfptr[925], + melt_dbgtrace_written_object ( /*_._VALDATA___V929*/ meltfptr[928], "new static instance"); /*putupl#49 */ melt_assertmsg ("putupl #49 checktup", melt_magic_discr ((melt_ptr_t) - ( /*_._VALTUP___V929*/ meltfptr[928])) == + ( /*_._VALTUP___V932*/ meltfptr[931])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #49 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) - ( /*_._VALTUP___V929*/ - meltfptr[928])))); - ((meltmultiple_ptr_t) ( /*_._VALTUP___V929*/ meltfptr[928]))->tabval[0] = - (melt_ptr_t) ( /*_._VALDATA___V920*/ meltfptr[919]); + ( /*_._VALTUP___V932*/ + meltfptr[931])))); + ((meltmultiple_ptr_t) ( /*_._VALTUP___V932*/ meltfptr[931]))->tabval[0] = + (melt_ptr_t) ( /*_._VALDATA___V923*/ meltfptr[922]); /*putupl#50 */ melt_assertmsg ("putupl #50 checktup", melt_magic_discr ((melt_ptr_t) - ( /*_._VALTUP___V929*/ meltfptr[928])) == + ( /*_._VALTUP___V932*/ meltfptr[931])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #50 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) - ( /*_._VALTUP___V929*/ - meltfptr[928])))); - ((meltmultiple_ptr_t) ( /*_._VALTUP___V929*/ meltfptr[928]))->tabval[1] = - (melt_ptr_t) ( /*_._VALDATA___V923*/ meltfptr[922]); + ( /*_._VALTUP___V932*/ + meltfptr[931])))); + ((meltmultiple_ptr_t) ( /*_._VALTUP___V932*/ meltfptr[931]))->tabval[1] = + (melt_ptr_t) ( /*_._VALDATA___V926*/ meltfptr[925]); /*putupl#51 */ melt_assertmsg ("putupl #51 checktup", melt_magic_discr ((melt_ptr_t) - ( /*_._VALTUP___V929*/ meltfptr[928])) == + ( /*_._VALTUP___V932*/ meltfptr[931])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #51 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) - ( /*_._VALTUP___V929*/ - meltfptr[928])))); - ((meltmultiple_ptr_t) ( /*_._VALTUP___V929*/ meltfptr[928]))->tabval[2] = - (melt_ptr_t) ( /*_._VALDATA___V926*/ meltfptr[925]); + ( /*_._VALTUP___V932*/ + meltfptr[931])))); + ((meltmultiple_ptr_t) ( /*_._VALTUP___V932*/ meltfptr[931]))->tabval[2] = + (melt_ptr_t) ( /*_._VALDATA___V929*/ meltfptr[928]); /*touch:_INITUP_ */ - meltgc_touch ( /*_._VALTUP___V929*/ meltfptr[928]); + meltgc_touch ( /*_._VALTUP___V932*/ meltfptr[931]); MELT_LOCATION ("warmelt-outobj.melt:7044:/ initchunk"); /*^putslot */ /*putslot */ - melt_assertmsg ("checkobj putslot ~dobj_728__MELT_RUN_EXTENSION @#2", + melt_assertmsg ("checkobj putslot ~dobj_730__MELT_RUN_EXTENSION @#2", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V918*/ meltfptr[917])) == + ( /*_._VALDATA___V921*/ meltfptr[920])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dobj_728__MELT_RUN_EXTENSION @#2", + melt_assertmsg ("checkoff putslot ~dobj_730__MELT_RUN_EXTENSION @#2", (2 >= 0 && 2 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V918*/ - meltfptr[917])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V918*/ meltfptr[917]))->obj_vartab[2] = + ( /*_._VALDATA___V921*/ + meltfptr[920])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V921*/ meltfptr[920]))->obj_vartab[2] = (melt_ptr_t) ( - /*_._VALTUP___V929*/ meltfptr[928]); + /*_._VALTUP___V932*/ meltfptr[931]); MELT_LOCATION ("warmelt-outobj.melt:7044:/ initchunk"); /*^putslot */ /*putslot */ - melt_assertmsg ("checkobj putslot ~dobj_728__MELT_RUN_EXTENSION @#3", + melt_assertmsg ("checkobj putslot ~dobj_730__MELT_RUN_EXTENSION @#3", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V918*/ meltfptr[917])) == + ( /*_._VALDATA___V921*/ meltfptr[920])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dobj_728__MELT_RUN_EXTENSION @#3", + melt_assertmsg ("checkoff putslot ~dobj_730__MELT_RUN_EXTENSION @#3", (3 >= 0 && 3 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V918*/ - meltfptr[917])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V918*/ meltfptr[917]))->obj_vartab[3] = + ( /*_._VALDATA___V921*/ + meltfptr[920])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V921*/ meltfptr[920]))->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___V934*/ meltfptr[933])) == + ( /*_._VALTUP___V937*/ meltfptr[936])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #52 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) - ( /*_._VALTUP___V934*/ - meltfptr[933])))); - ((meltmultiple_ptr_t) ( /*_._VALTUP___V934*/ meltfptr[933]))->tabval[0] = - (melt_ptr_t) ( /*_._VALSTR___V930*/ meltfptr[929]); + ( /*_._VALTUP___V937*/ + meltfptr[936])))); + ((meltmultiple_ptr_t) ( /*_._VALTUP___V937*/ meltfptr[936]))->tabval[0] = + (melt_ptr_t) ( /*_._VALSTR___V933*/ meltfptr[932]); /*putupl#53 */ melt_assertmsg ("putupl #53 checktup", melt_magic_discr ((melt_ptr_t) - ( /*_._VALTUP___V934*/ meltfptr[933])) == + ( /*_._VALTUP___V937*/ meltfptr[936])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #53 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) - ( /*_._VALTUP___V934*/ - meltfptr[933])))); - ((meltmultiple_ptr_t) ( /*_._VALTUP___V934*/ meltfptr[933]))->tabval[1] = - (melt_ptr_t) ( /*_._VALDATA___V921*/ meltfptr[920]); + ( /*_._VALTUP___V937*/ + meltfptr[936])))); + ((meltmultiple_ptr_t) ( /*_._VALTUP___V937*/ meltfptr[936]))->tabval[1] = + (melt_ptr_t) ( /*_._VALDATA___V924*/ meltfptr[923]); /*putupl#54 */ melt_assertmsg ("putupl #54 checktup", melt_magic_discr ((melt_ptr_t) - ( /*_._VALTUP___V934*/ meltfptr[933])) == + ( /*_._VALTUP___V937*/ meltfptr[936])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #54 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) - ( /*_._VALTUP___V934*/ - meltfptr[933])))); - ((meltmultiple_ptr_t) ( /*_._VALTUP___V934*/ meltfptr[933]))->tabval[2] = - (melt_ptr_t) ( /*_._VALSTR___V931*/ meltfptr[930]); + ( /*_._VALTUP___V937*/ + meltfptr[936])))); + ((meltmultiple_ptr_t) ( /*_._VALTUP___V937*/ meltfptr[936]))->tabval[2] = + (melt_ptr_t) ( /*_._VALSTR___V934*/ meltfptr[933]); /*putupl#55 */ melt_assertmsg ("putupl #55 checktup", melt_magic_discr ((melt_ptr_t) - ( /*_._VALTUP___V934*/ meltfptr[933])) == + ( /*_._VALTUP___V937*/ meltfptr[936])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #55 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) - ( /*_._VALTUP___V934*/ - meltfptr[933])))); - ((meltmultiple_ptr_t) ( /*_._VALTUP___V934*/ meltfptr[933]))->tabval[3] = - (melt_ptr_t) ( /*_._VALDATA___V924*/ meltfptr[923]); + ( /*_._VALTUP___V937*/ + meltfptr[936])))); + ((meltmultiple_ptr_t) ( /*_._VALTUP___V937*/ meltfptr[936]))->tabval[3] = + (melt_ptr_t) ( /*_._VALDATA___V927*/ meltfptr[926]); /*putupl#56 */ melt_assertmsg ("putupl #56 checktup", melt_magic_discr ((melt_ptr_t) - ( /*_._VALTUP___V934*/ meltfptr[933])) == + ( /*_._VALTUP___V937*/ meltfptr[936])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #56 checkoff", (4 >= 0 && 4 < melt_multiple_length ((melt_ptr_t) - ( /*_._VALTUP___V934*/ - meltfptr[933])))); - ((meltmultiple_ptr_t) ( /*_._VALTUP___V934*/ meltfptr[933]))->tabval[4] = - (melt_ptr_t) ( /*_._VALSTR___V932*/ meltfptr[931]); + ( /*_._VALTUP___V937*/ + meltfptr[936])))); + ((meltmultiple_ptr_t) ( /*_._VALTUP___V937*/ meltfptr[936]))->tabval[4] = + (melt_ptr_t) ( /*_._VALSTR___V935*/ meltfptr[934]); /*putupl#57 */ melt_assertmsg ("putupl #57 checktup", melt_magic_discr ((melt_ptr_t) - ( /*_._VALTUP___V934*/ meltfptr[933])) == + ( /*_._VALTUP___V937*/ meltfptr[936])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #57 checkoff", (5 >= 0 && 5 < melt_multiple_length ((melt_ptr_t) - ( /*_._VALTUP___V934*/ - meltfptr[933])))); - ((meltmultiple_ptr_t) ( /*_._VALTUP___V934*/ meltfptr[933]))->tabval[5] = - (melt_ptr_t) ( /*_._VALDATA___V927*/ meltfptr[926]); + ( /*_._VALTUP___V937*/ + meltfptr[936])))); + ((meltmultiple_ptr_t) ( /*_._VALTUP___V937*/ meltfptr[936]))->tabval[5] = + (melt_ptr_t) ( /*_._VALDATA___V930*/ meltfptr[929]); /*putupl#58 */ melt_assertmsg ("putupl #58 checktup", melt_magic_discr ((melt_ptr_t) - ( /*_._VALTUP___V934*/ meltfptr[933])) == + ( /*_._VALTUP___V937*/ meltfptr[936])) == MELTOBMAG_MULTIPLE); melt_assertmsg ("putupl #58 checkoff", (6 >= 0 && 6 < melt_multiple_length ((melt_ptr_t) - ( /*_._VALTUP___V934*/ - meltfptr[933])))); - ((meltmultiple_ptr_t) ( /*_._VALTUP___V934*/ meltfptr[933]))->tabval[6] = - (melt_ptr_t) ( /*_._VALSTR___V933*/ meltfptr[932]); + ( /*_._VALTUP___V937*/ + meltfptr[936])))); + ((meltmultiple_ptr_t) ( /*_._VALTUP___V937*/ meltfptr[936]))->tabval[6] = + (melt_ptr_t) ( /*_._VALSTR___V936*/ meltfptr[935]); /*touch:_INITUP_ */ - meltgc_touch ( /*_._VALTUP___V934*/ meltfptr[933]); + meltgc_touch ( /*_._VALTUP___V937*/ meltfptr[936]); MELT_LOCATION ("warmelt-outobj.melt:7044:/ initchunk"); /*^putslot */ /*putslot */ - melt_assertmsg ("checkobj putslot ~dobj_728__MELT_RUN_EXTENSION @#4", + melt_assertmsg ("checkobj putslot ~dobj_730__MELT_RUN_EXTENSION @#4", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V918*/ meltfptr[917])) == + ( /*_._VALDATA___V921*/ meltfptr[920])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dobj_728__MELT_RUN_EXTENSION @#4", + melt_assertmsg ("checkoff putslot ~dobj_730__MELT_RUN_EXTENSION @#4", (4 >= 0 && 4 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V918*/ - meltfptr[917])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V918*/ meltfptr[917]))->obj_vartab[4] = + ( /*_._VALDATA___V921*/ + meltfptr[920])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V921*/ meltfptr[920]))->obj_vartab[4] = (melt_ptr_t) ( - /*_._VALTUP___V934*/ meltfptr[933]); + /*_._VALTUP___V937*/ meltfptr[936]); MELT_LOCATION ("warmelt-outobj.melt:7044:/ initchunk"); /*^touch */ /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V918*/ meltfptr[917]); + meltgc_touch ( /*_._VALDATA___V921*/ meltfptr[920]); MELT_LOCATION ("warmelt-outobj.melt:7044:/ initchunk"); /*^touchobj */ - melt_dbgtrace_written_object ( /*_._VALDATA___V918*/ meltfptr[917], + melt_dbgtrace_written_object ( /*_._VALDATA___V921*/ meltfptr[920], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:7054:/ initchunk"); @@ -46497,13 +46530,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_16 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V935*/ meltfptr[934])) + ( /*_._VALROUT___V938*/ meltfptr[937])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_745__AUTOBOX_NORMAL_RETURN#0", + ("putroutconst constnull.drout_747__AUTOBOX_NORMAL_RETURN#0", NULL != ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_._VALROUT___V935*/ meltfptr[934])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V938*/ meltfptr[937])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:7054:/ initchunk"); @@ -46512,13 +46545,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_16 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V935*/ meltfptr[934])) + ( /*_._VALROUT___V938*/ meltfptr[937])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_745__AUTOBOX_NORMAL_RETURN#1", + ("putroutconst constnull.drout_747__AUTOBOX_NORMAL_RETURN#1", NULL != ( /*_.DISCR_LIST__V65*/ meltfptr[64])); - ((meltroutine_ptr_t) /*_._VALROUT___V935*/ meltfptr[934])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V938*/ meltfptr[937])->tabval[1] = (melt_ptr_t) ( /*_.DISCR_LIST__V65*/ meltfptr[64]); MELT_LOCATION ("warmelt-outobj.melt:7054:/ initchunk"); @@ -46527,13 +46560,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_16 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V935*/ meltfptr[934])) + ( /*_._VALROUT___V938*/ meltfptr[937])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_745__AUTOBOX_NORMAL_RETURN#2", + ("putroutconst constnull.drout_747__AUTOBOX_NORMAL_RETURN#2", NULL != ( /*_.CLASS_CTYPE__V28*/ meltfptr[27])); - ((meltroutine_ptr_t) /*_._VALROUT___V935*/ meltfptr[934])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V938*/ meltfptr[937])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_CTYPE__V28*/ meltfptr[27]); MELT_LOCATION ("warmelt-outobj.melt:7054:/ initchunk"); @@ -46542,36 +46575,36 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_16 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V935*/ meltfptr[934])) + ( /*_._VALROUT___V938*/ meltfptr[937])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_745__AUTOBOX_NORMAL_RETURN#3", - NULL != ( /*_.CLONE_SYMBOL__V177*/ meltfptr[176])); - ((meltroutine_ptr_t) /*_._VALROUT___V935*/ meltfptr[934])->tabval[3] = - (melt_ptr_t) ( /*_.CLONE_SYMBOL__V177*/ meltfptr[176]); + ("putroutconst constnull.drout_747__AUTOBOX_NORMAL_RETURN#3", + NULL != ( /*_.CLONE_SYMBOL__V178*/ meltfptr[177])); + ((meltroutine_ptr_t) /*_._VALROUT___V938*/ meltfptr[937])->tabval[3] = + (melt_ptr_t) ( /*_.CLONE_SYMBOL__V178*/ meltfptr[177]); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_749__RETAUTOBOXVAL @#1", + melt_assertmsg ("checkobj putslot ~dsym_751__RETAUTOBOXVAL @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V936*/ meltfptr[935])) == + ( /*_._VALDATA___V939*/ meltfptr[938])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_749__RETAUTOBOXVAL @#1", + melt_assertmsg ("checkoff putslot ~dsym_751__RETAUTOBOXVAL @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V936*/ - meltfptr[935])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V936*/ meltfptr[935]))->obj_vartab[1] = + ( /*_._VALDATA___V939*/ + meltfptr[938])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V939*/ meltfptr[938]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V937*/ meltfptr[936]); + /*_._VALSTR___V940*/ meltfptr[939]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V936*/ meltfptr[935]); + meltgc_touch ( /*_._VALDATA___V939*/ meltfptr[938]); - melt_dbgtrace_written_object ( /*_._VALDATA___V936*/ meltfptr[935], + melt_dbgtrace_written_object ( /*_._VALDATA___V939*/ meltfptr[938], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:7054:/ initchunk"); @@ -46580,14 +46613,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_16 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V935*/ meltfptr[934])) + ( /*_._VALROUT___V938*/ meltfptr[937])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_745__AUTOBOX_NORMAL_RETURN#4", - NULL != ( /*_._VALDATA___V936*/ meltfptr[935])); - ((meltroutine_ptr_t) /*_._VALROUT___V935*/ meltfptr[934])->tabval[4] = - (melt_ptr_t) ( /*_._VALDATA___V936*/ meltfptr[935]); + ("putroutconst constnull.drout_747__AUTOBOX_NORMAL_RETURN#4", + NULL != ( /*_._VALDATA___V939*/ meltfptr[938])); + ((meltroutine_ptr_t) /*_._VALROUT___V938*/ meltfptr[937])->tabval[4] = + (melt_ptr_t) ( /*_._VALDATA___V939*/ meltfptr[938]); MELT_LOCATION ("warmelt-outobj.melt:7054:/ initchunk"); /*^putroutconst */ @@ -46595,14 +46628,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_16 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V935*/ meltfptr[934])) + ( /*_._VALROUT___V938*/ meltfptr[937])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_745__AUTOBOX_NORMAL_RETURN#5", - NULL != ( /*_.CLASS_NORMAL_LET_BINDING__V178*/ meltfptr[177])); - ((meltroutine_ptr_t) /*_._VALROUT___V935*/ meltfptr[934])->tabval[5] = - (melt_ptr_t) ( /*_.CLASS_NORMAL_LET_BINDING__V178*/ meltfptr[177]); + ("putroutconst constnull.drout_747__AUTOBOX_NORMAL_RETURN#5", + NULL != ( /*_.CLASS_NORMAL_LET_BINDING__V179*/ meltfptr[178])); + ((meltroutine_ptr_t) /*_._VALROUT___V938*/ meltfptr[937])->tabval[5] = + (melt_ptr_t) ( /*_.CLASS_NORMAL_LET_BINDING__V179*/ meltfptr[178]); MELT_LOCATION ("warmelt-outobj.melt:7054:/ initchunk"); /*^putroutconst */ @@ -46610,13 +46643,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_16 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V935*/ meltfptr[934])) + ( /*_._VALROUT___V938*/ meltfptr[937])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_745__AUTOBOX_NORMAL_RETURN#6", + ("putroutconst constnull.drout_747__AUTOBOX_NORMAL_RETURN#6", NULL != ( /*_.CTYPE_VALUE__V31*/ meltfptr[30])); - ((meltroutine_ptr_t) /*_._VALROUT___V935*/ meltfptr[934])->tabval[6] = + ((meltroutine_ptr_t) /*_._VALROUT___V938*/ meltfptr[937])->tabval[6] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V31*/ meltfptr[30]); MELT_LOCATION ("warmelt-outobj.melt:7054:/ initchunk"); @@ -46625,14 +46658,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_16 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V935*/ meltfptr[934])) + ( /*_._VALROUT___V938*/ meltfptr[937])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_745__AUTOBOX_NORMAL_RETURN#7", - NULL != ( /*_.CLASS_NREP_LOCSYMOCC__V179*/ meltfptr[178])); - ((meltroutine_ptr_t) /*_._VALROUT___V935*/ meltfptr[934])->tabval[7] = - (melt_ptr_t) ( /*_.CLASS_NREP_LOCSYMOCC__V179*/ meltfptr[178]); + ("putroutconst constnull.drout_747__AUTOBOX_NORMAL_RETURN#7", + NULL != ( /*_.CLASS_NREP_LOCSYMOCC__V180*/ meltfptr[179])); + ((meltroutine_ptr_t) /*_._VALROUT___V938*/ meltfptr[937])->tabval[7] = + (melt_ptr_t) ( /*_.CLASS_NREP_LOCSYMOCC__V180*/ meltfptr[179]); MELT_LOCATION ("warmelt-outobj.melt:7054:/ initchunk"); /*^putroutconst */ @@ -46640,14 +46673,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_16 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V935*/ meltfptr[934])) + ( /*_._VALROUT___V938*/ meltfptr[937])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_745__AUTOBOX_NORMAL_RETURN#8", - NULL != ( /*_.CLASS_NREP_RETURN__V180*/ meltfptr[179])); - ((meltroutine_ptr_t) /*_._VALROUT___V935*/ meltfptr[934])->tabval[8] = - (melt_ptr_t) ( /*_.CLASS_NREP_RETURN__V180*/ meltfptr[179]); + ("putroutconst constnull.drout_747__AUTOBOX_NORMAL_RETURN#8", + NULL != ( /*_.CLASS_NREP_RETURN__V181*/ meltfptr[180])); + ((meltroutine_ptr_t) /*_._VALROUT___V938*/ meltfptr[937])->tabval[8] = + (melt_ptr_t) ( /*_.CLASS_NREP_RETURN__V181*/ meltfptr[180]); MELT_LOCATION ("warmelt-outobj.melt:7054:/ initchunk"); /*^putroutconst */ @@ -46655,14 +46688,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_16 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V935*/ meltfptr[934])) + ( /*_._VALROUT___V938*/ meltfptr[937])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_745__AUTOBOX_NORMAL_RETURN#9", - NULL != ( /*_.CTYPE_LONG__V77*/ meltfptr[76])); - ((meltroutine_ptr_t) /*_._VALROUT___V935*/ meltfptr[934])->tabval[9] = - (melt_ptr_t) ( /*_.CTYPE_LONG__V77*/ meltfptr[76]); + ("putroutconst constnull.drout_747__AUTOBOX_NORMAL_RETURN#9", + NULL != ( /*_.CTYPE_LONG__V78*/ meltfptr[77])); + ((meltroutine_ptr_t) /*_._VALROUT___V938*/ meltfptr[937])->tabval[9] = + (melt_ptr_t) ( /*_.CTYPE_LONG__V78*/ meltfptr[77]); MELT_LOCATION ("warmelt-outobj.melt:7054:/ initchunk"); /*^putroutconst */ @@ -46670,14 +46703,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_16 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V935*/ meltfptr[934])) + ( /*_._VALROUT___V938*/ meltfptr[937])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_745__AUTOBOX_NORMAL_RETURN#10", - NULL != ( /*_.CLASS_NREP_CHUNK__V181*/ meltfptr[180])); - ((meltroutine_ptr_t) /*_._VALROUT___V935*/ meltfptr[934])->tabval[10] = - (melt_ptr_t) ( /*_.CLASS_NREP_CHUNK__V181*/ meltfptr[180]); + ("putroutconst constnull.drout_747__AUTOBOX_NORMAL_RETURN#10", + NULL != ( /*_.CLASS_NREP_CHUNK__V182*/ meltfptr[181])); + ((meltroutine_ptr_t) /*_._VALROUT___V938*/ meltfptr[937])->tabval[10] = + (melt_ptr_t) ( /*_.CLASS_NREP_CHUNK__V182*/ meltfptr[181]); MELT_LOCATION ("warmelt-outobj.melt:7054:/ initchunk"); /*^putroutconst */ @@ -46685,36 +46718,36 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_16 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V935*/ meltfptr[934])) + ( /*_._VALROUT___V938*/ meltfptr[937])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_745__AUTOBOX_NORMAL_RETURN#11", - NULL != ( /*_.DISCR_VERBATIM_STRING__V87*/ meltfptr[86])); - ((meltroutine_ptr_t) /*_._VALROUT___V935*/ meltfptr[934])->tabval[11] = - (melt_ptr_t) ( /*_.DISCR_VERBATIM_STRING__V87*/ meltfptr[86]); + ("putroutconst constnull.drout_747__AUTOBOX_NORMAL_RETURN#11", + NULL != ( /*_.DISCR_VERBATIM_STRING__V88*/ meltfptr[87])); + ((meltroutine_ptr_t) /*_._VALROUT___V938*/ meltfptr[937])->tabval[11] = + (melt_ptr_t) ( /*_.DISCR_VERBATIM_STRING__V88*/ meltfptr[87]); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_759__AUTOBOXLONG @#1", + melt_assertmsg ("checkobj putslot ~dsym_761__AUTOBOXLONG @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V938*/ meltfptr[937])) == + ( /*_._VALDATA___V941*/ meltfptr[940])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_759__AUTOBOXLONG @#1", + melt_assertmsg ("checkoff putslot ~dsym_761__AUTOBOXLONG @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V938*/ - meltfptr[937])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V938*/ meltfptr[937]))->obj_vartab[1] = + ( /*_._VALDATA___V941*/ + meltfptr[940])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V941*/ meltfptr[940]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V939*/ meltfptr[938]); + /*_._VALSTR___V942*/ meltfptr[941]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V938*/ meltfptr[937]); + meltgc_touch ( /*_._VALDATA___V941*/ meltfptr[940]); - melt_dbgtrace_written_object ( /*_._VALDATA___V938*/ meltfptr[937], + melt_dbgtrace_written_object ( /*_._VALDATA___V941*/ meltfptr[940], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:7054:/ initchunk"); @@ -46723,14 +46756,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_16 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V935*/ meltfptr[934])) + ( /*_._VALROUT___V938*/ meltfptr[937])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_745__AUTOBOX_NORMAL_RETURN#12", - NULL != ( /*_._VALDATA___V938*/ meltfptr[937])); - ((meltroutine_ptr_t) /*_._VALROUT___V935*/ meltfptr[934])->tabval[12] = - (melt_ptr_t) ( /*_._VALDATA___V938*/ meltfptr[937]); + ("putroutconst constnull.drout_747__AUTOBOX_NORMAL_RETURN#12", + NULL != ( /*_._VALDATA___V941*/ meltfptr[940])); + ((meltroutine_ptr_t) /*_._VALROUT___V938*/ meltfptr[937])->tabval[12] = + (melt_ptr_t) ( /*_._VALDATA___V941*/ meltfptr[940]); MELT_LOCATION ("warmelt-outobj.melt:7054:/ initchunk"); /*^putroutconst */ @@ -46738,14 +46771,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_16 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V935*/ meltfptr[934])) + ( /*_._VALROUT___V938*/ meltfptr[937])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_745__AUTOBOX_NORMAL_RETURN#13", - NULL != ( /*_.CLASS_LET_BINDING__V182*/ meltfptr[181])); - ((meltroutine_ptr_t) /*_._VALROUT___V935*/ meltfptr[934])->tabval[13] = - (melt_ptr_t) ( /*_.CLASS_LET_BINDING__V182*/ meltfptr[181]); + ("putroutconst constnull.drout_747__AUTOBOX_NORMAL_RETURN#13", + NULL != ( /*_.CLASS_LET_BINDING__V183*/ meltfptr[182])); + ((meltroutine_ptr_t) /*_._VALROUT___V938*/ meltfptr[937])->tabval[13] = + (melt_ptr_t) ( /*_.CLASS_LET_BINDING__V183*/ meltfptr[182]); MELT_LOCATION ("warmelt-outobj.melt:7054:/ initchunk"); /*^putroutconst */ @@ -46753,36 +46786,36 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_16 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V935*/ meltfptr[934])) + ( /*_._VALROUT___V938*/ meltfptr[937])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_745__AUTOBOX_NORMAL_RETURN#14", - NULL != ( /*_.CTYPE_CSTRING__V183*/ meltfptr[182])); - ((meltroutine_ptr_t) /*_._VALROUT___V935*/ meltfptr[934])->tabval[14] = - (melt_ptr_t) ( /*_.CTYPE_CSTRING__V183*/ meltfptr[182]); + ("putroutconst constnull.drout_747__AUTOBOX_NORMAL_RETURN#14", + NULL != ( /*_.CTYPE_CSTRING__V184*/ meltfptr[183])); + ((meltroutine_ptr_t) /*_._VALROUT___V938*/ meltfptr[937])->tabval[14] = + (melt_ptr_t) ( /*_.CTYPE_CSTRING__V184*/ meltfptr[183]); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_765__AUTOBOXSTRING @#1", + melt_assertmsg ("checkobj putslot ~dsym_767__AUTOBOXSTRING @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V940*/ meltfptr[939])) == + ( /*_._VALDATA___V943*/ meltfptr[942])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_765__AUTOBOXSTRING @#1", + melt_assertmsg ("checkoff putslot ~dsym_767__AUTOBOXSTRING @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V940*/ - meltfptr[939])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V940*/ meltfptr[939]))->obj_vartab[1] = + ( /*_._VALDATA___V943*/ + meltfptr[942])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V943*/ meltfptr[942]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V941*/ meltfptr[940]); + /*_._VALSTR___V944*/ meltfptr[943]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V940*/ meltfptr[939]); + meltgc_touch ( /*_._VALDATA___V943*/ meltfptr[942]); - melt_dbgtrace_written_object ( /*_._VALDATA___V940*/ meltfptr[939], + melt_dbgtrace_written_object ( /*_._VALDATA___V943*/ meltfptr[942], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:7054:/ initchunk"); @@ -46791,14 +46824,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_16 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V935*/ meltfptr[934])) + ( /*_._VALROUT___V938*/ meltfptr[937])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_745__AUTOBOX_NORMAL_RETURN#15", - NULL != ( /*_._VALDATA___V940*/ meltfptr[939])); - ((meltroutine_ptr_t) /*_._VALROUT___V935*/ meltfptr[934])->tabval[15] = - (melt_ptr_t) ( /*_._VALDATA___V940*/ meltfptr[939]); + ("putroutconst constnull.drout_747__AUTOBOX_NORMAL_RETURN#15", + NULL != ( /*_._VALDATA___V943*/ meltfptr[942])); + ((meltroutine_ptr_t) /*_._VALROUT___V938*/ meltfptr[937])->tabval[15] = + (melt_ptr_t) ( /*_._VALDATA___V943*/ meltfptr[942]); MELT_LOCATION ("warmelt-outobj.melt:7054:/ initchunk"); /*^putroutconst */ @@ -46806,14 +46839,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_16 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V935*/ meltfptr[934])) + ( /*_._VALROUT___V938*/ meltfptr[937])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_745__AUTOBOX_NORMAL_RETURN#16", - NULL != ( /*_.CLASS_CTYPE_GTY__V184*/ meltfptr[183])); - ((meltroutine_ptr_t) /*_._VALROUT___V935*/ meltfptr[934])->tabval[16] = - (melt_ptr_t) ( /*_.CLASS_CTYPE_GTY__V184*/ meltfptr[183]); + ("putroutconst constnull.drout_747__AUTOBOX_NORMAL_RETURN#16", + NULL != ( /*_.CLASS_CTYPE_GTY__V185*/ meltfptr[184])); + ((meltroutine_ptr_t) /*_._VALROUT___V938*/ meltfptr[937])->tabval[16] = + (melt_ptr_t) ( /*_.CLASS_CTYPE_GTY__V185*/ meltfptr[184]); MELT_LOCATION ("warmelt-outobj.melt:7054:/ initchunk"); /*^putroutconst */ @@ -46821,36 +46854,36 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_16 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V935*/ meltfptr[934])) + ( /*_._VALROUT___V938*/ meltfptr[937])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_745__AUTOBOX_NORMAL_RETURN#17", + ("putroutconst constnull.drout_747__AUTOBOX_NORMAL_RETURN#17", NULL != ( /*_.CLASS_NAMED__V13*/ meltfptr[12])); - ((meltroutine_ptr_t) /*_._VALROUT___V935*/ meltfptr[934])->tabval[17] = + ((meltroutine_ptr_t) /*_._VALROUT___V938*/ meltfptr[937])->tabval[17] = (melt_ptr_t) ( /*_.CLASS_NAMED__V13*/ meltfptr[12]); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_769__AUTOBOXGTY @#1", + melt_assertmsg ("checkobj putslot ~dsym_771__AUTOBOXGTY @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V942*/ meltfptr[941])) == + ( /*_._VALDATA___V945*/ meltfptr[944])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_769__AUTOBOXGTY @#1", + melt_assertmsg ("checkoff putslot ~dsym_771__AUTOBOXGTY @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V942*/ - meltfptr[941])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V942*/ meltfptr[941]))->obj_vartab[1] = + ( /*_._VALDATA___V945*/ + meltfptr[944])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V945*/ meltfptr[944]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V943*/ meltfptr[942]); + /*_._VALSTR___V946*/ meltfptr[945]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V942*/ meltfptr[941]); + meltgc_touch ( /*_._VALDATA___V945*/ meltfptr[944]); - melt_dbgtrace_written_object ( /*_._VALDATA___V942*/ meltfptr[941], + melt_dbgtrace_written_object ( /*_._VALDATA___V945*/ meltfptr[944], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:7054:/ initchunk"); @@ -46859,217 +46892,217 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_16 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V935*/ meltfptr[934])) + ( /*_._VALROUT___V938*/ meltfptr[937])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_745__AUTOBOX_NORMAL_RETURN#18", - NULL != ( /*_._VALDATA___V942*/ meltfptr[941])); - ((meltroutine_ptr_t) /*_._VALROUT___V935*/ meltfptr[934])->tabval[18] = - (melt_ptr_t) ( /*_._VALDATA___V942*/ meltfptr[941]); + ("putroutconst constnull.drout_747__AUTOBOX_NORMAL_RETURN#18", + NULL != ( /*_._VALDATA___V945*/ meltfptr[944])); + ((meltroutine_ptr_t) /*_._VALROUT___V938*/ meltfptr[937])->tabval[18] = + (melt_ptr_t) ( /*_._VALDATA___V945*/ meltfptr[944]); MELT_LOCATION ("warmelt-outobj.melt:7054:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V935*/ meltfptr[934]); + meltgc_touch ( /*_._VALROUT___V938*/ meltfptr[937]); /*putclosurout#127 */ melt_assertmsg ("putclosrout#127 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V944*/ meltfptr[943])) == + ( /*_._VALCLO___V947*/ meltfptr[946])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#127 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V935*/ meltfptr[934])) == + ( /*_._VALROUT___V938*/ meltfptr[937])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V944*/ meltfptr[943])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V935*/ meltfptr[934]); + ((meltclosure_ptr_t) /*_._VALCLO___V947*/ meltfptr[946])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V938*/ meltfptr[937]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V944*/ meltfptr[943]); + meltgc_touch ( /*_._VALCLO___V947*/ meltfptr[946]); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_747__CLONE_SYMBOL @#1", + melt_assertmsg ("checkobj putslot ~dsym_749__CLONE_SYMBOL @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V945*/ meltfptr[944])) == + ( /*_._VALDATA___V948*/ meltfptr[947])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_747__CLONE_SYMBOL @#1", + melt_assertmsg ("checkoff putslot ~dsym_749__CLONE_SYMBOL @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V945*/ - meltfptr[944])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V945*/ meltfptr[944]))->obj_vartab[1] = + ( /*_._VALDATA___V948*/ + meltfptr[947])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V948*/ meltfptr[947]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V946*/ meltfptr[945]); + /*_._VALSTR___V949*/ meltfptr[948]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V945*/ meltfptr[944]); + meltgc_touch ( /*_._VALDATA___V948*/ meltfptr[947]); - melt_dbgtrace_written_object ( /*_._VALDATA___V945*/ meltfptr[944], + melt_dbgtrace_written_object ( /*_._VALDATA___V948*/ meltfptr[947], "new static instance"); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_751__CLASS_NORMAL_LET_BINDING @#1", + melt_assertmsg ("checkobj putslot ~dsym_753__CLASS_NORMAL_LET_BINDING @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V947*/ meltfptr[946])) == + ( /*_._VALDATA___V950*/ meltfptr[949])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_751__CLASS_NORMAL_LET_BINDING @#1", + melt_assertmsg ("checkoff putslot ~dsym_753__CLASS_NORMAL_LET_BINDING @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V947*/ - meltfptr[946])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V947*/ meltfptr[946]))->obj_vartab[1] = + ( /*_._VALDATA___V950*/ + meltfptr[949])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V950*/ meltfptr[949]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V948*/ meltfptr[947]); + /*_._VALSTR___V951*/ meltfptr[950]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V947*/ meltfptr[946]); + meltgc_touch ( /*_._VALDATA___V950*/ meltfptr[949]); - melt_dbgtrace_written_object ( /*_._VALDATA___V947*/ meltfptr[946], + melt_dbgtrace_written_object ( /*_._VALDATA___V950*/ meltfptr[949], "new static instance"); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_753__CLASS_NREP_LOCSYMOCC @#1", + melt_assertmsg ("checkobj putslot ~dsym_755__CLASS_NREP_LOCSYMOCC @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V949*/ meltfptr[948])) == + ( /*_._VALDATA___V952*/ meltfptr[951])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_753__CLASS_NREP_LOCSYMOCC @#1", + melt_assertmsg ("checkoff putslot ~dsym_755__CLASS_NREP_LOCSYMOCC @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V949*/ - meltfptr[948])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V949*/ meltfptr[948]))->obj_vartab[1] = + ( /*_._VALDATA___V952*/ + meltfptr[951])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V952*/ meltfptr[951]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V950*/ meltfptr[949]); + /*_._VALSTR___V953*/ meltfptr[952]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V949*/ meltfptr[948]); + meltgc_touch ( /*_._VALDATA___V952*/ meltfptr[951]); - melt_dbgtrace_written_object ( /*_._VALDATA___V949*/ meltfptr[948], + melt_dbgtrace_written_object ( /*_._VALDATA___V952*/ meltfptr[951], "new static instance"); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_755__CLASS_NREP_RETURN @#1", + melt_assertmsg ("checkobj putslot ~dsym_757__CLASS_NREP_RETURN @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V951*/ meltfptr[950])) == + ( /*_._VALDATA___V954*/ meltfptr[953])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_755__CLASS_NREP_RETURN @#1", + melt_assertmsg ("checkoff putslot ~dsym_757__CLASS_NREP_RETURN @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V951*/ - meltfptr[950])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V951*/ meltfptr[950]))->obj_vartab[1] = + ( /*_._VALDATA___V954*/ + meltfptr[953])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V954*/ meltfptr[953]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V952*/ meltfptr[951]); + /*_._VALSTR___V955*/ meltfptr[954]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V951*/ meltfptr[950]); + meltgc_touch ( /*_._VALDATA___V954*/ meltfptr[953]); - melt_dbgtrace_written_object ( /*_._VALDATA___V951*/ meltfptr[950], + melt_dbgtrace_written_object ( /*_._VALDATA___V954*/ meltfptr[953], "new static instance"); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_757__CLASS_NREP_CHUNK @#1", + melt_assertmsg ("checkobj putslot ~dsym_759__CLASS_NREP_CHUNK @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V953*/ meltfptr[952])) == + ( /*_._VALDATA___V956*/ meltfptr[955])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_757__CLASS_NREP_CHUNK @#1", + melt_assertmsg ("checkoff putslot ~dsym_759__CLASS_NREP_CHUNK @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V953*/ - meltfptr[952])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V953*/ meltfptr[952]))->obj_vartab[1] = + ( /*_._VALDATA___V956*/ + meltfptr[955])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V956*/ meltfptr[955]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V954*/ meltfptr[953]); + /*_._VALSTR___V957*/ meltfptr[956]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V953*/ meltfptr[952]); + meltgc_touch ( /*_._VALDATA___V956*/ meltfptr[955]); - melt_dbgtrace_written_object ( /*_._VALDATA___V953*/ meltfptr[952], + melt_dbgtrace_written_object ( /*_._VALDATA___V956*/ meltfptr[955], "new static instance"); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_761__CLASS_LET_BINDING @#1", + melt_assertmsg ("checkobj putslot ~dsym_763__CLASS_LET_BINDING @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V955*/ meltfptr[954])) == + ( /*_._VALDATA___V958*/ meltfptr[957])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_761__CLASS_LET_BINDING @#1", + melt_assertmsg ("checkoff putslot ~dsym_763__CLASS_LET_BINDING @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V955*/ - meltfptr[954])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V955*/ meltfptr[954]))->obj_vartab[1] = + ( /*_._VALDATA___V958*/ + meltfptr[957])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V958*/ meltfptr[957]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V956*/ meltfptr[955]); + /*_._VALSTR___V959*/ meltfptr[958]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V955*/ meltfptr[954]); + meltgc_touch ( /*_._VALDATA___V958*/ meltfptr[957]); - melt_dbgtrace_written_object ( /*_._VALDATA___V955*/ meltfptr[954], + melt_dbgtrace_written_object ( /*_._VALDATA___V958*/ meltfptr[957], "new static instance"); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_763__CTYPE_CSTRING @#1", + melt_assertmsg ("checkobj putslot ~dsym_765__CTYPE_CSTRING @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V957*/ meltfptr[956])) == + ( /*_._VALDATA___V960*/ meltfptr[959])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_763__CTYPE_CSTRING @#1", + melt_assertmsg ("checkoff putslot ~dsym_765__CTYPE_CSTRING @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V957*/ - meltfptr[956])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V957*/ meltfptr[956]))->obj_vartab[1] = + ( /*_._VALDATA___V960*/ + meltfptr[959])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V960*/ meltfptr[959]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V958*/ meltfptr[957]); + /*_._VALSTR___V961*/ meltfptr[960]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V957*/ meltfptr[956]); + meltgc_touch ( /*_._VALDATA___V960*/ meltfptr[959]); - melt_dbgtrace_written_object ( /*_._VALDATA___V957*/ meltfptr[956], + melt_dbgtrace_written_object ( /*_._VALDATA___V960*/ meltfptr[959], "new static instance"); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_767__CLASS_CTYPE_GTY @#1", + melt_assertmsg ("checkobj putslot ~dsym_769__CLASS_CTYPE_GTY @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V959*/ meltfptr[958])) == + ( /*_._VALDATA___V962*/ meltfptr[961])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_767__CLASS_CTYPE_GTY @#1", + melt_assertmsg ("checkoff putslot ~dsym_769__CLASS_CTYPE_GTY @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V959*/ - meltfptr[958])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V959*/ meltfptr[958]))->obj_vartab[1] = + ( /*_._VALDATA___V962*/ + meltfptr[961])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V962*/ meltfptr[961]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V960*/ meltfptr[959]); + /*_._VALSTR___V963*/ meltfptr[962]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V959*/ meltfptr[958]); + meltgc_touch ( /*_._VALDATA___V962*/ meltfptr[961]); - melt_dbgtrace_written_object ( /*_._VALDATA___V959*/ meltfptr[958], + melt_dbgtrace_written_object ( /*_._VALDATA___V962*/ meltfptr[961], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:7181:/ initchunk"); @@ -47078,13 +47111,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_16 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V961*/ meltfptr[960])) + ( /*_._VALROUT___V964*/ meltfptr[963])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_771__TRANSLATE_RUN_MELT_EXPRESSIONS#0", + ("putroutconst constnull.drout_773__TRANSLATE_RUN_MELT_EXPRESSIONS#0", NULL != ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_._VALROUT___V961*/ meltfptr[960])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V964*/ meltfptr[963])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:7181:/ initchunk"); @@ -47093,14 +47126,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_16 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V961*/ meltfptr[960])) + ( /*_._VALROUT___V964*/ meltfptr[963])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_771__TRANSLATE_RUN_MELT_EXPRESSIONS#1", - NULL != ( /*_.CLASS_ENVIRONMENT__V153*/ meltfptr[152])); - ((meltroutine_ptr_t) /*_._VALROUT___V961*/ meltfptr[960])->tabval[1] = - (melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V153*/ meltfptr[152]); + ("putroutconst constnull.drout_773__TRANSLATE_RUN_MELT_EXPRESSIONS#1", + NULL != ( /*_.CLASS_ENVIRONMENT__V154*/ meltfptr[153])); + ((meltroutine_ptr_t) /*_._VALROUT___V964*/ meltfptr[963])->tabval[1] = + (melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V154*/ meltfptr[153]); MELT_LOCATION ("warmelt-outobj.melt:7181:/ initchunk"); /*^putroutconst */ @@ -47108,13 +47141,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_16 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V961*/ meltfptr[960])) + ( /*_._VALROUT___V964*/ meltfptr[963])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_771__TRANSLATE_RUN_MELT_EXPRESSIONS#2", + ("putroutconst constnull.drout_773__TRANSLATE_RUN_MELT_EXPRESSIONS#2", NULL != ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5])); - ((meltroutine_ptr_t) /*_._VALROUT___V961*/ meltfptr[960])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V964*/ meltfptr[963])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5]); MELT_LOCATION ("warmelt-outobj.melt:7181:/ initchunk"); @@ -47123,13 +47156,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_16 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V961*/ meltfptr[960])) + ( /*_._VALROUT___V964*/ meltfptr[963])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_771__TRANSLATE_RUN_MELT_EXPRESSIONS#3", + ("putroutconst constnull.drout_773__TRANSLATE_RUN_MELT_EXPRESSIONS#3", NULL != ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_._VALROUT___V961*/ meltfptr[960])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V964*/ meltfptr[963])->tabval[3] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:7181:/ initchunk"); @@ -47138,13 +47171,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_16 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V961*/ meltfptr[960])) + ( /*_._VALROUT___V964*/ meltfptr[963])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_771__TRANSLATE_RUN_MELT_EXPRESSIONS#4", + ("putroutconst constnull.drout_773__TRANSLATE_RUN_MELT_EXPRESSIONS#4", NULL != ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5])); - ((meltroutine_ptr_t) /*_._VALROUT___V961*/ meltfptr[960])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V964*/ meltfptr[963])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5]); MELT_LOCATION ("warmelt-outobj.melt:7219:/ initchunk"); @@ -47153,35 +47186,35 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_16 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V962*/ meltfptr[961])) + ( /*_._VALROUT___V965*/ meltfptr[964])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_773__LAMBDA_#0", + melt_checkmsg ("putroutconst constnull.drout_775__LAMBDA_#0", NULL != ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_._VALROUT___V962*/ meltfptr[961])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V965*/ meltfptr[964])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6]); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_774__TRUE @#1", + melt_assertmsg ("checkobj putslot ~dsym_776__TRUE @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V963*/ meltfptr[962])) == + ( /*_._VALDATA___V966*/ meltfptr[965])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_774__TRUE @#1", + melt_assertmsg ("checkoff putslot ~dsym_776__TRUE @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V963*/ - meltfptr[962])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V963*/ meltfptr[962]))->obj_vartab[1] = + ( /*_._VALDATA___V966*/ + meltfptr[965])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V966*/ meltfptr[965]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V964*/ meltfptr[963]); + /*_._VALSTR___V967*/ meltfptr[966]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V963*/ meltfptr[962]); + meltgc_touch ( /*_._VALDATA___V966*/ meltfptr[965]); - melt_dbgtrace_written_object ( /*_._VALDATA___V963*/ meltfptr[962], + melt_dbgtrace_written_object ( /*_._VALDATA___V966*/ meltfptr[965], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:7219:/ initchunk"); @@ -47190,13 +47223,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_16 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V962*/ meltfptr[961])) + ( /*_._VALROUT___V965*/ meltfptr[964])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_773__LAMBDA_#1", - NULL != ( /*_._VALDATA___V963*/ meltfptr[962])); - ((meltroutine_ptr_t) /*_._VALROUT___V962*/ meltfptr[961])->tabval[1] = - (melt_ptr_t) ( /*_._VALDATA___V963*/ meltfptr[962]); + melt_checkmsg ("putroutconst constnull.drout_775__LAMBDA_#1", + NULL != ( /*_._VALDATA___V966*/ meltfptr[965])); + ((meltroutine_ptr_t) /*_._VALROUT___V965*/ meltfptr[964])->tabval[1] = + (melt_ptr_t) ( /*_._VALDATA___V966*/ meltfptr[965]); MELT_LOCATION ("warmelt-outobj.melt:7219:/ initchunk"); /*^putroutconst */ @@ -47204,18 +47237,18 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_16 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V962*/ meltfptr[961])) + ( /*_._VALROUT___V965*/ meltfptr[964])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_773__LAMBDA_#2", + melt_checkmsg ("putroutconst constnull.drout_775__LAMBDA_#2", NULL != ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5])); - ((meltroutine_ptr_t) /*_._VALROUT___V962*/ meltfptr[961])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V965*/ meltfptr[964])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5]); MELT_LOCATION ("warmelt-outobj.melt:7219:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V962*/ meltfptr[961]); + meltgc_touch ( /*_._VALROUT___V965*/ meltfptr[964]); MELT_LOCATION ("warmelt-outobj.melt:7181:/ initchunk"); /*^putroutconst */ @@ -47223,14 +47256,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_16 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V961*/ meltfptr[960])) + ( /*_._VALROUT___V964*/ meltfptr[963])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_771__TRANSLATE_RUN_MELT_EXPRESSIONS#5", - NULL != ( /*_._VALROUT___V962*/ meltfptr[961])); - ((meltroutine_ptr_t) /*_._VALROUT___V961*/ meltfptr[960])->tabval[5] = - (melt_ptr_t) ( /*_._VALROUT___V962*/ meltfptr[961]); + ("putroutconst constnull.drout_773__TRANSLATE_RUN_MELT_EXPRESSIONS#5", + NULL != ( /*_._VALROUT___V965*/ meltfptr[964])); + ((meltroutine_ptr_t) /*_._VALROUT___V964*/ meltfptr[963])->tabval[5] = + (melt_ptr_t) ( /*_._VALROUT___V965*/ meltfptr[964]); MELT_LOCATION ("warmelt-outobj.melt:7181:/ initchunk"); /*^putroutconst */ @@ -47238,16 +47271,16 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_16 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V961*/ meltfptr[960])) + ( /*_._VALROUT___V964*/ meltfptr[963])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_771__TRANSLATE_RUN_MELT_EXPRESSIONS#6", + ("putroutconst constnull.drout_773__TRANSLATE_RUN_MELT_EXPRESSIONS#6", NULL != - ( /*_.CLASS_RUNNING_EXTENSION_MODULE_CONTEXT__V141*/ meltfptr[140])); - ((meltroutine_ptr_t) /*_._VALROUT___V961*/ meltfptr[960])->tabval[6] = - (melt_ptr_t) ( /*_.CLASS_RUNNING_EXTENSION_MODULE_CONTEXT__V141*/ - meltfptr[140]); + ( /*_.CLASS_RUNNING_EXTENSION_MODULE_CONTEXT__V142*/ meltfptr[141])); + ((meltroutine_ptr_t) /*_._VALROUT___V964*/ meltfptr[963])->tabval[6] = + (melt_ptr_t) ( /*_.CLASS_RUNNING_EXTENSION_MODULE_CONTEXT__V142*/ + meltfptr[141]); MELT_LOCATION ("warmelt-outobj.melt:7181:/ initchunk"); /*^putroutconst */ @@ -47255,14 +47288,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_16 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V961*/ meltfptr[960])) + ( /*_._VALROUT___V964*/ meltfptr[963])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_771__TRANSLATE_RUN_MELT_EXPRESSIONS#7", - NULL != ( /*_.DISCR_MAP_STRINGS__V171*/ meltfptr[170])); - ((meltroutine_ptr_t) /*_._VALROUT___V961*/ meltfptr[960])->tabval[7] = - (melt_ptr_t) ( /*_.DISCR_MAP_STRINGS__V171*/ meltfptr[170]); + ("putroutconst constnull.drout_773__TRANSLATE_RUN_MELT_EXPRESSIONS#7", + NULL != ( /*_.DISCR_MAP_STRINGS__V172*/ meltfptr[171])); + ((meltroutine_ptr_t) /*_._VALROUT___V964*/ meltfptr[963])->tabval[7] = + (melt_ptr_t) ( /*_.DISCR_MAP_STRINGS__V172*/ meltfptr[171]); MELT_LOCATION ("warmelt-outobj.melt:7181:/ initchunk"); /*^putroutconst */ @@ -47270,13 +47303,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_16 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V961*/ meltfptr[960])) + ( /*_._VALROUT___V964*/ meltfptr[963])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_771__TRANSLATE_RUN_MELT_EXPRESSIONS#8", + ("putroutconst constnull.drout_773__TRANSLATE_RUN_MELT_EXPRESSIONS#8", NULL != ( /*_.DISCR_INTEGER__V52*/ meltfptr[51])); - ((meltroutine_ptr_t) /*_._VALROUT___V961*/ meltfptr[960])->tabval[8] = + ((meltroutine_ptr_t) /*_._VALROUT___V964*/ meltfptr[963])->tabval[8] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V52*/ meltfptr[51]); MELT_LOCATION ("warmelt-outobj.melt:7181:/ initchunk"); @@ -47285,13 +47318,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_16 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V961*/ meltfptr[960])) + ( /*_._VALROUT___V964*/ meltfptr[963])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_771__TRANSLATE_RUN_MELT_EXPRESSIONS#9", + ("putroutconst constnull.drout_773__TRANSLATE_RUN_MELT_EXPRESSIONS#9", NULL != ( /*_.DISCR_LIST__V65*/ meltfptr[64])); - ((meltroutine_ptr_t) /*_._VALROUT___V961*/ meltfptr[960])->tabval[9] = + ((meltroutine_ptr_t) /*_._VALROUT___V964*/ meltfptr[963])->tabval[9] = (melt_ptr_t) ( /*_.DISCR_LIST__V65*/ meltfptr[64]); MELT_LOCATION ("warmelt-outobj.melt:7181:/ initchunk"); @@ -47300,14 +47333,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_16 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V961*/ meltfptr[960])) + ( /*_._VALROUT___V964*/ meltfptr[963])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_771__TRANSLATE_RUN_MELT_EXPRESSIONS#10", - NULL != ( /*_.DISCR_MAP_OBJECTS__V147*/ meltfptr[146])); - ((meltroutine_ptr_t) /*_._VALROUT___V961*/ meltfptr[960])->tabval[10] = - (melt_ptr_t) ( /*_.DISCR_MAP_OBJECTS__V147*/ meltfptr[146]); + ("putroutconst constnull.drout_773__TRANSLATE_RUN_MELT_EXPRESSIONS#10", + NULL != ( /*_.DISCR_MAP_OBJECTS__V148*/ meltfptr[147])); + ((meltroutine_ptr_t) /*_._VALROUT___V964*/ meltfptr[963])->tabval[10] = + (melt_ptr_t) ( /*_.DISCR_MAP_OBJECTS__V148*/ meltfptr[147]); MELT_LOCATION ("warmelt-outobj.melt:7181:/ initchunk"); /*^putroutconst */ @@ -47315,29 +47348,42 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_16 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V961*/ meltfptr[960])) + ( /*_._VALROUT___V964*/ meltfptr[963])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_771__TRANSLATE_RUN_MELT_EXPRESSIONS#11", - NULL != ( /*_.CREATE_NORMAL_EXTENDING_CONTEXT__V185*/ meltfptr[184])); - ((meltroutine_ptr_t) /*_._VALROUT___V961*/ meltfptr[960])->tabval[11] = - (melt_ptr_t) ( /*_.CREATE_NORMAL_EXTENDING_CONTEXT__V185*/ meltfptr[184]); + ("putroutconst constnull.drout_773__TRANSLATE_RUN_MELT_EXPRESSIONS#11", + NULL != ( /*_.CREATE_NORMAL_EXTENDING_CONTEXT__V186*/ meltfptr[185])); + ((meltroutine_ptr_t) /*_._VALROUT___V964*/ meltfptr[963])->tabval[11] = + (melt_ptr_t) ( /*_.CREATE_NORMAL_EXTENDING_CONTEXT__V186*/ meltfptr[185]); + + +#undef meltfram__ +} /*end of meltmod__WARMELTmiOUTOBJ__initialmeltchunk_16 */ +void +meltmod__WARMELTmiOUTOBJ__initialmeltchunk_17 (meltinitial_frame_t * + meltmeltframptr__, + char meltpredefinited[]) +{ +#define meltfram__ (*meltmeltframptr__) +#undef meltcallcount +#define meltcallcount 0L + (void) meltpredefinited; MELT_LOCATION ("warmelt-outobj.melt:7181:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V961*/ meltfptr[960])) + ( /*_._VALROUT___V964*/ meltfptr[963])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_771__TRANSLATE_RUN_MELT_EXPRESSIONS#12", - NULL != ( /*_.CLASS_SEXPR__V186*/ meltfptr[185])); - ((meltroutine_ptr_t) /*_._VALROUT___V961*/ meltfptr[960])->tabval[12] = - (melt_ptr_t) ( /*_.CLASS_SEXPR__V186*/ meltfptr[185]); + ("putroutconst constnull.drout_773__TRANSLATE_RUN_MELT_EXPRESSIONS#12", + NULL != ( /*_.CLASS_SEXPR__V187*/ meltfptr[186])); + ((meltroutine_ptr_t) /*_._VALROUT___V964*/ meltfptr[963])->tabval[12] = + (melt_ptr_t) ( /*_.CLASS_SEXPR__V187*/ meltfptr[186]); MELT_LOCATION ("warmelt-outobj.melt:7181:/ initchunk"); /*^putroutconst */ @@ -47345,13 +47391,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_16 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V961*/ meltfptr[960])) + ( /*_._VALROUT___V964*/ meltfptr[963])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_771__TRANSLATE_RUN_MELT_EXPRESSIONS#13", + ("putroutconst constnull.drout_773__TRANSLATE_RUN_MELT_EXPRESSIONS#13", NULL != ( /*_.CLASS_SYMBOL__V15*/ meltfptr[14])); - ((meltroutine_ptr_t) /*_._VALROUT___V961*/ meltfptr[960])->tabval[13] = + ((meltroutine_ptr_t) /*_._VALROUT___V964*/ meltfptr[963])->tabval[13] = (melt_ptr_t) ( /*_.CLASS_SYMBOL__V15*/ meltfptr[14]); MELT_LOCATION ("warmelt-outobj.melt:7181:/ initchunk"); @@ -47360,13 +47406,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_16 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V961*/ meltfptr[960])) + ( /*_._VALROUT___V964*/ meltfptr[963])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_771__TRANSLATE_RUN_MELT_EXPRESSIONS#14", + ("putroutconst constnull.drout_773__TRANSLATE_RUN_MELT_EXPRESSIONS#14", NULL != ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_._VALROUT___V961*/ meltfptr[960])->tabval[14] = + ((meltroutine_ptr_t) /*_._VALROUT___V964*/ meltfptr[963])->tabval[14] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:7181:/ initchunk"); @@ -47375,41 +47421,28 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_16 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V961*/ meltfptr[960])) + ( /*_._VALROUT___V964*/ meltfptr[963])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_771__TRANSLATE_RUN_MELT_EXPRESSIONS#15", + ("putroutconst constnull.drout_773__TRANSLATE_RUN_MELT_EXPRESSIONS#15", NULL != ( /*_.CLASS_NAMED__V13*/ meltfptr[12])); - ((meltroutine_ptr_t) /*_._VALROUT___V961*/ meltfptr[960])->tabval[15] = + ((meltroutine_ptr_t) /*_._VALROUT___V964*/ meltfptr[963])->tabval[15] = (melt_ptr_t) ( /*_.CLASS_NAMED__V13*/ meltfptr[12]); - -#undef meltfram__ -} /*end of meltmod__WARMELTmiOUTOBJ__initialmeltchunk_16 */ - -void -meltmod__WARMELTmiOUTOBJ__initialmeltchunk_17 (meltinitial_frame_t * - meltmeltframptr__, - char meltpredefinited[]) -{ -#define meltfram__ (*meltmeltframptr__) -#undef meltcallcount -#define meltcallcount 0L - (void) meltpredefinited; MELT_LOCATION ("warmelt-outobj.melt:7267:/ initchunk"); /*^putroutconst */ /*putroutconst */ if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V965*/ meltfptr[964])) + ( /*_._VALROUT___V968*/ meltfptr[967])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_778__LAMBDA_#0", - NULL != ( /*_.CLASS_SEXPR__V186*/ meltfptr[185])); - ((meltroutine_ptr_t) /*_._VALROUT___V965*/ meltfptr[964])->tabval[0] = - (melt_ptr_t) ( /*_.CLASS_SEXPR__V186*/ meltfptr[185]); + melt_checkmsg ("putroutconst constnull.drout_780__LAMBDA_#0", + NULL != ( /*_.CLASS_SEXPR__V187*/ meltfptr[186])); + ((meltroutine_ptr_t) /*_._VALROUT___V968*/ meltfptr[967])->tabval[0] = + (melt_ptr_t) ( /*_.CLASS_SEXPR__V187*/ meltfptr[186]); MELT_LOCATION ("warmelt-outobj.melt:7267:/ initchunk"); /*^putroutconst */ @@ -47417,12 +47450,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_17 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V965*/ meltfptr[964])) + ( /*_._VALROUT___V968*/ meltfptr[967])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_778__LAMBDA_#1", + melt_checkmsg ("putroutconst constnull.drout_780__LAMBDA_#1", NULL != ( /*_.CLASS_SYMBOL__V15*/ meltfptr[14])); - ((meltroutine_ptr_t) /*_._VALROUT___V965*/ meltfptr[964])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V968*/ meltfptr[967])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_SYMBOL__V15*/ meltfptr[14]); MELT_LOCATION ("warmelt-outobj.melt:7267:/ initchunk"); @@ -47431,12 +47464,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_17 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V965*/ meltfptr[964])) + ( /*_._VALROUT___V968*/ meltfptr[967])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_778__LAMBDA_#2", + melt_checkmsg ("putroutconst constnull.drout_780__LAMBDA_#2", NULL != ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_._VALROUT___V965*/ meltfptr[964])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V968*/ meltfptr[967])->tabval[2] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:7267:/ initchunk"); @@ -47445,12 +47478,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_17 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V965*/ meltfptr[964])) + ( /*_._VALROUT___V968*/ meltfptr[967])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_778__LAMBDA_#3", + melt_checkmsg ("putroutconst constnull.drout_780__LAMBDA_#3", NULL != ( /*_.CLASS_NAMED__V13*/ meltfptr[12])); - ((meltroutine_ptr_t) /*_._VALROUT___V965*/ meltfptr[964])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V968*/ meltfptr[967])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_NAMED__V13*/ meltfptr[12]); MELT_LOCATION ("warmelt-outobj.melt:7267:/ initchunk"); @@ -47459,18 +47492,18 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_17 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V965*/ meltfptr[964])) + ( /*_._VALROUT___V968*/ meltfptr[967])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_778__LAMBDA_#4", - NULL != ( /*_._VALSTR___V966*/ meltfptr[965])); - ((meltroutine_ptr_t) /*_._VALROUT___V965*/ meltfptr[964])->tabval[4] = - (melt_ptr_t) ( /*_._VALSTR___V966*/ meltfptr[965]); + melt_checkmsg ("putroutconst constnull.drout_780__LAMBDA_#4", + NULL != ( /*_._VALSTR___V969*/ meltfptr[968])); + ((meltroutine_ptr_t) /*_._VALROUT___V968*/ meltfptr[967])->tabval[4] = + (melt_ptr_t) ( /*_._VALSTR___V969*/ meltfptr[968]); MELT_LOCATION ("warmelt-outobj.melt:7267:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V965*/ meltfptr[964]); + meltgc_touch ( /*_._VALROUT___V968*/ meltfptr[967]); MELT_LOCATION ("warmelt-outobj.melt:7181:/ initchunk"); /*^putroutconst */ @@ -47478,14 +47511,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_17 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V961*/ meltfptr[960])) + ( /*_._VALROUT___V964*/ meltfptr[963])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_771__TRANSLATE_RUN_MELT_EXPRESSIONS#16", - NULL != ( /*_._VALROUT___V965*/ meltfptr[964])); - ((meltroutine_ptr_t) /*_._VALROUT___V961*/ meltfptr[960])->tabval[16] = - (melt_ptr_t) ( /*_._VALROUT___V965*/ meltfptr[964]); + ("putroutconst constnull.drout_773__TRANSLATE_RUN_MELT_EXPRESSIONS#16", + NULL != ( /*_._VALROUT___V968*/ meltfptr[967])); + ((meltroutine_ptr_t) /*_._VALROUT___V964*/ meltfptr[963])->tabval[16] = + (melt_ptr_t) ( /*_._VALROUT___V968*/ meltfptr[967]); MELT_LOCATION ("warmelt-outobj.melt:7181:/ initchunk"); /*^putroutconst */ @@ -47493,14 +47526,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_17 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V961*/ meltfptr[960])) + ( /*_._VALROUT___V964*/ meltfptr[963])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_771__TRANSLATE_RUN_MELT_EXPRESSIONS#17", - NULL != ( /*_.CLASS_SEXPR__V186*/ meltfptr[185])); - ((meltroutine_ptr_t) /*_._VALROUT___V961*/ meltfptr[960])->tabval[17] = - (melt_ptr_t) ( /*_.CLASS_SEXPR__V186*/ meltfptr[185]); + ("putroutconst constnull.drout_773__TRANSLATE_RUN_MELT_EXPRESSIONS#17", + NULL != ( /*_.CLASS_SEXPR__V187*/ meltfptr[186])); + ((meltroutine_ptr_t) /*_._VALROUT___V964*/ meltfptr[963])->tabval[17] = + (melt_ptr_t) ( /*_.CLASS_SEXPR__V187*/ meltfptr[186]); MELT_LOCATION ("warmelt-outobj.melt:7181:/ initchunk"); /*^putroutconst */ @@ -47508,14 +47541,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_17 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V961*/ meltfptr[960])) + ( /*_._VALROUT___V964*/ meltfptr[963])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_771__TRANSLATE_RUN_MELT_EXPRESSIONS#18", - NULL != ( /*_._VALSTR___V967*/ meltfptr[966])); - ((meltroutine_ptr_t) /*_._VALROUT___V961*/ meltfptr[960])->tabval[18] = - (melt_ptr_t) ( /*_._VALSTR___V967*/ meltfptr[966]); + ("putroutconst constnull.drout_773__TRANSLATE_RUN_MELT_EXPRESSIONS#18", + NULL != ( /*_._VALSTR___V970*/ meltfptr[969])); + ((meltroutine_ptr_t) /*_._VALROUT___V964*/ meltfptr[963])->tabval[18] = + (melt_ptr_t) ( /*_._VALSTR___V970*/ meltfptr[969]); MELT_LOCATION ("warmelt-outobj.melt:7181:/ initchunk"); /*^putroutconst */ @@ -47523,14 +47556,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_17 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V961*/ meltfptr[960])) + ( /*_._VALROUT___V964*/ meltfptr[963])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_771__TRANSLATE_RUN_MELT_EXPRESSIONS#19", - NULL != ( /*_._VALSTR___V968*/ meltfptr[967])); - ((meltroutine_ptr_t) /*_._VALROUT___V961*/ meltfptr[960])->tabval[19] = - (melt_ptr_t) ( /*_._VALSTR___V968*/ meltfptr[967]); + ("putroutconst constnull.drout_773__TRANSLATE_RUN_MELT_EXPRESSIONS#19", + NULL != ( /*_._VALSTR___V971*/ meltfptr[970])); + ((meltroutine_ptr_t) /*_._VALROUT___V964*/ meltfptr[963])->tabval[19] = + (melt_ptr_t) ( /*_._VALSTR___V971*/ meltfptr[970]); MELT_LOCATION ("warmelt-outobj.melt:7181:/ initchunk"); /*^putroutconst */ @@ -47538,14 +47571,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_17 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V961*/ meltfptr[960])) + ( /*_._VALROUT___V964*/ meltfptr[963])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_771__TRANSLATE_RUN_MELT_EXPRESSIONS#20", - NULL != ( /*_.MACROEXPAND_TOPLEVEL_LIST__V174*/ meltfptr[173])); - ((meltroutine_ptr_t) /*_._VALROUT___V961*/ meltfptr[960])->tabval[20] = - (melt_ptr_t) ( /*_.MACROEXPAND_TOPLEVEL_LIST__V174*/ meltfptr[173]); + ("putroutconst constnull.drout_773__TRANSLATE_RUN_MELT_EXPRESSIONS#20", + NULL != ( /*_.MACROEXPAND_TOPLEVEL_LIST__V175*/ meltfptr[174])); + ((meltroutine_ptr_t) /*_._VALROUT___V964*/ meltfptr[963])->tabval[20] = + (melt_ptr_t) ( /*_.MACROEXPAND_TOPLEVEL_LIST__V175*/ meltfptr[174]); MELT_LOCATION ("warmelt-outobj.melt:7181:/ initchunk"); /*^putroutconst */ @@ -47553,14 +47586,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_17 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V961*/ meltfptr[960])) + ( /*_._VALROUT___V964*/ meltfptr[963])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_771__TRANSLATE_RUN_MELT_EXPRESSIONS#21", - NULL != ( /*_.MACROEXPAND_1__V175*/ meltfptr[174])); - ((meltroutine_ptr_t) /*_._VALROUT___V961*/ meltfptr[960])->tabval[21] = - (melt_ptr_t) ( /*_.MACROEXPAND_1__V175*/ meltfptr[174]); + ("putroutconst constnull.drout_773__TRANSLATE_RUN_MELT_EXPRESSIONS#21", + NULL != ( /*_.MACROEXPAND_1__V176*/ meltfptr[175])); + ((meltroutine_ptr_t) /*_._VALROUT___V964*/ meltfptr[963])->tabval[21] = + (melt_ptr_t) ( /*_.MACROEXPAND_1__V176*/ meltfptr[175]); MELT_LOCATION ("warmelt-outobj.melt:7181:/ initchunk"); /*^putroutconst */ @@ -47568,13 +47601,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_17 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V961*/ meltfptr[960])) + ( /*_._VALROUT___V964*/ meltfptr[963])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_771__TRANSLATE_RUN_MELT_EXPRESSIONS#22", + ("putroutconst constnull.drout_773__TRANSLATE_RUN_MELT_EXPRESSIONS#22", NULL != ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_._VALROUT___V961*/ meltfptr[960])->tabval[22] = + ((meltroutine_ptr_t) /*_._VALROUT___V964*/ meltfptr[963])->tabval[22] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:7181:/ initchunk"); @@ -47583,13 +47616,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_17 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V961*/ meltfptr[960])) + ( /*_._VALROUT___V964*/ meltfptr[963])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_771__TRANSLATE_RUN_MELT_EXPRESSIONS#23", + ("putroutconst constnull.drout_773__TRANSLATE_RUN_MELT_EXPRESSIONS#23", NULL != ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5])); - ((meltroutine_ptr_t) /*_._VALROUT___V961*/ meltfptr[960])->tabval[23] = + ((meltroutine_ptr_t) /*_._VALROUT___V964*/ meltfptr[963])->tabval[23] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5]); MELT_LOCATION ("warmelt-outobj.melt:7181:/ initchunk"); @@ -47598,14 +47631,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_17 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V961*/ meltfptr[960])) + ( /*_._VALROUT___V964*/ meltfptr[963])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_771__TRANSLATE_RUN_MELT_EXPRESSIONS#24", - NULL != ( /*_.GET_CTYPE__V110*/ meltfptr[109])); - ((meltroutine_ptr_t) /*_._VALROUT___V961*/ meltfptr[960])->tabval[24] = - (melt_ptr_t) ( /*_.GET_CTYPE__V110*/ meltfptr[109]); + ("putroutconst constnull.drout_773__TRANSLATE_RUN_MELT_EXPRESSIONS#24", + NULL != ( /*_.GET_CTYPE__V111*/ meltfptr[110])); + ((meltroutine_ptr_t) /*_._VALROUT___V964*/ meltfptr[963])->tabval[24] = + (melt_ptr_t) ( /*_.GET_CTYPE__V111*/ meltfptr[110]); MELT_LOCATION ("warmelt-outobj.melt:7181:/ initchunk"); /*^putroutconst */ @@ -47613,13 +47646,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_17 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V961*/ meltfptr[960])) + ( /*_._VALROUT___V964*/ meltfptr[963])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_771__TRANSLATE_RUN_MELT_EXPRESSIONS#25", + ("putroutconst constnull.drout_773__TRANSLATE_RUN_MELT_EXPRESSIONS#25", NULL != ( /*_.CLASS_CTYPE__V28*/ meltfptr[27])); - ((meltroutine_ptr_t) /*_._VALROUT___V961*/ meltfptr[960])->tabval[25] = + ((meltroutine_ptr_t) /*_._VALROUT___V964*/ meltfptr[963])->tabval[25] = (melt_ptr_t) ( /*_.CLASS_CTYPE__V28*/ meltfptr[27]); MELT_LOCATION ("warmelt-outobj.melt:7181:/ initchunk"); @@ -47628,13 +47661,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_17 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V961*/ meltfptr[960])) + ( /*_._VALROUT___V964*/ meltfptr[963])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_771__TRANSLATE_RUN_MELT_EXPRESSIONS#26", + ("putroutconst constnull.drout_773__TRANSLATE_RUN_MELT_EXPRESSIONS#26", NULL != ( /*_.CTYPE_VALUE__V31*/ meltfptr[30])); - ((meltroutine_ptr_t) /*_._VALROUT___V961*/ meltfptr[960])->tabval[26] = + ((meltroutine_ptr_t) /*_._VALROUT___V964*/ meltfptr[963])->tabval[26] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V31*/ meltfptr[30]); MELT_LOCATION ("warmelt-outobj.melt:7181:/ initchunk"); @@ -47643,14 +47676,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_17 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V961*/ meltfptr[960])) + ( /*_._VALROUT___V964*/ meltfptr[963])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_771__TRANSLATE_RUN_MELT_EXPRESSIONS#27", - NULL != ( /*_.CLASS_NREP_RETURN__V180*/ meltfptr[179])); - ((meltroutine_ptr_t) /*_._VALROUT___V961*/ meltfptr[960])->tabval[27] = - (melt_ptr_t) ( /*_.CLASS_NREP_RETURN__V180*/ meltfptr[179]); + ("putroutconst constnull.drout_773__TRANSLATE_RUN_MELT_EXPRESSIONS#27", + NULL != ( /*_.CLASS_NREP_RETURN__V181*/ meltfptr[180])); + ((meltroutine_ptr_t) /*_._VALROUT___V964*/ meltfptr[963])->tabval[27] = + (melt_ptr_t) ( /*_.CLASS_NREP_RETURN__V181*/ meltfptr[180]); MELT_LOCATION ("warmelt-outobj.melt:7181:/ initchunk"); /*^putroutconst */ @@ -47658,13 +47691,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_17 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V961*/ meltfptr[960])) + ( /*_._VALROUT___V964*/ meltfptr[963])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_771__TRANSLATE_RUN_MELT_EXPRESSIONS#28", + ("putroutconst constnull.drout_773__TRANSLATE_RUN_MELT_EXPRESSIONS#28", NULL != ( /*_.CLASS_NAMED__V13*/ meltfptr[12])); - ((meltroutine_ptr_t) /*_._VALROUT___V961*/ meltfptr[960])->tabval[28] = + ((meltroutine_ptr_t) /*_._VALROUT___V964*/ meltfptr[963])->tabval[28] = (melt_ptr_t) ( /*_.CLASS_NAMED__V13*/ meltfptr[12]); MELT_LOCATION ("warmelt-outobj.melt:7181:/ initchunk"); @@ -47672,12 +47705,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_17 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V961*/ meltfptr[960])) == + ( /*_._VALROUT___V964*/ meltfptr[963])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V944*/ meltfptr[943]); - ((meltroutine_ptr_t) /*_._VALROUT___V961*/ meltfptr[960])->tabval[29] = - (melt_ptr_t) ( /*_._VALCLO___V944*/ meltfptr[943]); + NULL != /*_._VALCLO___V947*/ meltfptr[946]); + ((meltroutine_ptr_t) /*_._VALROUT___V964*/ meltfptr[963])->tabval[29] = + (melt_ptr_t) ( /*_._VALCLO___V947*/ meltfptr[946]); MELT_LOCATION ("warmelt-outobj.melt:7181:/ initchunk"); /*^putroutconst */ @@ -47685,14 +47718,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_17 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V961*/ meltfptr[960])) + ( /*_._VALROUT___V964*/ meltfptr[963])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_771__TRANSLATE_RUN_MELT_EXPRESSIONS#30", - NULL != ( /*_.WRAP_NORMAL_LET1__V159*/ meltfptr[158])); - ((meltroutine_ptr_t) /*_._VALROUT___V961*/ meltfptr[960])->tabval[30] = - (melt_ptr_t) ( /*_.WRAP_NORMAL_LET1__V159*/ meltfptr[158]); + ("putroutconst constnull.drout_773__TRANSLATE_RUN_MELT_EXPRESSIONS#30", + NULL != ( /*_.WRAP_NORMAL_LET1__V160*/ meltfptr[159])); + ((meltroutine_ptr_t) /*_._VALROUT___V964*/ meltfptr[963])->tabval[30] = + (melt_ptr_t) ( /*_.WRAP_NORMAL_LET1__V160*/ meltfptr[159]); MELT_LOCATION ("warmelt-outobj.melt:7330:/ initchunk"); /*^putroutconst */ @@ -47700,12 +47733,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_17 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V969*/ meltfptr[968])) + ( /*_._VALROUT___V972*/ meltfptr[971])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_784__LAMBDA_#0", + melt_checkmsg ("putroutconst constnull.drout_786__LAMBDA_#0", NULL != ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_._VALROUT___V969*/ meltfptr[968])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V972*/ meltfptr[971])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:7330:/ initchunk"); @@ -47714,12 +47747,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_17 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V969*/ meltfptr[968])) + ( /*_._VALROUT___V972*/ meltfptr[971])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_784__LAMBDA_#1", + melt_checkmsg ("putroutconst constnull.drout_786__LAMBDA_#1", NULL != ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5])); - ((meltroutine_ptr_t) /*_._VALROUT___V969*/ meltfptr[968])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V972*/ meltfptr[971])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V6*/ meltfptr[5]); MELT_LOCATION ("warmelt-outobj.melt:7330:/ initchunk"); @@ -47728,13 +47761,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_17 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V969*/ meltfptr[968])) + ( /*_._VALROUT___V972*/ meltfptr[971])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_784__LAMBDA_#2", - NULL != ( /*_.GET_CTYPE__V110*/ meltfptr[109])); - ((meltroutine_ptr_t) /*_._VALROUT___V969*/ meltfptr[968])->tabval[2] = - (melt_ptr_t) ( /*_.GET_CTYPE__V110*/ meltfptr[109]); + melt_checkmsg ("putroutconst constnull.drout_786__LAMBDA_#2", + NULL != ( /*_.GET_CTYPE__V111*/ meltfptr[110])); + ((meltroutine_ptr_t) /*_._VALROUT___V972*/ meltfptr[971])->tabval[2] = + (melt_ptr_t) ( /*_.GET_CTYPE__V111*/ meltfptr[110]); MELT_LOCATION ("warmelt-outobj.melt:7330:/ initchunk"); /*^putroutconst */ @@ -47742,12 +47775,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_17 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V969*/ meltfptr[968])) + ( /*_._VALROUT___V972*/ meltfptr[971])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_784__LAMBDA_#3", + melt_checkmsg ("putroutconst constnull.drout_786__LAMBDA_#3", NULL != ( /*_.CLASS_CTYPE__V28*/ meltfptr[27])); - ((meltroutine_ptr_t) /*_._VALROUT___V969*/ meltfptr[968])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V972*/ meltfptr[971])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_CTYPE__V28*/ meltfptr[27]); MELT_LOCATION ("warmelt-outobj.melt:7330:/ initchunk"); @@ -47756,12 +47789,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_17 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V969*/ meltfptr[968])) + ( /*_._VALROUT___V972*/ meltfptr[971])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_784__LAMBDA_#4", + melt_checkmsg ("putroutconst constnull.drout_786__LAMBDA_#4", NULL != ( /*_.CTYPE_VALUE__V31*/ meltfptr[30])); - ((meltroutine_ptr_t) /*_._VALROUT___V969*/ meltfptr[968])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V972*/ meltfptr[971])->tabval[4] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V31*/ meltfptr[30]); MELT_LOCATION ("warmelt-outobj.melt:7330:/ initchunk"); @@ -47770,13 +47803,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_17 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V969*/ meltfptr[968])) + ( /*_._VALROUT___V972*/ meltfptr[971])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_784__LAMBDA_#5", - NULL != ( /*_.CLASS_NREP_RETURN__V180*/ meltfptr[179])); - ((meltroutine_ptr_t) /*_._VALROUT___V969*/ meltfptr[968])->tabval[5] = - (melt_ptr_t) ( /*_.CLASS_NREP_RETURN__V180*/ meltfptr[179]); + melt_checkmsg ("putroutconst constnull.drout_786__LAMBDA_#5", + NULL != ( /*_.CLASS_NREP_RETURN__V181*/ meltfptr[180])); + ((meltroutine_ptr_t) /*_._VALROUT___V972*/ meltfptr[971])->tabval[5] = + (melt_ptr_t) ( /*_.CLASS_NREP_RETURN__V181*/ meltfptr[180]); MELT_LOCATION ("warmelt-outobj.melt:7330:/ initchunk"); /*^putroutconst */ @@ -47784,12 +47817,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_17 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V969*/ meltfptr[968])) + ( /*_._VALROUT___V972*/ meltfptr[971])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_784__LAMBDA_#6", + melt_checkmsg ("putroutconst constnull.drout_786__LAMBDA_#6", NULL != ( /*_.CLASS_NAMED__V13*/ meltfptr[12])); - ((meltroutine_ptr_t) /*_._VALROUT___V969*/ meltfptr[968])->tabval[6] = + ((meltroutine_ptr_t) /*_._VALROUT___V972*/ meltfptr[971])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_NAMED__V13*/ meltfptr[12]); MELT_LOCATION ("warmelt-outobj.melt:7330:/ initchunk"); @@ -47797,12 +47830,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_17 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V969*/ meltfptr[968])) == + ( /*_._VALROUT___V972*/ meltfptr[971])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V944*/ meltfptr[943]); - ((meltroutine_ptr_t) /*_._VALROUT___V969*/ meltfptr[968])->tabval[7] = - (melt_ptr_t) ( /*_._VALCLO___V944*/ meltfptr[943]); + NULL != /*_._VALCLO___V947*/ meltfptr[946]); + ((meltroutine_ptr_t) /*_._VALROUT___V972*/ meltfptr[971])->tabval[7] = + (melt_ptr_t) ( /*_._VALCLO___V947*/ meltfptr[946]); MELT_LOCATION ("warmelt-outobj.melt:7330:/ initchunk"); /*^putroutconst */ @@ -47810,18 +47843,18 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_17 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V969*/ meltfptr[968])) + ( /*_._VALROUT___V972*/ meltfptr[971])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_784__LAMBDA_#8", - NULL != ( /*_.WRAP_NORMAL_LET1__V159*/ meltfptr[158])); - ((meltroutine_ptr_t) /*_._VALROUT___V969*/ meltfptr[968])->tabval[8] = - (melt_ptr_t) ( /*_.WRAP_NORMAL_LET1__V159*/ meltfptr[158]); + melt_checkmsg ("putroutconst constnull.drout_786__LAMBDA_#8", + NULL != ( /*_.WRAP_NORMAL_LET1__V160*/ meltfptr[159])); + ((meltroutine_ptr_t) /*_._VALROUT___V972*/ meltfptr[971])->tabval[8] = + (melt_ptr_t) ( /*_.WRAP_NORMAL_LET1__V160*/ meltfptr[159]); MELT_LOCATION ("warmelt-outobj.melt:7330:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V969*/ meltfptr[968]); + meltgc_touch ( /*_._VALROUT___V972*/ meltfptr[971]); MELT_LOCATION ("warmelt-outobj.melt:7181:/ initchunk"); /*^putroutconst */ @@ -47829,14 +47862,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_17 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V961*/ meltfptr[960])) + ( /*_._VALROUT___V964*/ meltfptr[963])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_771__TRANSLATE_RUN_MELT_EXPRESSIONS#31", - NULL != ( /*_._VALROUT___V969*/ meltfptr[968])); - ((meltroutine_ptr_t) /*_._VALROUT___V961*/ meltfptr[960])->tabval[31] = - (melt_ptr_t) ( /*_._VALROUT___V969*/ meltfptr[968]); + ("putroutconst constnull.drout_773__TRANSLATE_RUN_MELT_EXPRESSIONS#31", + NULL != ( /*_._VALROUT___V972*/ meltfptr[971])); + ((meltroutine_ptr_t) /*_._VALROUT___V964*/ meltfptr[963])->tabval[31] = + (melt_ptr_t) ( /*_._VALROUT___V972*/ meltfptr[971]); MELT_LOCATION ("warmelt-outobj.melt:7181:/ initchunk"); /*^putroutconst */ @@ -47844,14 +47877,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_17 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V961*/ meltfptr[960])) + ( /*_._VALROUT___V964*/ meltfptr[963])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_771__TRANSLATE_RUN_MELT_EXPRESSIONS#32", - NULL != ( /*_._VALSTR___V970*/ meltfptr[969])); - ((meltroutine_ptr_t) /*_._VALROUT___V961*/ meltfptr[960])->tabval[32] = - (melt_ptr_t) ( /*_._VALSTR___V970*/ meltfptr[969]); + ("putroutconst constnull.drout_773__TRANSLATE_RUN_MELT_EXPRESSIONS#32", + NULL != ( /*_._VALSTR___V973*/ meltfptr[972])); + ((meltroutine_ptr_t) /*_._VALROUT___V964*/ meltfptr[963])->tabval[32] = + (melt_ptr_t) ( /*_._VALSTR___V973*/ meltfptr[972]); MELT_LOCATION ("warmelt-outobj.melt:7181:/ initchunk"); /*^putroutconst */ @@ -47859,13 +47892,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_17 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V961*/ meltfptr[960])) + ( /*_._VALROUT___V964*/ meltfptr[963])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_771__TRANSLATE_RUN_MELT_EXPRESSIONS#33", + ("putroutconst constnull.drout_773__TRANSLATE_RUN_MELT_EXPRESSIONS#33", NULL != ( /*_.DISCR_STRING__V53*/ meltfptr[52])); - ((meltroutine_ptr_t) /*_._VALROUT___V961*/ meltfptr[960])->tabval[33] = + ((meltroutine_ptr_t) /*_._VALROUT___V964*/ meltfptr[963])->tabval[33] = (melt_ptr_t) ( /*_.DISCR_STRING__V53*/ meltfptr[52]); MELT_LOCATION ("warmelt-outobj.melt:7181:/ initchunk"); @@ -47873,12 +47906,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_17 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V961*/ meltfptr[960])) == + ( /*_._VALROUT___V964*/ meltfptr[963])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V880*/ meltfptr[879]); - ((meltroutine_ptr_t) /*_._VALROUT___V961*/ meltfptr[960])->tabval[34] = - (melt_ptr_t) ( /*_._VALCLO___V880*/ meltfptr[879]); + NULL != /*_._VALCLO___V883*/ meltfptr[882]); + ((meltroutine_ptr_t) /*_._VALROUT___V964*/ meltfptr[963])->tabval[34] = + (melt_ptr_t) ( /*_._VALCLO___V883*/ meltfptr[882]); MELT_LOCATION ("warmelt-outobj.melt:7181:/ initchunk"); /*^putroutconst */ @@ -47886,14 +47919,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_17 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V961*/ meltfptr[960])) + ( /*_._VALROUT___V964*/ meltfptr[963])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_771__TRANSLATE_RUN_MELT_EXPRESSIONS#35", - NULL != ( /*_.COMPILE2OBJ_INITEXTENDPROC__V187*/ meltfptr[186])); - ((meltroutine_ptr_t) /*_._VALROUT___V961*/ meltfptr[960])->tabval[35] = - (melt_ptr_t) ( /*_.COMPILE2OBJ_INITEXTENDPROC__V187*/ meltfptr[186]); + ("putroutconst constnull.drout_773__TRANSLATE_RUN_MELT_EXPRESSIONS#35", + NULL != ( /*_.COMPILE2OBJ_INITEXTENDPROC__V188*/ meltfptr[187])); + ((meltroutine_ptr_t) /*_._VALROUT___V964*/ meltfptr[963])->tabval[35] = + (melt_ptr_t) ( /*_.COMPILE2OBJ_INITEXTENDPROC__V188*/ meltfptr[187]); MELT_LOCATION ("warmelt-outobj.melt:7181:/ initchunk"); /*^putroutconst */ @@ -47901,14 +47934,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_17 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V961*/ meltfptr[960])) + ( /*_._VALROUT___V964*/ meltfptr[963])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_771__TRANSLATE_RUN_MELT_EXPRESSIONS#36", - NULL != ( /*_._VALSTR___V971*/ meltfptr[970])); - ((meltroutine_ptr_t) /*_._VALROUT___V961*/ meltfptr[960])->tabval[36] = - (melt_ptr_t) ( /*_._VALSTR___V971*/ meltfptr[970]); + ("putroutconst constnull.drout_773__TRANSLATE_RUN_MELT_EXPRESSIONS#36", + NULL != ( /*_._VALSTR___V974*/ meltfptr[973])); + ((meltroutine_ptr_t) /*_._VALROUT___V964*/ meltfptr[963])->tabval[36] = + (melt_ptr_t) ( /*_._VALSTR___V974*/ meltfptr[973]); MELT_LOCATION ("warmelt-outobj.melt:7181:/ initchunk"); /*^putroutconst */ @@ -47916,14 +47949,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_17 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V961*/ meltfptr[960])) + ( /*_._VALROUT___V964*/ meltfptr[963])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_771__TRANSLATE_RUN_MELT_EXPRESSIONS#37", - NULL != ( /*_._VALSTR___V972*/ meltfptr[971])); - ((meltroutine_ptr_t) /*_._VALROUT___V961*/ meltfptr[960])->tabval[37] = - (melt_ptr_t) ( /*_._VALSTR___V972*/ meltfptr[971]); + ("putroutconst constnull.drout_773__TRANSLATE_RUN_MELT_EXPRESSIONS#37", + NULL != ( /*_._VALSTR___V975*/ meltfptr[974])); + ((meltroutine_ptr_t) /*_._VALROUT___V964*/ meltfptr[963])->tabval[37] = + (melt_ptr_t) ( /*_._VALSTR___V975*/ meltfptr[974]); MELT_LOCATION ("warmelt-outobj.melt:7181:/ initchunk"); /*^putroutconst */ @@ -47931,13 +47964,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_17 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V961*/ meltfptr[960])) + ( /*_._VALROUT___V964*/ meltfptr[963])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_771__TRANSLATE_RUN_MELT_EXPRESSIONS#38", + ("putroutconst constnull.drout_773__TRANSLATE_RUN_MELT_EXPRESSIONS#38", NULL != ( /*_.DISCR_MULTIPLE__V67*/ meltfptr[66])); - ((meltroutine_ptr_t) /*_._VALROUT___V961*/ meltfptr[960])->tabval[38] = + ((meltroutine_ptr_t) /*_._VALROUT___V964*/ meltfptr[963])->tabval[38] = (melt_ptr_t) ( /*_.DISCR_MULTIPLE__V67*/ meltfptr[66]); MELT_LOCATION ("warmelt-outobj.melt:7181:/ initchunk"); @@ -47946,14 +47979,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_17 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V961*/ meltfptr[960])) + ( /*_._VALROUT___V964*/ meltfptr[963])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_771__TRANSLATE_RUN_MELT_EXPRESSIONS#39", - NULL != ( /*_.CLASS_ANY_MODULE_CONTEXT__V140*/ meltfptr[139])); - ((meltroutine_ptr_t) /*_._VALROUT___V961*/ meltfptr[960])->tabval[39] = - (melt_ptr_t) ( /*_.CLASS_ANY_MODULE_CONTEXT__V140*/ meltfptr[139]); + ("putroutconst constnull.drout_773__TRANSLATE_RUN_MELT_EXPRESSIONS#39", + NULL != ( /*_.CLASS_ANY_MODULE_CONTEXT__V141*/ meltfptr[140])); + ((meltroutine_ptr_t) /*_._VALROUT___V964*/ meltfptr[963])->tabval[39] = + (melt_ptr_t) ( /*_.CLASS_ANY_MODULE_CONTEXT__V141*/ meltfptr[140]); MELT_LOCATION ("warmelt-outobj.melt:7181:/ initchunk"); /*^putroutconst */ @@ -47961,125 +47994,125 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_17 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V961*/ meltfptr[960])) + ( /*_._VALROUT___V964*/ meltfptr[963])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_771__TRANSLATE_RUN_MELT_EXPRESSIONS#40", - NULL != ( /*_.CLASS_LITERAL_VALUE__V188*/ meltfptr[187])); - ((meltroutine_ptr_t) /*_._VALROUT___V961*/ meltfptr[960])->tabval[40] = - (melt_ptr_t) ( /*_.CLASS_LITERAL_VALUE__V188*/ meltfptr[187]); + ("putroutconst constnull.drout_773__TRANSLATE_RUN_MELT_EXPRESSIONS#40", + NULL != ( /*_.CLASS_LITERAL_VALUE__V189*/ meltfptr[188])); + ((meltroutine_ptr_t) /*_._VALROUT___V964*/ meltfptr[963])->tabval[40] = + (melt_ptr_t) ( /*_.CLASS_LITERAL_VALUE__V189*/ meltfptr[188]); MELT_LOCATION ("warmelt-outobj.melt:7181:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V961*/ meltfptr[960]); + meltgc_touch ( /*_._VALROUT___V964*/ meltfptr[963]); /*putclosurout#128 */ melt_assertmsg ("putclosrout#128 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V973*/ meltfptr[972])) == + ( /*_._VALCLO___V976*/ meltfptr[975])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#128 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V961*/ meltfptr[960])) == + ( /*_._VALROUT___V964*/ meltfptr[963])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V973*/ meltfptr[972])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V961*/ meltfptr[960]); + ((meltclosure_ptr_t) /*_._VALCLO___V976*/ meltfptr[975])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V964*/ meltfptr[963]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V973*/ meltfptr[972]); + meltgc_touch ( /*_._VALCLO___V976*/ meltfptr[975]); /*putslot */ melt_assertmsg - ("checkobj putslot ~dsym_776__CREATE_NORMAL_EXTENDING_CONTEXT @#1", - melt_magic_discr ((melt_ptr_t) ( /*_._VALDATA___V974*/ meltfptr[973])) == + ("checkobj putslot ~dsym_778__CREATE_NORMAL_EXTENDING_CONTEXT @#1", + melt_magic_discr ((melt_ptr_t) ( /*_._VALDATA___V977*/ meltfptr[976])) == MELTOBMAG_OBJECT); melt_assertmsg - ("checkoff putslot ~dsym_776__CREATE_NORMAL_EXTENDING_CONTEXT @#1", + ("checkoff putslot ~dsym_778__CREATE_NORMAL_EXTENDING_CONTEXT @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V974*/ meltfptr[973])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V974*/ meltfptr[973]))->obj_vartab[1] = + ( /*_._VALDATA___V977*/ meltfptr[976])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V977*/ meltfptr[976]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V975*/ meltfptr[974]); + /*_._VALSTR___V978*/ meltfptr[977]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V974*/ meltfptr[973]); + meltgc_touch ( /*_._VALDATA___V977*/ meltfptr[976]); - melt_dbgtrace_written_object ( /*_._VALDATA___V974*/ meltfptr[973], + melt_dbgtrace_written_object ( /*_._VALDATA___V977*/ meltfptr[976], "new static instance"); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_779__CLASS_SEXPR @#1", + melt_assertmsg ("checkobj putslot ~dsym_781__CLASS_SEXPR @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V976*/ meltfptr[975])) == + ( /*_._VALDATA___V979*/ meltfptr[978])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_779__CLASS_SEXPR @#1", + melt_assertmsg ("checkoff putslot ~dsym_781__CLASS_SEXPR @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V976*/ - meltfptr[975])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V976*/ meltfptr[975]))->obj_vartab[1] = + ( /*_._VALDATA___V979*/ + meltfptr[978])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V979*/ meltfptr[978]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V977*/ meltfptr[976]); + /*_._VALSTR___V980*/ meltfptr[979]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V976*/ meltfptr[975]); + meltgc_touch ( /*_._VALDATA___V979*/ meltfptr[978]); - melt_dbgtrace_written_object ( /*_._VALDATA___V976*/ meltfptr[975], + melt_dbgtrace_written_object ( /*_._VALDATA___V979*/ meltfptr[978], "new static instance"); /*putslot */ melt_assertmsg - ("checkobj putslot ~dsym_786__COMPILE2OBJ_INITEXTENDPROC @#1", - melt_magic_discr ((melt_ptr_t) ( /*_._VALDATA___V978*/ meltfptr[977])) == + ("checkobj putslot ~dsym_788__COMPILE2OBJ_INITEXTENDPROC @#1", + melt_magic_discr ((melt_ptr_t) ( /*_._VALDATA___V981*/ meltfptr[980])) == MELTOBMAG_OBJECT); melt_assertmsg - ("checkoff putslot ~dsym_786__COMPILE2OBJ_INITEXTENDPROC @#1", + ("checkoff putslot ~dsym_788__COMPILE2OBJ_INITEXTENDPROC @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V978*/ meltfptr[977])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V978*/ meltfptr[977]))->obj_vartab[1] = + ( /*_._VALDATA___V981*/ meltfptr[980])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V981*/ meltfptr[980]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V979*/ meltfptr[978]); + /*_._VALSTR___V982*/ meltfptr[981]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V978*/ meltfptr[977]); + meltgc_touch ( /*_._VALDATA___V981*/ meltfptr[980]); - melt_dbgtrace_written_object ( /*_._VALDATA___V978*/ meltfptr[977], + melt_dbgtrace_written_object ( /*_._VALDATA___V981*/ meltfptr[980], "new static instance"); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_790__CLASS_LITERAL_VALUE @#1", + melt_assertmsg ("checkobj putslot ~dsym_792__CLASS_LITERAL_VALUE @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V980*/ meltfptr[979])) == + ( /*_._VALDATA___V983*/ meltfptr[982])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_790__CLASS_LITERAL_VALUE @#1", + melt_assertmsg ("checkoff putslot ~dsym_792__CLASS_LITERAL_VALUE @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V980*/ - meltfptr[979])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V980*/ meltfptr[979]))->obj_vartab[1] = + ( /*_._VALDATA___V983*/ + meltfptr[982])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V983*/ meltfptr[982]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V981*/ meltfptr[980]); + /*_._VALSTR___V984*/ meltfptr[983]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V980*/ meltfptr[979]); + meltgc_touch ( /*_._VALDATA___V983*/ meltfptr[982]); - melt_dbgtrace_written_object ( /*_._VALDATA___V980*/ meltfptr[979], + melt_dbgtrace_written_object ( /*_._VALDATA___V983*/ meltfptr[982], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:7470:/ initchunk"); @@ -48088,13 +48121,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_17 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V982*/ meltfptr[981])) + ( /*_._VALROUT___V985*/ meltfptr[984])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_792__READ_MELT_EXPRESSIONS#0", + ("putroutconst constnull.drout_794__READ_MELT_EXPRESSIONS#0", NULL != ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_._VALROUT___V982*/ meltfptr[981])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V985*/ meltfptr[984])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:7470:/ initchunk"); @@ -48103,41 +48136,41 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_17 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V982*/ meltfptr[981])) + ( /*_._VALROUT___V985*/ meltfptr[984])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_792__READ_MELT_EXPRESSIONS#1", - NULL != ( /*_.LIST_APPEND2LIST__V189*/ meltfptr[188])); - ((meltroutine_ptr_t) /*_._VALROUT___V982*/ meltfptr[981])->tabval[1] = - (melt_ptr_t) ( /*_.LIST_APPEND2LIST__V189*/ meltfptr[188]); + ("putroutconst constnull.drout_794__READ_MELT_EXPRESSIONS#1", + NULL != ( /*_.LIST_APPEND2LIST__V190*/ meltfptr[189])); + ((meltroutine_ptr_t) /*_._VALROUT___V985*/ meltfptr[984])->tabval[1] = + (melt_ptr_t) ( /*_.LIST_APPEND2LIST__V190*/ meltfptr[189]); /*putclosurout#129 */ melt_assertmsg ("putclosrout#129 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V983*/ meltfptr[982])) == + ( /*_._VALCLO___V986*/ meltfptr[985])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#129 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V982*/ meltfptr[981])) == + ( /*_._VALROUT___V985*/ meltfptr[984])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V983*/ meltfptr[982])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V982*/ meltfptr[981]); + ((meltclosure_ptr_t) /*_._VALCLO___V986*/ meltfptr[985])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V985*/ meltfptr[984]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V983*/ meltfptr[982]); + meltgc_touch ( /*_._VALCLO___V986*/ meltfptr[985]); MELT_LOCATION ("warmelt-outobj.melt:7470:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V982*/ meltfptr[981])) == + ( /*_._VALROUT___V985*/ meltfptr[984])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V983*/ meltfptr[982]); - ((meltroutine_ptr_t) /*_._VALROUT___V982*/ meltfptr[981])->tabval[2] = - (melt_ptr_t) ( /*_._VALCLO___V983*/ meltfptr[982]); + NULL != /*_._VALCLO___V986*/ meltfptr[985]); + ((meltroutine_ptr_t) /*_._VALROUT___V985*/ meltfptr[984])->tabval[2] = + (melt_ptr_t) ( /*_._VALCLO___V986*/ meltfptr[985]); MELT_LOCATION ("warmelt-outobj.melt:7470:/ initchunk"); /*^putroutconst */ @@ -48145,13 +48178,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_17 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V982*/ meltfptr[981])) + ( /*_._VALROUT___V985*/ meltfptr[984])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_792__READ_MELT_EXPRESSIONS#3", + ("putroutconst constnull.drout_794__READ_MELT_EXPRESSIONS#3", NULL != ( /*_.CLASS_SYMBOL__V15*/ meltfptr[14])); - ((meltroutine_ptr_t) /*_._VALROUT___V982*/ meltfptr[981])->tabval[3] = + ((meltroutine_ptr_t) /*_._VALROUT___V985*/ meltfptr[984])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_SYMBOL__V15*/ meltfptr[14]); MELT_LOCATION ("warmelt-outobj.melt:7470:/ initchunk"); @@ -48160,14 +48193,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_17 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V982*/ meltfptr[981])) + ( /*_._VALROUT___V985*/ meltfptr[984])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_792__READ_MELT_EXPRESSIONS#4", - NULL != ( /*_.CLASS_SEXPR__V186*/ meltfptr[185])); - ((meltroutine_ptr_t) /*_._VALROUT___V982*/ meltfptr[981])->tabval[4] = - (melt_ptr_t) ( /*_.CLASS_SEXPR__V186*/ meltfptr[185]); + ("putroutconst constnull.drout_794__READ_MELT_EXPRESSIONS#4", + NULL != ( /*_.CLASS_SEXPR__V187*/ meltfptr[186])); + ((meltroutine_ptr_t) /*_._VALROUT___V985*/ meltfptr[984])->tabval[4] = + (melt_ptr_t) ( /*_.CLASS_SEXPR__V187*/ meltfptr[186]); MELT_LOCATION ("warmelt-outobj.melt:7470:/ initchunk"); /*^putroutconst */ @@ -48175,41 +48208,41 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_17 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V982*/ meltfptr[981])) + ( /*_._VALROUT___V985*/ meltfptr[984])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_792__READ_MELT_EXPRESSIONS#5", + ("putroutconst constnull.drout_794__READ_MELT_EXPRESSIONS#5", NULL != ( /*_.CLASS_NAMED__V13*/ meltfptr[12])); - ((meltroutine_ptr_t) /*_._VALROUT___V982*/ meltfptr[981])->tabval[5] = + ((meltroutine_ptr_t) /*_._VALROUT___V985*/ meltfptr[984])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_NAMED__V13*/ meltfptr[12]); MELT_LOCATION ("warmelt-outobj.melt:7470:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V982*/ meltfptr[981]); + meltgc_touch ( /*_._VALROUT___V985*/ meltfptr[984]); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_794__LIST_APPEND2LIST @#1", + melt_assertmsg ("checkobj putslot ~dsym_796__LIST_APPEND2LIST @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V984*/ meltfptr[983])) == + ( /*_._VALDATA___V987*/ meltfptr[986])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_794__LIST_APPEND2LIST @#1", + melt_assertmsg ("checkoff putslot ~dsym_796__LIST_APPEND2LIST @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V984*/ - meltfptr[983])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V984*/ meltfptr[983]))->obj_vartab[1] = + ( /*_._VALDATA___V987*/ + meltfptr[986])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V987*/ meltfptr[986]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V985*/ meltfptr[984]); + /*_._VALSTR___V988*/ meltfptr[987]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V984*/ meltfptr[983]); + meltgc_touch ( /*_._VALDATA___V987*/ meltfptr[986]); - melt_dbgtrace_written_object ( /*_._VALDATA___V984*/ meltfptr[983], + melt_dbgtrace_written_object ( /*_._VALDATA___V987*/ meltfptr[986], "new static instance"); MELT_LOCATION ("warmelt-outobj.melt:7508:/ initchunk"); @@ -48218,13 +48251,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_17 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V986*/ meltfptr[985])) + ( /*_._VALROUT___V989*/ meltfptr[988])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_796__TRANSLATE_TO_C_MODULE_MELT_SOURCES#0", + ("putroutconst constnull.drout_798__TRANSLATE_TO_C_MODULE_MELT_SOURCES#0", NULL != ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_._VALROUT___V986*/ meltfptr[985])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V989*/ meltfptr[988])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:7508:/ initchunk"); @@ -48233,14 +48266,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_17 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V986*/ meltfptr[985])) + ( /*_._VALROUT___V989*/ meltfptr[988])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_796__TRANSLATE_TO_C_MODULE_MELT_SOURCES#1", - NULL != ( /*_.CLASS_ENVIRONMENT__V153*/ meltfptr[152])); - ((meltroutine_ptr_t) /*_._VALROUT___V986*/ meltfptr[985])->tabval[1] = - (melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V153*/ meltfptr[152]); + ("putroutconst constnull.drout_798__TRANSLATE_TO_C_MODULE_MELT_SOURCES#1", + NULL != ( /*_.CLASS_ENVIRONMENT__V154*/ meltfptr[153])); + ((meltroutine_ptr_t) /*_._VALROUT___V989*/ meltfptr[988])->tabval[1] = + (melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V154*/ meltfptr[153]); MELT_LOCATION ("warmelt-outobj.melt:7508:/ initchunk"); /*^putroutconst */ @@ -48248,13 +48281,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_17 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V986*/ meltfptr[985])) + ( /*_._VALROUT___V989*/ meltfptr[988])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg - ("putroutconst constnull.drout_796__TRANSLATE_TO_C_MODULE_MELT_SOURCES#2", + ("putroutconst constnull.drout_798__TRANSLATE_TO_C_MODULE_MELT_SOURCES#2", NULL != ( /*_.DISCR_LIST__V65*/ meltfptr[64])); - ((meltroutine_ptr_t) /*_._VALROUT___V986*/ meltfptr[985])->tabval[2] = + ((meltroutine_ptr_t) /*_._VALROUT___V989*/ meltfptr[988])->tabval[2] = (melt_ptr_t) ( /*_.DISCR_LIST__V65*/ meltfptr[64]); MELT_LOCATION ("warmelt-outobj.melt:7508:/ initchunk"); @@ -48262,44 +48295,44 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_17 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V986*/ meltfptr[985])) == + ( /*_._VALROUT___V989*/ meltfptr[988])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V983*/ meltfptr[982]); - ((meltroutine_ptr_t) /*_._VALROUT___V986*/ meltfptr[985])->tabval[3] = - (melt_ptr_t) ( /*_._VALCLO___V983*/ meltfptr[982]); + NULL != /*_._VALCLO___V986*/ meltfptr[985]); + ((meltroutine_ptr_t) /*_._VALROUT___V989*/ meltfptr[988])->tabval[3] = + (melt_ptr_t) ( /*_._VALCLO___V986*/ meltfptr[985]); MELT_LOCATION ("warmelt-outobj.melt:7508:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V986*/ meltfptr[985])) == + ( /*_._VALROUT___V989*/ meltfptr[988])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V901*/ meltfptr[900]); - ((meltroutine_ptr_t) /*_._VALROUT___V986*/ meltfptr[985])->tabval[4] = - (melt_ptr_t) ( /*_._VALCLO___V901*/ meltfptr[900]); + NULL != /*_._VALCLO___V904*/ meltfptr[903]); + ((meltroutine_ptr_t) /*_._VALROUT___V989*/ meltfptr[988])->tabval[4] = + (melt_ptr_t) ( /*_._VALCLO___V904*/ meltfptr[903]); MELT_LOCATION ("warmelt-outobj.melt:7508:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V986*/ meltfptr[985]); + meltgc_touch ( /*_._VALROUT___V989*/ meltfptr[988]); /*putclosurout#130 */ melt_assertmsg ("putclosrout#130 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V987*/ meltfptr[986])) == + ( /*_._VALCLO___V990*/ meltfptr[989])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#130 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V986*/ meltfptr[985])) == + ( /*_._VALROUT___V989*/ meltfptr[988])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V987*/ meltfptr[986])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V986*/ meltfptr[985]); + ((meltclosure_ptr_t) /*_._VALCLO___V990*/ meltfptr[989])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V989*/ meltfptr[988]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V987*/ meltfptr[986]); + meltgc_touch ( /*_._VALCLO___V990*/ meltfptr[989]); MELT_LOCATION ("warmelt-outobj.melt:7552:/ initchunk"); /*^putroutconst */ @@ -48307,12 +48340,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_17 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V988*/ meltfptr[987])) + ( /*_._VALROUT___V991*/ meltfptr[990])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_798__EVAL#0", + melt_checkmsg ("putroutconst constnull.drout_800__EVAL#0", NULL != ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6])); - ((meltroutine_ptr_t) /*_._VALROUT___V988*/ meltfptr[987])->tabval[0] = + ((meltroutine_ptr_t) /*_._VALROUT___V991*/ meltfptr[990])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6]); MELT_LOCATION ("warmelt-outobj.melt:7552:/ initchunk"); @@ -48321,12 +48354,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_17 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V988*/ meltfptr[987])) + ( /*_._VALROUT___V991*/ meltfptr[990])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_798__EVAL#1", + melt_checkmsg ("putroutconst constnull.drout_800__EVAL#1", NULL != ( /*_._PREVENV___V4*/ meltfptr[3])); - ((meltroutine_ptr_t) /*_._VALROUT___V988*/ meltfptr[987])->tabval[1] = + ((meltroutine_ptr_t) /*_._VALROUT___V991*/ meltfptr[990])->tabval[1] = (melt_ptr_t) ( /*_._PREVENV___V4*/ meltfptr[3]); MELT_LOCATION ("warmelt-outobj.melt:7552:/ initchunk"); @@ -48335,13 +48368,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_17 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V988*/ meltfptr[987])) + ( /*_._VALROUT___V991*/ meltfptr[990])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_798__EVAL#2", - NULL != ( /*_.CLASS_ENVIRONMENT__V153*/ meltfptr[152])); - ((meltroutine_ptr_t) /*_._VALROUT___V988*/ meltfptr[987])->tabval[2] = - (melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V153*/ meltfptr[152]); + melt_checkmsg ("putroutconst constnull.drout_800__EVAL#2", + NULL != ( /*_.CLASS_ENVIRONMENT__V154*/ meltfptr[153])); + ((meltroutine_ptr_t) /*_._VALROUT___V991*/ meltfptr[990])->tabval[2] = + (melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V154*/ meltfptr[153]); MELT_LOCATION ("warmelt-outobj.melt:7552:/ initchunk"); /*^putroutconst */ @@ -48349,13 +48382,13 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_17 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V988*/ meltfptr[987])) + ( /*_._VALROUT___V991*/ meltfptr[990])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_798__EVAL#3", - NULL != ( /*_.MULTIPLE_TO_LIST__V190*/ meltfptr[189])); - ((meltroutine_ptr_t) /*_._VALROUT___V988*/ meltfptr[987])->tabval[3] = - (melt_ptr_t) ( /*_.MULTIPLE_TO_LIST__V190*/ meltfptr[189]); + melt_checkmsg ("putroutconst constnull.drout_800__EVAL#3", + NULL != ( /*_.MULTIPLE_TO_LIST__V191*/ meltfptr[190])); + ((meltroutine_ptr_t) /*_._VALROUT___V991*/ meltfptr[990])->tabval[3] = + (melt_ptr_t) ( /*_.MULTIPLE_TO_LIST__V191*/ meltfptr[190]); MELT_LOCATION ("warmelt-outobj.melt:7552:/ initchunk"); /*^putroutconst */ @@ -48363,12 +48396,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_17 (meltinitial_frame_t * if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg ("putroutconst checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V988*/ meltfptr[987])) + ( /*_._VALROUT___V991*/ meltfptr[990])) == MELTOBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) - melt_checkmsg ("putroutconst constnull.drout_798__EVAL#4", + melt_checkmsg ("putroutconst constnull.drout_800__EVAL#4", NULL != ( /*_.DISCR_LIST__V65*/ meltfptr[64])); - ((meltroutine_ptr_t) /*_._VALROUT___V988*/ meltfptr[987])->tabval[4] = + ((meltroutine_ptr_t) /*_._VALROUT___V991*/ meltfptr[990])->tabval[4] = (melt_ptr_t) ( /*_.DISCR_LIST__V65*/ meltfptr[64]); MELT_LOCATION ("warmelt-outobj.melt:7552:/ initchunk"); @@ -48376,230 +48409,230 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_17 (meltinitial_frame_t * /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V988*/ meltfptr[987])) == + ( /*_._VALROUT___V991*/ meltfptr[990])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_._VALCLO___V973*/ meltfptr[972]); - ((meltroutine_ptr_t) /*_._VALROUT___V988*/ meltfptr[987])->tabval[5] = - (melt_ptr_t) ( /*_._VALCLO___V973*/ meltfptr[972]); + NULL != /*_._VALCLO___V976*/ meltfptr[975]); + ((meltroutine_ptr_t) /*_._VALROUT___V991*/ meltfptr[990])->tabval[5] = + (melt_ptr_t) ( /*_._VALCLO___V976*/ meltfptr[975]); MELT_LOCATION ("warmelt-outobj.melt:7552:/ initchunk"); /*^touch */ /*touch:_IROUTVAL_ */ - meltgc_touch ( /*_._VALROUT___V988*/ meltfptr[987]); + meltgc_touch ( /*_._VALROUT___V991*/ meltfptr[990]); /*putclosurout#131 */ melt_assertmsg ("putclosrout#131 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V989*/ meltfptr[988])) == + ( /*_._VALCLO___V992*/ meltfptr[991])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#131 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V988*/ meltfptr[987])) == + ( /*_._VALROUT___V991*/ meltfptr[990])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V989*/ meltfptr[988])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V988*/ meltfptr[987]); + ((meltclosure_ptr_t) /*_._VALCLO___V992*/ meltfptr[991])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V991*/ meltfptr[990]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V989*/ meltfptr[988]); + meltgc_touch ( /*_._VALCLO___V992*/ meltfptr[991]); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_800__MULTIPLE_TO_LIST @#1", + melt_assertmsg ("checkobj putslot ~dsym_802__MULTIPLE_TO_LIST @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V990*/ meltfptr[989])) == + ( /*_._VALDATA___V993*/ meltfptr[992])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_800__MULTIPLE_TO_LIST @#1", + melt_assertmsg ("checkoff putslot ~dsym_802__MULTIPLE_TO_LIST @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V990*/ - meltfptr[989])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V990*/ meltfptr[989]))->obj_vartab[1] = + ( /*_._VALDATA___V993*/ + meltfptr[992])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V993*/ meltfptr[992]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V991*/ meltfptr[990]); + /*_._VALSTR___V994*/ meltfptr[993]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V990*/ meltfptr[989]); + meltgc_touch ( /*_._VALDATA___V993*/ meltfptr[992]); - melt_dbgtrace_written_object ( /*_._VALDATA___V990*/ meltfptr[989], + melt_dbgtrace_written_object ( /*_._VALDATA___V993*/ meltfptr[992], "new static instance"); /*putclosurout#132 */ melt_assertmsg ("putclosrout#132 checkclo", melt_magic_discr ((melt_ptr_t) - ( /*_._VALCLO___V993*/ meltfptr[992])) == + ( /*_._VALCLO___V996*/ meltfptr[995])) == MELTOBMAG_CLOSURE); melt_assertmsg ("putclosrout#132 checkrout", melt_magic_discr ((melt_ptr_t) - ( /*_._VALROUT___V992*/ meltfptr[991])) == + ( /*_._VALROUT___V995*/ meltfptr[994])) == MELTOBMAG_ROUTINE); - ((meltclosure_ptr_t) /*_._VALCLO___V993*/ meltfptr[992])->rout = - (meltroutine_ptr_t) ( /*_._VALROUT___V992*/ meltfptr[991]); + ((meltclosure_ptr_t) /*_._VALCLO___V996*/ meltfptr[995])->rout = + (meltroutine_ptr_t) ( /*_._VALROUT___V995*/ meltfptr[994]); /*touch:_DATACLOSURE_ */ - meltgc_touch ( /*_._VALCLO___V993*/ meltfptr[992]); + meltgc_touch ( /*_._VALCLO___V996*/ meltfptr[995]); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_804__COMPILE_LIST_SEXPR @#1", + melt_assertmsg ("checkobj putslot ~dsym_806__COMPILE_LIST_SEXPR @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V994*/ meltfptr[993])) == + ( /*_._VALDATA___V997*/ meltfptr[996])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_804__COMPILE_LIST_SEXPR @#1", + melt_assertmsg ("checkoff putslot ~dsym_806__COMPILE_LIST_SEXPR @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V994*/ - meltfptr[993])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V994*/ meltfptr[993]))->obj_vartab[1] = + ( /*_._VALDATA___V997*/ + meltfptr[996])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V997*/ meltfptr[996]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V995*/ meltfptr[994]); + /*_._VALSTR___V998*/ meltfptr[997]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V994*/ meltfptr[993]); + meltgc_touch ( /*_._VALDATA___V997*/ meltfptr[996]); - melt_dbgtrace_written_object ( /*_._VALDATA___V994*/ meltfptr[993], + melt_dbgtrace_written_object ( /*_._VALDATA___V997*/ meltfptr[996], "new static instance"); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_806__EVAL @#1", + melt_assertmsg ("checkobj putslot ~dsym_808__EVAL @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V996*/ meltfptr[995])) == + ( /*_._VALDATA___V999*/ meltfptr[998])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_806__EVAL @#1", + melt_assertmsg ("checkoff putslot ~dsym_808__EVAL @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V996*/ - meltfptr[995])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V996*/ meltfptr[995]))->obj_vartab[1] = + ( /*_._VALDATA___V999*/ + meltfptr[998])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V999*/ meltfptr[998]))->obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V997*/ meltfptr[996]); + /*_._VALSTR___V1000*/ meltfptr[999]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V996*/ meltfptr[995]); + meltgc_touch ( /*_._VALDATA___V999*/ meltfptr[998]); - melt_dbgtrace_written_object ( /*_._VALDATA___V996*/ meltfptr[995], + melt_dbgtrace_written_object ( /*_._VALDATA___V999*/ meltfptr[998], "new static instance"); /*putslot */ melt_assertmsg - ("checkobj putslot ~dsym_808__GENERATE_GPLV3PLUS_COPYRIGHT_NOTICE_C_COMMENT @#1", - melt_magic_discr ((melt_ptr_t) ( /*_._VALDATA___V998*/ meltfptr[997])) == - MELTOBMAG_OBJECT); + ("checkobj putslot ~dsym_810__GENERATE_GPLV3PLUS_COPYRIGHT_NOTICE_C_COMMENT @#1", + melt_magic_discr ((melt_ptr_t) ( /*_._VALDATA___V1001*/ meltfptr[1000])) + == MELTOBMAG_OBJECT); melt_assertmsg - ("checkoff putslot ~dsym_808__GENERATE_GPLV3PLUS_COPYRIGHT_NOTICE_C_COMMENT @#1", + ("checkoff putslot ~dsym_810__GENERATE_GPLV3PLUS_COPYRIGHT_NOTICE_C_COMMENT @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V998*/ meltfptr[997])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V998*/ meltfptr[997]))->obj_vartab[1] = - (melt_ptr_t) ( - /*_._VALSTR___V999*/ meltfptr[998]); + ( /*_._VALDATA___V1001*/ meltfptr[1000])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V1001*/ meltfptr[1000]))-> + obj_vartab[1] = (melt_ptr_t) ( + /*_._VALSTR___V1002*/ meltfptr[1001]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V998*/ meltfptr[997]); + meltgc_touch ( /*_._VALDATA___V1001*/ meltfptr[1000]); - melt_dbgtrace_written_object ( /*_._VALDATA___V998*/ meltfptr[997], + melt_dbgtrace_written_object ( /*_._VALDATA___V1001*/ meltfptr[1000], "new static instance"); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_810__GET_CODE_BUFFER_LIMIT @#1", + melt_assertmsg ("checkobj putslot ~dsym_812__GET_CODE_BUFFER_LIMIT @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V1000*/ meltfptr[999])) + ( /*_._VALDATA___V1003*/ meltfptr[1002])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_810__GET_CODE_BUFFER_LIMIT @#1", + melt_assertmsg ("checkoff putslot ~dsym_812__GET_CODE_BUFFER_LIMIT @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V1000*/ - meltfptr[999])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V1000*/ meltfptr[999]))-> + ( /*_._VALDATA___V1003*/ + meltfptr[1002])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V1003*/ meltfptr[1002]))-> obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V1001*/ meltfptr[1000]); + /*_._VALSTR___V1004*/ meltfptr[1003]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V1000*/ meltfptr[999]); + meltgc_touch ( /*_._VALDATA___V1003*/ meltfptr[1002]); - melt_dbgtrace_written_object ( /*_._VALDATA___V1000*/ meltfptr[999], + melt_dbgtrace_written_object ( /*_._VALDATA___V1003*/ meltfptr[1002], "new static instance"); /*putslot */ - melt_assertmsg ("checkobj putslot ~dsym_812__PUT_CODE_BUFFER_LIMIT @#1", + melt_assertmsg ("checkobj putslot ~dsym_814__PUT_CODE_BUFFER_LIMIT @#1", melt_magic_discr ((melt_ptr_t) - ( /*_._VALDATA___V1002*/ meltfptr[1001])) + ( /*_._VALDATA___V1005*/ meltfptr[1004])) == MELTOBMAG_OBJECT); - melt_assertmsg ("checkoff putslot ~dsym_812__PUT_CODE_BUFFER_LIMIT @#1", + melt_assertmsg ("checkoff putslot ~dsym_814__PUT_CODE_BUFFER_LIMIT @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V1002*/ - meltfptr[1001])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V1002*/ meltfptr[1001]))-> + ( /*_._VALDATA___V1005*/ + meltfptr[1004])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V1005*/ meltfptr[1004]))-> obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V1003*/ meltfptr[1002]); + /*_._VALSTR___V1006*/ meltfptr[1005]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V1002*/ meltfptr[1001]); + meltgc_touch ( /*_._VALDATA___V1005*/ meltfptr[1004]); - melt_dbgtrace_written_object ( /*_._VALDATA___V1002*/ meltfptr[1001], + melt_dbgtrace_written_object ( /*_._VALDATA___V1005*/ meltfptr[1004], "new static instance"); /*putslot */ melt_assertmsg - ("checkobj putslot ~dsym_814__TRANSLATE_RUN_MELT_EXPRESSIONS @#1", - melt_magic_discr ((melt_ptr_t) ( /*_._VALDATA___V1004*/ meltfptr[1003])) + ("checkobj putslot ~dsym_816__TRANSLATE_RUN_MELT_EXPRESSIONS @#1", + melt_magic_discr ((melt_ptr_t) ( /*_._VALDATA___V1007*/ meltfptr[1006])) == MELTOBMAG_OBJECT); melt_assertmsg - ("checkoff putslot ~dsym_814__TRANSLATE_RUN_MELT_EXPRESSIONS @#1", + ("checkoff putslot ~dsym_816__TRANSLATE_RUN_MELT_EXPRESSIONS @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V1004*/ meltfptr[1003])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V1004*/ meltfptr[1003]))-> + ( /*_._VALDATA___V1007*/ meltfptr[1006])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V1007*/ meltfptr[1006]))-> obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V1005*/ meltfptr[1004]); + /*_._VALSTR___V1008*/ meltfptr[1007]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V1004*/ meltfptr[1003]); + meltgc_touch ( /*_._VALDATA___V1007*/ meltfptr[1006]); - melt_dbgtrace_written_object ( /*_._VALDATA___V1004*/ meltfptr[1003], + melt_dbgtrace_written_object ( /*_._VALDATA___V1007*/ meltfptr[1006], "new static instance"); /*putslot */ melt_assertmsg - ("checkobj putslot ~dsym_816__TRANSLATE_TO_C_MODULE_MELT_SOURCES @#1", - melt_magic_discr ((melt_ptr_t) ( /*_._VALDATA___V1006*/ meltfptr[1005])) + ("checkobj putslot ~dsym_818__TRANSLATE_TO_C_MODULE_MELT_SOURCES @#1", + melt_magic_discr ((melt_ptr_t) ( /*_._VALDATA___V1009*/ meltfptr[1008])) == MELTOBMAG_OBJECT); melt_assertmsg - ("checkoff putslot ~dsym_816__TRANSLATE_TO_C_MODULE_MELT_SOURCES @#1", + ("checkoff putslot ~dsym_818__TRANSLATE_TO_C_MODULE_MELT_SOURCES @#1", (1 >= 0 && 1 < melt_object_length ((melt_ptr_t) - ( /*_._VALDATA___V1006*/ meltfptr[1005])))); - ((meltobject_ptr_t) ( /*_._VALDATA___V1006*/ meltfptr[1005]))-> + ( /*_._VALDATA___V1009*/ meltfptr[1008])))); + ((meltobject_ptr_t) ( /*_._VALDATA___V1009*/ meltfptr[1008]))-> obj_vartab[1] = (melt_ptr_t) ( - /*_._VALSTR___V1007*/ meltfptr[1006]); + /*_._VALSTR___V1010*/ meltfptr[1009]); /*touch:_VALUEDATA_ */ - meltgc_touch ( /*_._VALDATA___V1006*/ meltfptr[1005]); + meltgc_touch ( /*_._VALDATA___V1009*/ meltfptr[1008]); - melt_dbgtrace_written_object ( /*_._VALDATA___V1006*/ meltfptr[1005], + melt_dbgtrace_written_object ( /*_._VALDATA___V1009*/ meltfptr[1008], "new static instance"); /**COMMENT: before toplevel body **/ ; @@ -48616,7 +48649,7 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_17 (meltinitial_frame_t * /*then */ { /*^cond.then */ - /*_.OR___V1008*/ meltfptr[1007] = + /*_.OR___V1011*/ meltfptr[1010] = /*quasi.cur.mod.env.cont cur.mod.env.cont : at very start */ /*_._CONTENV___V2*/ meltfptr[1];; } @@ -48628,7 +48661,7 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_17 (meltinitial_frame_t * /*anyblock */ { - /*_.HOOK_FRESH_ENVIRONMENT_REFERENCE_MAKER__V1009*/ meltfptr[1008] = + /*_.HOOK_FRESH_ENVIRONMENT_REFERENCE_MAKER__V1012*/ meltfptr[1011] = /*hookcall */ melthook_HOOK_FRESH_ENVIRONMENT_REFERENCE_MAKER ((melt_ptr_t) /*_.HOOK_FRESH_ENVIRONMENT_REFERENCE_MAKER__V5*/ @@ -48637,14 +48670,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_17 (meltinitial_frame_t * meltfptr[3], "warmelt-outobj");; /*^compute */ - /*_.OR___V1008*/ meltfptr[1007] = - /*_.HOOK_FRESH_ENVIRONMENT_REFERENCE_MAKER__V1009*/ - meltfptr[1008];; + /*_.OR___V1011*/ meltfptr[1010] = + /*_.HOOK_FRESH_ENVIRONMENT_REFERENCE_MAKER__V1012*/ + meltfptr[1011];; /*epilog */ MELT_LOCATION ("warmelt-outobj.melt:3:/ clear"); - /*clear *//*_.HOOK_FRESH_ENVIRONMENT_REFERENCE_MAKER__V1009*/ - meltfptr[1008] = 0; + /*clear *//*_.HOOK_FRESH_ENVIRONMENT_REFERENCE_MAKER__V1012*/ + meltfptr[1011] = 0; } ; } @@ -48657,7 +48690,7 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_17 (meltinitial_frame_t * /*epilog */ /*^clear */ - /*clear *//*_.OR___V1008*/ meltfptr[1007] = 0; + /*clear *//*_.OR___V1011*/ meltfptr[1010] = 0; } MELT_LOCATION ("warmelt-outobj.melt:77:/ initchunk"); @@ -48675,14 +48708,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_17 (meltinitial_frame_t * memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = - (melt_ptr_t *) & /*_._VALSTR___V213*/ meltfptr[212]; + (melt_ptr_t *) & /*_._VALSTR___V214*/ meltfptr[213]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_._VALCLO___V208*/ meltfptr[207]; - /*_.REGISTER_OPTION__V1010*/ meltfptr[1008] = + (melt_ptr_t *) & /*_._VALCLO___V209*/ meltfptr[208]; + /*_.REGISTER_OPTION__V1013*/ meltfptr[1011] = melt_apply ((meltclosure_ptr_t) ( /*_.REGISTER_OPTION__V9*/ meltfptr[8]), - (melt_ptr_t) ( /*_._VALDATA___V211*/ meltfptr[210]), + (melt_ptr_t) ( /*_._VALDATA___V212*/ meltfptr[211]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } @@ -48690,7 +48723,7 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_17 (meltinitial_frame_t * /*epilog */ /*^clear */ - /*clear *//*_.REGISTER_OPTION__V1010*/ meltfptr[1008] = 0; + /*clear *//*_.REGISTER_OPTION__V1013*/ meltfptr[1011] = 0; } MELT_LOCATION ("warmelt-outobj.melt:116:/ initchunk"); @@ -48711,8 +48744,8 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_17 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_DECLINIT__V18*/ meltfptr[17]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_._VALCLO___V230*/ meltfptr[229]; - /*_.INSTALL_METHOD__V1011*/ meltfptr[1007] = + (melt_ptr_t *) & /*_._VALCLO___V231*/ meltfptr[230]; + /*_.INSTALL_METHOD__V1014*/ meltfptr[1010] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V16*/ meltfptr[15]), (melt_ptr_t) ( /*_.CLASS_ROOT__V17*/ meltfptr[16]), @@ -48723,7 +48756,7 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_17 (meltinitial_frame_t * /*epilog */ /*^clear */ - /*clear *//*_.INSTALL_METHOD__V1011*/ meltfptr[1007] = 0; + /*clear *//*_.INSTALL_METHOD__V1014*/ meltfptr[1010] = 0; } MELT_LOCATION ("warmelt-outobj.melt:140:/ initchunk"); @@ -48744,8 +48777,8 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_17 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_._VALCLO___V238*/ meltfptr[237]; - /*_.INSTALL_METHOD__V1012*/ meltfptr[1008] = + (melt_ptr_t *) & /*_._VALCLO___V239*/ meltfptr[238]; + /*_.INSTALL_METHOD__V1015*/ meltfptr[1011] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V16*/ meltfptr[15]), (melt_ptr_t) ( /*_.CLASS_OBJINITELEM__V19*/ meltfptr[18]), @@ -48756,7 +48789,7 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_17 (meltinitial_frame_t * /*epilog */ /*^clear */ - /*clear *//*_.INSTALL_METHOD__V1012*/ meltfptr[1008] = 0; + /*clear *//*_.INSTALL_METHOD__V1015*/ meltfptr[1011] = 0; } MELT_LOCATION ("warmelt-outobj.melt:146:/ initchunk"); @@ -48777,8 +48810,8 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_17 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_INITIAL_FILL__V21*/ meltfptr[20]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_._VALCLO___V244*/ meltfptr[243]; - /*_.INSTALL_METHOD__V1013*/ meltfptr[1007] = + (melt_ptr_t *) & /*_._VALCLO___V245*/ meltfptr[244]; + /*_.INSTALL_METHOD__V1016*/ meltfptr[1010] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V16*/ meltfptr[15]), (melt_ptr_t) ( /*_.CLASS_ROOT__V17*/ meltfptr[16]), @@ -48789,7 +48822,7 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_17 (meltinitial_frame_t * /*epilog */ /*^clear */ - /*clear *//*_.INSTALL_METHOD__V1013*/ meltfptr[1007] = 0; + /*clear *//*_.INSTALL_METHOD__V1016*/ meltfptr[1010] = 0; } MELT_LOCATION ("warmelt-outobj.melt:154:/ initchunk"); @@ -48810,8 +48843,8 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_17 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_INITIAL_PREDEF__V22*/ meltfptr[21]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_._VALCLO___V248*/ meltfptr[247]; - /*_.INSTALL_METHOD__V1014*/ meltfptr[1008] = + (melt_ptr_t *) & /*_._VALCLO___V249*/ meltfptr[248]; + /*_.INSTALL_METHOD__V1017*/ meltfptr[1011] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V16*/ meltfptr[15]), (melt_ptr_t) ( /*_.CLASS_ROOT__V17*/ meltfptr[16]), @@ -48822,7 +48855,7 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_17 (meltinitial_frame_t * /*epilog */ /*^clear */ - /*clear *//*_.INSTALL_METHOD__V1014*/ meltfptr[1008] = 0; + /*clear *//*_.INSTALL_METHOD__V1017*/ meltfptr[1011] = 0; } MELT_LOCATION ("warmelt-outobj.melt:187:/ initchunk"); @@ -48843,8 +48876,8 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_17 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_._VALCLO___V256*/ meltfptr[255]; - /*_.INSTALL_METHOD__V1015*/ meltfptr[1007] = + (melt_ptr_t *) & /*_._VALCLO___V257*/ meltfptr[256]; + /*_.INSTALL_METHOD__V1018*/ meltfptr[1010] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V16*/ meltfptr[15]), (melt_ptr_t) ( /*_.CLASS_OBJPREDEF__V24*/ meltfptr[23]), @@ -48855,7 +48888,7 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_17 (meltinitial_frame_t * /*epilog */ /*^clear */ - /*clear *//*_.INSTALL_METHOD__V1015*/ meltfptr[1007] = 0; + /*clear *//*_.INSTALL_METHOD__V1018*/ meltfptr[1010] = 0; } MELT_LOCATION ("warmelt-outobj.melt:193:/ initchunk"); @@ -48876,8 +48909,8 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_17 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_._VALCLO___V260*/ meltfptr[259]; - /*_.INSTALL_METHOD__V1016*/ meltfptr[1008] = + (melt_ptr_t *) & /*_._VALCLO___V261*/ meltfptr[260]; + /*_.INSTALL_METHOD__V1019*/ meltfptr[1011] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V16*/ meltfptr[15]), (melt_ptr_t) ( /*_.CLASS_OBJNIL__V25*/ meltfptr[24]), @@ -48888,7 +48921,7 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_17 (meltinitial_frame_t * /*epilog */ /*^clear */ - /*clear *//*_.INSTALL_METHOD__V1016*/ meltfptr[1008] = 0; + /*clear *//*_.INSTALL_METHOD__V1019*/ meltfptr[1011] = 0; } MELT_LOCATION ("warmelt-outobj.melt:279:/ initchunk"); @@ -48909,8 +48942,8 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_17 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_._VALCLO___V270*/ meltfptr[269]; - /*_.INSTALL_METHOD__V1017*/ meltfptr[1007] = + (melt_ptr_t *) & /*_._VALCLO___V271*/ meltfptr[270]; + /*_.INSTALL_METHOD__V1020*/ meltfptr[1010] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V16*/ meltfptr[15]), (melt_ptr_t) ( /*_.CLASS_OBJEXPANDPUREVAL__V26*/ @@ -48922,7 +48955,7 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_17 (meltinitial_frame_t * /*epilog */ /*^clear */ - /*clear *//*_.INSTALL_METHOD__V1017*/ meltfptr[1007] = 0; + /*clear *//*_.INSTALL_METHOD__V1020*/ meltfptr[1010] = 0; } MELT_LOCATION ("warmelt-outobj.melt:298:/ initchunk"); @@ -48943,8 +48976,8 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_17 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_._VALCLO___V280*/ meltfptr[279]; - /*_.INSTALL_METHOD__V1018*/ meltfptr[1008] = + (melt_ptr_t *) & /*_._VALCLO___V281*/ meltfptr[280]; + /*_.INSTALL_METHOD__V1021*/ meltfptr[1011] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V16*/ meltfptr[15]), (melt_ptr_t) ( /*_.CLASS_OBJHOOKNTH__V30*/ meltfptr[29]), @@ -48955,7 +48988,7 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_17 (meltinitial_frame_t * /*epilog */ /*^clear */ - /*clear *//*_.INSTALL_METHOD__V1018*/ meltfptr[1008] = 0; + /*clear *//*_.INSTALL_METHOD__V1021*/ meltfptr[1011] = 0; } MELT_LOCATION ("warmelt-outobj.melt:310:/ initchunk"); @@ -48976,8 +49009,8 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_17 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_DECLINIT__V18*/ meltfptr[17]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_._VALCLO___V286*/ meltfptr[285]; - /*_.INSTALL_METHOD__V1019*/ meltfptr[1007] = + (melt_ptr_t *) & /*_._VALCLO___V287*/ meltfptr[286]; + /*_.INSTALL_METHOD__V1022*/ meltfptr[1010] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V16*/ meltfptr[15]), (melt_ptr_t) ( /*_.CLASS_OBJINITOBJECT__V32*/ @@ -48989,7 +49022,7 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_17 (meltinitial_frame_t * /*epilog */ /*^clear */ - /*clear *//*_.INSTALL_METHOD__V1019*/ meltfptr[1007] = 0; + /*clear *//*_.INSTALL_METHOD__V1022*/ meltfptr[1010] = 0; } MELT_LOCATION ("warmelt-outobj.melt:463:/ initchunk"); @@ -49010,8 +49043,8 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_17 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_INITIAL_FILL__V21*/ meltfptr[20]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_._VALCLO___V290*/ meltfptr[289]; - /*_.INSTALL_METHOD__V1020*/ meltfptr[1008] = + (melt_ptr_t *) & /*_._VALCLO___V291*/ meltfptr[290]; + /*_.INSTALL_METHOD__V1023*/ meltfptr[1011] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V16*/ meltfptr[15]), (melt_ptr_t) ( /*_.CLASS_OBJINITOBJECT__V32*/ @@ -49023,9 +49056,22 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_17 (meltinitial_frame_t * /*epilog */ /*^clear */ - /*clear *//*_.INSTALL_METHOD__V1020*/ meltfptr[1008] = 0; + /*clear *//*_.INSTALL_METHOD__V1023*/ meltfptr[1011] = 0; } + +#undef meltfram__ +} /*end of meltmod__WARMELTmiOUTOBJ__initialmeltchunk_17 */ + +void +meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * + meltmeltframptr__, + char meltpredefinited[]) +{ +#define meltfram__ (*meltmeltframptr__) +#undef meltcallcount +#define meltcallcount 0L + (void) meltpredefinited; MELT_LOCATION ("warmelt-outobj.melt:555:/ initchunk"); /*^block */ /*anyblock */ @@ -49044,8 +49090,8 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_17 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_INITIAL_PREDEF__V22*/ meltfptr[21]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_._VALCLO___V298*/ meltfptr[297]; - /*_.INSTALL_METHOD__V1021*/ meltfptr[1007] = + (melt_ptr_t *) & /*_._VALCLO___V299*/ meltfptr[298]; + /*_.INSTALL_METHOD__V1024*/ meltfptr[1010] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V16*/ meltfptr[15]), (melt_ptr_t) ( /*_.CLASS_OBJINITOBJECT__V32*/ @@ -49057,7 +49103,7 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_17 (meltinitial_frame_t * /*epilog */ /*^clear */ - /*clear *//*_.INSTALL_METHOD__V1021*/ meltfptr[1007] = 0; + /*clear *//*_.INSTALL_METHOD__V1024*/ meltfptr[1010] = 0; } MELT_LOCATION ("warmelt-outobj.melt:612:/ initchunk"); @@ -49078,8 +49124,8 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_17 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_INITIAL_PREDEF__V22*/ meltfptr[21]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_._VALCLO___V302*/ meltfptr[301]; - /*_.INSTALL_METHOD__V1022*/ meltfptr[1008] = + (melt_ptr_t *) & /*_._VALCLO___V303*/ meltfptr[302]; + /*_.INSTALL_METHOD__V1025*/ meltfptr[1011] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V16*/ meltfptr[15]), (melt_ptr_t) ( /*_.CLASS_OBJINITHOOK__V37*/ meltfptr[36]), @@ -49090,7 +49136,7 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_17 (meltinitial_frame_t * /*epilog */ /*^clear */ - /*clear *//*_.INSTALL_METHOD__V1022*/ meltfptr[1008] = 0; + /*clear *//*_.INSTALL_METHOD__V1025*/ meltfptr[1011] = 0; } MELT_LOCATION ("warmelt-outobj.melt:623:/ initchunk"); @@ -49111,8 +49157,8 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_17 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_DECLINIT__V18*/ meltfptr[17]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_._VALCLO___V308*/ meltfptr[307]; - /*_.INSTALL_METHOD__V1023*/ meltfptr[1007] = + (melt_ptr_t *) & /*_._VALCLO___V309*/ meltfptr[308]; + /*_.INSTALL_METHOD__V1026*/ meltfptr[1010] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V16*/ meltfptr[15]), (melt_ptr_t) ( /*_.CLASS_OBJINITMULTIPLE__V39*/ @@ -49124,7 +49170,7 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_17 (meltinitial_frame_t * /*epilog */ /*^clear */ - /*clear *//*_.INSTALL_METHOD__V1023*/ meltfptr[1007] = 0; + /*clear *//*_.INSTALL_METHOD__V1026*/ meltfptr[1010] = 0; } MELT_LOCATION ("warmelt-outobj.melt:669:/ initchunk"); @@ -49145,8 +49191,8 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_17 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_INITIAL_FILL__V21*/ meltfptr[20]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_._VALCLO___V312*/ meltfptr[311]; - /*_.INSTALL_METHOD__V1024*/ meltfptr[1008] = + (melt_ptr_t *) & /*_._VALCLO___V313*/ meltfptr[312]; + /*_.INSTALL_METHOD__V1027*/ meltfptr[1011] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V16*/ meltfptr[15]), (melt_ptr_t) ( /*_.CLASS_OBJINITMULTIPLE__V39*/ @@ -49158,22 +49204,9 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_17 (meltinitial_frame_t * /*epilog */ /*^clear */ - /*clear *//*_.INSTALL_METHOD__V1024*/ meltfptr[1008] = 0; + /*clear *//*_.INSTALL_METHOD__V1027*/ meltfptr[1011] = 0; } - -#undef meltfram__ -} /*end of meltmod__WARMELTmiOUTOBJ__initialmeltchunk_17 */ - -void -meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * - meltmeltframptr__, - char meltpredefinited[]) -{ -#define meltfram__ (*meltmeltframptr__) -#undef meltcallcount -#define meltcallcount 0L - (void) meltpredefinited; MELT_LOCATION ("warmelt-outobj.melt:678:/ initchunk"); /*^block */ /*anyblock */ @@ -49192,8 +49225,8 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_DECLINIT__V18*/ meltfptr[17]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_._VALCLO___V314*/ meltfptr[313]; - /*_.INSTALL_METHOD__V1025*/ meltfptr[1007] = + (melt_ptr_t *) & /*_._VALCLO___V315*/ meltfptr[314]; + /*_.INSTALL_METHOD__V1028*/ meltfptr[1010] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V16*/ meltfptr[15]), (melt_ptr_t) ( /*_.CLASS_OBJINITCLOSURE__V40*/ @@ -49205,7 +49238,7 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * /*epilog */ /*^clear */ - /*clear *//*_.INSTALL_METHOD__V1025*/ meltfptr[1007] = 0; + /*clear *//*_.INSTALL_METHOD__V1028*/ meltfptr[1010] = 0; } MELT_LOCATION ("warmelt-outobj.melt:738:/ initchunk"); @@ -49226,8 +49259,8 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_INITIAL_FILL__V21*/ meltfptr[20]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_._VALCLO___V318*/ meltfptr[317]; - /*_.INSTALL_METHOD__V1026*/ meltfptr[1008] = + (melt_ptr_t *) & /*_._VALCLO___V319*/ meltfptr[318]; + /*_.INSTALL_METHOD__V1029*/ meltfptr[1011] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V16*/ meltfptr[15]), (melt_ptr_t) ( /*_.CLASS_OBJINITCLOSURE__V40*/ @@ -49239,7 +49272,7 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * /*epilog */ /*^clear */ - /*clear *//*_.INSTALL_METHOD__V1026*/ meltfptr[1008] = 0; + /*clear *//*_.INSTALL_METHOD__V1029*/ meltfptr[1011] = 0; } MELT_LOCATION ("warmelt-outobj.melt:748:/ initchunk"); @@ -49260,8 +49293,8 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_DECLINIT__V18*/ meltfptr[17]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_._VALCLO___V320*/ meltfptr[319]; - /*_.INSTALL_METHOD__V1027*/ meltfptr[1007] = + (melt_ptr_t *) & /*_._VALCLO___V321*/ meltfptr[320]; + /*_.INSTALL_METHOD__V1030*/ meltfptr[1010] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V16*/ meltfptr[15]), (melt_ptr_t) ( /*_.CLASS_OBJINITROUTINE__V41*/ @@ -49273,7 +49306,7 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * /*epilog */ /*^clear */ - /*clear *//*_.INSTALL_METHOD__V1027*/ meltfptr[1007] = 0; + /*clear *//*_.INSTALL_METHOD__V1030*/ meltfptr[1010] = 0; } MELT_LOCATION ("warmelt-outobj.melt:846:/ initchunk"); @@ -49294,8 +49327,8 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_INITIAL_FILL__V21*/ meltfptr[20]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_._VALCLO___V324*/ meltfptr[323]; - /*_.INSTALL_METHOD__V1028*/ meltfptr[1008] = + (melt_ptr_t *) & /*_._VALCLO___V325*/ meltfptr[324]; + /*_.INSTALL_METHOD__V1031*/ meltfptr[1011] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V16*/ meltfptr[15]), (melt_ptr_t) ( /*_.CLASS_OBJINITROUTINE__V41*/ @@ -49307,7 +49340,7 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * /*epilog */ /*^clear */ - /*clear *//*_.INSTALL_METHOD__V1028*/ meltfptr[1008] = 0; + /*clear *//*_.INSTALL_METHOD__V1031*/ meltfptr[1011] = 0; } MELT_LOCATION ("warmelt-outobj.melt:859:/ initchunk"); @@ -49328,8 +49361,8 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_DECLINIT__V18*/ meltfptr[17]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_._VALCLO___V330*/ meltfptr[329]; - /*_.INSTALL_METHOD__V1029*/ meltfptr[1007] = + (melt_ptr_t *) & /*_._VALCLO___V331*/ meltfptr[330]; + /*_.INSTALL_METHOD__V1032*/ meltfptr[1010] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V16*/ meltfptr[15]), (melt_ptr_t) ( /*_.CLASS_OBJINITHOOK__V37*/ meltfptr[36]), @@ -49340,7 +49373,7 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * /*epilog */ /*^clear */ - /*clear *//*_.INSTALL_METHOD__V1029*/ meltfptr[1007] = 0; + /*clear *//*_.INSTALL_METHOD__V1032*/ meltfptr[1010] = 0; } MELT_LOCATION ("warmelt-outobj.melt:922:/ initchunk"); @@ -49361,8 +49394,8 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_INITIAL_FILL__V21*/ meltfptr[20]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_._VALCLO___V332*/ meltfptr[331]; - /*_.INSTALL_METHOD__V1030*/ meltfptr[1008] = + (melt_ptr_t *) & /*_._VALCLO___V333*/ meltfptr[332]; + /*_.INSTALL_METHOD__V1033*/ meltfptr[1011] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V16*/ meltfptr[15]), (melt_ptr_t) ( /*_.CLASS_OBJINITHOOK__V37*/ meltfptr[36]), @@ -49373,7 +49406,7 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * /*epilog */ /*^clear */ - /*clear *//*_.INSTALL_METHOD__V1030*/ meltfptr[1008] = 0; + /*clear *//*_.INSTALL_METHOD__V1033*/ meltfptr[1011] = 0; } MELT_LOCATION ("warmelt-outobj.melt:934:/ initchunk"); @@ -49394,8 +49427,8 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_DECLINIT__V18*/ meltfptr[17]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_._VALCLO___V336*/ meltfptr[335]; - /*_.INSTALL_METHOD__V1031*/ meltfptr[1007] = + (melt_ptr_t *) & /*_._VALCLO___V337*/ meltfptr[336]; + /*_.INSTALL_METHOD__V1034*/ meltfptr[1010] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V16*/ meltfptr[15]), (melt_ptr_t) ( /*_.CLASS_OBJINITSTRING__V45*/ @@ -49407,7 +49440,7 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * /*epilog */ /*^clear */ - /*clear *//*_.INSTALL_METHOD__V1031*/ meltfptr[1007] = 0; + /*clear *//*_.INSTALL_METHOD__V1034*/ meltfptr[1010] = 0; } MELT_LOCATION ("warmelt-outobj.melt:1132:/ initchunk"); @@ -49428,8 +49461,8 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_INITIAL_FILL__V21*/ meltfptr[20]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_._VALCLO___V340*/ meltfptr[339]; - /*_.INSTALL_METHOD__V1032*/ meltfptr[1008] = + (melt_ptr_t *) & /*_._VALCLO___V341*/ meltfptr[340]; + /*_.INSTALL_METHOD__V1035*/ meltfptr[1011] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V16*/ meltfptr[15]), (melt_ptr_t) ( /*_.CLASS_OBJINITSTRING__V45*/ @@ -49441,7 +49474,7 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * /*epilog */ /*^clear */ - /*clear *//*_.INSTALL_METHOD__V1032*/ meltfptr[1008] = 0; + /*clear *//*_.INSTALL_METHOD__V1035*/ meltfptr[1011] = 0; } MELT_LOCATION ("warmelt-outobj.melt:1141:/ initchunk"); @@ -49462,8 +49495,8 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_DECLINIT__V18*/ meltfptr[17]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_._VALCLO___V342*/ meltfptr[341]; - /*_.INSTALL_METHOD__V1033*/ meltfptr[1007] = + (melt_ptr_t *) & /*_._VALCLO___V343*/ meltfptr[342]; + /*_.INSTALL_METHOD__V1036*/ meltfptr[1010] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V16*/ meltfptr[15]), (melt_ptr_t) ( /*_.CLASS_OBJINITBOXINTEGER__V46*/ @@ -49475,7 +49508,7 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * /*epilog */ /*^clear */ - /*clear *//*_.INSTALL_METHOD__V1033*/ meltfptr[1007] = 0; + /*clear *//*_.INSTALL_METHOD__V1036*/ meltfptr[1010] = 0; } MELT_LOCATION ("warmelt-outobj.melt:1190:/ initchunk"); @@ -49496,8 +49529,8 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_INITIAL_FILL__V21*/ meltfptr[20]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_._VALCLO___V346*/ meltfptr[345]; - /*_.INSTALL_METHOD__V1034*/ meltfptr[1008] = + (melt_ptr_t *) & /*_._VALCLO___V347*/ meltfptr[346]; + /*_.INSTALL_METHOD__V1037*/ meltfptr[1011] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V16*/ meltfptr[15]), (melt_ptr_t) ( /*_.CLASS_OBJINITBOXINTEGER__V46*/ @@ -49509,7 +49542,7 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * /*epilog */ /*^clear */ - /*clear *//*_.INSTALL_METHOD__V1034*/ meltfptr[1008] = 0; + /*clear *//*_.INSTALL_METHOD__V1037*/ meltfptr[1011] = 0; } MELT_LOCATION ("warmelt-outobj.melt:1201:/ initchunk"); @@ -49530,8 +49563,8 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_DECLINIT__V18*/ meltfptr[17]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_._VALCLO___V348*/ meltfptr[347]; - /*_.INSTALL_METHOD__V1035*/ meltfptr[1007] = + (melt_ptr_t *) & /*_._VALCLO___V349*/ meltfptr[348]; + /*_.INSTALL_METHOD__V1038*/ meltfptr[1010] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V16*/ meltfptr[15]), (melt_ptr_t) ( /*_.CLASS_OBJINITPAIR__V47*/ meltfptr[46]), @@ -49542,7 +49575,7 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * /*epilog */ /*^clear */ - /*clear *//*_.INSTALL_METHOD__V1035*/ meltfptr[1007] = 0; + /*clear *//*_.INSTALL_METHOD__V1038*/ meltfptr[1010] = 0; } MELT_LOCATION ("warmelt-outobj.melt:1241:/ initchunk"); @@ -49563,8 +49596,8 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_INITIAL_FILL__V21*/ meltfptr[20]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_._VALCLO___V352*/ meltfptr[351]; - /*_.INSTALL_METHOD__V1036*/ meltfptr[1008] = + (melt_ptr_t *) & /*_._VALCLO___V353*/ meltfptr[352]; + /*_.INSTALL_METHOD__V1039*/ meltfptr[1011] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V16*/ meltfptr[15]), (melt_ptr_t) ( /*_.CLASS_OBJINITPAIR__V47*/ meltfptr[46]), @@ -49575,7 +49608,7 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * /*epilog */ /*^clear */ - /*clear *//*_.INSTALL_METHOD__V1036*/ meltfptr[1008] = 0; + /*clear *//*_.INSTALL_METHOD__V1039*/ meltfptr[1011] = 0; } MELT_LOCATION ("warmelt-outobj.melt:1250:/ initchunk"); @@ -49596,8 +49629,8 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_DECLINIT__V18*/ meltfptr[17]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_._VALCLO___V354*/ meltfptr[353]; - /*_.INSTALL_METHOD__V1037*/ meltfptr[1007] = + (melt_ptr_t *) & /*_._VALCLO___V355*/ meltfptr[354]; + /*_.INSTALL_METHOD__V1040*/ meltfptr[1010] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V16*/ meltfptr[15]), (melt_ptr_t) ( /*_.CLASS_OBJINITLIST__V48*/ meltfptr[47]), @@ -49608,7 +49641,7 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * /*epilog */ /*^clear */ - /*clear *//*_.INSTALL_METHOD__V1037*/ meltfptr[1007] = 0; + /*clear *//*_.INSTALL_METHOD__V1040*/ meltfptr[1010] = 0; } MELT_LOCATION ("warmelt-outobj.melt:1291:/ initchunk"); @@ -49629,8 +49662,8 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_INITIAL_FILL__V21*/ meltfptr[20]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_._VALCLO___V358*/ meltfptr[357]; - /*_.INSTALL_METHOD__V1038*/ meltfptr[1008] = + (melt_ptr_t *) & /*_._VALCLO___V359*/ meltfptr[358]; + /*_.INSTALL_METHOD__V1041*/ meltfptr[1011] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V16*/ meltfptr[15]), (melt_ptr_t) ( /*_.CLASS_OBJINITLIST__V48*/ meltfptr[47]), @@ -49641,7 +49674,7 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * /*epilog */ /*^clear */ - /*clear *//*_.INSTALL_METHOD__V1038*/ meltfptr[1008] = 0; + /*clear *//*_.INSTALL_METHOD__V1041*/ meltfptr[1011] = 0; } MELT_LOCATION ("warmelt-outobj.melt:1303:/ initchunk"); @@ -49662,8 +49695,8 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_._VALCLO___V360*/ meltfptr[359]; - /*_.INSTALL_METHOD__V1039*/ meltfptr[1007] = + (melt_ptr_t *) & /*_._VALCLO___V361*/ meltfptr[360]; + /*_.INSTALL_METHOD__V1042*/ meltfptr[1010] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V16*/ meltfptr[15]), (melt_ptr_t) ( /*_.DISCR_ANY_RECEIVER__V49*/ @@ -49675,7 +49708,7 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * /*epilog */ /*^clear */ - /*clear *//*_.INSTALL_METHOD__V1039*/ meltfptr[1007] = 0; + /*clear *//*_.INSTALL_METHOD__V1042*/ meltfptr[1010] = 0; } MELT_LOCATION ("warmelt-outobj.melt:1313:/ initchunk"); @@ -49696,8 +49729,8 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_._VALCLO___V364*/ meltfptr[363]; - /*_.INSTALL_METHOD__V1040*/ meltfptr[1008] = + (melt_ptr_t *) & /*_._VALCLO___V365*/ meltfptr[364]; + /*_.INSTALL_METHOD__V1043*/ meltfptr[1011] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V16*/ meltfptr[15]), (melt_ptr_t) ( /*_.DISCR_NULL_RECEIVER__V50*/ @@ -49709,7 +49742,7 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * /*epilog */ /*^clear */ - /*clear *//*_.INSTALL_METHOD__V1040*/ meltfptr[1008] = 0; + /*clear *//*_.INSTALL_METHOD__V1043*/ meltfptr[1011] = 0; } MELT_LOCATION ("warmelt-outobj.melt:1324:/ initchunk"); @@ -49730,8 +49763,8 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_._VALCLO___V368*/ meltfptr[367]; - /*_.INSTALL_METHOD__V1041*/ meltfptr[1007] = + (melt_ptr_t *) & /*_._VALCLO___V369*/ meltfptr[368]; + /*_.INSTALL_METHOD__V1044*/ meltfptr[1010] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V16*/ meltfptr[15]), (melt_ptr_t) ( /*_.CLASS_ROOT__V17*/ meltfptr[16]), @@ -49742,7 +49775,7 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * /*epilog */ /*^clear */ - /*clear *//*_.INSTALL_METHOD__V1041*/ meltfptr[1007] = 0; + /*clear *//*_.INSTALL_METHOD__V1044*/ meltfptr[1010] = 0; } MELT_LOCATION ("warmelt-outobj.melt:1957:/ initchunk"); @@ -49763,8 +49796,8 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_._VALCLO___V406*/ meltfptr[405]; - /*_.INSTALL_METHOD__V1042*/ meltfptr[1008] = + (melt_ptr_t *) & /*_._VALCLO___V407*/ meltfptr[406]; + /*_.INSTALL_METHOD__V1045*/ meltfptr[1011] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V16*/ meltfptr[15]), (melt_ptr_t) ( /*_.CLASS_PROCROUTINEOBJ__V59*/ @@ -49776,7 +49809,7 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * /*epilog */ /*^clear */ - /*clear *//*_.INSTALL_METHOD__V1042*/ meltfptr[1008] = 0; + /*clear *//*_.INSTALL_METHOD__V1045*/ meltfptr[1011] = 0; } MELT_LOCATION ("warmelt-outobj.melt:2399:/ initchunk"); @@ -49797,8 +49830,8 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_._VALCLO___V421*/ meltfptr[420]; - /*_.INSTALL_METHOD__V1043*/ meltfptr[1007] = + (melt_ptr_t *) & /*_._VALCLO___V422*/ meltfptr[421]; + /*_.INSTALL_METHOD__V1046*/ meltfptr[1010] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V16*/ meltfptr[15]), (melt_ptr_t) ( /*_.CLASS_INITIAL_MODULE_ROUTINEOBJ__V64*/ @@ -49810,7 +49843,7 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * /*epilog */ /*^clear */ - /*clear *//*_.INSTALL_METHOD__V1043*/ meltfptr[1007] = 0; + /*clear *//*_.INSTALL_METHOD__V1046*/ meltfptr[1010] = 0; } MELT_LOCATION ("warmelt-outobj.melt:2644:/ initchunk"); @@ -49831,8 +49864,8 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_._VALCLO___V439*/ meltfptr[438]; - /*_.INSTALL_METHOD__V1044*/ meltfptr[1008] = + (melt_ptr_t *) & /*_._VALCLO___V442*/ meltfptr[441]; + /*_.INSTALL_METHOD__V1047*/ meltfptr[1011] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V16*/ meltfptr[15]), (melt_ptr_t) ( /*_.CLASS_HOOKROUTINEOBJ__V60*/ @@ -49844,7 +49877,7 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * /*epilog */ /*^clear */ - /*clear *//*_.INSTALL_METHOD__V1044*/ meltfptr[1008] = 0; + /*clear *//*_.INSTALL_METHOD__V1047*/ meltfptr[1011] = 0; } MELT_LOCATION ("warmelt-outobj.melt:2838:/ initchunk"); @@ -49865,8 +49898,8 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_._VALCLO___V442*/ meltfptr[441]; - /*_.INSTALL_METHOD__V1045*/ meltfptr[1007] = + (melt_ptr_t *) & /*_._VALCLO___V445*/ meltfptr[444]; + /*_.INSTALL_METHOD__V1048*/ meltfptr[1010] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V16*/ meltfptr[15]), (melt_ptr_t) ( /*_.CLASS_INITIAL_EXTENSION_ROUTINEOBJ__V54*/ meltfptr[53]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); @@ -49875,7 +49908,7 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * /*epilog */ /*^clear */ - /*clear *//*_.INSTALL_METHOD__V1045*/ meltfptr[1007] = 0; + /*clear *//*_.INSTALL_METHOD__V1048*/ meltfptr[1010] = 0; } MELT_LOCATION ("warmelt-outobj.melt:2908:/ initchunk"); @@ -49896,11 +49929,11 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_._VALCLO___V444*/ meltfptr[443]; - /*_.INSTALL_METHOD__V1046*/ meltfptr[1008] = + (melt_ptr_t *) & /*_._VALCLO___V447*/ meltfptr[446]; + /*_.INSTALL_METHOD__V1049*/ meltfptr[1011] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V16*/ meltfptr[15]), - (melt_ptr_t) ( /*_.CLASS_OBJGETARG__V71*/ meltfptr[70]), + (melt_ptr_t) ( /*_.CLASS_OBJGETARG__V72*/ meltfptr[71]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } @@ -49908,7 +49941,7 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * /*epilog */ /*^clear */ - /*clear *//*_.INSTALL_METHOD__V1046*/ meltfptr[1008] = 0; + /*clear *//*_.INSTALL_METHOD__V1049*/ meltfptr[1011] = 0; } MELT_LOCATION ("warmelt-outobj.melt:2990:/ initchunk"); @@ -49929,12 +49962,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_._VALCLO___V450*/ meltfptr[449]; - /*_.INSTALL_METHOD__V1047*/ meltfptr[1007] = + (melt_ptr_t *) & /*_._VALCLO___V453*/ meltfptr[452]; + /*_.INSTALL_METHOD__V1050*/ meltfptr[1010] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V16*/ meltfptr[15]), - (melt_ptr_t) ( /*_.CLASS_OBJGETARGREST__V73*/ - meltfptr[72]), + (melt_ptr_t) ( /*_.CLASS_OBJGETARGREST__V74*/ + meltfptr[73]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } @@ -49942,7 +49975,7 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * /*epilog */ /*^clear */ - /*clear *//*_.INSTALL_METHOD__V1047*/ meltfptr[1007] = 0; + /*clear *//*_.INSTALL_METHOD__V1050*/ meltfptr[1010] = 0; } MELT_LOCATION ("warmelt-outobj.melt:3005:/ initchunk"); @@ -49963,11 +49996,11 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_._VALCLO___V454*/ meltfptr[453]; - /*_.INSTALL_METHOD__V1048*/ meltfptr[1008] = + (melt_ptr_t *) & /*_._VALCLO___V457*/ meltfptr[456]; + /*_.INSTALL_METHOD__V1051*/ meltfptr[1011] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V16*/ meltfptr[15]), - (melt_ptr_t) ( /*_.CLASS_OBJCFORMAL__V70*/ meltfptr[69]), + (melt_ptr_t) ( /*_.CLASS_OBJCFORMAL__V71*/ meltfptr[70]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } @@ -49975,7 +50008,7 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * /*epilog */ /*^clear */ - /*clear *//*_.INSTALL_METHOD__V1048*/ meltfptr[1008] = 0; + /*clear *//*_.INSTALL_METHOD__V1051*/ meltfptr[1011] = 0; } MELT_LOCATION ("warmelt-outobj.melt:3020:/ initchunk"); @@ -49996,12 +50029,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_._VALCLO___V456*/ meltfptr[455]; - /*_.INSTALL_METHOD__V1049*/ meltfptr[1007] = + (melt_ptr_t *) & /*_._VALCLO___V459*/ meltfptr[458]; + /*_.INSTALL_METHOD__V1052*/ meltfptr[1010] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V16*/ meltfptr[15]), - (melt_ptr_t) ( /*_.CLASS_OBJFETCHMODVAR__V74*/ - meltfptr[73]), + (melt_ptr_t) ( /*_.CLASS_OBJFETCHMODVAR__V75*/ + meltfptr[74]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } @@ -50009,7 +50042,7 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * /*epilog */ /*^clear */ - /*clear *//*_.INSTALL_METHOD__V1049*/ meltfptr[1007] = 0; + /*clear *//*_.INSTALL_METHOD__V1052*/ meltfptr[1010] = 0; } MELT_LOCATION ("warmelt-outobj.melt:3041:/ initchunk"); @@ -50030,12 +50063,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_._VALCLO___V460*/ meltfptr[459]; - /*_.INSTALL_METHOD__V1050*/ meltfptr[1008] = + (melt_ptr_t *) & /*_._VALCLO___V463*/ meltfptr[462]; + /*_.INSTALL_METHOD__V1053*/ meltfptr[1011] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V16*/ meltfptr[15]), - (melt_ptr_t) ( /*_.CLASS_OBJPUTMODVAR__V75*/ - meltfptr[74]), + (melt_ptr_t) ( /*_.CLASS_OBJPUTMODVAR__V76*/ + meltfptr[75]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } @@ -50043,7 +50076,7 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * /*epilog */ /*^clear */ - /*clear *//*_.INSTALL_METHOD__V1050*/ meltfptr[1008] = 0; + /*clear *//*_.INSTALL_METHOD__V1053*/ meltfptr[1011] = 0; } MELT_LOCATION ("warmelt-outobj.melt:3066:/ initchunk"); @@ -50064,12 +50097,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_._VALCLO___V464*/ meltfptr[463]; - /*_.INSTALL_METHOD__V1051*/ meltfptr[1007] = + (melt_ptr_t *) & /*_._VALCLO___V467*/ meltfptr[466]; + /*_.INSTALL_METHOD__V1054*/ meltfptr[1010] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V16*/ meltfptr[15]), - (melt_ptr_t) ( /*_.CLASS_OBJPUTOUTARG__V76*/ - meltfptr[75]), + (melt_ptr_t) ( /*_.CLASS_OBJPUTOUTARG__V77*/ + meltfptr[76]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } @@ -50077,7 +50110,7 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * /*epilog */ /*^clear */ - /*clear *//*_.INSTALL_METHOD__V1051*/ meltfptr[1007] = 0; + /*clear *//*_.INSTALL_METHOD__V1054*/ meltfptr[1010] = 0; } MELT_LOCATION ("warmelt-outobj.melt:3097:/ initchunk"); @@ -50098,8 +50131,8 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_._VALCLO___V468*/ meltfptr[467]; - /*_.INSTALL_METHOD__V1052*/ meltfptr[1008] = + (melt_ptr_t *) & /*_._VALCLO___V471*/ meltfptr[470]; + /*_.INSTALL_METHOD__V1055*/ meltfptr[1011] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V16*/ meltfptr[15]), (melt_ptr_t) ( /*_.CLASS_OBJLOCV__V57*/ meltfptr[56]), @@ -50110,7 +50143,7 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * /*epilog */ /*^clear */ - /*clear *//*_.INSTALL_METHOD__V1052*/ meltfptr[1008] = 0; + /*clear *//*_.INSTALL_METHOD__V1055*/ meltfptr[1011] = 0; } MELT_LOCATION ("warmelt-outobj.melt:3115:/ initchunk"); @@ -50131,11 +50164,11 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_._VALCLO___V472*/ meltfptr[471]; - /*_.INSTALL_METHOD__V1053*/ meltfptr[1007] = + (melt_ptr_t *) & /*_._VALCLO___V475*/ meltfptr[474]; + /*_.INSTALL_METHOD__V1056*/ meltfptr[1010] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V16*/ meltfptr[15]), - (melt_ptr_t) ( /*_.CLASS_OBJCLOCCV__V78*/ meltfptr[77]), + (melt_ptr_t) ( /*_.CLASS_OBJCLOCCV__V79*/ meltfptr[78]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } @@ -50143,7 +50176,7 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * /*epilog */ /*^clear */ - /*clear *//*_.INSTALL_METHOD__V1053*/ meltfptr[1007] = 0; + /*clear *//*_.INSTALL_METHOD__V1056*/ meltfptr[1010] = 0; } MELT_LOCATION ("warmelt-outobj.melt:3134:/ initchunk"); @@ -50164,11 +50197,11 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_._VALCLO___V476*/ meltfptr[475]; - /*_.INSTALL_METHOD__V1054*/ meltfptr[1008] = + (melt_ptr_t *) & /*_._VALCLO___V479*/ meltfptr[478]; + /*_.INSTALL_METHOD__V1057*/ meltfptr[1011] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V16*/ meltfptr[15]), - (melt_ptr_t) ( /*_.CLASS_OBJCLOHOOKV__V79*/ meltfptr[78]), + (melt_ptr_t) ( /*_.CLASS_OBJCLOHOOKV__V80*/ meltfptr[79]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } @@ -50176,7 +50209,7 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * /*epilog */ /*^clear */ - /*clear *//*_.INSTALL_METHOD__V1054*/ meltfptr[1008] = 0; + /*clear *//*_.INSTALL_METHOD__V1057*/ meltfptr[1011] = 0; } MELT_LOCATION ("warmelt-outobj.melt:3154:/ initchunk"); @@ -50197,11 +50230,11 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_._VALCLO___V480*/ meltfptr[479]; - /*_.INSTALL_METHOD__V1055*/ meltfptr[1007] = + (melt_ptr_t *) & /*_._VALCLO___V483*/ meltfptr[482]; + /*_.INSTALL_METHOD__V1058*/ meltfptr[1010] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V16*/ meltfptr[15]), - (melt_ptr_t) ( /*_.CLASS_OBJCONSTV__V80*/ meltfptr[79]), + (melt_ptr_t) ( /*_.CLASS_OBJCONSTV__V81*/ meltfptr[80]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } @@ -50209,7 +50242,7 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * /*epilog */ /*^clear */ - /*clear *//*_.INSTALL_METHOD__V1055*/ meltfptr[1007] = 0; + /*clear *//*_.INSTALL_METHOD__V1058*/ meltfptr[1010] = 0; } MELT_LOCATION ("warmelt-outobj.melt:3202:/ initchunk"); @@ -50230,12 +50263,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_._VALCLO___V488*/ meltfptr[487]; - /*_.INSTALL_METHOD__V1056*/ meltfptr[1008] = + (melt_ptr_t *) & /*_._VALCLO___V491*/ meltfptr[490]; + /*_.INSTALL_METHOD__V1059*/ meltfptr[1011] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V16*/ meltfptr[15]), - (melt_ptr_t) ( /*_.CLASS_OBJCHECKSIGNAL__V82*/ - meltfptr[81]), + (melt_ptr_t) ( /*_.CLASS_OBJCHECKSIGNAL__V83*/ + meltfptr[82]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } @@ -50243,7 +50276,7 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * /*epilog */ /*^clear */ - /*clear *//*_.INSTALL_METHOD__V1056*/ meltfptr[1008] = 0; + /*clear *//*_.INSTALL_METHOD__V1059*/ meltfptr[1011] = 0; } MELT_LOCATION ("warmelt-outobj.melt:3226:/ initchunk"); @@ -50264,11 +50297,11 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_._VALCLO___V492*/ meltfptr[491]; - /*_.INSTALL_METHOD__V1057*/ meltfptr[1007] = + (melt_ptr_t *) & /*_._VALCLO___V495*/ meltfptr[494]; + /*_.INSTALL_METHOD__V1060*/ meltfptr[1010] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V16*/ meltfptr[15]), - (melt_ptr_t) ( /*_.CLASS_OBJANYBLOCK__V83*/ meltfptr[82]), + (melt_ptr_t) ( /*_.CLASS_OBJANYBLOCK__V84*/ meltfptr[83]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } @@ -50276,7 +50309,7 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * /*epilog */ /*^clear */ - /*clear *//*_.INSTALL_METHOD__V1057*/ meltfptr[1007] = 0; + /*clear *//*_.INSTALL_METHOD__V1060*/ meltfptr[1010] = 0; } MELT_LOCATION ("warmelt-outobj.melt:3238:/ initchunk"); @@ -50297,11 +50330,11 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_._VALCLO___V496*/ meltfptr[495]; - /*_.INSTALL_METHOD__V1058*/ meltfptr[1008] = + (melt_ptr_t *) & /*_._VALCLO___V499*/ meltfptr[498]; + /*_.INSTALL_METHOD__V1061*/ meltfptr[1011] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V16*/ meltfptr[15]), - (melt_ptr_t) ( /*_.CLASS_OBJFLAG__V84*/ meltfptr[83]), + (melt_ptr_t) ( /*_.CLASS_OBJFLAG__V85*/ meltfptr[84]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } @@ -50309,7 +50342,7 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * /*epilog */ /*^clear */ - /*clear *//*_.INSTALL_METHOD__V1058*/ meltfptr[1008] = 0; + /*clear *//*_.INSTALL_METHOD__V1061*/ meltfptr[1011] = 0; } MELT_LOCATION ("warmelt-outobj.melt:3290:/ initchunk"); @@ -50330,12 +50363,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_._VALCLO___V500*/ meltfptr[499]; - /*_.INSTALL_METHOD__V1059*/ meltfptr[1007] = + (melt_ptr_t *) & /*_._VALCLO___V503*/ meltfptr[502]; + /*_.INSTALL_METHOD__V1062*/ meltfptr[1010] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V16*/ meltfptr[15]), - (melt_ptr_t) ( /*_.CLASS_OBJMATCHFLAGBLOCK__V85*/ - meltfptr[84]), + (melt_ptr_t) ( /*_.CLASS_OBJMATCHFLAGBLOCK__V86*/ + meltfptr[85]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } @@ -50343,7 +50376,7 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * /*epilog */ /*^clear */ - /*clear *//*_.INSTALL_METHOD__V1059*/ meltfptr[1007] = 0; + /*clear *//*_.INSTALL_METHOD__V1062*/ meltfptr[1010] = 0; } MELT_LOCATION ("warmelt-outobj.melt:3362:/ initchunk"); @@ -50364,12 +50397,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_._VALCLO___V504*/ meltfptr[503]; - /*_.INSTALL_METHOD__V1060*/ meltfptr[1008] = + (melt_ptr_t *) & /*_._VALCLO___V507*/ meltfptr[506]; + /*_.INSTALL_METHOD__V1063*/ meltfptr[1011] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V16*/ meltfptr[15]), - (melt_ptr_t) ( /*_.CLASS_OBJMULTIALLOCBLOCK__V86*/ - meltfptr[85]), + (melt_ptr_t) ( /*_.CLASS_OBJMULTIALLOCBLOCK__V87*/ + meltfptr[86]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } @@ -50377,7 +50410,7 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * /*epilog */ /*^clear */ - /*clear *//*_.INSTALL_METHOD__V1060*/ meltfptr[1008] = 0; + /*clear *//*_.INSTALL_METHOD__V1063*/ meltfptr[1011] = 0; } MELT_LOCATION ("warmelt-outobj.melt:3417:/ initchunk"); @@ -50398,12 +50431,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_._VALCLO___V510*/ meltfptr[509]; - /*_.INSTALL_METHOD__V1061*/ meltfptr[1007] = + (melt_ptr_t *) & /*_._VALCLO___V513*/ meltfptr[512]; + /*_.INSTALL_METHOD__V1064*/ meltfptr[1010] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V16*/ meltfptr[15]), - (melt_ptr_t) ( /*_.CLASS_OBJCITERBLOCK__V88*/ - meltfptr[87]), + (melt_ptr_t) ( /*_.CLASS_OBJCITERBLOCK__V89*/ + meltfptr[88]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } @@ -50411,7 +50444,7 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * /*epilog */ /*^clear */ - /*clear *//*_.INSTALL_METHOD__V1061*/ meltfptr[1007] = 0; + /*clear *//*_.INSTALL_METHOD__V1064*/ meltfptr[1010] = 0; } MELT_LOCATION ("warmelt-outobj.melt:3437:/ initchunk"); @@ -50432,12 +50465,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_._VALCLO___V516*/ meltfptr[515]; - /*_.INSTALL_METHOD__V1062*/ meltfptr[1008] = + (melt_ptr_t *) & /*_._VALCLO___V519*/ meltfptr[518]; + /*_.INSTALL_METHOD__V1065*/ meltfptr[1011] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V16*/ meltfptr[15]), - (melt_ptr_t) ( /*_.CLASS_OBJCOMMENTINSTR__V90*/ - meltfptr[89]), + (melt_ptr_t) ( /*_.CLASS_OBJCOMMENTINSTR__V91*/ + meltfptr[90]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } @@ -50445,7 +50478,7 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * /*epilog */ /*^clear */ - /*clear *//*_.INSTALL_METHOD__V1062*/ meltfptr[1008] = 0; + /*clear *//*_.INSTALL_METHOD__V1065*/ meltfptr[1011] = 0; } MELT_LOCATION ("warmelt-outobj.melt:3474:/ initchunk"); @@ -50466,12 +50499,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_._VALCLO___V520*/ meltfptr[519]; - /*_.INSTALL_METHOD__V1063*/ meltfptr[1007] = + (melt_ptr_t *) & /*_._VALCLO___V523*/ meltfptr[522]; + /*_.INSTALL_METHOD__V1066*/ meltfptr[1010] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V16*/ meltfptr[15]), - (melt_ptr_t) ( /*_.CLASS_OBJCOMMENTEDBLOCK__V91*/ - meltfptr[90]), + (melt_ptr_t) ( /*_.CLASS_OBJCOMMENTEDBLOCK__V92*/ + meltfptr[91]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } @@ -50479,7 +50512,7 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * /*epilog */ /*^clear */ - /*clear *//*_.INSTALL_METHOD__V1063*/ meltfptr[1007] = 0; + /*clear *//*_.INSTALL_METHOD__V1066*/ meltfptr[1010] = 0; } MELT_LOCATION ("warmelt-outobj.melt:3510:/ initchunk"); @@ -50500,12 +50533,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_._VALCLO___V528*/ meltfptr[527]; - /*_.INSTALL_METHOD__V1064*/ meltfptr[1008] = + (melt_ptr_t *) & /*_._VALCLO___V531*/ meltfptr[530]; + /*_.INSTALL_METHOD__V1067*/ meltfptr[1011] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V16*/ meltfptr[15]), - (melt_ptr_t) ( /*_.CLASS_OBJLABELINSTR__V92*/ - meltfptr[91]), + (melt_ptr_t) ( /*_.CLASS_OBJLABELINSTR__V93*/ + meltfptr[92]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } @@ -50513,7 +50546,7 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * /*epilog */ /*^clear */ - /*clear *//*_.INSTALL_METHOD__V1064*/ meltfptr[1008] = 0; + /*clear *//*_.INSTALL_METHOD__V1067*/ meltfptr[1011] = 0; } MELT_LOCATION ("warmelt-outobj.melt:3528:/ initchunk"); @@ -50534,12 +50567,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_._VALCLO___V536*/ meltfptr[535]; - /*_.INSTALL_METHOD__V1065*/ meltfptr[1007] = + (melt_ptr_t *) & /*_._VALCLO___V539*/ meltfptr[538]; + /*_.INSTALL_METHOD__V1068*/ meltfptr[1010] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V16*/ meltfptr[15]), - (melt_ptr_t) ( /*_.CLASS_OBJGOTOINSTR__V95*/ - meltfptr[94]), + (melt_ptr_t) ( /*_.CLASS_OBJGOTOINSTR__V96*/ + meltfptr[95]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } @@ -50547,7 +50580,7 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * /*epilog */ /*^clear */ - /*clear *//*_.INSTALL_METHOD__V1065*/ meltfptr[1007] = 0; + /*clear *//*_.INSTALL_METHOD__V1068*/ meltfptr[1010] = 0; } MELT_LOCATION ("warmelt-outobj.melt:3600:/ initchunk"); @@ -50568,11 +50601,11 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_._VALCLO___V544*/ meltfptr[543]; - /*_.INSTALL_METHOD__V1066*/ meltfptr[1008] = + (melt_ptr_t *) & /*_._VALCLO___V547*/ meltfptr[546]; + /*_.INSTALL_METHOD__V1069*/ meltfptr[1011] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V16*/ meltfptr[15]), - (melt_ptr_t) ( /*_.CLASS_OBJLOOP__V96*/ meltfptr[95]), + (melt_ptr_t) ( /*_.CLASS_OBJLOOP__V97*/ meltfptr[96]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } @@ -50580,7 +50613,7 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * /*epilog */ /*^clear */ - /*clear *//*_.INSTALL_METHOD__V1066*/ meltfptr[1008] = 0; + /*clear *//*_.INSTALL_METHOD__V1069*/ meltfptr[1011] = 0; } MELT_LOCATION ("warmelt-outobj.melt:3620:/ initchunk"); @@ -50601,11 +50634,11 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_._VALCLO___V548*/ meltfptr[547]; - /*_.INSTALL_METHOD__V1067*/ meltfptr[1007] = + (melt_ptr_t *) & /*_._VALCLO___V551*/ meltfptr[550]; + /*_.INSTALL_METHOD__V1070*/ meltfptr[1010] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V16*/ meltfptr[15]), - (melt_ptr_t) ( /*_.CLASS_OBJEXIT__V97*/ meltfptr[96]), + (melt_ptr_t) ( /*_.CLASS_OBJEXIT__V98*/ meltfptr[97]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } @@ -50613,7 +50646,7 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * /*epilog */ /*^clear */ - /*clear *//*_.INSTALL_METHOD__V1067*/ meltfptr[1007] = 0; + /*clear *//*_.INSTALL_METHOD__V1070*/ meltfptr[1010] = 0; } MELT_LOCATION ("warmelt-outobj.melt:3640:/ initchunk"); @@ -50634,11 +50667,11 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_._VALCLO___V552*/ meltfptr[551]; - /*_.INSTALL_METHOD__V1068*/ meltfptr[1008] = + (melt_ptr_t *) & /*_._VALCLO___V555*/ meltfptr[554]; + /*_.INSTALL_METHOD__V1071*/ meltfptr[1011] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V16*/ meltfptr[15]), - (melt_ptr_t) ( /*_.CLASS_OBJAGAIN__V98*/ meltfptr[97]), + (melt_ptr_t) ( /*_.CLASS_OBJAGAIN__V99*/ meltfptr[98]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } @@ -50646,7 +50679,7 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * /*epilog */ /*^clear */ - /*clear *//*_.INSTALL_METHOD__V1068*/ meltfptr[1008] = 0; + /*clear *//*_.INSTALL_METHOD__V1071*/ meltfptr[1011] = 0; } MELT_LOCATION ("warmelt-outobj.melt:3685:/ initchunk"); @@ -50667,11 +50700,11 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_._VALCLO___V559*/ meltfptr[558]; - /*_.INSTALL_METHOD__V1069*/ meltfptr[1007] = + (melt_ptr_t *) & /*_._VALCLO___V562*/ meltfptr[561]; + /*_.INSTALL_METHOD__V1072*/ meltfptr[1010] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V16*/ meltfptr[15]), - (melt_ptr_t) ( /*_.CLASS_OBJCOMPUTE__V99*/ meltfptr[98]), + (melt_ptr_t) ( /*_.CLASS_OBJCOMPUTE__V100*/ meltfptr[99]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } @@ -50679,7 +50712,7 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * /*epilog */ /*^clear */ - /*clear *//*_.INSTALL_METHOD__V1069*/ meltfptr[1007] = 0; + /*clear *//*_.INSTALL_METHOD__V1072*/ meltfptr[1010] = 0; } MELT_LOCATION ("warmelt-outobj.melt:3727:/ initchunk"); @@ -50700,11 +50733,11 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_._VALCLO___V565*/ meltfptr[564]; - /*_.INSTALL_METHOD__V1070*/ meltfptr[1008] = + (melt_ptr_t *) & /*_._VALCLO___V568*/ meltfptr[567]; + /*_.INSTALL_METHOD__V1073*/ meltfptr[1011] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V16*/ meltfptr[15]), - (melt_ptr_t) ( /*_.CLASS_OBJCOND__V101*/ meltfptr[100]), + (melt_ptr_t) ( /*_.CLASS_OBJCOND__V102*/ meltfptr[101]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } @@ -50712,7 +50745,7 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * /*epilog */ /*^clear */ - /*clear *//*_.INSTALL_METHOD__V1070*/ meltfptr[1008] = 0; + /*clear *//*_.INSTALL_METHOD__V1073*/ meltfptr[1011] = 0; } MELT_LOCATION ("warmelt-outobj.melt:3761:/ initchunk"); @@ -50733,11 +50766,11 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_._VALCLO___V569*/ meltfptr[568]; - /*_.INSTALL_METHOD__V1071*/ meltfptr[1007] = + (melt_ptr_t *) & /*_._VALCLO___V572*/ meltfptr[571]; + /*_.INSTALL_METHOD__V1074*/ meltfptr[1010] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V16*/ meltfptr[15]), - (melt_ptr_t) ( /*_.CLASS_OBJCPPIF__V102*/ meltfptr[101]), + (melt_ptr_t) ( /*_.CLASS_OBJCPPIF__V103*/ meltfptr[102]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } @@ -50745,7 +50778,7 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * /*epilog */ /*^clear */ - /*clear *//*_.INSTALL_METHOD__V1071*/ meltfptr[1007] = 0; + /*clear *//*_.INSTALL_METHOD__V1074*/ meltfptr[1010] = 0; } MELT_LOCATION ("warmelt-outobj.melt:3786:/ initchunk"); @@ -50766,12 +50799,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_._VALCLO___V573*/ meltfptr[572]; - /*_.INSTALL_METHOD__V1072*/ meltfptr[1008] = + (melt_ptr_t *) & /*_._VALCLO___V576*/ meltfptr[575]; + /*_.INSTALL_METHOD__V1075*/ meltfptr[1011] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V16*/ meltfptr[15]), - (melt_ptr_t) ( /*_.CLASS_OBJINTERNSYMBOL__V103*/ - meltfptr[102]), + (melt_ptr_t) ( /*_.CLASS_OBJINTERNSYMBOL__V104*/ + meltfptr[103]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } @@ -50779,7 +50812,7 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * /*epilog */ /*^clear */ - /*clear *//*_.INSTALL_METHOD__V1072*/ meltfptr[1008] = 0; + /*clear *//*_.INSTALL_METHOD__V1075*/ meltfptr[1011] = 0; } MELT_LOCATION ("warmelt-outobj.melt:3810:/ initchunk"); @@ -50800,12 +50833,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_._VALCLO___V579*/ meltfptr[578]; - /*_.INSTALL_METHOD__V1073*/ meltfptr[1007] = + (melt_ptr_t *) & /*_._VALCLO___V582*/ meltfptr[581]; + /*_.INSTALL_METHOD__V1076*/ meltfptr[1010] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V16*/ meltfptr[15]), - (melt_ptr_t) ( /*_.CLASS_OBJINTERNKEYWORD__V105*/ - meltfptr[104]), + (melt_ptr_t) ( /*_.CLASS_OBJINTERNKEYWORD__V106*/ + meltfptr[105]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } @@ -50813,7 +50846,7 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * /*epilog */ /*^clear */ - /*clear *//*_.INSTALL_METHOD__V1073*/ meltfptr[1007] = 0; + /*clear *//*_.INSTALL_METHOD__V1076*/ meltfptr[1010] = 0; } MELT_LOCATION ("warmelt-outobj.melt:3861:/ initchunk"); @@ -50834,12 +50867,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_._VALCLO___V585*/ meltfptr[584]; - /*_.INSTALL_METHOD__V1074*/ meltfptr[1008] = + (melt_ptr_t *) & /*_._VALCLO___V588*/ meltfptr[587]; + /*_.INSTALL_METHOD__V1077*/ meltfptr[1011] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V16*/ meltfptr[15]), - (melt_ptr_t) ( /*_.CLASS_OBJGETNAMEDSYMBOL__V107*/ - meltfptr[106]), + (melt_ptr_t) ( /*_.CLASS_OBJGETNAMEDSYMBOL__V108*/ + meltfptr[107]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } @@ -50847,7 +50880,7 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * /*epilog */ /*^clear */ - /*clear *//*_.INSTALL_METHOD__V1074*/ meltfptr[1008] = 0; + /*clear *//*_.INSTALL_METHOD__V1077*/ meltfptr[1011] = 0; } MELT_LOCATION ("warmelt-outobj.melt:3896:/ initchunk"); @@ -50868,12 +50901,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_._VALCLO___V589*/ meltfptr[588]; - /*_.INSTALL_METHOD__V1075*/ meltfptr[1007] = + (melt_ptr_t *) & /*_._VALCLO___V592*/ meltfptr[591]; + /*_.INSTALL_METHOD__V1078*/ meltfptr[1010] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V16*/ meltfptr[15]), - (melt_ptr_t) ( /*_.CLASS_OBJGETNAMEDKEYWORD__V108*/ - meltfptr[107]), + (melt_ptr_t) ( /*_.CLASS_OBJGETNAMEDKEYWORD__V109*/ + meltfptr[108]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } @@ -50881,7 +50914,7 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * /*epilog */ /*^clear */ - /*clear *//*_.INSTALL_METHOD__V1075*/ meltfptr[1007] = 0; + /*clear *//*_.INSTALL_METHOD__V1078*/ meltfptr[1010] = 0; } MELT_LOCATION ("warmelt-outobj.melt:3993:/ initchunk"); @@ -50902,11 +50935,11 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_._VALCLO___V595*/ meltfptr[594]; - /*_.INSTALL_METHOD__V1076*/ meltfptr[1008] = + (melt_ptr_t *) & /*_._VALCLO___V598*/ meltfptr[597]; + /*_.INSTALL_METHOD__V1079*/ meltfptr[1011] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V16*/ meltfptr[15]), - (melt_ptr_t) ( /*_.CLASS_OBJAPPLY__V109*/ meltfptr[108]), + (melt_ptr_t) ( /*_.CLASS_OBJAPPLY__V110*/ meltfptr[109]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } @@ -50914,7 +50947,7 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * /*epilog */ /*^clear */ - /*clear *//*_.INSTALL_METHOD__V1076*/ meltfptr[1008] = 0; + /*clear *//*_.INSTALL_METHOD__V1079*/ meltfptr[1011] = 0; } MELT_LOCATION ("warmelt-outobj.melt:4090:/ initchunk"); @@ -50935,11 +50968,11 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_._VALCLO___V602*/ meltfptr[601]; - /*_.INSTALL_METHOD__V1077*/ meltfptr[1007] = + (melt_ptr_t *) & /*_._VALCLO___V605*/ meltfptr[604]; + /*_.INSTALL_METHOD__V1080*/ meltfptr[1010] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V16*/ meltfptr[15]), - (melt_ptr_t) ( /*_.CLASS_OBJMSEND__V111*/ meltfptr[110]), + (melt_ptr_t) ( /*_.CLASS_OBJMSEND__V112*/ meltfptr[111]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } @@ -50947,7 +50980,7 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * /*epilog */ /*^clear */ - /*clear *//*_.INSTALL_METHOD__V1077*/ meltfptr[1007] = 0; + /*clear *//*_.INSTALL_METHOD__V1080*/ meltfptr[1010] = 0; } MELT_LOCATION ("warmelt-outobj.melt:4254:/ initchunk"); @@ -50968,12 +51001,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_._VALCLO___V611*/ meltfptr[610]; - /*_.INSTALL_METHOD__V1078*/ meltfptr[1008] = + (melt_ptr_t *) & /*_._VALCLO___V614*/ meltfptr[613]; + /*_.INSTALL_METHOD__V1081*/ meltfptr[1011] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V16*/ meltfptr[15]), - (melt_ptr_t) ( /*_.CLASS_OBJMULTIAPPLY__V112*/ - meltfptr[111]), + (melt_ptr_t) ( /*_.CLASS_OBJMULTIAPPLY__V113*/ + meltfptr[112]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } @@ -50981,7 +51014,7 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * /*epilog */ /*^clear */ - /*clear *//*_.INSTALL_METHOD__V1078*/ meltfptr[1008] = 0; + /*clear *//*_.INSTALL_METHOD__V1081*/ meltfptr[1011] = 0; } MELT_LOCATION ("warmelt-outobj.melt:4410:/ initchunk"); @@ -51002,12 +51035,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_._VALCLO___V620*/ meltfptr[619]; - /*_.INSTALL_METHOD__V1079*/ meltfptr[1007] = + (melt_ptr_t *) & /*_._VALCLO___V623*/ meltfptr[622]; + /*_.INSTALL_METHOD__V1082*/ meltfptr[1010] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V16*/ meltfptr[15]), - (melt_ptr_t) ( /*_.CLASS_OBJMULTIMSEND__V113*/ - meltfptr[112]), + (melt_ptr_t) ( /*_.CLASS_OBJMULTIMSEND__V114*/ + meltfptr[113]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } @@ -51015,7 +51048,7 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * /*epilog */ /*^clear */ - /*clear *//*_.INSTALL_METHOD__V1079*/ meltfptr[1007] = 0; + /*clear *//*_.INSTALL_METHOD__V1082*/ meltfptr[1010] = 0; } MELT_LOCATION ("warmelt-outobj.melt:4428:/ initchunk"); @@ -51036,11 +51069,11 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_._VALCLO___V624*/ meltfptr[623]; - /*_.INSTALL_METHOD__V1080*/ meltfptr[1008] = + (melt_ptr_t *) & /*_._VALCLO___V627*/ meltfptr[626]; + /*_.INSTALL_METHOD__V1083*/ meltfptr[1011] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V16*/ meltfptr[15]), - (melt_ptr_t) ( /*_.CLASS_OBJCLEAR__V114*/ meltfptr[113]), + (melt_ptr_t) ( /*_.CLASS_OBJCLEAR__V115*/ meltfptr[114]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } @@ -51048,7 +51081,7 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * /*epilog */ /*^clear */ - /*clear *//*_.INSTALL_METHOD__V1080*/ meltfptr[1008] = 0; + /*clear *//*_.INSTALL_METHOD__V1083*/ meltfptr[1011] = 0; } MELT_LOCATION ("warmelt-outobj.melt:4465:/ initchunk"); @@ -51069,12 +51102,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_._VALCLO___V628*/ meltfptr[627]; - /*_.INSTALL_METHOD__V1081*/ meltfptr[1007] = + (melt_ptr_t *) & /*_._VALCLO___V631*/ meltfptr[630]; + /*_.INSTALL_METHOD__V1084*/ meltfptr[1010] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V16*/ meltfptr[15]), - (melt_ptr_t) ( /*_.CLASS_OBJRAWALLOCOBJ__V115*/ - meltfptr[114]), + (melt_ptr_t) ( /*_.CLASS_OBJRAWALLOCOBJ__V116*/ + meltfptr[115]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } @@ -51082,7 +51115,7 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * /*epilog */ /*^clear */ - /*clear *//*_.INSTALL_METHOD__V1081*/ meltfptr[1007] = 0; + /*clear *//*_.INSTALL_METHOD__V1084*/ meltfptr[1010] = 0; } MELT_LOCATION ("warmelt-outobj.melt:4499:/ initchunk"); @@ -51103,12 +51136,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_._VALCLO___V633*/ meltfptr[632]; - /*_.INSTALL_METHOD__V1082*/ meltfptr[1008] = + (melt_ptr_t *) & /*_._VALCLO___V636*/ meltfptr[635]; + /*_.INSTALL_METHOD__V1085*/ meltfptr[1011] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V16*/ meltfptr[15]), - (melt_ptr_t) ( /*_.CLASS_OBJNEWCLOSURE__V116*/ - meltfptr[115]), + (melt_ptr_t) ( /*_.CLASS_OBJNEWCLOSURE__V117*/ + meltfptr[116]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } @@ -51116,7 +51149,7 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * /*epilog */ /*^clear */ - /*clear *//*_.INSTALL_METHOD__V1082*/ meltfptr[1008] = 0; + /*clear *//*_.INSTALL_METHOD__V1085*/ meltfptr[1011] = 0; } MELT_LOCATION ("warmelt-outobj.melt:4522:/ initchunk"); @@ -51137,11 +51170,11 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_._VALCLO___V637*/ meltfptr[636]; - /*_.INSTALL_METHOD__V1083*/ meltfptr[1007] = + (melt_ptr_t *) & /*_._VALCLO___V640*/ meltfptr[639]; + /*_.INSTALL_METHOD__V1086*/ meltfptr[1010] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V16*/ meltfptr[15]), - (melt_ptr_t) ( /*_.CLASS_OBJTOUCH__V117*/ meltfptr[116]), + (melt_ptr_t) ( /*_.CLASS_OBJTOUCH__V118*/ meltfptr[117]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } @@ -51149,7 +51182,7 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * /*epilog */ /*^clear */ - /*clear *//*_.INSTALL_METHOD__V1083*/ meltfptr[1007] = 0; + /*clear *//*_.INSTALL_METHOD__V1086*/ meltfptr[1010] = 0; } MELT_LOCATION ("warmelt-outobj.melt:4543:/ initchunk"); @@ -51170,12 +51203,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_._VALCLO___V641*/ meltfptr[640]; - /*_.INSTALL_METHOD__V1084*/ meltfptr[1008] = + (melt_ptr_t *) & /*_._VALCLO___V644*/ meltfptr[643]; + /*_.INSTALL_METHOD__V1087*/ meltfptr[1011] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V16*/ meltfptr[15]), - (melt_ptr_t) ( /*_.CLASS_OBJDBGTRACEWRITEOBJ__V118*/ - meltfptr[117]), + (melt_ptr_t) ( /*_.CLASS_OBJDBGTRACEWRITEOBJ__V119*/ + meltfptr[118]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } @@ -51183,7 +51216,7 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * /*epilog */ /*^clear */ - /*clear *//*_.INSTALL_METHOD__V1084*/ meltfptr[1008] = 0; + /*clear *//*_.INSTALL_METHOD__V1087*/ meltfptr[1011] = 0; } MELT_LOCATION ("warmelt-outobj.melt:4617:/ initchunk"); @@ -51204,12 +51237,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_._VALCLO___V645*/ meltfptr[644]; - /*_.INSTALL_METHOD__V1085*/ meltfptr[1007] = + (melt_ptr_t *) & /*_._VALCLO___V648*/ meltfptr[647]; + /*_.INSTALL_METHOD__V1088*/ meltfptr[1010] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V16*/ meltfptr[15]), - (melt_ptr_t) ( /*_.CLASS_OBJPUTUPLE__V119*/ - meltfptr[118]), + (melt_ptr_t) ( /*_.CLASS_OBJPUTUPLE__V120*/ + meltfptr[119]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } @@ -51217,7 +51250,7 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * /*epilog */ /*^clear */ - /*clear *//*_.INSTALL_METHOD__V1085*/ meltfptr[1007] = 0; + /*clear *//*_.INSTALL_METHOD__V1088*/ meltfptr[1010] = 0; } MELT_LOCATION ("warmelt-outobj.melt:4648:/ initchunk"); @@ -51238,12 +51271,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_._VALCLO___V653*/ meltfptr[652]; - /*_.INSTALL_METHOD__V1086*/ meltfptr[1008] = + (melt_ptr_t *) & /*_._VALCLO___V656*/ meltfptr[655]; + /*_.INSTALL_METHOD__V1089*/ meltfptr[1011] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V16*/ meltfptr[15]), - (melt_ptr_t) ( /*_.CLASS_OBJPUTPAIRHEAD__V121*/ - meltfptr[120]), + (melt_ptr_t) ( /*_.CLASS_OBJPUTPAIRHEAD__V122*/ + meltfptr[121]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } @@ -51251,7 +51284,7 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * /*epilog */ /*^clear */ - /*clear *//*_.INSTALL_METHOD__V1086*/ meltfptr[1008] = 0; + /*clear *//*_.INSTALL_METHOD__V1089*/ meltfptr[1011] = 0; } MELT_LOCATION ("warmelt-outobj.melt:4674:/ initchunk"); @@ -51272,12 +51305,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_._VALCLO___V659*/ meltfptr[658]; - /*_.INSTALL_METHOD__V1087*/ meltfptr[1007] = + (melt_ptr_t *) & /*_._VALCLO___V662*/ meltfptr[661]; + /*_.INSTALL_METHOD__V1090*/ meltfptr[1010] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V16*/ meltfptr[15]), - (melt_ptr_t) ( /*_.CLASS_OBJPUTPAIRTAIL__V122*/ - meltfptr[121]), + (melt_ptr_t) ( /*_.CLASS_OBJPUTPAIRTAIL__V123*/ + meltfptr[122]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } @@ -51285,7 +51318,7 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * /*epilog */ /*^clear */ - /*clear *//*_.INSTALL_METHOD__V1087*/ meltfptr[1007] = 0; + /*clear *//*_.INSTALL_METHOD__V1090*/ meltfptr[1010] = 0; } MELT_LOCATION ("warmelt-outobj.melt:4705:/ initchunk"); @@ -51306,12 +51339,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_._VALCLO___V663*/ meltfptr[662]; - /*_.INSTALL_METHOD__V1088*/ meltfptr[1008] = + (melt_ptr_t *) & /*_._VALCLO___V666*/ meltfptr[665]; + /*_.INSTALL_METHOD__V1091*/ meltfptr[1011] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V16*/ meltfptr[15]), - (melt_ptr_t) ( /*_.CLASS_OBJPUTLIST__V123*/ - meltfptr[122]), + (melt_ptr_t) ( /*_.CLASS_OBJPUTLIST__V124*/ + meltfptr[123]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } @@ -51319,7 +51352,7 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * /*epilog */ /*^clear */ - /*clear *//*_.INSTALL_METHOD__V1088*/ meltfptr[1008] = 0; + /*clear *//*_.INSTALL_METHOD__V1091*/ meltfptr[1011] = 0; } MELT_LOCATION ("warmelt-outobj.melt:4742:/ initchunk"); @@ -51340,12 +51373,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_._VALCLO___V668*/ meltfptr[667]; - /*_.INSTALL_METHOD__V1089*/ meltfptr[1007] = + (melt_ptr_t *) & /*_._VALCLO___V671*/ meltfptr[670]; + /*_.INSTALL_METHOD__V1092*/ meltfptr[1010] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V16*/ meltfptr[15]), - (melt_ptr_t) ( /*_.CLASS_OBJGETSLOT__V124*/ - meltfptr[123]), + (melt_ptr_t) ( /*_.CLASS_OBJGETSLOT__V125*/ + meltfptr[124]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } @@ -51353,7 +51386,7 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * /*epilog */ /*^clear */ - /*clear *//*_.INSTALL_METHOD__V1089*/ meltfptr[1007] = 0; + /*clear *//*_.INSTALL_METHOD__V1092*/ meltfptr[1010] = 0; } MELT_LOCATION ("warmelt-outobj.melt:4819:/ initchunk"); @@ -51374,12 +51407,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_._VALCLO___V674*/ meltfptr[673]; - /*_.INSTALL_METHOD__V1090*/ meltfptr[1008] = + (melt_ptr_t *) & /*_._VALCLO___V677*/ meltfptr[676]; + /*_.INSTALL_METHOD__V1093*/ meltfptr[1011] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V16*/ meltfptr[15]), - (melt_ptr_t) ( /*_.CLASS_OBJPUTSLOT__V126*/ - meltfptr[125]), + (melt_ptr_t) ( /*_.CLASS_OBJPUTSLOT__V127*/ + meltfptr[126]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } @@ -51387,7 +51420,7 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * /*epilog */ /*^clear */ - /*clear *//*_.INSTALL_METHOD__V1090*/ meltfptr[1008] = 0; + /*clear *//*_.INSTALL_METHOD__V1093*/ meltfptr[1011] = 0; } MELT_LOCATION ("warmelt-outobj.melt:4864:/ initchunk"); @@ -51408,12 +51441,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_._VALCLO___V678*/ meltfptr[677]; - /*_.INSTALL_METHOD__V1091*/ meltfptr[1007] = + (melt_ptr_t *) & /*_._VALCLO___V681*/ meltfptr[680]; + /*_.INSTALL_METHOD__V1094*/ meltfptr[1010] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V16*/ meltfptr[15]), - (melt_ptr_t) ( /*_.CLASS_OBJPUTCLOSUROUT__V127*/ - meltfptr[126]), + (melt_ptr_t) ( /*_.CLASS_OBJPUTCLOSUROUT__V128*/ + meltfptr[127]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } @@ -51421,7 +51454,7 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * /*epilog */ /*^clear */ - /*clear *//*_.INSTALL_METHOD__V1091*/ meltfptr[1007] = 0; + /*clear *//*_.INSTALL_METHOD__V1094*/ meltfptr[1010] = 0; } MELT_LOCATION ("warmelt-outobj.melt:4899:/ initchunk"); @@ -51442,12 +51475,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_._VALCLO___V682*/ meltfptr[681]; - /*_.INSTALL_METHOD__V1092*/ meltfptr[1008] = + (melt_ptr_t *) & /*_._VALCLO___V685*/ meltfptr[684]; + /*_.INSTALL_METHOD__V1095*/ meltfptr[1011] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V16*/ meltfptr[15]), - (melt_ptr_t) ( /*_.CLASS_OBJPUTCLOSEDV__V128*/ - meltfptr[127]), + (melt_ptr_t) ( /*_.CLASS_OBJPUTCLOSEDV__V129*/ + meltfptr[128]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } @@ -51455,7 +51488,7 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * /*epilog */ /*^clear */ - /*clear *//*_.INSTALL_METHOD__V1092*/ meltfptr[1008] = 0; + /*clear *//*_.INSTALL_METHOD__V1095*/ meltfptr[1011] = 0; } MELT_LOCATION ("warmelt-outobj.melt:4939:/ initchunk"); @@ -51476,12 +51509,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_._VALCLO___V686*/ meltfptr[685]; - /*_.INSTALL_METHOD__V1093*/ meltfptr[1007] = + (melt_ptr_t *) & /*_._VALCLO___V689*/ meltfptr[688]; + /*_.INSTALL_METHOD__V1096*/ meltfptr[1010] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V16*/ meltfptr[15]), - (melt_ptr_t) ( /*_.CLASS_OBJPUTCLOSEDNOTNULLV__V129*/ - meltfptr[128]), + (melt_ptr_t) ( /*_.CLASS_OBJPUTCLOSEDNOTNULLV__V130*/ + meltfptr[129]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } @@ -51489,7 +51522,7 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * /*epilog */ /*^clear */ - /*clear *//*_.INSTALL_METHOD__V1093*/ meltfptr[1007] = 0; + /*clear *//*_.INSTALL_METHOD__V1096*/ meltfptr[1010] = 0; } MELT_LOCATION ("warmelt-outobj.melt:4979:/ initchunk"); @@ -51510,12 +51543,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_._VALCLO___V690*/ meltfptr[689]; - /*_.INSTALL_METHOD__V1094*/ meltfptr[1008] = + (melt_ptr_t *) & /*_._VALCLO___V693*/ meltfptr[692]; + /*_.INSTALL_METHOD__V1097*/ meltfptr[1011] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V16*/ meltfptr[15]), - (melt_ptr_t) ( /*_.CLASS_OBJPUTROUTCONST__V130*/ - meltfptr[129]), + (melt_ptr_t) ( /*_.CLASS_OBJPUTROUTCONST__V131*/ + meltfptr[130]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } @@ -51523,7 +51556,7 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * /*epilog */ /*^clear */ - /*clear *//*_.INSTALL_METHOD__V1094*/ meltfptr[1008] = 0; + /*clear *//*_.INSTALL_METHOD__V1097*/ meltfptr[1011] = 0; } MELT_LOCATION ("warmelt-outobj.melt:5012:/ initchunk"); @@ -51544,12 +51577,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_._VALCLO___V694*/ meltfptr[693]; - /*_.INSTALL_METHOD__V1095*/ meltfptr[1007] = + (melt_ptr_t *) & /*_._VALCLO___V697*/ meltfptr[696]; + /*_.INSTALL_METHOD__V1098*/ meltfptr[1010] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V16*/ meltfptr[15]), - (melt_ptr_t) ( /*_.CLASS_OBJPUTROUTCONSTNOTNULL__V131*/ - meltfptr[130]), + (melt_ptr_t) ( /*_.CLASS_OBJPUTROUTCONSTNOTNULL__V132*/ + meltfptr[131]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } @@ -51557,7 +51590,7 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * /*epilog */ /*^clear */ - /*clear *//*_.INSTALL_METHOD__V1095*/ meltfptr[1007] = 0; + /*clear *//*_.INSTALL_METHOD__V1098*/ meltfptr[1010] = 0; } MELT_LOCATION ("warmelt-outobj.melt:5051:/ initchunk"); @@ -51578,12 +51611,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_._VALCLO___V698*/ meltfptr[697]; - /*_.INSTALL_METHOD__V1096*/ meltfptr[1008] = + (melt_ptr_t *) & /*_._VALCLO___V701*/ meltfptr[700]; + /*_.INSTALL_METHOD__V1099*/ meltfptr[1011] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V16*/ meltfptr[15]), - (melt_ptr_t) ( /*_.CLASS_OBJPUTHOOKCONST__V132*/ - meltfptr[131]), + (melt_ptr_t) ( /*_.CLASS_OBJPUTHOOKCONST__V133*/ + meltfptr[132]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } @@ -51591,7 +51624,7 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * /*epilog */ /*^clear */ - /*clear *//*_.INSTALL_METHOD__V1096*/ meltfptr[1008] = 0; + /*clear *//*_.INSTALL_METHOD__V1099*/ meltfptr[1011] = 0; } MELT_LOCATION ("warmelt-outobj.melt:5080:/ initchunk"); @@ -51612,12 +51645,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_._VALCLO___V704*/ meltfptr[703]; - /*_.INSTALL_METHOD__V1097*/ meltfptr[1007] = + (melt_ptr_t *) & /*_._VALCLO___V707*/ meltfptr[706]; + /*_.INSTALL_METHOD__V1100*/ meltfptr[1010] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V16*/ meltfptr[15]), - (melt_ptr_t) ( /*_.CLASS_OBJPUTHOOKDATA__V134*/ - meltfptr[133]), + (melt_ptr_t) ( /*_.CLASS_OBJPUTHOOKDATA__V135*/ + meltfptr[134]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } @@ -51625,7 +51658,7 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * /*epilog */ /*^clear */ - /*clear *//*_.INSTALL_METHOD__V1097*/ meltfptr[1007] = 0; + /*clear *//*_.INSTALL_METHOD__V1100*/ meltfptr[1010] = 0; } MELT_LOCATION ("warmelt-outobj.melt:5122:/ initchunk"); @@ -51646,12 +51679,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_._VALCLO___V708*/ meltfptr[707]; - /*_.INSTALL_METHOD__V1098*/ meltfptr[1008] = + (melt_ptr_t *) & /*_._VALCLO___V711*/ meltfptr[710]; + /*_.INSTALL_METHOD__V1101*/ meltfptr[1011] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V16*/ meltfptr[15]), - (melt_ptr_t) ( /*_.CLASS_OBJPUTXTRARESULT__V135*/ - meltfptr[134]), + (melt_ptr_t) ( /*_.CLASS_OBJPUTXTRARESULT__V136*/ + meltfptr[135]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } @@ -51659,7 +51692,7 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * /*epilog */ /*^clear */ - /*clear *//*_.INSTALL_METHOD__V1098*/ meltfptr[1008] = 0; + /*clear *//*_.INSTALL_METHOD__V1101*/ meltfptr[1011] = 0; } MELT_LOCATION ("warmelt-outobj.melt:5138:/ initchunk"); @@ -51680,11 +51713,11 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_._VALCLO___V712*/ meltfptr[711]; - /*_.INSTALL_METHOD__V1099*/ meltfptr[1007] = + (melt_ptr_t *) & /*_._VALCLO___V715*/ meltfptr[714]; + /*_.INSTALL_METHOD__V1102*/ meltfptr[1010] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V16*/ meltfptr[15]), - (melt_ptr_t) ( /*_.CLASS_OBJEXPV__V136*/ meltfptr[135]), + (melt_ptr_t) ( /*_.CLASS_OBJEXPV__V137*/ meltfptr[136]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } @@ -51692,7 +51725,7 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * /*epilog */ /*^clear */ - /*clear *//*_.INSTALL_METHOD__V1099*/ meltfptr[1007] = 0; + /*clear *//*_.INSTALL_METHOD__V1102*/ meltfptr[1010] = 0; } MELT_LOCATION ("warmelt-outobj.melt:5179:/ initchunk"); @@ -51713,12 +51746,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_._VALCLO___V716*/ meltfptr[715]; - /*_.INSTALL_METHOD__V1100*/ meltfptr[1008] = + (melt_ptr_t *) & /*_._VALCLO___V719*/ meltfptr[718]; + /*_.INSTALL_METHOD__V1103*/ meltfptr[1011] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V16*/ meltfptr[15]), - (melt_ptr_t) ( /*_.CLASS_OBJLOCATEDEXPV__V137*/ - meltfptr[136]), + (melt_ptr_t) ( /*_.CLASS_OBJLOCATEDEXPV__V138*/ + meltfptr[137]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } @@ -51726,7 +51759,7 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * /*epilog */ /*^clear */ - /*clear *//*_.INSTALL_METHOD__V1100*/ meltfptr[1008] = 0; + /*clear *//*_.INSTALL_METHOD__V1103*/ meltfptr[1011] = 0; } MELT_LOCATION ("warmelt-outobj.melt:5188:/ initchunk"); @@ -51747,12 +51780,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_._VALCLO___V720*/ meltfptr[719]; - /*_.INSTALL_METHOD__V1101*/ meltfptr[1007] = + (melt_ptr_t *) & /*_._VALCLO___V723*/ meltfptr[722]; + /*_.INSTALL_METHOD__V1104*/ meltfptr[1010] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V16*/ meltfptr[15]), - (melt_ptr_t) ( /*_.DISCR_VERBATIM_STRING__V87*/ - meltfptr[86]), + (melt_ptr_t) ( /*_.DISCR_VERBATIM_STRING__V88*/ + meltfptr[87]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } @@ -51760,7 +51793,7 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * /*epilog */ /*^clear */ - /*clear *//*_.INSTALL_METHOD__V1101*/ meltfptr[1007] = 0; + /*clear *//*_.INSTALL_METHOD__V1104*/ meltfptr[1010] = 0; } MELT_LOCATION ("warmelt-outobj.melt:5201:/ initchunk"); @@ -51781,8 +51814,8 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_._VALCLO___V722*/ meltfptr[721]; - /*_.INSTALL_METHOD__V1102*/ meltfptr[1008] = + (melt_ptr_t *) & /*_._VALCLO___V725*/ meltfptr[724]; + /*_.INSTALL_METHOD__V1105*/ meltfptr[1011] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V16*/ meltfptr[15]), (melt_ptr_t) ( /*_.DISCR_STRING__V53*/ meltfptr[52]), @@ -51793,7 +51826,7 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * /*epilog */ /*^clear */ - /*clear *//*_.INSTALL_METHOD__V1102*/ meltfptr[1008] = 0; + /*clear *//*_.INSTALL_METHOD__V1105*/ meltfptr[1011] = 0; } MELT_LOCATION ("warmelt-outobj.melt:5210:/ initchunk"); @@ -51814,8 +51847,8 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_._VALCLO___V724*/ meltfptr[723]; - /*_.INSTALL_METHOD__V1103*/ meltfptr[1007] = + (melt_ptr_t *) & /*_._VALCLO___V727*/ meltfptr[726]; + /*_.INSTALL_METHOD__V1106*/ meltfptr[1010] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V16*/ meltfptr[15]), (melt_ptr_t) ( /*_.DISCR_INTEGER__V52*/ meltfptr[51]), @@ -51826,7 +51859,7 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * /*epilog */ /*^clear */ - /*clear *//*_.INSTALL_METHOD__V1103*/ meltfptr[1007] = 0; + /*clear *//*_.INSTALL_METHOD__V1106*/ meltfptr[1010] = 0; } MELT_LOCATION ("warmelt-outobj.melt:5222:/ initchunk"); @@ -51847,12 +51880,12 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * (melt_ptr_t *) & /*_.OUTPUT_C_CODE__V20*/ meltfptr[19]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_._VALCLO___V726*/ meltfptr[725]; - /*_.INSTALL_METHOD__V1104*/ meltfptr[1008] = + (melt_ptr_t *) & /*_._VALCLO___V729*/ meltfptr[728]; + /*_.INSTALL_METHOD__V1107*/ meltfptr[1011] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V16*/ meltfptr[15]), - (melt_ptr_t) ( /*_.CLASS_OBJFINALRETURN__V138*/ - meltfptr[137]), + (melt_ptr_t) ( /*_.CLASS_OBJFINALRETURN__V139*/ + meltfptr[138]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } @@ -51860,7 +51893,7 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * /*epilog */ /*^clear */ - /*clear *//*_.INSTALL_METHOD__V1104*/ meltfptr[1008] = 0; + /*clear *//*_.INSTALL_METHOD__V1107*/ meltfptr[1011] = 0; } MELT_LOCATION ("warmelt-outobj.melt:5797:/ initchunk"); @@ -51878,11 +51911,11 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = - (melt_ptr_t *) & /*_._VALDATA___V814*/ meltfptr[813]; + (melt_ptr_t *) & /*_._VALDATA___V817*/ meltfptr[816]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_._VALCLO___V817*/ meltfptr[816]; - /*_.INSTALL_METHOD__V1105*/ meltfptr[1007] = + (melt_ptr_t *) & /*_._VALCLO___V820*/ meltfptr[819]; + /*_.INSTALL_METHOD__V1108*/ meltfptr[1010] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V16*/ meltfptr[15]), (melt_ptr_t) ( /*_.DISCR_ANY_RECEIVER__V49*/ @@ -51894,7 +51927,7 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * /*epilog */ /*^clear */ - /*clear *//*_.INSTALL_METHOD__V1105*/ meltfptr[1007] = 0; + /*clear *//*_.INSTALL_METHOD__V1108*/ meltfptr[1010] = 0; } MELT_LOCATION ("warmelt-outobj.melt:5904:/ initchunk"); @@ -51912,14 +51945,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = - (melt_ptr_t *) & /*_._VALDATA___V814*/ meltfptr[813]; + (melt_ptr_t *) & /*_._VALDATA___V817*/ meltfptr[816]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_._VALCLO___V827*/ meltfptr[826]; - /*_.INSTALL_METHOD__V1106*/ meltfptr[1008] = + (melt_ptr_t *) & /*_._VALCLO___V830*/ meltfptr[829]; + /*_.INSTALL_METHOD__V1109*/ meltfptr[1011] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V16*/ meltfptr[15]), - (melt_ptr_t) ( /*_.CLASS_PRIMITIVE__V145*/ meltfptr[144]), + (melt_ptr_t) ( /*_.CLASS_PRIMITIVE__V146*/ meltfptr[145]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } @@ -51927,7 +51960,7 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * /*epilog */ /*^clear */ - /*clear *//*_.INSTALL_METHOD__V1106*/ meltfptr[1008] = 0; + /*clear *//*_.INSTALL_METHOD__V1109*/ meltfptr[1011] = 0; } MELT_LOCATION ("warmelt-outobj.melt:5975:/ initchunk"); @@ -51945,14 +51978,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = - (melt_ptr_t *) & /*_._VALDATA___V814*/ meltfptr[813]; + (melt_ptr_t *) & /*_._VALDATA___V817*/ meltfptr[816]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_._VALCLO___V835*/ meltfptr[834]; - /*_.INSTALL_METHOD__V1107*/ meltfptr[1007] = + (melt_ptr_t *) & /*_._VALCLO___V838*/ meltfptr[837]; + /*_.INSTALL_METHOD__V1110*/ meltfptr[1010] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V16*/ meltfptr[15]), - (melt_ptr_t) ( /*_.CLASS_CITERATOR__V89*/ meltfptr[88]), + (melt_ptr_t) ( /*_.CLASS_CITERATOR__V90*/ meltfptr[89]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } @@ -51960,7 +51993,7 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * /*epilog */ /*^clear */ - /*clear *//*_.INSTALL_METHOD__V1107*/ meltfptr[1007] = 0; + /*clear *//*_.INSTALL_METHOD__V1110*/ meltfptr[1010] = 0; } MELT_LOCATION ("warmelt-outobj.melt:6061:/ initchunk"); @@ -51978,14 +52011,14 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_aptr = - (melt_ptr_t *) & /*_._VALDATA___V814*/ meltfptr[813]; + (melt_ptr_t *) & /*_._VALDATA___V817*/ meltfptr[816]; /*^apply.arg */ argtab[1].meltbp_aptr = - (melt_ptr_t *) & /*_._VALCLO___V841*/ meltfptr[840]; - /*_.INSTALL_METHOD__V1108*/ meltfptr[1008] = + (melt_ptr_t *) & /*_._VALCLO___V844*/ meltfptr[843]; + /*_.INSTALL_METHOD__V1111*/ meltfptr[1011] = melt_apply ((meltclosure_ptr_t) ( /*_.INSTALL_METHOD__V16*/ meltfptr[15]), - (melt_ptr_t) ( /*_.CLASS_CMATCHER__V149*/ meltfptr[148]), + (melt_ptr_t) ( /*_.CLASS_CMATCHER__V150*/ meltfptr[149]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un *) 0); } @@ -51993,7 +52026,7 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * /*epilog */ /*^clear */ - /*clear *//*_.INSTALL_METHOD__V1108*/ meltfptr[1008] = 0; + /*clear *//*_.INSTALL_METHOD__V1111*/ meltfptr[1011] = 0; } MELT_LOCATION ("warmelt-outobj.melt:7641:/ initchunk"); @@ -52006,8 +52039,8 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * melthook_HOOK_VALUE_EXPORTER ((melt_ptr_t) ((melt_ptr_t) (MELT_PREDEF (HOOK_VALUE_EXPORTER))), - /*_._VALDATA___V994*/ meltfptr[993], - /*_._VALCLO___V901*/ meltfptr[900], + /*_._VALDATA___V997*/ meltfptr[996], + /*_._VALCLO___V904*/ meltfptr[903], /*quasi.cur.mod.env.cont norm.exp.val : COMPILE_LIST_SEXPR */ /*_._CONTENV___V2*/ meltfptr[1]); @@ -52015,8 +52048,8 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * melthook_HOOK_VALUE_EXPORTER ((melt_ptr_t) ((melt_ptr_t) (MELT_PREDEF (HOOK_VALUE_EXPORTER))), - /*_._VALDATA___V996*/ meltfptr[995], - /*_._VALCLO___V989*/ meltfptr[988], + /*_._VALDATA___V999*/ meltfptr[998], + /*_._VALCLO___V992*/ meltfptr[991], /*quasi.cur.mod.env.cont norm.exp.val : EVAL */ /*_._CONTENV___V2*/ meltfptr[1]); @@ -52024,8 +52057,8 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * melthook_HOOK_VALUE_EXPORTER ((melt_ptr_t) ((melt_ptr_t) (MELT_PREDEF (HOOK_VALUE_EXPORTER))), - /*_._VALDATA___V998*/ meltfptr[997], - /*_._VALCLO___V993*/ meltfptr[992], + /*_._VALDATA___V1001*/ meltfptr[1000], + /*_._VALCLO___V996*/ meltfptr[995], /*quasi.cur.mod.env.cont norm.exp.val : GENERATE_GPLV3PLUS_COPYRIGHT_NOTICE_C_COMMENT */ /*_._CONTENV___V2*/ meltfptr[1]); @@ -52033,8 +52066,8 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * melthook_HOOK_VALUE_EXPORTER ((melt_ptr_t) ((melt_ptr_t) (MELT_PREDEF (HOOK_VALUE_EXPORTER))), - /*_._VALDATA___V1000*/ meltfptr[999], - /*_._VALCLO___V200*/ meltfptr[199], + /*_._VALDATA___V1003*/ meltfptr[1002], + /*_._VALCLO___V201*/ meltfptr[200], /*quasi.cur.mod.env.cont norm.exp.val : GET_CODE_BUFFER_LIMIT */ /*_._CONTENV___V2*/ meltfptr[1]); @@ -52042,8 +52075,8 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * melthook_HOOK_VALUE_EXPORTER ((melt_ptr_t) ((melt_ptr_t) (MELT_PREDEF (HOOK_VALUE_EXPORTER))), - /*_._VALDATA___V1002*/ meltfptr[1001], - /*_._VALCLO___V202*/ meltfptr[201], + /*_._VALDATA___V1005*/ meltfptr[1004], + /*_._VALCLO___V203*/ meltfptr[202], /*quasi.cur.mod.env.cont norm.exp.val : PUT_CODE_BUFFER_LIMIT */ /*_._CONTENV___V2*/ meltfptr[1]); @@ -52051,8 +52084,8 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * melthook_HOOK_VALUE_EXPORTER ((melt_ptr_t) ((melt_ptr_t) (MELT_PREDEF (HOOK_VALUE_EXPORTER))), - /*_._VALDATA___V794*/ meltfptr[793], - /*_._VALDATA___V814*/ meltfptr[813], + /*_._VALDATA___V797*/ meltfptr[796], + /*_._VALDATA___V817*/ meltfptr[816], /*quasi.cur.mod.env.cont norm.exp.val : SYNTAX_TEST_GENERATOR */ /*_._CONTENV___V2*/ meltfptr[1]); @@ -52060,8 +52093,8 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * melthook_HOOK_VALUE_EXPORTER ((melt_ptr_t) ((melt_ptr_t) (MELT_PREDEF (HOOK_VALUE_EXPORTER))), - /*_._VALDATA___V1004*/ meltfptr[1003], - /*_._VALCLO___V973*/ meltfptr[972], + /*_._VALDATA___V1007*/ meltfptr[1006], + /*_._VALCLO___V976*/ meltfptr[975], /*quasi.cur.mod.env.cont norm.exp.val : TRANSLATE_RUN_MELT_EXPRESSIONS */ /*_._CONTENV___V2*/ meltfptr[1]); @@ -52069,8 +52102,8 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * melthook_HOOK_VALUE_EXPORTER ((melt_ptr_t) ((melt_ptr_t) (MELT_PREDEF (HOOK_VALUE_EXPORTER))), - /*_._VALDATA___V1006*/ meltfptr[1005], - /*_._VALCLO___V987*/ meltfptr[986], + /*_._VALDATA___V1009*/ meltfptr[1008], + /*_._VALCLO___V990*/ meltfptr[989], /*quasi.cur.mod.env.cont norm.exp.val : TRANSLATE_TO_C_MODULE_MELT_SOURCES */ /*_._CONTENV___V2*/ meltfptr[1]); /*epilog */ @@ -52086,8 +52119,8 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * melthook_HOOK_VALUE_EXPORTER ((melt_ptr_t) ((melt_ptr_t) (MELT_PREDEF (HOOK_VALUE_EXPORTER))), - /*_._VALDATA___V737*/ meltfptr[736], - /*_._VALDATA___V739*/ meltfptr[738], + /*_._VALDATA___V740*/ meltfptr[739], + /*_._VALDATA___V742*/ meltfptr[741], /*quasi.cur.mod.env.cont norm.exp.val : CLASS_SECONDARY_C_FILE */ /*_._CONTENV___V2*/ meltfptr[1]); @@ -52095,8 +52128,8 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * melthook_HOOK_VALUE_EXPORTER ((melt_ptr_t) ((melt_ptr_t) (MELT_PREDEF (HOOK_VALUE_EXPORTER))), - /*_._VALDATA___V751*/ meltfptr[750], - /*_._VALDATA___V742*/ meltfptr[741], + /*_._VALDATA___V754*/ meltfptr[753], + /*_._VALDATA___V745*/ meltfptr[744], /*quasi.cur.mod.env.cont norm.exp.val : SECFIL_MODNAM */ /*_._CONTENV___V2*/ meltfptr[1]); @@ -52104,8 +52137,8 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * melthook_HOOK_VALUE_EXPORTER ((melt_ptr_t) ((melt_ptr_t) (MELT_PREDEF (HOOK_VALUE_EXPORTER))), - /*_._VALDATA___V753*/ meltfptr[752], - /*_._VALDATA___V744*/ meltfptr[743], + /*_._VALDATA___V756*/ meltfptr[755], + /*_._VALDATA___V747*/ meltfptr[746], /*quasi.cur.mod.env.cont norm.exp.val : SECFIL_PATH */ /*_._CONTENV___V2*/ meltfptr[1]); @@ -52113,8 +52146,8 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * melthook_HOOK_VALUE_EXPORTER ((melt_ptr_t) ((melt_ptr_t) (MELT_PREDEF (HOOK_VALUE_EXPORTER))), - /*_._VALDATA___V755*/ meltfptr[754], - /*_._VALDATA___V746*/ meltfptr[745], + /*_._VALDATA___V758*/ meltfptr[757], + /*_._VALDATA___V749*/ meltfptr[748], /*quasi.cur.mod.env.cont norm.exp.val : SECFIL_DECLBUF */ /*_._CONTENV___V2*/ meltfptr[1]); @@ -52122,8 +52155,8 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * melthook_HOOK_VALUE_EXPORTER ((melt_ptr_t) ((melt_ptr_t) (MELT_PREDEF (HOOK_VALUE_EXPORTER))), - /*_._VALDATA___V757*/ meltfptr[756], - /*_._VALDATA___V748*/ meltfptr[747], + /*_._VALDATA___V760*/ meltfptr[759], + /*_._VALDATA___V751*/ meltfptr[750], /*quasi.cur.mod.env.cont norm.exp.val : SECFIL_IMPLBUF */ /*_._CONTENV___V2*/ meltfptr[1]); /*epilog */ @@ -52164,1151 +52197,1158 @@ meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 (meltinitial_frame_t * /*internsym:HOOK_FRESH_ENVIRONMENT_REFERENCE_MAKER */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V191*/ meltfptr[190])); + ( /*_._VALDATA___V192*/ meltfptr[191])); /*internsym:BUFFER_LIMIT_CONT */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V193*/ meltfptr[192])); + ( /*_._VALDATA___V194*/ meltfptr[193])); /*internsym:CLASS_REFERENCE */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V195*/ meltfptr[194])); + ( /*_._VALDATA___V196*/ meltfptr[195])); /*internsym:MELT_DEBUG_FUN */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V203*/ meltfptr[202])); + ( /*_._VALDATA___V204*/ meltfptr[203])); /*internsym:DISCR_CONSTANT_INTEGER */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V205*/ meltfptr[204])); + ( /*_._VALDATA___V206*/ meltfptr[205])); /*internsym:REGISTER_OPTION */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V209*/ meltfptr[208])); + ( /*_._VALDATA___V210*/ meltfptr[209])); /*internsym:CODE_BUFFER_LIMIT */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V211*/ meltfptr[210])); + ( /*_._VALDATA___V212*/ meltfptr[211])); /*internsym:CLASS_NORMAL_MODULE_VARIABLE_BINDING */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V217*/ meltfptr[216])); + ( /*_._VALDATA___V218*/ meltfptr[217])); /*internsym:CLASS_ANY_BINDING */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V219*/ meltfptr[218])); + ( /*_._VALDATA___V220*/ meltfptr[219])); /*internsym:CLASS_CLONED_SYMBOL */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V221*/ meltfptr[220])); + ( /*_._VALDATA___V222*/ meltfptr[221])); /*internsym:CLASS_NAMED */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V223*/ meltfptr[222])); + ( /*_._VALDATA___V224*/ meltfptr[223])); /*internsym:ADD2OUT */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V225*/ meltfptr[224])); + ( /*_._VALDATA___V226*/ meltfptr[225])); /*internsym:CLASS_SYMBOL */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V227*/ meltfptr[226])); + ( /*_._VALDATA___V228*/ meltfptr[227])); /*internsym:INSTALL_METHOD */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V231*/ meltfptr[230])); + ( /*_._VALDATA___V232*/ meltfptr[231])); /*internsym:CLASS_ROOT */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V233*/ meltfptr[232])); + ( /*_._VALDATA___V234*/ meltfptr[233])); /*internsym:OUTPUT_C_DECLINIT */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V235*/ meltfptr[234])); + ( /*_._VALDATA___V236*/ meltfptr[235])); /*internsym:CLASS_OBJINITELEM */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V239*/ meltfptr[238])); + ( /*_._VALDATA___V240*/ meltfptr[239])); /*internsym:OUTPUT_C_CODE */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V241*/ meltfptr[240])); + ( /*_._VALDATA___V242*/ meltfptr[241])); /*internsym:OUTPUT_C_INITIAL_FILL */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V245*/ meltfptr[244])); + ( /*_._VALDATA___V246*/ meltfptr[245])); /*internsym:OUTPUT_C_INITIAL_PREDEF */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V249*/ meltfptr[248])); + ( /*_._VALDATA___V250*/ meltfptr[249])); /*internsym:OBPREDEF */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V253*/ meltfptr[252])); + ( /*_._VALDATA___V254*/ meltfptr[253])); /*internsym:CLASS_OBJPREDEF */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V257*/ meltfptr[256])); + ( /*_._VALDATA___V258*/ meltfptr[257])); /*internsym:CLASS_OBJNIL */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V261*/ meltfptr[260])); + ( /*_._VALDATA___V262*/ meltfptr[261])); /*internsym:CLASS_OBJEXPANDPUREVAL */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V271*/ meltfptr[270])); + ( /*_._VALDATA___V272*/ meltfptr[271])); /*internsym:CLASS_OBJVALUE */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V273*/ meltfptr[272])); + ( /*_._VALDATA___V274*/ meltfptr[273])); /*internsym:CLASS_CTYPE */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V275*/ meltfptr[274])); + ( /*_._VALDATA___V276*/ meltfptr[275])); /*internsym:CTYPE_VOID */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V277*/ meltfptr[276])); + ( /*_._VALDATA___V278*/ meltfptr[277])); /*internsym:CLASS_OBJHOOKNTH */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V281*/ meltfptr[280])); + ( /*_._VALDATA___V282*/ meltfptr[281])); /*internsym:CTYPE_VALUE */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V283*/ meltfptr[282])); + ( /*_._VALDATA___V284*/ meltfptr[283])); /*internsym:CLASS_OBJINITOBJECT */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V287*/ meltfptr[286])); + ( /*_._VALDATA___V288*/ meltfptr[287])); /*internsym:CLASS_NREP_DATAINSTANCE */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V291*/ meltfptr[290])); + ( /*_._VALDATA___V292*/ meltfptr[291])); /*internsym:CLASS_CLASS */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V293*/ meltfptr[292])); + ( /*_._VALDATA___V294*/ meltfptr[293])); /*internsym:CLASS_OBJINITUNIQUEOBJECT */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V295*/ meltfptr[294])); + ( /*_._VALDATA___V296*/ meltfptr[295])); /*internsym:CLASS_NREP_NIL */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V299*/ meltfptr[298])); + ( /*_._VALDATA___V300*/ meltfptr[299])); + + +#undef meltfram__ +} /*end of meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 */ - /*internsym:CLASS_OBJINITHOOK */ +void +meltmod__WARMELTmiOUTOBJ__initialmeltchunk_19 (meltinitial_frame_t * + meltmeltframptr__, + char meltpredefinited[]) +{ +#define meltfram__ (*meltmeltframptr__) +#undef meltcallcount +#define meltcallcount 0L + (void) meltpredefinited; +/*internsym:CLASS_OBJINITHOOK*/ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V303*/ meltfptr[302])); + ( /*_._VALDATA___V304*/ meltfptr[303])); /*internsym:CLASS_NREP */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V305*/ meltfptr[304])); + ( /*_._VALDATA___V306*/ meltfptr[305])); /*internsym:CLASS_OBJINITMULTIPLE */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V309*/ meltfptr[308])); + ( /*_._VALDATA___V310*/ meltfptr[309])); /*internsym:CLASS_OBJINITCLOSURE */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V315*/ meltfptr[314])); - - -#undef meltfram__ -} /*end of meltmod__WARMELTmiOUTOBJ__initialmeltchunk_18 */ + ( /*_._VALDATA___V316*/ meltfptr[315])); -void -meltmod__WARMELTmiOUTOBJ__initialmeltchunk_19 (meltinitial_frame_t * - meltmeltframptr__, - char meltpredefinited[]) -{ -#define meltfram__ (*meltmeltframptr__) -#undef meltcallcount -#define meltcallcount 0L - (void) meltpredefinited; -/*internsym:CLASS_OBJINITROUTINE*/ + /*internsym:CLASS_OBJINITROUTINE */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V321*/ meltfptr[320])); + ( /*_._VALDATA___V322*/ meltfptr[321])); /*internsym:CLASS_NREP_DATAROUTINE */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V325*/ meltfptr[324])); + ( /*_._VALDATA___V326*/ meltfptr[325])); /*internsym:CLASS_NREP_ROUTPROC */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V327*/ meltfptr[326])); + ( /*_._VALDATA___V328*/ meltfptr[327])); - /*internsym:CLASS_NREP_HOOKPROC */ + /*internsym:CLASS_NREP_CLOSPROC */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V333*/ meltfptr[332])); + ( /*_._VALDATA___V334*/ meltfptr[333])); /*internsym:CLASS_OBJINITSTRING */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V337*/ meltfptr[336])); + ( /*_._VALDATA___V338*/ meltfptr[337])); /*internsym:CLASS_OBJINITBOXINTEGER */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V343*/ meltfptr[342])); + ( /*_._VALDATA___V344*/ meltfptr[343])); /*internsym:CLASS_OBJINITPAIR */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V349*/ meltfptr[348])); + ( /*_._VALDATA___V350*/ meltfptr[349])); /*internsym:CLASS_OBJINITLIST */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V355*/ meltfptr[354])); + ( /*_._VALDATA___V356*/ meltfptr[355])); /*internsym:DISCR_ANY_RECEIVER */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V361*/ meltfptr[360])); + ( /*_._VALDATA___V362*/ meltfptr[361])); /*internsym:DISCR_NULL_RECEIVER */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V365*/ meltfptr[364])); + ( /*_._VALDATA___V366*/ meltfptr[365])); /*internsym:DISPLAY_DEBUG_MESSAGE */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V369*/ meltfptr[368])); + ( /*_._VALDATA___V370*/ meltfptr[369])); /*internsym:PREVLOC_CONTAINER */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V371*/ meltfptr[370])); + ( /*_._VALDATA___V372*/ meltfptr[371])); /*internsym:PREVIMPLBUF_CONTAINER */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V373*/ meltfptr[372])); + ( /*_._VALDATA___V374*/ meltfptr[373])); /*internsym:DISCR_INTEGER */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V377*/ meltfptr[376])); + ( /*_._VALDATA___V378*/ meltfptr[377])); /*internsym:DISCR_STRING */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V379*/ meltfptr[378])); + ( /*_._VALDATA___V380*/ meltfptr[379])); /*internsym:CLASS_INITIAL_EXTENSION_ROUTINEOBJ */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V384*/ meltfptr[383])); + ( /*_._VALDATA___V385*/ meltfptr[384])); /*internsym:CLASS_INITIALROUTINEOBJ */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V386*/ meltfptr[385])); + ( /*_._VALDATA___V387*/ meltfptr[386])); /*internsym:LIST_EVERY */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V388*/ meltfptr[387])); + ( /*_._VALDATA___V389*/ meltfptr[388])); /*internsym:CLASS_OBJLOCV */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V390*/ meltfptr[389])); + ( /*_._VALDATA___V391*/ meltfptr[390])); /*internsym:CLASS_ROUTINEOBJ */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V395*/ meltfptr[394])); + ( /*_._VALDATA___V396*/ meltfptr[395])); /*internsym:CLASS_PROCROUTINEOBJ */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V397*/ meltfptr[396])); + ( /*_._VALDATA___V398*/ meltfptr[397])); /*internsym:CLASS_HOOKROUTINEOBJ */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V401*/ meltfptr[400])); + ( /*_._VALDATA___V402*/ meltfptr[401])); /*internsym:VARIADIC_INDEX_IDSTR */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V407*/ meltfptr[406])); + ( /*_._VALDATA___V408*/ meltfptr[407])); /*internsym:VARIADIC_LENGTH_IDSTR */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V409*/ meltfptr[408])); + ( /*_._VALDATA___V410*/ meltfptr[409])); /*internsym:CLASS_OBJPUREVALUE */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V411*/ meltfptr[410])); + ( /*_._VALDATA___V412*/ meltfptr[411])); /*internsym:CLASS_INITIAL_MODULE_ROUTINEOBJ */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V422*/ meltfptr[421])); + ( /*_._VALDATA___V423*/ meltfptr[422])); /*internsym:DISCR_LIST */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V424*/ meltfptr[423])); + ( /*_._VALDATA___V425*/ meltfptr[424])); /*internsym:LIST_TO_MULTIPLE */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V426*/ meltfptr[425])); + ( /*_._VALDATA___V427*/ meltfptr[426])); /*internsym:DISCR_MULTIPLE */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V428*/ meltfptr[427])); + ( /*_._VALDATA___V429*/ meltfptr[428])); /*internsym:DISCR_STRBUF */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V430*/ meltfptr[429])); + ( /*_._VALDATA___V431*/ meltfptr[430])); /*internsym:CLASS_OBJINSTR */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V432*/ meltfptr[431])); + ( /*_._VALDATA___V433*/ meltfptr[432])); + + /*internsym:CLASS_NREP_HOOKPROC */ + (void) + melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) + ( /*_._VALDATA___V437*/ meltfptr[436])); /*internsym:CLASS_OBJCFORMAL */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V436*/ meltfptr[435])); + ( /*_._VALDATA___V439*/ meltfptr[438])); /*internsym:CLASS_OBJGETARG */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V445*/ meltfptr[444])); + ( /*_._VALDATA___V448*/ meltfptr[447])); /*internsym:CLASS_FORMAL_BINDING */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V447*/ meltfptr[446])); + ( /*_._VALDATA___V450*/ meltfptr[449])); /*internsym:CLASS_OBJGETARGREST */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V451*/ meltfptr[450])); + ( /*_._VALDATA___V454*/ meltfptr[453])); /*internsym:CLASS_OBJFETCHMODVAR */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V457*/ meltfptr[456])); + ( /*_._VALDATA___V460*/ meltfptr[459])); /*internsym:CLASS_OBJPUTMODVAR */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V461*/ meltfptr[460])); + ( /*_._VALDATA___V464*/ meltfptr[463])); /*internsym:CLASS_OBJPUTOUTARG */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V465*/ meltfptr[464])); + ( /*_._VALDATA___V468*/ meltfptr[467])); /*internsym:CTYPE_LONG */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V469*/ meltfptr[468])); + ( /*_._VALDATA___V472*/ meltfptr[471])); /*internsym:CLASS_OBJCLOCCV */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V473*/ meltfptr[472])); + ( /*_._VALDATA___V476*/ meltfptr[475])); /*internsym:CLASS_OBJCLOHOOKV */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V477*/ meltfptr[476])); + ( /*_._VALDATA___V480*/ meltfptr[479])); /*internsym:CLASS_OBJCONSTV */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V481*/ meltfptr[480])); + ( /*_._VALDATA___V484*/ meltfptr[483])); /*internsym:CLASS_OBJPLAINBLOCK */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V485*/ meltfptr[484])); + ( /*_._VALDATA___V488*/ meltfptr[487])); /*internsym:CLASS_OBJCHECKSIGNAL */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V489*/ meltfptr[488])); + ( /*_._VALDATA___V492*/ meltfptr[491])); /*internsym:CLASS_OBJANYBLOCK */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V493*/ meltfptr[492])); + ( /*_._VALDATA___V496*/ meltfptr[495])); /*internsym:CLASS_OBJFLAG */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V497*/ meltfptr[496])); + ( /*_._VALDATA___V500*/ meltfptr[499])); /*internsym:CLASS_OBJMATCHFLAGBLOCK */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V501*/ meltfptr[500])); + ( /*_._VALDATA___V504*/ meltfptr[503])); /*internsym:CLASS_OBJMULTIALLOCBLOCK */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V505*/ meltfptr[504])); + ( /*_._VALDATA___V508*/ meltfptr[507])); /*internsym:DISCR_VERBATIM_STRING */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V507*/ meltfptr[506])); + ( /*_._VALDATA___V510*/ meltfptr[509])); /*internsym:CLASS_OBJCITERBLOCK */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V511*/ meltfptr[510])); + ( /*_._VALDATA___V514*/ meltfptr[513])); /*internsym:CLASS_CITERATOR */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V513*/ meltfptr[512])); + ( /*_._VALDATA___V516*/ meltfptr[515])); /*internsym:CLASS_OBJCOMMENTINSTR */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V517*/ meltfptr[516])); + ( /*_._VALDATA___V520*/ meltfptr[519])); /*internsym:CLASS_OBJCOMMENTEDBLOCK */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V521*/ meltfptr[520])); + ( /*_._VALDATA___V524*/ meltfptr[523])); /*internsym:LABELCOUNTREF */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V523*/ meltfptr[522])); + ( /*_._VALDATA___V526*/ meltfptr[525])); /*internsym:CLASS_OBJLABELINSTR */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V529*/ meltfptr[528])); + ( /*_._VALDATA___V532*/ meltfptr[531])); /*internsym:SET_CONTENT */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V531*/ meltfptr[530])); + ( /*_._VALDATA___V534*/ meltfptr[533])); /*internsym:STRING4OUT */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V533*/ meltfptr[532])); + ( /*_._VALDATA___V536*/ meltfptr[535])); /*internsym:CLASS_OBJGOTOINSTR */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V537*/ meltfptr[536])); + ( /*_._VALDATA___V540*/ meltfptr[539])); /*internsym:CLASS_OBJLOOP */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V545*/ meltfptr[544])); + ( /*_._VALDATA___V548*/ meltfptr[547])); /*internsym:CLASS_OBJEXIT */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V549*/ meltfptr[548])); + ( /*_._VALDATA___V552*/ meltfptr[551])); /*internsym:CLASS_OBJAGAIN */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V553*/ meltfptr[552])); + ( /*_._VALDATA___V556*/ meltfptr[555])); /*internsym:CLASS_OBJCOMPUTE */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V560*/ meltfptr[559])); + ( /*_._VALDATA___V563*/ meltfptr[562])); /*internsym:MULTIPLE_EVERY */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V562*/ meltfptr[561])); + ( /*_._VALDATA___V565*/ meltfptr[564])); /*internsym:CLASS_OBJCOND */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V566*/ meltfptr[565])); + ( /*_._VALDATA___V569*/ meltfptr[568])); /*internsym:CLASS_OBJCPPIF */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V570*/ meltfptr[569])); + ( /*_._VALDATA___V573*/ meltfptr[572])); /*internsym:CLASS_OBJINTERNSYMBOL */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V574*/ meltfptr[573])); + ( /*_._VALDATA___V577*/ meltfptr[576])); /*internsym:CLASS_NREP_DATASYMBOL */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V576*/ meltfptr[575])); + ( /*_._VALDATA___V579*/ meltfptr[578])); /*internsym:CLASS_OBJINTERNKEYWORD */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V580*/ meltfptr[579])); + ( /*_._VALDATA___V583*/ meltfptr[582])); /*internsym:CLASS_NREP_DATAKEYWORD */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V582*/ meltfptr[581])); + ( /*_._VALDATA___V585*/ meltfptr[584])); /*internsym:CLASS_OBJGETNAMEDSYMBOL */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V586*/ meltfptr[585])); + ( /*_._VALDATA___V589*/ meltfptr[588])); /*internsym:CLASS_OBJGETNAMEDKEYWORD */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V590*/ meltfptr[589])); + ( /*_._VALDATA___V593*/ meltfptr[592])); /*internsym:CLASS_OBJAPPLY */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V596*/ meltfptr[595])); + ( /*_._VALDATA___V599*/ meltfptr[598])); /*internsym:GET_CTYPE */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V598*/ meltfptr[597])); + ( /*_._VALDATA___V601*/ meltfptr[600])); /*internsym:CLASS_OBJMSEND */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V603*/ meltfptr[602])); + ( /*_._VALDATA___V606*/ meltfptr[605])); /*internsym:CLASS_OBJMULTIAPPLY */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V612*/ meltfptr[611])); + ( /*_._VALDATA___V615*/ meltfptr[614])); /*internsym:CLASS_OBJMULTIMSEND */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V621*/ meltfptr[620])); + ( /*_._VALDATA___V624*/ meltfptr[623])); /*internsym:CLASS_OBJCLEAR */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V625*/ meltfptr[624])); + ( /*_._VALDATA___V628*/ meltfptr[627])); /*internsym:CLASS_OBJRAWALLOCOBJ */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V629*/ meltfptr[628])); + ( /*_._VALDATA___V632*/ meltfptr[631])); /*internsym:CLASS_OBJNEWCLOSURE */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V634*/ meltfptr[633])); + ( /*_._VALDATA___V637*/ meltfptr[636])); /*internsym:CLASS_OBJTOUCH */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V638*/ meltfptr[637])); + ( /*_._VALDATA___V641*/ meltfptr[640])); /*internsym:CLASS_OBJDBGTRACEWRITEOBJ */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V642*/ meltfptr[641])); + ( /*_._VALDATA___V645*/ meltfptr[644])); /*internsym:CLASS_OBJPUTUPLE */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V646*/ meltfptr[645])); + ( /*_._VALDATA___V649*/ meltfptr[648])); /*internsym:OBJPUTPAIRHEAD_COUNTER */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V648*/ meltfptr[647])); + ( /*_._VALDATA___V651*/ meltfptr[650])); /*internsym:CLASS_OBJPUTPAIR */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V654*/ meltfptr[653])); + ( /*_._VALDATA___V657*/ meltfptr[656])); /*internsym:CLASS_OBJPUTPAIRHEAD */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V656*/ meltfptr[655])); + ( /*_._VALDATA___V659*/ meltfptr[658])); /*internsym:CLASS_OBJPUTPAIRTAIL */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V660*/ meltfptr[659])); + ( /*_._VALDATA___V663*/ meltfptr[662])); /*internsym:CLASS_OBJPUTLIST */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V664*/ meltfptr[663])); + ( /*_._VALDATA___V667*/ meltfptr[666])); /*internsym:CLASS_OBJGETSLOT */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V669*/ meltfptr[668])); + ( /*_._VALDATA___V672*/ meltfptr[671])); /*internsym:CLASS_FIELD */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V671*/ meltfptr[670])); + ( /*_._VALDATA___V674*/ meltfptr[673])); /*internsym:CLASS_OBJPUTSLOT */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V675*/ meltfptr[674])); + ( /*_._VALDATA___V678*/ meltfptr[677])); /*internsym:CLASS_OBJPUTCLOSUROUT */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V679*/ meltfptr[678])); + ( /*_._VALDATA___V682*/ meltfptr[681])); /*internsym:CLASS_OBJPUTCLOSEDV */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V683*/ meltfptr[682])); + ( /*_._VALDATA___V686*/ meltfptr[685])); /*internsym:CLASS_OBJPUTCLOSEDNOTNULLV */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V687*/ meltfptr[686])); + ( /*_._VALDATA___V690*/ meltfptr[689])); /*internsym:CLASS_OBJPUTROUTCONST */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V691*/ meltfptr[690])); + ( /*_._VALDATA___V694*/ meltfptr[693])); /*internsym:CLASS_OBJPUTROUTCONSTNOTNULL */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V695*/ meltfptr[694])); + ( /*_._VALDATA___V698*/ meltfptr[697])); /*internsym:CLASS_OBJPUTHOOKCONST */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V699*/ meltfptr[698])); + ( /*_._VALDATA___V702*/ meltfptr[701])); /*internsym:CLASS_NREP_BOUND_DATA */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V701*/ meltfptr[700])); + ( /*_._VALDATA___V704*/ meltfptr[703])); /*internsym:CLASS_OBJPUTHOOKDATA */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V705*/ meltfptr[704])); + ( /*_._VALDATA___V708*/ meltfptr[707])); /*internsym:CLASS_OBJPUTXTRARESULT */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V709*/ meltfptr[708])); + ( /*_._VALDATA___V712*/ meltfptr[711])); /*internsym:CLASS_OBJEXPV */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V713*/ meltfptr[712])); + ( /*_._VALDATA___V716*/ meltfptr[715])); /*internsym:CLASS_OBJLOCATEDEXPV */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V717*/ meltfptr[716])); + ( /*_._VALDATA___V720*/ meltfptr[719])); /*internsym:CLASS_OBJFINALRETURN */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V727*/ meltfptr[726])); + ( /*_._VALDATA___V730*/ meltfptr[729])); /*internsym:COMPARE_NAMED_ALPHA */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V731*/ meltfptr[730])); + ( /*_._VALDATA___V734*/ meltfptr[733])); /*internsym:CLASS_ANY_MODULE_CONTEXT */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V735*/ meltfptr[734])); + ( /*_._VALDATA___V738*/ meltfptr[737])); /*internsym:CLASS_SECONDARY_C_FILE */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V737*/ meltfptr[736])); + ( /*_._VALDATA___V740*/ meltfptr[739])); /*internsym:SECFIL_MODNAM */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V751*/ meltfptr[750])); + ( /*_._VALDATA___V754*/ meltfptr[753])); /*internsym:SECFIL_PATH */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V753*/ meltfptr[752])); + ( /*_._VALDATA___V756*/ meltfptr[755])); /*internsym:SECFIL_DECLBUF */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V755*/ meltfptr[754])); + ( /*_._VALDATA___V758*/ meltfptr[757])); /*internsym:SECFIL_IMPLBUF */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V757*/ meltfptr[756])); + ( /*_._VALDATA___V760*/ meltfptr[759])); /*internsym:GENERATED_C_FILENAME */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V759*/ meltfptr[758])); + ( /*_._VALDATA___V762*/ meltfptr[761])); /*internsym:DISCR */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V764*/ meltfptr[763])); + ( /*_._VALDATA___V767*/ meltfptr[766])); /*internsym:BASE */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V767*/ meltfptr[766])); + ( /*_._VALDATA___V770*/ meltfptr[769])); /*internsym:DIR */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V770*/ meltfptr[769])); + ( /*_._VALDATA___V773*/ meltfptr[772])); /*internsym:NUM */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V773*/ meltfptr[772])); + ( /*_._VALDATA___V776*/ meltfptr[775])); /*internsym:CLASS_RUNNING_EXTENSION_MODULE_CONTEXT */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V792*/ meltfptr[791])); + ( /*_._VALDATA___V795*/ meltfptr[794])); /*internsym:SYNTAX_TEST_GENERATOR */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V794*/ meltfptr[793])); + ( /*_._VALDATA___V797*/ meltfptr[796])); /*internsym:CLASS_SELECTOR */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V796*/ meltfptr[795])); + ( /*_._VALDATA___V799*/ meltfptr[798])); /*internsym:RECV */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V798*/ meltfptr[797])); + ( /*_._VALDATA___V801*/ meltfptr[800])); /*internsym:GENDEV */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V801*/ meltfptr[800])); + ( /*_._VALDATA___V804*/ meltfptr[803])); /*internsym:SBUF */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V804*/ meltfptr[803])); + ( /*_._VALDATA___V807*/ meltfptr[806])); /*internsym:MODCTX */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V807*/ meltfptr[806])); + ( /*_._VALDATA___V810*/ meltfptr[809])); /*internsym:IX */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V810*/ meltfptr[809])); + ( /*_._VALDATA___V813*/ meltfptr[812])); /*internsym:CLASS_LOCATED */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V818*/ meltfptr[817])); + ( /*_._VALDATA___V821*/ meltfptr[820])); + + +#undef meltfram__ +} /*end of meltmod__WARMELTmiOUTOBJ__initialmeltchunk_19 */ - /*internsym:CLASS_SOURCE_GENERATOR_DEVICE */ +void +meltmod__WARMELTmiOUTOBJ__initialmeltchunk_20 (meltinitial_frame_t * + meltmeltframptr__, + char meltpredefinited[]) +{ +#define meltfram__ (*meltmeltframptr__) +#undef meltcallcount +#define meltcallcount 0L + (void) meltpredefinited; +/*internsym:CLASS_SOURCE_GENERATOR_DEVICE*/ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V820*/ meltfptr[819])); + ( /*_._VALDATA___V823*/ meltfptr[822])); /*internsym:CLASS_PRIMITIVE */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V828*/ meltfptr[827])); + ( /*_._VALDATA___V831*/ meltfptr[830])); /*internsym:CLASS_SOURCE_DEFPRIMITIVE */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V830*/ meltfptr[829])); + ( /*_._VALDATA___V833*/ meltfptr[832])); /*internsym:DISCR_MAP_OBJECTS */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V832*/ meltfptr[831])); + ( /*_._VALDATA___V835*/ meltfptr[834])); /*internsym:CLASS_SOURCE_DEFCITERATOR */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V836*/ meltfptr[835])); - + ( /*_._VALDATA___V839*/ meltfptr[838])); -#undef meltfram__ -} /*end of meltmod__WARMELTmiOUTOBJ__initialmeltchunk_19 */ - -void -meltmod__WARMELTmiOUTOBJ__initialmeltchunk_20 (meltinitial_frame_t * - meltmeltframptr__, - char meltpredefinited[]) -{ -#define meltfram__ (*meltmeltframptr__) -#undef meltcallcount -#define meltcallcount 0L - (void) meltpredefinited; -/*internsym:CLASS_CMATCHER*/ + /*internsym:CLASS_CMATCHER */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V842*/ meltfptr[841])); + ( /*_._VALDATA___V845*/ meltfptr[844])); /*internsym:CLASS_ANY_MATCHER */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V844*/ meltfptr[843])); + ( /*_._VALDATA___V847*/ meltfptr[846])); /*internsym:CLASS_SOURCE_DEFCMATCHER */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V846*/ meltfptr[845])); + ( /*_._VALDATA___V849*/ meltfptr[848])); /*internsym:CLASS_NORMALIZATION_CONTEXT */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V853*/ meltfptr[852])); + ( /*_._VALDATA___V856*/ meltfptr[855])); /*internsym:CLASS_ENVIRONMENT */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V855*/ meltfptr[854])); + ( /*_._VALDATA___V858*/ meltfptr[857])); /*internsym:CLASS_SOURCE */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V857*/ meltfptr[856])); + ( /*_._VALDATA___V860*/ meltfptr[859])); /*internsym:CLASS_SOURCE_UPDATE_CURRENT_MODULE_ENVIRONMENT_REFERENCE */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V859*/ meltfptr[858])); + ( /*_._VALDATA___V862*/ meltfptr[861])); /*internsym:CLASS_SOURCE_COMMENT */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V861*/ meltfptr[860])); + ( /*_._VALDATA___V864*/ meltfptr[863])); /*internsym:NORMAL_EXP */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V863*/ meltfptr[862])); + ( /*_._VALDATA___V866*/ meltfptr[865])); /*internsym:CLASS_NREP_ANYPROC */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V865*/ meltfptr[864])); + ( /*_._VALDATA___V868*/ meltfptr[867])); /*internsym:WRAP_NORMAL_LET1 */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V867*/ meltfptr[866])); + ( /*_._VALDATA___V870*/ meltfptr[869])); /*internsym:CLASS_NREP_INITPROC */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V869*/ meltfptr[868])); + ( /*_._VALDATA___V872*/ meltfptr[871])); /*internsym:CLASS_NREP_DATAHOOK */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V873*/ meltfptr[872])); + ( /*_._VALDATA___V876*/ meltfptr[875])); /*internsym:COMPILE2OBJ_HOOK */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V881*/ meltfptr[880])); + ( /*_._VALDATA___V884*/ meltfptr[883])); /*internsym:COMPILE2OBJ_PROCEDURE */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V883*/ meltfptr[882])); + ( /*_._VALDATA___V886*/ meltfptr[885])); /*internsym:NORMAL_IMPORT */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V885*/ meltfptr[884])); + ( /*_._VALDATA___V888*/ meltfptr[887])); /*internsym:CLASS_HOOK_DESCRIPTOR */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V887*/ meltfptr[886])); + ( /*_._VALDATA___V890*/ meltfptr[889])); /*internsym:SYMBOL_CNAME */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V889*/ meltfptr[888])); + ( /*_._VALDATA___V892*/ meltfptr[891])); /*internsym:CLASS_SOURCE_CHEADER */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V891*/ meltfptr[890])); + ( /*_._VALDATA___V894*/ meltfptr[893])); /*internsym:CLASS_SOURCE_CODE_STRING */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V893*/ meltfptr[892])); + ( /*_._VALDATA___V896*/ meltfptr[895])); /*internsym:CLASS_SOURCE_CIMPLEMENT */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V895*/ meltfptr[894])); + ( /*_._VALDATA___V898*/ meltfptr[897])); /*internsym:CLASS_MODULE_CONTEXT */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V902*/ meltfptr[901])); + ( /*_._VALDATA___V905*/ meltfptr[904])); /*internsym:DISCR_MAP_STRINGS */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V904*/ meltfptr[903])); + ( /*_._VALDATA___V907*/ meltfptr[906])); /*internsym:CREATE_NORMCONTEXT */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V906*/ meltfptr[905])); + ( /*_._VALDATA___V909*/ meltfptr[908])); /*internsym:INITIAL_ENVIRONMENT */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V908*/ meltfptr[907])); + ( /*_._VALDATA___V911*/ meltfptr[910])); /*internsym:MACROEXPAND_TOPLEVEL_LIST */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V910*/ meltfptr[909])); + ( /*_._VALDATA___V913*/ meltfptr[912])); /*internsym:MACROEXPAND_1 */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V912*/ meltfptr[911])); + ( /*_._VALDATA___V915*/ meltfptr[914])); /*internsym:COMPILE2OBJ_INITPROC */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V914*/ meltfptr[913])); + ( /*_._VALDATA___V917*/ meltfptr[916])); /*internsym:MELT_RUN_EXTENSION */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V916*/ meltfptr[915])); + ( /*_._VALDATA___V919*/ meltfptr[918])); /*internsym:BASENAME */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V921*/ meltfptr[920])); + ( /*_._VALDATA___V924*/ meltfptr[923])); /*internsym:ENV */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V924*/ meltfptr[923])); + ( /*_._VALDATA___V927*/ meltfptr[926])); /*internsym:LITVAL */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V927*/ meltfptr[926])); + ( /*_._VALDATA___V930*/ meltfptr[929])); /*internsym:CLONE_SYMBOL */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V945*/ meltfptr[944])); + ( /*_._VALDATA___V948*/ meltfptr[947])); /*internsym:RETAUTOBOXVAL */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V936*/ meltfptr[935])); + ( /*_._VALDATA___V939*/ meltfptr[938])); /*internsym:CLASS_NORMAL_LET_BINDING */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V947*/ meltfptr[946])); + ( /*_._VALDATA___V950*/ meltfptr[949])); /*internsym:CLASS_NREP_LOCSYMOCC */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V949*/ meltfptr[948])); + ( /*_._VALDATA___V952*/ meltfptr[951])); /*internsym:CLASS_NREP_RETURN */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V951*/ meltfptr[950])); + ( /*_._VALDATA___V954*/ meltfptr[953])); /*internsym:CLASS_NREP_CHUNK */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V953*/ meltfptr[952])); + ( /*_._VALDATA___V956*/ meltfptr[955])); /*internsym:AUTOBOXLONG */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V938*/ meltfptr[937])); + ( /*_._VALDATA___V941*/ meltfptr[940])); /*internsym:CLASS_LET_BINDING */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V955*/ meltfptr[954])); + ( /*_._VALDATA___V958*/ meltfptr[957])); /*internsym:CTYPE_CSTRING */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V957*/ meltfptr[956])); + ( /*_._VALDATA___V960*/ meltfptr[959])); /*internsym:AUTOBOXSTRING */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V940*/ meltfptr[939])); + ( /*_._VALDATA___V943*/ meltfptr[942])); /*internsym:CLASS_CTYPE_GTY */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V959*/ meltfptr[958])); + ( /*_._VALDATA___V962*/ meltfptr[961])); /*internsym:AUTOBOXGTY */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V942*/ meltfptr[941])); + ( /*_._VALDATA___V945*/ meltfptr[944])); /*internkeyw:TRUE */ (void) melthookproc_HOOK_INTERN_KEYWORD ((melt_ptr_t) - ( /*_._VALDATA___V963*/ meltfptr[962])); + ( /*_._VALDATA___V966*/ meltfptr[965])); /*internsym:CREATE_NORMAL_EXTENDING_CONTEXT */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V974*/ meltfptr[973])); + ( /*_._VALDATA___V977*/ meltfptr[976])); /*internsym:CLASS_SEXPR */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V976*/ meltfptr[975])); + ( /*_._VALDATA___V979*/ meltfptr[978])); /*internsym:COMPILE2OBJ_INITEXTENDPROC */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V978*/ meltfptr[977])); + ( /*_._VALDATA___V981*/ meltfptr[980])); /*internsym:CLASS_LITERAL_VALUE */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V980*/ meltfptr[979])); + ( /*_._VALDATA___V983*/ meltfptr[982])); /*internsym:LIST_APPEND2LIST */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V984*/ meltfptr[983])); + ( /*_._VALDATA___V987*/ meltfptr[986])); /*internsym:MULTIPLE_TO_LIST */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V990*/ meltfptr[989])); + ( /*_._VALDATA___V993*/ meltfptr[992])); /*internsym:COMPILE_LIST_SEXPR */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V994*/ meltfptr[993])); + ( /*_._VALDATA___V997*/ meltfptr[996])); /*internsym:EVAL */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V996*/ meltfptr[995])); + ( /*_._VALDATA___V999*/ meltfptr[998])); /*internsym:GENERATE_GPLV3PLUS_COPYRIGHT_NOTICE_C_COMMENT */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V998*/ meltfptr[997])); + ( /*_._VALDATA___V1001*/ + meltfptr[1000])); /*internsym:GET_CODE_BUFFER_LIMIT */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V1000*/ meltfptr[999])); + ( /*_._VALDATA___V1003*/ + meltfptr[1002])); /*internsym:PUT_CODE_BUFFER_LIMIT */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V1002*/ - meltfptr[1001])); + ( /*_._VALDATA___V1005*/ + meltfptr[1004])); /*internsym:TRANSLATE_RUN_MELT_EXPRESSIONS */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V1004*/ - meltfptr[1003])); + ( /*_._VALDATA___V1007*/ + meltfptr[1006])); /*internsym:TRANSLATE_TO_C_MODULE_MELT_SOURCES */ (void) melthookproc_HOOK_INTERN_SYMBOL ((melt_ptr_t) - ( /*_._VALDATA___V1006*/ - meltfptr[1005])); + ( /*_._VALDATA___V1009*/ + meltfptr[1008])); /**COMMENT: set retinit from boxloc **/ ; @@ -53331,20 +53371,20 @@ meltmod__WARMELTmiOUTOBJ__forward_or_mark_module_start_frame (struct struct melt_initial_frame_st *meltframptr_ = (struct melt_initial_frame_st *) fp; melt_assertmsg ("check module frame", - meltframptr_->mcfr_nbvar == /*minihash */ -2938); + meltframptr_->mcfr_nbvar == /*minihash */ -761); if (!marking && melt_is_forwarding) { dbgprintf ("forward_or_mark_module_start_frame_WARMELTmiOUTOBJ forwarding %d pointers in frame %p", - 1108, (void *) meltframptr_); - for (meltix = 0; meltix < 1108; meltix++) + 1111, (void *) meltframptr_); + for (meltix = 0; meltix < 1111; meltix++) MELT_FORWARDED (meltframptr_->mcfr_varptr[meltix]); return; } /*end forwarding */ dbgprintf ("forward_or_mark_module_start_frame_WARMELTmiOUTOBJ marking in frame %p", (void *) meltframptr_); - for (meltix = 0; meltix < 1108; meltix++) + for (meltix = 0; meltix < 1111; meltix++) if (meltframptr_->mcfr_varptr[meltix]) gt_ggc_mx_melt_un (meltframptr_->mcfr_varptr[meltix]); |